/************************************************************************************************/
/* Stata User File for H33G 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                 */
/* (H33G.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 H33G.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\H33G.DO                                               */
/* The program below will output the Stata dataset H33G.DTA                                      */
/************************************************************************************************/


#delimit ;
cd C:\MEPS\DATA;
log using H33G.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
  byte   OBR2FLAG 30-31
  str    FFEEIDX 32-43
  byte   MPCELIG 44-44
  byte   MPCDATA 45-45
  int    OBDATEYR 46-49
  byte   OBDATEMM 50-51
  byte   OBDATEDD 52-53
  byte   SEETLKPV 54-55
  byte   REFERDBY 56-57
  byte   SEEDOC 58-59
  byte   MEDPTYPE 60-61
  byte   TIMESPNT 62-63
  byte   DOCATLOC 64-65
  byte   VSTCTGRY 66-67
  byte   VSTRELCN 68-69
  byte   PHYSTH 70-71
  byte   OCCUPTH 72-73
  byte   SPEECHTH 74-75
  byte   CHEMOTH 76-77
  byte   RADIATTH 78-79
  byte   KIDNEYD 80-81
  byte   IVTHER 82-83
  byte   DRUGTRT 84-85
  byte   RCVSHOT 86-87
  byte   PSYCHOTH 88-89
  byte   LABTEST 90-91
  byte   SONOGRAM 92-93
  byte   XRAYS 94-95
  byte   MAMMOG 96-97
  byte   MRI 98-99
  byte   EKG 100-101
  byte   EEG 102-103
  byte   RCVVAC 104-105
  byte   ANESTH 106-107
  byte   OTHSVCE 108-109
  byte   SURGPROC 110-111
  byte   SURGNAME 112-113
  byte   MEDPRESC 114-115
  byte   VAPLACE 116-116
  str    OBICD1X 117-119
  str    OBICD2X 120-122
  str    OBICD3X 123-125
  str    OBICD4X 126-128
  str    OBPRO1X 129-130
  str    OBCCC1X 131-133
  str    OBCCC2X 134-136
  str    OBCCC3X 137-139
  str    OBCCC4X 140-142
  byte   FFOBTYPE 143-144
  byte   FFBEF99 145-146
  byte   FFTOT00 147-148
  double OBSF99X 149-155
  double OBMR99X 156-163
  double OBMD99X 164-170
  double OBPV99X 171-178
  double OBVA99X 179-185
  double OBCH99X 186-192
  double OBOF99X 193-199
  double OBSL99X 200-206
  double OBWC99X 207-214
  double OBOR99X 215-221
  double OBOU99X 222-228
  double OBOT99X 229-235
  double OBXP99X 236-243
  double OBTC99X 244-252
  byte   IMPFLAG 253-253
  double PERWT99F 254-265
  byte   VARPSU99 266-267
  int    VARSTR99 268-270
