/************************************************************************************************/
/* Stata User File for H51G Data                                                                 */
/*                                                                                              */
/* This file contains information and a sample Stata program to create a permanent              */
/* Stata dataset for users who want to use Stata in processing the MEPS data provided           */
/* in this PUF release.  Stata (StataCorp) has the capability to produce                        */
/* appropriate standard errors for estimates from a survey with a complex sample                */
/* design such as the Medical Expenditure Panel Survey (MEPS).                                  */
/* The input file for creating a permanent Stata dataset is the ASCII data file                 */
/* (H51G.DAT) supplied in this PUF release, which in turn can be extracted from the              */
/* .EXE file. After entering the Stata interactive environment access the Stata DO-File         */
/* editor by clicking on the appropriate icon in the command line at the top of the             */
/* screen.  Copy and paste the following Stata commands into the editor and save as a           */
/* DO file.  A DO file is a Stata program which may then be executed using the DO command.      */
/* For example, if the DO file is named H51G.DO and is located in the directory                  */
/* C:\MEPS\PROG, then the file may be executed by typing the following command into             */
/* the Stata command line:                                                                      */
/*                         do C:\MEPS\PROG\H51G.DO                                               */
/* The program below will output the Stata dataset H51G.DTA                                      */
/************************************************************************************************/


#delimit ;
cd C:\MEPS\DATA;
log using H51G.log, replace;
clear;

* INPUT ALL VARIABLES;
infix
  long   DUID 1-5
  int    PID 6-8
  str    DUPERSID 9-16
  str    EVNTIDX 17-28
  byte   EVENTRN 29-29
  str    FFEEIDX 30-41
  byte   MPCELIG 42-42
  byte   MPCDATA 43-43
  int    OBDATEYR 44-47
  byte   OBDATEMM 48-49
  byte   OBDATEDD 50-51
  byte   SEETLKPV 52-53
  byte   REFERDBY 54-55
  byte   SEEDOC 56-57
  byte   MEDPTYPE 58-59
  byte   TIMESPNT 60-61
  byte   DOCATLOC 62-63
  byte   VSTCTGRY 64-65
  byte   VSTRELCN 66-67
  byte   PHYSTH 68-69
  byte   OCCUPTH 70-71
  byte   SPEECHTH 72-73
  byte   CHEMOTH 74-75
  byte   RADIATTH 76-77
  byte   KIDNEYD 78-79
  byte   IVTHER 80-81
  byte   DRUGTRT 82-83
  byte   RCVSHOT 84-85
  byte   PSYCHOTH 86-87
  byte   LABTEST 88-89
  byte   SONOGRAM 90-91
  byte   XRAYS 92-93
  byte   MAMMOG 94-95
  byte   MRI 96-97
  byte   EKG 98-99
  byte   EEG 100-101
  byte   RCVVAC 102-103
  byte   ANESTH 104-105
  byte   OTHSVCE 106-107
  byte   SURGPROC 108-109
  byte   SURGNAME 110-111
  byte   MEDPRESC 112-113
  byte   VAPLACE 114-114
  str    OBICD1X 115-117
  str    OBICD2X 118-120
  str    OBICD3X 121-123
  str    OBICD4X 124-126
  str    OBPRO1X 127-128
  str    OBCCC1X 129-131
  str    OBCCC2X 132-134
  str    OBCCC3X 135-137
  str    OBCCC4X 138-140
  byte   FFOBTYPE 141-142
  byte   FFBEF00 143-144
  byte   FFTOT01 145-146
  double OBSF00X 147-153
  double OBMR00X 154-160
  double OBMD00X 161-167
  double OBPV00X 168-175
  double OBVA00X 176-182
  double OBTR00X 183-189
  double OBOF00X 190-196
  double OBSL00X 197-203
  double OBWC00X 204-210
  double OBOR00X 211-217
  double OBOU00X 218-224
  double OBOT00X 225-232
  double OBXP00X 233-240
  double OBTC00X 241-248
  byte   IMPFLAG 249-249
  double PERWT00F 250-261
  byte   VARSTR00 262-263
  byte   VARPSU00 264-265
using H51G.dat;

