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


#delimit ;
cd C:\MEPS\DATA;
log using H77B.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
  int    DVDATEYR 42-45
  byte   DVDATEMM 46-47
  byte   DVDATEDD 48-49
  byte   GENDENT 50-51
  byte   DENTHYG 52-53
  byte   DENTTECH 54-55
  byte   DENTSURG 56-57
  byte   ORTHODNT 58-59
  byte   ENDODENT 60-61
  byte   PERIODNT 62-63
  byte   DENTYPE 64-65
  byte   EXAMINE 66-67
  byte   CLENTETH 68-69
  byte   JUSTXRYX 70-71
  byte   JUSTXRAY 72-73
  byte   FLUORIDE 74-75
  byte   SEALANTX 76-77
  byte   SEALANT 78-79
  byte   FILLINGX 80-81
  byte   FILLING 82-83
  byte   INLAY 84-85
  byte   CROWNSX 86-87
  byte   CROWNS 88-89
  byte   ROOTCANX 90-91
  byte   ROOTCANL 92-93
  byte   GUMSURGX 94-95
  byte   GUMSURG 96-97
  byte   RECLVISX 98-99
  byte   RECLVIS 100-101
  byte   EXTRACT 102-103
  byte   IMPLANT 104-105
  byte   ABSCESS 106-107
  byte   ORALSURX 108-109
  byte   ORALSURG 110-111
  byte   BRIDGESX 112-113
  byte   BRIDGES 114-115
  byte   DENTUREX 116-117
  byte   DENTURES 118-119
  byte   REPAIRX 120-121
  byte   REPAIR 122-123
  byte   ORTHDONX 124-125
  byte   ORTHDONT 126-127
  byte   WHITENX 128-129
  byte   WHITEN 130-131
  byte   TMDTMJ 132-133
  byte   DENTPROX 134-135
  byte   DENTPROC 136-137
  str    DENTOTHX 138-162
  str    DENTOTHR 163-187
  byte   DENTMED 188-189
  byte   FFDVTYPE 190-191
  byte   FFBEF03 192-193
  byte   FFTOT04 194-195
  double DVSF03X 196-202
  double DVMR03X 203-209
  double DVMD03X 210-216
  double DVPV03X 217-223
  double DVVA03X 224-230
  double DVTR03X 231-237
  double DVOF03X 238-244
  double DVSL03X 245-251
  double DVWC03X 252-258
  double DVOR03X 259-265
  double DVOU03X 266-272
  double DVOT03X 273-279
  double DVXP03X 280-287
  double DVTC03X 288-295
  byte   IMPFLAG 296-296
  double PERWT03F 297-308
  int    VARSTR 309-311
  byte   VARPSU 312-312
using H77B.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 DVDATEYR "EVENT DATE - YEAR";
label variable DVDATEMM "EVENT DATE - MONTH";
label variable DVDATEDD "EVENT DATE - DAY";
label variable GENDENT "GENERAL DENTIST SEEN";
label variable DENTHYG "DENTAL HYGIENIST SEEN";
label variable DENTTECH "DENTAL TECHNICIAN SEEN";
label variable DENTSURG "DENTAL SURGEON SEEN";
label variable ORTHODNT "ORTHODONTIST SEEN";
label variable ENDODENT "ENDODONTIST SEEN";
label variable PERIODNT "PERIODONTIST SEEN";
label variable DENTYPE "OTHER DENTAL SPECIALIST SEEN";
label variable EXAMINE "GENERAL EXAM OR CONSULTATION";
label variable CLENTETH "CLEANING, PROPHYLAXIS, OR POLISHING";
label variable JUSTXRYX "EDITED JUSTXRAY";
label variable JUSTXRAY "X-RAYS, RADIOGRAPHS OR BITEWINGS";
label variable FLUORIDE "FLUORIDE TREATMENT";
label variable SEALANTX "EDITED SEALANT";
label variable SEALANT "SEALANT APPLICATION";
label variable FILLINGX "EDITED FILLING";
label variable FILLING "FILLINGS";
label variable INLAY "INLAYS";
label variable CROWNSX "EDITED CROWNS";
label variable CROWNS "CROWNS OR CAPS";
label variable ROOTCANX "EDITED ROOTCANL";
label variable ROOTCANL "ROOT CANAL";
label variable GUMSURGX "EDITED GUMSURG";
label variable GUMSURG "PERIODONTAL SCALING, ROOT PLANING OR GUM";
label variable RECLVISX "EDITED RECLVIS";
label variable RECLVIS "PERIODONTAL RECALL VISIT";
label variable EXTRACT "EXTRACTION, TOOTH PULLED";
label variable IMPLANT "IMPLANTS";
label variable ABSCESS "ABSCESS OR INFECTION TREATMENT";
label variable ORALSURX "EDITED ORALSURG";
label variable ORALSURG "ORAL SURGERY";
label variable BRIDGESX "EDITED BRIDGES";
label variable BRIDGES "BRIDGES";
label variable DENTUREX "EDITED DENTURES";
label variable DENTURES "DENTURES OR PARTIAL DENTURES";
label variable REPAIRX "EDITED REPAIR";
label variable REPAIR "REPAIR OF BRIDGES/DENTURES OR RELINING";
label variable ORTHDONX "EDITED ORTHDONT";
label variable ORTHDONT "ORTHODONTIA, BRACES OR RETAINERS";
label variable WHITENX "EDITED WHITEN";
label variable WHITEN "BONDING, WHITENING, OR BLEACHING";
label variable TMDTMJ "TREATMENT FOR TMD OR TMJ";
label variable DENTPROX "EDITED DENTPROC";
label variable DENTPROC "OTHER DENTAL PROCEDURES";
label variable DENTOTHX "EDITED DENTOTHR";
label variable DENTOTHR "OTHER SPECIFIED DENTAL PROCEDURES";
label variable DENTMED "RECEIVED MEDICINE INCLUDING FREE SAMPLE";
label variable FFDVTYPE "FLAT FEE BUNDLE";
label variable FFBEF03 "TOTAL # OF VISITS IN FF BEFORE 2003";
label variable FFTOT04 "TOTAL # OF VISITS IN FF AFTER 2003";
label variable DVSF03X "AMOUNT PAID, FAMILY (IMPUTED)";
label variable DVMR03X "AMOUNT PAID, MEDICARE (IMPUTED)";
label variable DVMD03X "AMOUNT PAID, MEDICAID (IMPUTED)";
label variable DVPV03X "AMOUNT PAID, PRIVATE INSURANCE (IMPUTED)";
label variable DVVA03X "AMOUNT PAID, VETERANS (IMPUTED)";
label variable DVTR03X "AMOUNT PAID, TRICARE (IMPUTED)";
label variable DVOF03X "AMOUNT PAID, OTHER FEDERAL (IMPUTED)";
label variable DVSL03X "AMOUNT PAID, STATE & LOCAL GOV (IMPUTED)";
label variable DVWC03X "AMOUNT PAID, WORKERS COMP (IMPUTED)";
label variable DVOR03X "AMOUNT PAID, OTHER PRIVATE (IMPUTED)";
label variable DVOU03X "AMOUNT PAID, OTHER PUBLIC (IMPUTED)";
label variable DVOT03X "AMOUNT PAID, OTHER INSURANCE (IMPUTED)";
label variable DVXP03X "SUM OF DVSF03X-DVOT03X (IMPUTED)";
label variable DVTC03X "HHLD REPORTED TOTAL CHARGE (IMPUTED)";
label variable IMPFLAG "IMPUTATION STATUS";
label variable PERWT03F "EXPENDITURE FILE PERSON WEIGHT, 2003";
label variable VARSTR "VARIANCE ESTIMATION STRATUM, 2003";
label variable VARPSU "VARIANCE ESTIMATION PSU, 2003";


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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