using H33G.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 OBR2FLAG "FLAG FOR PANEL 3 R2 EVENT IN 1999";
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 "REFERRED BY ANOTHER PHYSICIAN";
label variable SEEDOC "TALK TO MD THIS VISIT/PHONE CALL";
label variable MEDPTYPE "TYPE OF MED PERSON P TALKED TO ON VST DT";
label variable TIMESPNT "TIME 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 HAVE ON VST DT";
label variable VSTRELCN "VISIT/PHONE CALL RELATED TO CONDITION";
label variable PHYSTH "THIS VISIT DID P HAVE PHYSICAL THERAPY";
label variable OCCUPTH "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 "TREATMENT FOR DRUG OR ALCOHOL";
label variable RCVSHOT "THIS VISIT DID P RECEIVE ALLERGY SHOT";
label variable PSYCHOTH "DID P HAVE PSYCHOTHERAPY/COUNSELING";
label variable LABTEST "THIS VISIST DID P HAVE LAB TEST";
label variable SONOGRAM "DID P HAVE SONOGRAM OR ULTRASOUND";
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 A EEG";
label variable RCVVAC "THIS VISIT DID P RECEIVE VACCINATION";
label variable ANESTH "THIS VISIT DID P RECEIVE ANESTHESIA";
label variable OTHSVCE "OTHER DIAGNOSTIC TESTS/EXAMS";
label variable SURGPROC "WAS SURGICAL PROCEDURE PERFORMED ON P";
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 FFBEF99 "TOTAL # OF VISITS IN FF BEFORE 1999";
label variable FFTOT00 "TOTAL # OF VISITS IN FF AFTER 1999";
label variable OBSF99X "AMOUNT PAID, FAMILY (IMPUTED)";
label variable OBMR99X "AMOUNT PAID, MEDICARE (IMPUTED)";
label variable OBMD99X "AMOUNT PAID, MEDICAID (IMPUTED)";
label variable OBPV99X "AMOUNT PAID, PRIVATE INSURANCE (IMPUTED)";
label variable OBVA99X "AMOUNT PAID, VETERANS (IMPUTED)";
label variable OBCH99X "AMOUNT PAID, CHAMPUS/CHAMPVA (IMPUTED)";
label variable OBOF99X "AMOUNT PAID, OTHER FEDERAL (IMPUTED)";
label variable OBSL99X "AMOUNT PAID, STATE & LOCAL GOV (IMPUTED)";
label variable OBWC99X "AMOUNT PAID, WORKERS COMP (IMPUTED)";
label variable OBOR99X "AMOUNT PAID, OTHER PRIVATE (IMPUTED)";
label variable OBOU99X "AMOUNT PAID, OTHER PUBLIC (IMPUTED)";
label variable OBOT99X "AMOUNT PAID, OTHER INSURANCE";
label variable OBXP99X "SUM OF OBSF99X-OBOT99X";
label variable OBTC99X "HHLD REPORTED TOTAL CHARGE (IMPUTED)";
label variable IMPFLAG "IMPUTATION STATUS";
label variable PERWT99F "FINAL PERSON LEVEL WEIGHT, 1999";
label variable VARPSU99 "VARIANCE ESTIMATION PSU, 1999";
label variable VARSTR99 "VARIANCE ESTIMATION STRATUM, 1999";


*DEFINE VALUE LABELS FOR REPORTS;
label define H33G0001X
         -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 H33G0002X
         -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 H33G0003X
         -1 "-1 INAPPLICABLE"
         -2 "-2 DETERMINED IN PREVIOUS ROUND"
         -3 "-3 NO DATA IN ROUND"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         0 "0 NO"
         1 "1 YES"
         2 "2 NO" ;

label define H33G0004X
         -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 H33G0005X
         -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 H33G0006X
         -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 H33G0007X
         1 "1"
         2 "2"
         3 "3"
         4 "4"
         5 "5" ;

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

label define H33G0009X
         -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 H33G0010X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         0 "0" ;

label define H33G0011X
         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 H33G0012X
         -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 H33G0013X
         -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 H33G0014X
         -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 H33G0015X
         -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 H33G0016X
         -1 "-1 INAPPLICABLE"
         -2 "-2 DETERMINED IN PREVIOUS ROUND"
         -3 "-3 NO DATA IN ROUND"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         0 "0 NO"
         1 "1 YES"
         2 "2 NO" ;

label define H33G0017X
         -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 H33G0018X
         1 "1 HAS MPC DATA"
         2 "2 NO MPC DATA" ;

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

label define H33G0020X
         -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 H33G0021X
         -9 "-9 NOT ASCERTAINED"
         0 "0" ;

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

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

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

label define H33G0025X
         -9 "-9 NOT ASCERTAINED"
         0 "0" ;

label define H33G0026X
         -9 "-9 NOT ASCERTAINED"
         0 "0" ;

label define H33G0027X
         -9 "-9 NOT ASCERTAINED"
         0 "0" ;

label define H33G0028X
         -9 "-9 NOT ASCERTAINED"
         0 "0" ;

label define H33G0029X
         -9 "-9 NOT ASCERTAINED"
         0 "0" ;

label define H33G0030X
         -9 "-9 NOT ASCERTAINED"
         0 "0" ;

label define H33G0031X
         -9 "-9 NOT ASCERTAINED"
         0 "0" ;

label define H33G0032X
         -1 "-1 NO R2 CROSSOVER PROBLEM"
         1 "1 PANEL 3 R2 EVENT IN 1999" ;

label define H33G0033X
         -9 "-9 NOT ASCERTAINED"
         0 "0" ;

label define H33G0034X
         -9 "-9 NOT ASCERTAINED"
         0 "0" ;