*DEFINE VARIABLE LABELS;
label variable DUID "DWELLING UNIT ID";
label variable PID "PERSON NUMBER";
label variable DUPERSID "PERSON ID (DUID + PID)";
label variable EVNTIDX "EVENT ID";
label variable EVENTRN "EVENT ROUND NUMBER";
label variable FFEEIDX "FLAT FEE ID";
label variable MPCELIG "MPC ELIGIBILITY FLAG";
label variable MPCDATA "MPC DATA FLAG";
label variable OBDATEYR "EVENT DATE - YEAR";
label variable OBDATEMM "EVENT DATE - MONTH";
label variable OBDATEDD "EVENT DATE - DAY";
label variable SEETLKPV "DID P VISIT PROV IN PERSON OR TELEPHONE";
label variable REFERDBY "THIS VISIT REFERRED BY ANOTHER PHYSICIAN";
label variable SEEDOC "DID P TALK TO MD THIS VISIT/PHONE CALL";
label variable MEDPTYPE "TYPE OF MED PERSON P TALKED TO ON VST DT";
label variable TIMESPNT "TIME P SPENT WITH DOCTOR/MEDICAL PERSON";
label variable DOCATLOC "ANY MD WORK AT LOCATION WHERE P SAW PROV";
label variable VSTCTGRY "BEST CATEGORY FOR CARE P RECV ON VST DT";
label variable VSTRELCN "THIS VST/PHONE CALL RELATED TO SPEC COND";
label variable PHYSTH "THIS VISIT DID P HAVE PHYSICAL THERAPY";
label variable OCCUPTH "THIS VIS DID P HAVE OCCUPATIONAL THERAPY";
label variable SPEECHTH "THIS VISIT DID P HAVE SPEECH THERAPY";
label variable CHEMOTH "THIS VISIT DID P HAVE CHEMOTHERAPY";
label variable RADIATTH "THIS VISIT DID P HAVE RADIATION THERAPY";
label variable KIDNEYD "THIS VISIT DID P HAVE KIDNEY DIALYSIS";
label variable IVTHER "THIS VISIT DID P HAVE IV THERAPY";
label variable DRUGTRT "THIS VIS DID P HAVE TRT FOR DRUG/ALCOHOL";
label variable RCVSHOT "THIS VISIT DID P RECEIVE AN ALLERGY SHOT";
label variable PSYCHOTH "DID P HAVE PSYCHOTHERAPY/COUNSELING";
label variable LABTEST "THIS VISIT DID P HAVE LAB TESTS";
label variable SONOGRAM "THIS VISIT DID P HAVE SONOGRAM OR ULTRSD";
label variable XRAYS "THIS VISIT DID P HAVE X-RAYS";
label variable MAMMOG "THIS VISIT DID P HAVE A MAMMOGRAM";
label variable MRI "THIS VISIT DID P HAVE AN MRI/CATSCAN";
label variable EKG "THIS VISIT DID P HAVE AN EKG OR ECG";
label variable EEG "THIS VISIT DID P HAVE AN EEG";
label variable RCVVAC "THIS VISIT DID P RECEIVE A VACCINATION";
label variable ANESTH "THIS VISIT DID P RECEIVE ANESTHESIA";
label variable OTHSVCE "THIS VISIT DID P HAVE OTH DIAG TEST/EXAM";
label variable SURGPROC "WAS SURG PROC PERFORMED ON P THIS VISIT";
label variable SURGNAME "SURGICAL PROCEDURE NAME IN CATEGORIES";
label variable MEDPRESC "ANY MEDICINE PRESCRIBED FOR P THIS VISIT";
label variable VAPLACE "VA FACILITY FLAG";
label variable OBICD1X "3-DIGIT ICD-9 CONDITION CODE";
label variable OBICD2X "3-DIGIT ICD-9 CONDITION CODE";
label variable OBICD3X "3-DIGIT ICD-9 CONDITION CODE";
label variable OBICD4X "3-DIGIT ICD-9 CONDITION CODE";
label variable OBPRO1X "2-DIGIT ICD-9 PROCEDURE CODE";
label variable OBCCC1X "MODIFIED CLINICAL CLASSIFICATION CODE";
label variable OBCCC2X "MODIFIED CLINICAL CLASSIFICATION CODE";
label variable OBCCC3X "MODIFIED CLINICAL CLASSIFICATION CODE";
label variable OBCCC4X "MODIFIED CLINICAL CLASSIFICATION CODE";
label variable FFOBTYPE "FLAT FEE BUNDLE";
label variable FFBEF00 "TOTAL # OF VISITS IN FF BEFORE 2000";
label variable FFTOT01 "TOTAL # OF VISITS IN FF AFTER 2000";
label variable OBSF00X "AMOUNT PAID, FAMILY (IMPUTED)";
label variable OBMR00X "AMOUNT PAID, MEDICARE (IMPUTED)";
label variable OBMD00X "AMOUNT PAID, MEDICAID (IMPUTED)";
label variable OBPV00X "AMOUNT PAID, PRIVATE INSURANCE (IMPUTED)";
label variable OBVA00X "AMOUNT PAID, VETERANS (IMPUTED)";
label variable OBTR00X "AMOUNT PAID, TRICARE (IMPUTED)";
label variable OBOF00X "AMOUNT PAID, OTHER FEDERAL (IMPUTED)";
label variable OBSL00X "AMOUNT PAID, STATE & LOCAL GOV (IMPUTED)";
label variable OBWC00X "AMOUNT PAID, WORKERS COMP (IMPUTED)";
label variable OBOR00X "AMOUNT PAID, OTHER PRIVATE (IMPUTED)";
label variable OBOU00X "AMOUNT PAID, OTHER PUBLIC (IMPUTED)";
label variable OBOT00X "AMOUNT PAID, OTHER INSURANCE (IMPUTED)";
label variable OBXP00X "SUM OF OBSF00X - OBOT00X (IMPUTED)";
label variable OBTC00X "HHLD REPORTED TOTAL CHARGE (IMPUTED)";
label variable IMPFLAG "IMPUTATION STATUS";
label variable PERWT00F "FINAL PERSON LEVEL WEIGHT, 2000";
label variable VARSTR00 "VARIANCE ESTIMATION STRATUM, 2000";
label variable VARPSU00 "VARIANCE ESTIMATION PSU, 2000";