label define H77B0046X
         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 H77B0047X
         -1 "-1 INAPPLICABLE"
         -7 "-7 REFUSED"
         -8 "-8 DK"
         -9 "-9 NOT ASCERTAINED"
         1 "1 YES"
         2 "2 NO" ;

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

* ASSOCIATE VARIABLES WITH VALUE LABEL DEFINITIONS;
label value ABSCESS H77B0001X;
label value BRIDGES H77B0002X;
label value BRIDGESX H77B0003X;
label value CLENTETH H77B0004X;
label value CROWNS H77B0005X;
label value CROWNSX H77B0006X;
label value DENTHYG H77B0007X;
label value DENTMED H77B0008X;
label value DENTPROC H77B0009X;
label value DENTPROX H77B0010X;
label value DENTSURG H77B0011X;
label value DENTTECH H77B0012X;
label value DENTURES H77B0013X;
label value DENTUREX H77B0014X;
label value DENTYPE H77B0015X;
label value DVDATEDD H77B0016X;
label value DVDATEMM H77B0017X;
label value DVDATEYR H77B0018X;
label value DVMD03X H77B0019X;
label value DVMR03X H77B0020X;
label value DVOF03X H77B0021X;
label value DVOR03X H77B0022X;
label value DVOT03X H77B0023X;
label value DVOU03X H77B0024X;
label value DVPV03X H77B0025X;
label value DVSF03X H77B0026X;
label value DVSL03X H77B0027X;
label value DVTC03X H77B0028X;
label value DVTR03X H77B0029X;
label value DVVA03X H77B0030X;
label value DVWC03X H77B0031X;
label value DVXP03X H77B0032X;
label value ENDODENT H77B0033X;
label value EVENTRN H77B0034X;
label value EXAMINE H77B0035X;
label value EXTRACT H77B0036X;
label value FFBEF03 H77B0037X;
label value FFDVTYPE H77B0038X;
label value FFTOT04 H77B0039X;
label value FILLING H77B0040X;
label value FILLINGX H77B0041X;
label value FLUORIDE H77B0042X;
label value GENDENT H77B0043X;
label value GUMSURG H77B0044X;
label value GUMSURGX H77B0045X;
label value IMPFLAG H77B0046X;
label value IMPLANT H77B0047X;
label value INLAY H77B0048X;
label value JUSTXRAY H77B0049X;
label value JUSTXRYX H77B0050X;
label value ORALSURG H77B0051X;
label value ORALSURX H77B0052X;
label value ORTHDONT H77B0053X;
label value ORTHDONX H77B0054X;
label value ORTHODNT H77B0055X;
label value PERIODNT H77B0056X;
label value RECLVIS H77B0057X;
label value RECLVISX H77B0058X;
label value REPAIR H77B0059X;
label value REPAIRX H77B0060X;
label value ROOTCANL H77B0061X;
label value ROOTCANX H77B0062X;
label value SEALANT H77B0063X;
label value SEALANTX H77B0064X;
label value TMDTMJ H77B0065X;
label value WHITEN H77B0066X;
label value WHITENX H77B0067X;

*DISPLAY A DESCRIPTION OF STATA FILE;
describe;

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

save H77B, replace;

#delimit cr

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