label define H33G0035X
         -9 "-9 NOT ASCERTAINED"
         0 "0" ;

label define H33G0036X
         -9 "-9 NOT ASCERTAINED"
         0 "0" ;

label define H33G0037X
         -9 "-9 NOT ASCERTAINED"
         0 "0" ;

label define H33G0038X
         -9 "-9 NOT ASCERTAINED"
         0 "0" ;

label define H33G0039X
         -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 H33G0040X
         -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 H33G0041X
         -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 H33G0042X
         -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 H33G0043X
         -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 H33G0044X
         -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 H33G0045X
         -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 H33G0046X
         -1 "-1 INAPPLICABLE"
         -2 "-2 DETERMINED IN PREVIOUS ROUND"
         -3 "-3 NO DATA IN ROUND"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         0 "0 NO"
         1 "1 YES"
         2 "2 NO" ;

label define H33G0047X
         -1 "-1 INAPPLICABLE"
         -2 "-2 DETERMINED IN PREVIOUS ROUND"
         -3 "-3 NO DATA IN ROUND"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         0 "0 NO"
         1 "1 YES"
         2 "2 NO" ;

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

label define H33G0049X
         -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 H33G0050X
         -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 H33G0051X
         -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 H33G0052X
         -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 H33G0053X
         -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 H33G0054X
         -1 "-1 INAPPLICABLE"
         -2 "-2 DETERMINED IN PREVIOUS ROUND"
         -3 "-3 NO DATA IN ROUND"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         0 "0 NO"
         1 "1 YES"
         2 "2 NO" ;

label define H33G0055X
         -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 OR 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 H33G0056X
         -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 H33G0057X
         -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 H33G0001X;
label value CHEMOTH H33G0002X;
label value DOCATLOC H33G0003X;
label value DRUGTRT H33G0004X;
label value EEG H33G0005X;
label value EKG H33G0006X;
label value EVENTRN H33G0007X;
label value FFBEF99 H33G0008X;
label value FFOBTYPE H33G0009X;
label value FFTOT00 H33G0010X;
label value IMPFLAG H33G0011X;
label value IVTHER H33G0012X;
label value KIDNEYD H33G0013X;
label value LABTEST H33G0014X;
label value MAMMOG H33G0015X;
label value MEDPRESC H33G0016X;
label value MEDPTYPE H33G0017X;
label value MPCDATA H33G0018X;
label value MPCELIG H33G0019X;
label value MRI H33G0020X;
label value OBCH99X H33G0021X;
label value OBDATEDD H33G0022X;
label value OBDATEMM H33G0023X;
label value OBDATEYR H33G0024X;
label value OBMD99X H33G0025X;
label value OBMR99X H33G0026X;
label value OBOF99X H33G0027X;
label value OBOR99X H33G0028X;
label value OBOT99X H33G0029X;
label value OBOU99X H33G0030X;
label value OBPV99X H33G0031X;
label value OBR2FLAG H33G0032X;
label value OBSF99X H33G0033X;
label value OBSL99X H33G0034X;
label value OBTC99X H33G0035X;
label value OBVA99X H33G0036X;
label value OBWC99X H33G0037X;
label value OBXP99X H33G0038X;
label value OCCUPTH H33G0039X;
label value OTHSVCE H33G0040X;
label value PHYSTH H33G0041X;
label value PSYCHOTH H33G0042X;
label value RADIATTH H33G0043X;
label value RCVSHOT H33G0044X;
label value RCVVAC H33G0045X;
label value REFERDBY H33G0046X;
label value SEEDOC H33G0047X;
label value SEETLKPV H33G0048X;
label value SONOGRAM H33G0049X;
label value SPEECHTH H33G0050X;
label value SURGNAME H33G0051X;
label value SURGPROC H33G0052X;
label value TIMESPNT H33G0053X;
label value VAPLACE H33G0054X;
label value VSTCTGRY H33G0055X;
label value VSTRELCN H33G0056X;
label value XRAYS H33G0057X;

*DISPLAY A DESCRIPTION OF STATA FILE;
describe;

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

save H33G, replace;

#delimit cr

* data file is stored in H33G.dta
* log  file is stored in H33G.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 H33G.LOG and a data file named H33G.DTA.  If these files (H33G.DTA and H33G.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.          
                                                                                                 
************************************************************************************************/