*DEFINE VALUE LABELS FOR REPORTS;
label define H51G0001X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 YES"
         2 "2 NO"
         95 "95 NO SERVICES RECEIVED" ;

label define H51G0002X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 YES"
         2 "2 NO"
         95 "95 NO TREATMENT RECEIVED" ;

label define H51G0003X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 YES"
         2 "2 NO" ;

label define H51G0004X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 YES"
         2 "2 NO"
         95 "95 NO TREATMENT RECEIVED" ;

label define H51G0005X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 YES"
         2 "2 NO"
         95 "95 NO SERVICES RECEIVED" ;

label define H51G0006X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 YES"
         2 "2 NO"
         95 "95 NO SERVICES RECEIVED" ;

label define H51G0007X
         1 "ROUND 1"
         2 "ROUND 2"
         3 "ROUND 3"
         4 "ROUND 4"
         5 "ROUND 5" ;

label define H51G0008X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         0 "0" ;

label define H51G0009X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 FLAT FEE STEM"
         2 "2 FLAT FEE LEAF" ;

label define H51G0010X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         0 "0" ;

label define H51G0011X
         -1 "-1 INAPPLICABLE"
         0 "0 NOT ELIGIBLE FOR IMPUTATION"
         1 "1 COMPLETE HC DATA"
         2 "2 COMPLETE MPC DATA"
         3 "3 FULLY IMPUTED"
         4 "4 PARTIALLY IMPUTED"
         5 "5 CAPITATION IMPUTATION" ;

label define H51G0012X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 YES"
         2 "2 NO"
         95 "95 NO TREATMENT RECEIVED" ;

label define H51G0013X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 YES"
         2 "2 NO"
         95 "95 NO TREATMENT RECEIVED" ;

label define H51G0014X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 YES"
         2 "2 NO"
         95 "95 NO SERVICES RECEIVED" ;

label define H51G0015X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 YES"
         2 "2 NO"
         95 "95 NO SERVICES RECEIVED" ;

label define H51G0016X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 YES"
         2 "2 NO" ;

label define H51G0017X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 CHIROPRACTOR"
         10 "10 PSYCHOLOGIST"
         11 "11 SOCIAL WORKER"
         12 "12 TECHNICIAN"
         13 "13 RECEPTIONIST/CLERK/SECRETARY"
         2 "2 DENTIST/DENTAL CARE PERSON"
         3 "3 MIDWIFE"
         4 "4 NURSE/NURSE PRACTITIONER"
         5 "5 OPTOMETRIST"
         6 "6 PODIATRIST"
         7 "7 PHYSICIAN'S ASSISTANT"
         8 "8 PHYSICAL THERAPIST"
         9 "9 OCCUPATIONAL THERAPIST"
         91 "91 OTHER" ;

label define H51G0018X
         1 "1 HAS MPC DATA"
         2 "2 NO MPC DATA" ;

label define H51G0019X
         1 "1 MPC ELIGIBLE"
         2 "2 NOT MPC ELIGIBLE" ;

label define H51G0020X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 YES"
         2 "2 NO"
         95 "95 NO SERVICES RECEIVED" ;

label define H51G0021X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED" ;

label define H51G0022X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED" ;

label define H51G0023X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         2000 "2000" ;

label define H51G0024X
         -1 "-1 INAPPLICABLE"
         -9 "-9 NOT ASCERTAINED"
         0 "0" ;

label define H51G0025X
         -1 "-1 INAPPLICABLE"
         -9 "-9 NOT ASCERTAINED"
         0 "0" ;

label define H51G0026X
         -1 "-1 INAPPLICABLE"
         -9 "-9 NOT ASCERTAINED"
         0 "0" ;

label define H51G0027X
         -1 "-1 INAPPLICABLE"
         -9 "-9 NOT ASCERTAINED"
         0 "0" ;

label define H51G0028X
         -1 "-1 INAPPLICABLE"
         -9 "-9 NOT ASCERTAINED"
         0 "0" ;

label define H51G0029X
         -1 "-1 INAPPLICABLE"
         -9 "-9 NOT ASCERTAINED"
         0 "0" ;

label define H51G0030X
         -1 "-1 INAPPLICABLE"
         -9 "-9 NOT ASCERTAINED"
         0 "0" ;

label define H51G0031X
         -1 "-1 INAPPLICABLE"
         -9 "-9 NOT ASCERTAINED"
         0 "0" ;

label define H51G0032X
         -1 "-1 INAPPLICABLE"
         -9 "-9 NOT ASCERTAINED"
         0 "0" ;

label define H51G0033X
         -1 "-1 INAPPLICABLE"
         -9 "-9 NOT ASCERTAINED"
         0 "0" ;

label define H51G0034X
         -1 "-1 INAPPLICABLE"
         -9 "-9 NOT ASCERTAINED"
         0 "0" ;

label define H51G0035X
         -1 "-1 INAPPLICABLE"
         -9 "-9 NOT ASCERTAINED"
         0 "0" ;

label define H51G0036X
         -1 "-1 INAPPLICABLE"
         -9 "-9 NOT ASCERTAINED"
         0 "0" ;

label define H51G0037X
         -1 "-1 INAPPLICABLE"
         -9 "-9 NOT ASCERTAINED"
         0 "0" ;

label define H51G0038X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 YES"
         2 "2 NO"
         95 "95 NO TREATMENT RECEIVED" ;

label define H51G0039X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 YES"
         2 "2 NO"
         95 "95 NO SERVICES RECEIVED" ;

label define H51G0040X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 YES"
         2 "2 NO"
         95 "95 NO TREATMENT RECEIVED" ;

label define H51G0041X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 YES"
         2 "2 NO"
         95 "95 NO TREATMENT RECEIVED" ;

label define H51G0042X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 YES"
         2 "2 NO"
         95 "95 NO TREATMENT RECEIVED" ;

label define H51G0043X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 YES"
         2 "2 NO"
         95 "95 NO TREATMENT RECEIVED" ;

label define H51G0044X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 YES"
         2 "2 NO"
         95 "95 NO SERVICES RECEIVED" ;

label define H51G0045X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 YES"
         2 "2 NO" ;

label define H51G0046X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 YES"
         2 "2 NO" ;

label define H51G0047X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 SAW PROVIDER"
         2 "2 TELEPHONE CALL" ;

label define H51G0048X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 YES"
         2 "2 NO"
         95 "95 NO SERVICES RECEIVED" ;

label define H51G0049X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 YES"
         2 "2 NO"
         95 "95 NO TREATMENT RECEIVED" ;

label define H51G0050X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 ARTHROSCOPIC SURGERY"
         2 "2 CLEANING/TREATM WOUND, INFECTION"
         3 "3 REMOVAL OF DISEASED TISSUE (EXCISION)"
         4 "4 STITCHES (WOUND SUTURE)"
         5 "5 EAR TUBES (TYMPANOSTOMY TUBES)"
         91 "91 OTHER SURGICAL PROCEDURE" ;

label define H51G0051X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 YES"
         2 "2 NO" ;

label define H51G0052X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 5 MINUTES OR LESS"
         2 "2 6-10 MINUTES"
         3 "3 11-15 MINUTES"
         4 "4 16-25 MINUTES"
         5 "5 26-40 MINUTES"
         6 "6 41 MINUTES OR MORE" ;

label define H51G0053X
         -1 "-1 INAPPLICABLE"
         0 "0 NO"
         1 "1 YES" ;

label define H51G0054X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 GENERAL CHECKUP"
         2 "2 DIAGNOSIS OR TREATMENT"
         3 "3 EMERGENCY (E.G., ACCIDENT OR INJURY)"
         4 "4 PSYCHOTHERAPY/MENTAL HEALTH COUNSELING"
         5 "5 FOLLOW-UP OR POST-OPERATIVE VISIT"
         6 "6 IMMUNIZATIONS OR SHOTS"
         7 "7 VISION EXAM"
         8 "8 MATERNITY CARE (PRE/POSTNATAL)"
         9 "9 WELL CHILD EXAM"
         91 "91 OTHER" ;

label define H51G0055X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 YES"
         2 "2 NO" ;

label define H51G0056X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 YES"
         2 "2 NO"
         95 "95 NO SERVICES RECEIVED" ;

* ASSOCIATE VARIABLES WITH VALUE LABEL DEFINITIONS;
label value ANESTH H51G0001X;
label value CHEMOTH H51G0002X;
label value DOCATLOC H51G0003X;
label value DRUGTRT H51G0004X;
label value EEG H51G0005X;
label value EKG H51G0006X;
label value EVENTRN H51G0007X;
label value FFBEF00 H51G0008X;
label value FFOBTYPE H51G0009X;
label value FFTOT01 H51G0010X;
label value IMPFLAG H51G0011X;
label value IVTHER H51G0012X;
label value KIDNEYD H51G0013X;
label value LABTEST H51G0014X;
label value MAMMOG H51G0015X;
label value MEDPRESC H51G0016X;
label value MEDPTYPE H51G0017X;
label value MPCDATA H51G0018X;
label value MPCELIG H51G0019X;
label value MRI H51G0020X;
label value OBDATEDD H51G0021X;
label value OBDATEMM H51G0022X;
label value OBDATEYR H51G0023X;
label value OBMD00X H51G0024X;
label value OBMR00X H51G0025X;
label value OBOF00X H51G0026X;
label value OBOR00X H51G0027X;
label value OBOT00X H51G0028X;
label value OBOU00X H51G0029X;
label value OBPV00X H51G0030X;
label value OBSF00X H51G0031X;
label value OBSL00X H51G0032X;
label value OBTC00X H51G0033X;
label value OBTR00X H51G0034X;
label value OBVA00X H51G0035X;
label value OBWC00X H51G0036X;
label value OBXP00X H51G0037X;
label value OCCUPTH H51G0038X;
label value OTHSVCE H51G0039X;
label value PHYSTH H51G0040X;
label value PSYCHOTH H51G0041X;
label value RADIATTH H51G0042X;
label value RCVSHOT H51G0043X;
label value RCVVAC H51G0044X;
label value REFERDBY H51G0045X;
label value SEEDOC H51G0046X;
label value SEETLKPV H51G0047X;
label value SONOGRAM H51G0048X;
label value SPEECHTH H51G0049X;
label value SURGNAME H51G0050X;
label value SURGPROC H51G0051X;
label value TIMESPNT H51G0052X;
label value VAPLACE H51G0053X;
label value VSTCTGRY H51G0054X;
label value VSTRELCN H51G0055X;
label value XRAYS H51G0056X;

*DISPLAY A DESCRIPTION OF STATA FILE;
describe;

*LIST FIRST 20 OBSERVATIONS IN THE FILE;
list in 1/20;

save H51G, replace;

#delimit cr

* data file is stored in H51G.dta
* log  file is stored in H51G.log

log close

/************************************************************************************************
 NOTES:                                                                                          
                                                                                                 
 1. This program has been tested on Stata Version 10 (for Windows).                              
                                                                                                 
 2. This program will create a permanent Stata dataset.  All additional analyses                 
    can be run using this dataset.  In addition to the dataset, this program creates             
    a log file named H51G.LOG and a data file named H51G.DTA.  If these files (H51G.DTA and H51G.LOG)
    already exist in the working directory, they will be replaced when this program is executed. 
                                                                                                 
 3. If the program ends prematurely, the log file will remain open.  Before running this         
    program again, the user should enter the following Stata command: log close                  
                                                                                                 
 4. The cd command assigns C:\MEPS\DATA as the working directory and location of the input       
    ASCII and output .DTA and .LOG files and can be modified by the user as necessary.           
                                                                                                 
 5. Stata commands end with a carriage return by default. The command                            
    #delimit ;                                                                                   
    temporarily changes the command ending delimiter from a carriage return to a semicolon.      
                                                                                                 
 6. The infix command assumes that the input variables are numeric unless the variable name      
    is prefaced by str.  For example, DUPERSID is the a string (or character) variable.          
                                                                                                 
************************************************************************************************/