/* SHORT TITLE:  Patient Quest-Time 6 Specific Data   */
PROC FORMAT
;
VALUE  IREC01F
   01  = 'NUMBER          '
;
VALUE  ISREC0F
   00  = 'NOT A REPEATING '
;
VALUE $IITYPEF
  'I' = 'INSTRUMENT TYPE '
;
VALUE  IRTYPEF
   1  = 'STUDY SUBJECT   '
   2  = 'PROXY           '
;
VALUE  ILANG_F
   1  = 'ENGLISH         '
   2  = 'SPANISH         '
;
VALUE $T6_STAF
  'CO' = 'COMPLETE, WITH R'
  'PR' = 'COMPLETE, WITH P'
  'DD' = 'COMPLETE, WITH P'
;
VALUE  OBSDAYF
   999  = 'NOT ASCERTAINED '
;
VALUE $GAP6FLF
  '1' = 'YES TIME GAP    '
;
VALUE  ADM6__F
   00  = 'NONE            '
;
VALUE  IPNGT6F
   000  = 'NONE            '
;
VALUE $IA1RELF
  '91' = 'OTHER RELATIVE  '
  '92' = 'OTHER NON-RELATI'
  '97' = 'REFUSED         '
  '98' = 'DK              '
  '99' = 'NOT ASCERTAINED '
;
VALUE $IA1SEXF
  '1' = 'MALE            '
  '2' = 'FEMALE          '
  '7' = 'REFUSED         '
  '8' = 'DK              '
  '9' = 'NOT ASCERTAINED '
;
VALUE $IA1AGEF
  '00' = 'NEWBORN TO 11 MO'
  '97' = 'REFUSED         '
  '98' = 'DK              '
  '99' = 'NOT ASCERTAINED '
;
VALUE $IA1SSTF
  '1' = 'YES             '
  '2' = 'NO              '
  '7' = 'REFUSED         '
  '8' = 'DK              '
  '9' = 'NOT ASCERTAINED '
;
VALUE  IABOX1F
   1  = 'YES             '
   2  = 'NO              '
;
VALUE $IA2___F
  '1' = 'MARRIED         '
  '2' = 'WIDOWED         '
  '3' = 'DIVORCED        '
  '4' = 'SEPARATED       '
  '5' = 'NEVER MARRIED   '
  '7' = 'REFUSED         '
  '8' = 'DK              '
  '9' = 'NOT ASCERTAINED '
;
VALUE  IA5___F
   01  = 'APARTMENT OR HOU'
   02  = 'APARTMENT OR HOU'
   03  = '"DOUBLED UP" WIT'
   04  = 'SINGLE ROOM OCCU'
   05  = 'SPECIALIZED AIDS'
   06  = 'SHELTERS        '
   07  = 'STREET OR OTHER '
   08  = 'HOSPITAL, NURSIN'
   09  = 'IN FOSTER HOMES '
   10  = 'LIVES WITH SOMEO'
   11  = 'JAIL            '
   12  = 'PUBLIC HOUSING  '
   13  = 'TRAILER/HOUSE UN'
   91  = 'OTHER SPECIFIED '
   97  = 'REFUSED         '
   98  = 'DK              '
   99  = 'NOT ASCERTAINED '
;
VALUE  IA6A__F
   1  = 'CIRCLED         '
   2  = 'NOT CIRCLED     '
   7  = 'REFUSED         '
   8  = 'DK              '
   9  = 'NOT ASCERTAINED '
;
VALUE  IB1___F
   1  = 'YES             '
   2  = 'NO              '
   7  = 'REFUSED         '
   8  = 'DK              '
   9  = 'NOT ASCERTAINED '
;
VALUE $IBBOX2F
  '1' = 'YES             '
  '2' = 'NO              '
;
VALUE $IB3___F
  '1' = 'THE WHOLE TIME  '
  '2' = 'PART OF THE TIME'
  '7' = 'REFUSED         '
  '8' = 'DK              '
  '9' = 'NOT ASCERTAINED '
;
VALUE $IB4A__F
  '1' = 'CIRCLED         '
  '2' = 'NOT CIRCLED     '
  '7' = 'REFUSED         '
  '8' = 'DK              '
  '9' = 'NOT ASCERTAINED '
;
VALUE $IB4E__F
  '1' = 'CIRCLED         '
  '2' = 'NOT CIRCLED     '
  '7' = 'REFUSED         '
  '8' = 'DON''T KNOW     '
  '9' = 'NOT ASCERTAINED '
;
VALUE $IB5MO_F
  '97' = 'REFUSED         '
  '98' = 'DK              '
  '99' = 'NOT ASCERTAINED '
;
VALUE $IB5YR_F
  '92' = 'YEAR            '
  '97' = 'REFUSED         '
  '98' = 'DK              '
  '99' = 'NOT ASCERTAINED '
;
VALUE $IB7___F
  '1' = 'INDIVIDUAL PLAN '
  '2' = 'FAMILY PLAN     '
  '7' = 'REFUSED         '
  '8' = 'DK              '
  '9' = 'NOT ASCERTAINED '
;
VALUE $IB8___F
  '01' = 'EMPLOYER/FAMILY '
  '02' = 'UNION           '
  '03' = 'INSURANCE COMPAN'
  '04' = 'SCHOOL ALUMNI GR'
  '05' = 'PUBLIC ASSISTANC'
  '91' = 'OTHER SPECIFIED '
  '97' = 'REFUSED         '
  '98' = 'DK              '
  '99' = 'NOT ASCERTAINED '
;
VALUE  IB18__F
   1  = 'YES             '
   2  = 'NO/ NO DECISION '
   7  = 'REFUSED         '
   8  = 'DK              '
   9  = 'NOT ASCERTAINED '
;
VALUE $IB26__F
  '70' = 'DRUG ASSISTANCE '
  '71' = 'ASSISTANCE FROM '
  '72' = 'CITY FUNDED PROG'
  '73' = 'COUNTY FUNDED PR'
  '74' = 'STATE FUNDED PRO'
  '75' = 'FEDERALLY FUNDED'
  '76' = 'GOVT FUNDED PROG'
  '77' = 'COMMUNITY PROGRA'
  '91' = 'OTHER SPECIFIED '
  '97' = 'REFUSED         '
  '98' = 'DK              '
  '99' = 'NOT ASCERTAINED '
;
VALUE $IB31A2F
  '1' = 'DAYS            '
  '2' = 'WEEKS           '
  '3' = 'MONTHS          '
  '4' = 'YEARS           '
  '7' = 'REFUSED         '
  '8' = 'DON''T KNOW     '
  '9' = 'NOT ASCERTAINED '
;
VALUE $IB31B2F
  '1' = 'DAYS            '
  '2' = 'WEEKS           '
  '3' = 'MONTHS          '
  '4' = 'YEARS           '
  '7' = 'REFUSED         '
  '8' = 'DK              '
  '9' = 'NOT ASCERTAINED '
;
VALUE $IB32__F
  '000000' = 'NOTHING         '
  '999997' = 'REFUSED         '
  '999998' = 'DK              '
  '999999' = 'NOT ASCERTAINED '
;
VALUE $IB33__F
  '01' = 'PER WEEK        '
  '02' = 'PER MONTH       '
  '03' = 'QUARTERLY       '
  '04' = 'SEMI-ANNUALLY (E'
  '05' = 'PER YEAR        '
  '06' = 'TWO TIMES A MONT'
  '07' = 'EVERY TWO MONTHS'
  '97' = 'REFUSED         '
  '98' = 'DK              '
  '99' = 'NOT ASCERTAINED '
;
VALUE $IB35A_F
  '999997' = 'REFUSED         '
  '999998' = 'DK              '
  '999999' = 'NOT ASCERTAINED '
;
VALUE $IB35B_F
  '1' = 'AMOUNT IN DOLLAR'
  '2' = 'PERCENTAGE      '
;
VALUE $IB36B1F
  '1' = 'PERCENTAGE      '
  '2' = 'FLAT FEE        '
  '7' = 'REFUSED         '
  '8' = 'DK              '
  '9' = 'NOT ASCERTAINED '
;
VALUE $IBR1__F
  '997' = 'REFUSED         '
  '998' = 'DK              '
  '999' = 'NOT ASCERTAINED '
;
VALUE $IB36G1F
  '0001' = 'INSURANCE PAYS 1'
  '0002' = 'LIFETIME LIMIT S'
  '0003' = 'INSURANCE PAYS 1'
  '0004' = 'SPECIFIED TIME L'
  '0005' = 'LIMIT GIVEN BUT '
  '0006' = 'INSURANCE PAYS 8'
  '0007' = 'INSURANCE PAYS U'
  '0008' = 'YEARLY MAXIMUM S'
  '0009' = 'INSURANCE PAYS 1'
  '0010' = '90% OF USUAL AND'
  '0011' = 'PREAPPROVED-100%'
  '0012' = 'INSURANCE PAYS 1'
  '0013' = 'COPAY AMOUNT INC'
  '9991' = 'OTHER SPECIFIED '
  '9997' = 'REFUSED         '
  '9998' = 'DK              '
  '9999' = 'NOT ASCERTAINED '
;
VALUE $IB36B2F
  '1' = 'PERCENTAGE      '
  '2' = 'FLAT RATE       '
  '7' = 'REFUSED         '
  '8' = 'DK              '
  '9' = 'NOT ASCERTAINED '
;
VALUE $IBINS3F
  '997' = 'DK              '
  '998' = 'REFUSED         '
  '999' = 'NOT ASCERTAINED '
;
VALUE $IB36DOF
  '999991' = 'OTHER SPECIFIED '
  '999996' = 'EQUAL TO 999996 '
  '999997' = 'REFUSED         '
  '999998' = 'DK              '
  '999999' = 'NOT ASCERTAINED '
;
VALUE $IB36MAF
  '1' = 'LIFETIME MAXIMUM'
  '2' = 'YEARLY MAXIMUM  '
  '3' = 'RESPONSE GIVEN I'
  '7' = 'REFUSED         '
  '8' = 'DK              '
  '9' = 'NOT ASCERTAINED '
;
VALUE $IB36F4F
  '1' = 'YES             '
  '2' = 'NO              '
  '7' = 'REFUSED         '
  '8' = 'DON''T KNOW     '
  '9' = 'NOT ASCERTAINED '
;
VALUE $IB36G4F
  '0001' = 'INSURANCE PAYS 1'
  '0002' = 'LIFETIME LIMIT S'
  '0003' = 'INSURANCE PAYS 1'
  '0004' = 'SPECIFIED TIME L'
  '0005' = 'LIMIT GIVEN BUT '
  '0006' = 'INSURANCE PAYS 8'
  '0007' = 'INSURANCE PAYS U'
  '0008' = 'YEARLY MAXIMUM S'
  '0009' = 'INSURANCE PAYS 1'
  '0010' = '90% OF USUAL AND'
  '0011' = 'PREAPPROVED - 10'
  '0012' = 'INSURANCE PAYS 1'
  '0013' = 'COPAY AMOUNT INC'
  '9991' = 'OTHER SPECIFIED '
  '9997' = 'REFUSED         '
  '9998' = 'DK              '
  '9999' = 'NOT ASCERTAINED '
;
VALUE  IC15A_F
   1  = 'YES             '
   2  = 'NO              '
   7  = 'REFUSED         '
   8  = 'DON''T KNOW     '
   9  = 'NOT ASCERTAINED '
;
VALUE $IC18__F
  '1' = '0 - 100         '
  '2' = '101 - 200       '
  '3' = '201 - 300       '
  '4' = '301 - 500       '
  '5' = 'GREATER THAN 500'
  '7' = 'REFUSED         '
  '8' = 'DON''T KNOW     '
  '9' = 'NOT ASCERTAINED '
;
VALUE $IC19MOF
  '97' = 'REFUSED         '
  '98' = 'DON''T KNOW     '
  '99' = 'NOT ASCERTAINED '
;
VALUE $IC19YRF
  '92' = 'YEAR            '
  '97' = 'REFUSED         '
  '98' = 'DON''T KNOW     '
  '99' = 'NOT ASCERTAINED '
;
VALUE  ID06CTF
   00  = 'NONE LISTED     '
;
VALUE  IF13CTF
   97  = 'REFUSED         '
   98  = 'DK              '
   99  = 'NOT ASCERTAINED '
   00  = 'NONE LISTED     '
;
VALUE  II3___F
   1  = 'YES             '
   2  = 'NO              '
   3  = 'NO CHILDREN     '
   7  = 'REFUSED         '
   8  = 'DK              '
   9  = 'NOT ASCERTAINED '
;
VALUE  IKSEX_F
   1  = 'MALE            '
   2  = 'FEMALE          '
;
VALUE  IK4PROF
   9999997  = 'REFUSED         '
   9999998  = 'DK              '
   9999999  = 'NOT ASCERTAINED '
;
VALUE $IK5FOSF
  '01' = 'RESEARCH STUDY/G'
  '03' = 'FLAT FEE        '
  '05' = 'GAY AIDS TASK FO'
  '14' = 'FAMILY/FRIEND   '
  '29' = 'COMMUNITY HEALTH'
  '46' = 'PROVIDER        '
  '47' = 'PRIVATE CHARITY/'
  '50' = 'DRUG COMPANY    '
  '91' = 'OTHER SPECIFIED '
  '97' = 'REFUSED         '
  '98' = 'DK              '
  '99' = 'NOT ASCERTAINED '
;
VALUE $IK7___F
  '01' = 'NO PROBLEMS     '
  '02' = 'DIDN''T WANT TO '
  '03' = 'NONE BECAUSE TER'
  '04' = 'HAD MISCARRIAGE '
  '91' = 'OTHER SPECIFIED '
  '97' = 'REFUSED         '
  '98' = 'DK              '
  '99' = 'NOT ASCERTAINED '
;
VALUE  IL4CT_F
   00  = 'NO DRUGS LISTED '
;
VALUE $IL4A__F
  '991' = 'OTHER SPECIFIED '
  '997' = 'REFUSED         '
  '998' = 'DK              '
  '999' = 'NOT ASCERTAINED '
;
VALUE  IM1___F
   1  = 'EXCELLENT       '
   2  = 'VERY GOOD       '
   3  = 'GOOD            '
   4  = 'FAIR            '
   5  = 'POOR            '
   7  = 'REFUSED         '
   8  = 'DK              '
   9  = 'NOT ASCERTAINED '
;
VALUE  IM3A__F
   1  = 'LIMITED FOR MORE'
   2  = 'LIMITED FOR 3 MO'
   3  = 'NOT LIMITED AT A'
   7  = 'REFUSED         '
   8  = 'DK              '
   9  = 'NOT ASCERTAINED '
;
VALUE  IM8___F
   1  = 'DAILY           '
   2  = 'SEVERAL TIMES A '
   3  = 'SEVERAL TIMES A '
   4  = 'ONCE OR TWICE   '
   5  = 'NOT AT ALL      '
   7  = 'REFUSED         '
   8  = 'DK              '
   9  = 'NOT ASCERTAINED '
;
VALUE  IM9___F
   1  = 'ALL OF THE TIME '
   2  = 'MOST OF THE TIME'
   3  = 'A GOOD BIT OF TH'
   4  = 'SOME OF THE TIME'
   5  = 'A LITTLE OF THE '
   6  = 'NONE OF THE TIME'
   7  = 'REFUSED         '
   8  = 'DK              '
   9  = 'NOT ASCERTAINED '
;
VALUE  IM11__F
   00  = 'NONE            '
   97  = 'REFUSED         '
   98  = 'DK              '
   99  = 'NOT ASCERTAINED '
;
VALUE $IN2A__F
  '01' = 'CLINIC          '
  '02' = 'HOSPITAL        '
  '03' = 'DOCTOR''S OFFICE'
  '91' = 'OTHER SPECIFIED '
  '97' = 'REFUSED         '
  '98' = 'DK              '
  '99' = 'NOT ASCERTAINED '
;
VALUE $IN5___F
  '01' = 'WALKING         '
  '02' = 'DRIVING         '
  '03' = 'BEING DRIVEN    '
  '04' = 'TAXI            '
  '05' = 'OTHER PUBLIC TRA'
  '06' = 'AMBULETTE/AMBULA'
  '91' = 'OTHER SPECIFIED '
  '97' = 'REFUSED         '
  '98' = 'DK              '
  '99' = 'NOT ASCERTAINED '
;
VALUE $IN7___F
  '1' = 'HAS APPOINTMENT '
  '2' = 'JUST WALKS IN   '
  '3' = 'SOMETIMES HAS AP'
  '7' = 'REFUSED         '
  '8' = 'DK              '
  '9' = 'NOT ASCERTAINED '
;
VALUE $IN9AG_F
  '0001' = 'DISEASE RELATED '
  '0002' = 'PROVIDER STATED;'
  '0003' = 'VARIETY OF REASO'
  '0004' = 'RESPONDENT WAS T'
  '0005' = 'PATIENT NOT ELIG'
  '0006' = 'SERVICE NOT AVAI'
  '9991' = 'OTHER SPECIFIED '
  '9992' = 'RESPONDENT DOES '
  '9997' = 'REFUSED         '
  '9998' = 'DK              '
  '9999' = 'NOT ASCERTAINED '
;
VALUE  IO1___F
   1  = 'FULL-TIME       '
   2  = 'PART-TIME       '
   3  = 'NOT WORKING     '
   7  = 'REFUSED         '
   8  = 'DK              '
   9  = 'NOT ASCERTAINED '
;
VALUE $IOBOX2F
  '1' = 'WORKING FULL TIM'
  '2' = 'WORKING PART-TIM'
  '3' = 'NOT WORKING (NW)'
;
VALUE $IO3O4_F
  '9994' = 'UNCODEABLE      '
  '9997' = 'REFUSED         '
  '9998' = 'DK              '
  '9999' = 'NOT ASCERTAINED '
;
VALUE $IO4A__F
  '1' = 'LESS THAN 25 PEO'
  '2' = '25-99 PEOPLE    '
  '3' = '100-499 PEOPLE  '
  '4' = '500 OR MORE     '
  '7' = 'REFUSED         '
  '8' = 'DK              '
  '9' = 'NOT ASCERTAINED '
;
VALUE $IO6___F
  '01' = 'STOPPED/QUIT/WOR'
  '02' = 'CAN''T DO WHAT I'
  '03' = 'CHANGE TYPE/AMOU'
  '91' = 'OTHER SPECIFIED '
  '97' = 'REFUSED         '
  '98' = 'DK              '
  '99' = 'NOT ASCERTAINED '
;
VALUE $IO11__F
  '01' = 'LEAVE OF ABSENCE'
  '02' = 'QUIT            '
  '03' = 'LAID OFF        '
  '04' = 'FIRED           '
  '05' = 'TOO ILL         '
  '06' = 'PREGNANCY       '
  '07' = 'ARRESTED/IN PRIS'
  '08' = 'RETIRED         '
  '09' = 'KEPT SAME JOB CH'
  '10' = 'MOVED/LEFT AREA '
  '11' = 'JOB ENDED OR BUS'
  '12' = 'WENT TO SCHOOL  '
  '91' = 'OTHER SPECIFIED '
  '97' = 'REFUSED         '
  '98' = 'DK              '
  '99' = 'NOT ASCERTAINED '
;
VALUE $IO31__F
  '01' = '$ 0-200/MO      '
  '02' = '$ 201-350/MO    '
  '03' = '$ 351-500/MO    '
  '04' = '$ 501-750/MO    '
  '05' = '$ 751-900/MO    '
  '06' = '$ 901-1,150/MO  '
  '07' = '$ 1,151-1,300/MO'
  '08' = '$ 1,301-1,450/MO'
  '09' = '$ 1,451-1,600/MO'
  '10' = '$ 1,601-1,750/MO'
  '11' = '$ 1,751-2000/MO '
  '12' = '$ 2,001-3000/MO '
  '13' = '$ 3,001-4,000/MO'
  '14' = '$ 4,001 OR MORE/'
  '97' = 'REFUSED         '
  '98' = 'DK              '
  '99' = 'NOT ASCERTAINED '
;
VALUE $IO33BXF
  '1' = 'CHECKED         '
;
VALUE $IO35__F
  '1' = 'YES             '
  '2' = 'NO/NO DECISION Y'
  '7' = 'REFUSED         '
  '8' = 'DK              '
  '9' = 'NOT ASCERTAINED '
;
VALUE $IOBOX5F
  '1' = 'NO CHILDREN LIVI'
  '2' = '1 OR MORE CHILDR'
;
VALUE $IP3R1MF
  '95' = 'STILL OUTSIDE OF'
  '97' = 'REFUSED         '
  '98' = 'DK              '
  '99' = 'NOT ASCERTAINED '
;
VALUE $IP3R1YF
  '92' = 'YEAR            '
  '95' = 'STILL OUTSIDE OF'
  '97' = 'REFUSED         '
  '98' = 'DK              '
  '99' = 'NOT ASCERTAINED '
;
VALUE $IP3R2DF
  '95' = 'STILL IN U.S    '
  '97' = 'REFUSED         '
  '98' = 'DK              '
  '99' = 'NOT ASCERTAINED '
;
VALUE $IP3R2YF
  '92' = 'YEAR            '
  '95' = 'STILL OUSIDE OF '
  '97' = 'REFUSED         '
  '98' = 'DK              '
  '99' = 'NOT ASCERTAINED '
;
VALUE $IP6EX1F
  '95' = 'STILL IN PRISON '
  '97' = 'REFUSED         '
  '98' = 'DK              '
  '99' = 'NOT ASCERTAINED '
;
VALUE $IP6EX1G
  '92' = 'YEAR            '
  '95' = 'STILL IN PRISON '
  '97' = 'REFUSED         '
  '98' = 'DK              '
  '99' = 'NOT ASCERTAINED '
;
VALUE  IR1___F
   1  = 'VERY CONFIDENT  '
   2  = 'CONFIDENT       '
   3  = 'UNSURE          '
   4  = 'DOUBTFUL        '
   5  = 'VERY DOUBTFUL   '
   8  = 'DK              '
   9  = 'NOT ASCERTAINED '
;
VALUE $IR2___F
  '91' = 'FLAG FOR QUESTIO'
  '98' = 'DK              '
  '99' = 'NOT ASCERTAINED '
;
VALUE  IR5A__F
   8  = 'DK              '
   9  = 'NOT ASCERTAINED '
;
     DATA SYSUT2 ; INFILE SYSUT1 END = EOF ;

 /*****************************************************************************/
 /*                                                                           */
 /*                   GENSAS run of 06/27/1994 at 21:55:58                    */
 /*                                                                           */
 /*****************************************************************************/

     ARRAY _CRDCTS_ (CRDCTSI)   CRDC01 - CRDC99 ;
     DO CRDCTSI = 1 TO 99 ;
          _CRDCTS_ = 0 ;
     END;

 /*****************************************************************************/
 /*                                                                           */
 /*   Read New ID and hold input line (Input Records must be SORTED BY ID)    */
 /*                                                                           */
 /*****************************************************************************/

     INPUT     ID         $  001-009 @ ;
     HOLD_ID = ID      ;


 /*****************************************************************************/
 /*                                                                           */
 /*                     Read in data until ID changes ...                     */
 /*                                                                           */
 /*****************************************************************************/

     DO WHILE (ID       = HOLD_ID);

          INPUT CRDTYP     010-011  @;

          IF CRDTYP = 01 THEN
          DO ;
               LINK CRD01;
          END ;
          ELSE
          DO ;
               PUT 'INVALID CRDTYP : 'ID      =  CRDTYP  = ;
               INPUT ; /* Release input line */
          END ;

          IF EOF THEN
          DO ;
               OUTPUT ;
               RETURN;
          END ;

          INPUT     HOLD_ID    $  001-009 @;

     END;

     DROP HOLD_ID CRDTYP CRDCTSI CRDC01 - CRDC99 ;
     OUTPUT ;
     INPUT @@ ; /* Hold input line */
     RETURN;


FORMAT
IREC01    IREC01F.
ISREC01   ISREC0F.
IITYPE   $IITYPEF.
IRTYPE    IRTYPEF.
ILANG     ILANG_F.
T6_STAT  $T6_STAF.
OBSDAYS6  OBSDAYF.
GAP6FLAG $GAP6FLF.
ADM6      ADM6__F.
IPNGT6    IPNGT6F.
AMBVS6    IPNGT6F.
ERVS6     IPNGT6F.
HCVS6     IPNGT6F.
OCVS6     IPNGT6F.
MDVS6     IPNGT6F.
IA01CT    ADM6__F.
IA1REL1  $IA1RELF.
IA1SEX1  $IA1SEXF.
IA1AGE1  $IA1AGEF.
IA1SST1  $IA1SSTF.
IA1REL2  $IA1RELF.
IA1SEX2  $IA1SEXF.
IA1AGE2  $IA1AGEF.
IA1SST2  $IA1SSTF.
IA1REL3  $IA1RELF.
IA1SEX3  $IA1SEXF.
IA1AGE3  $IA1AGEF.
IA1SST3  $IA1SSTF.
IA1REL4  $IA1RELF.
IA1SEX4  $IA1SEXF.
IA1AGE4  $IA1AGEF.
IA1SST4  $IA1SSTF.
IA1REL5  $IA1RELF.
IA1SEX5  $IA1SEXF.
IA1AGE5  $IA1AGEF.
IA1SST5  $IA1SSTF.
IA1REL6  $IA1RELF.
IA1SEX6  $IA1SEXF.
IA1AGE6  $IA1AGEF.
IA1SST6  $IA1SSTF.
IA1REL7  $IA1RELF.
IA1SEX7  $IA1SEXF.
IA1AGE7  $IA1AGEF.
IA1SST7  $IA1SSTF.
IA1REL8  $IA1RELF.
IA1SEX8  $IA1SEXF.
IA1AGE8  $IA1AGEF.
IA1SST8  $IA1SSTF.
IA1REL9  $IA1RELF.
IA1SEX9  $IA1SEXF.
IA1AGE9  $IA1AGEF.
IA1SST9  $IA1SSTF.
IA1REL10 $IA1RELF.
IA1SEX10 $IA1SEXF.
IA1AGE10 $IA1AGEF.
IA1SST10 $IA1SSTF.
IABOX1A   IABOX1F.
IABOX1B   IABOX1F.
IA2      $IA2___F.
IA3      $IA1SSTF.
IA4      $IA1SSTF.
IA5       IA5___F.
IA6A      IA6A__F.
IA6B      IA6A__F.
IA6C      IA6A__F.
IA6D      IA6A__F.
IA6E      IA6A__F.
IA6F      IA6A__F.
IB1       IB1___F.
IBBOX2   $IBBOX2F.
IBBOX3    IABOX1F.
IB2      $IA1SSTF.
IB3      $IB3___F.
IB4A     $IB4A__F.
IB4B     $IB4A__F.
IB4C     $IB4A__F.
IB4D     $IB4A__F.
IB4E     $IB4E__F.
IB4F     $IB4E__F.
IB4G     $IB4E__F.
IB4H     $IB4E__F.
IB4I     $IB4E__F.
IB4J     $IB4E__F.
IB4K     $IB4E__F.
IB4L     $IB4E__F.
IB5MO    $IB5MO_F.
IB5YR    $IB5YR_F.
IB6      $IA1SSTF.
IBBOX4   $IBBOX2F.
IB7      $IB7___F.
IB8      $IB8___F.
IB9MO    $IB5MO_F.
IB9YR    $IB5YR_F.
IB10     $IA1SSTF.
IB12     $IA1SSTF.
IB13     $IB3___F.
IB14A    $IB4A__F.
IB14B    $IB4A__F.
IB14C    $IB4A__F.
IB14D    $IB4A__F.
IB14E    $IB4E__F.
IB14F    $IB4E__F.
IB14G    $IB4E__F.
IB14H    $IB4E__F.
IB14I    $IB4E__F.
IB14J    $IB4E__F.
IB14K    $IB4E__F.
IB14L    $IB4E__F.
IBBOX5   $IBBOX2F.
IB16MO   $IB5MO_F.
IB16YR   $IB5YR_F.
IB17     $IA1SSTF.
IB18      IB18__F.
IB19      IB1___F.
IB21      IB1___F.
IBBOX6   $IBBOX2F.
IBBOX7   $IBBOX2F.
IB22     $IA1SSTF.
IB23     $IB3___F.
IB24A    $IB4A__F.
IB24B    $IB4A__F.
IB24C    $IB4A__F.
IB24D    $IB4A__F.
IB24E    $IB4E__F.
IB24F    $IB4E__F.
IB24G    $IB4E__F.
IB24H    $IB4E__F.
IB24I    $IB4E__F.
IB24J    $IB4E__F.
IB24K    $IB4E__F.
IB24L    $IB4E__F.
IB25MO   $IB5MO_F.
IB25YR   $IB5YR_F.
IBBOX8   $IBBOX2F.
IB26     $IB26__F.
IB27MO   $IB5MO_F.
IB27YR   $IB5YR_F.
IBBOX9    IABOX1F.
IB28     $IA1SSTF.
IB29      IB1___F.
IB31A1   $IB5MO_F.
IB31A2   $IB31A2F.
IB31B1   $IB5MO_F.
IB31B2   $IB31B2F.
IBBOX10   IABOX1F.
IB32     $IB32__F.
IB33     $IB33__F.
IB34     $IA1SSTF.
IB35A    $IB35A_F.
IB35B    $IB35B_F.
IB361    $IA1SSTF.
IB36A1   $IA1SSTF.
IB36B1   $IB36B1F.
IBR1     $IBR1__F.
IBINS1   $IBR1__F.
IB36D1   $IB35A_F.
IB36E1   $IA1SSTF.
IBDAYS1  $IBR1__F.
IB36F1   $IA1SSTF.
IB36G1   $IB36G1F.
IB362    $IA1SSTF.
IB36A2   $IA1SSTF.
IB36B2   $IB36B2F.
IBR2     $IBR1__F.
IBINS2   $IBR1__F.
IB36D2   $IB35A_F.
IB36F2   $IA1SSTF.
IB36G2   $IB36G1F.
IB363    $IA1SSTF.
IB36A3   $IA1SSTF.
IB36B3   $IB36B1F.
IBR3     $IBR1__F.
IBINS3   $IBINS3F.
IB36D3   $IB35A_F.
IB36F3   $IA1SSTF.
IB36G3   $IB36G1F.
IB364    $IA1SSTF.
IB36A4   $IA1SSTF.
IB36B4   $IB36B1F.
IBR4     $IBR1__F.
IBINS4   $IBR1__F.
IB36D4   $IB35A_F.
IB36E4   $IA1SSTF.
IB36DOL  $IB36DOF.
IB36MAX  $IB36MAF.
IB36F4   $IB36F4F.
IB36G4   $IB36G4F.
IB365    $IA1SSTF.
IB36A5   $IA1SSTF.
IB36B5   $IB36B1F.
IBR5     $IBR1__F.
IBINS5   $IBR1__F.
IB36D5   $IB35A_F.
IB36F5   $IA1SSTF.
IB36G5   $IB36G1F.
IC15A     IC15A_F.
IC15B     IC15A_F.
IC15C     IC15A_F.
IC15D     IC15A_F.
IC15E     IC15A_F.
IC16A     IC15A_F.
IC16B     IC15A_F.
IC16C     IC15A_F.
IC16D     IC15A_F.
IC16E     IC15A_F.
IC16F     IC15A_F.
IC16G     IC15A_F.
IC16H     IC15A_F.
IC16I     IC15A_F.
IC16J     IC15A_F.
IC16K     IC15A_F.
IC16L     IC15A_F.
IC16M     IC15A_F.
IC16N     IC15A_F.
IC16O     IC15A_F.
IC16P     IC15A_F.
IC16Q     IC15A_F.
IC16R     IC15A_F.
IC17      IC15A_F.
IC18     $IC18__F.
IC19MO   $IC19MOF.
IC19DY   $IC19MOF.
IC19YR   $IC19YRF.
IC20     $IB36F4F.
ID1A      IB1___F.
ID1B     $IB5MO_F.
ID06CT    ID06CTF.
IE1A      IB1___F.
IE1B     $IB5MO_F.
IE08CT    ID06CTF.
IF1       IB1___F.
IF1A     $IB5MO_F.
IF10CT    ID06CTF.
IF2       IB1___F.
IF2A     $IB5MO_F.
IF11CT    ID06CTF.
IF3       IB1___F.
IF3A     $IB5MO_F.
IF12CT    ID06CTF.
IF4       IB1___F.
IF13CT    IF13CTF.
IG1       IB1___F.
IG1A     $IB5MO_F.
IG14CT    ID06CTF.
IG2       IB1___F.
IG2A     $IB5MO_F.
IG15CT    ID06CTF.
IG3       IB1___F.
IG3A     $IB5MO_F.
IG16CT    ID06CTF.
IG4       IB1___F.
IG17CT    ID06CTF.
IH1       IB1___F.
IH2       IB1___F.
IH19CT    ID06CTF.
II1       IB1___F.
II21CT    ADM6__F.
II2       IB1___F.
II22CT    ADM6__F.
II3       II3___F.
II23CT    ADM6__F.
II4       IB1___F.
II24CT    ADM6__F.
II5       IB1___F.
II25CT    ADM6__F.
II6       IB1___F.
II26CT    ADM6__F.
II7       IB1___F.
II27CT    ADM6__F.
IJ1       IB1___F.
IJ1A     $IB5MO_F.
IJ29CT    ADM6__F.
IKSEX     IKSEX_F.
IK1A     $IB4A__F.
IK1B     $IB4A__F.
IK1C     $IB4A__F.
IK1D     $IB4A__F.
IK1E     $IB4A__F.
IK1F     $IB4A__F.
IK1G     $IB4A__F.
IK2      $IA1SSTF.
IK3      $IA1SSTF.
IK4PROV   IK4PROF.
IK5A     $IB4A__F.
IK5B     $IB4A__F.
IK5C     $IB4A__F.
IK5D     $IB4A__F.
IK5E     $IB4A__F.
IK5F     $IB4A__F.
IK5FOS   $IK5FOSF.
IK6      $IA1SSTF.
IK7      $IK7___F.
IL1       IB1___F.
IL2       IB1___F.
IL32CT    ID06CTF.
IL3       IB1___F.
IL4CT     IL4CT_F.
IL4A     $IL4A__F.
IL4B     $IL4A__F.
IL4C     $IL4A__F.
IL4D     $IL4A__F.
IL4E     $IL4A__F.
IL4F     $IL4A__F.
IL4G     $IL4A__F.
IL4H     $IL4A__F.
IL4I     $IL4A__F.
IL4J     $IL4A__F.
IL4K     $IL4A__F.
IL4L     $IL4A__F.
IL4M     $IL4A__F.
IL4N     $IL4A__F.
IL4O     $IL4A__F.
IL4P     $IL4A__F.
IL4Q     $IL4A__F.
IL4R     $IL4A__F.
IL4S     $IL4A__F.
IL4T     $IL4A__F.
IL4U     $IL4A__F.
IL4V     $IL4A__F.
IL4W     $IL4A__F.
IL4X     $IL4A__F.
IL5      $IB32__F.
IM1       IM1___F.
IM2A      IB1___F.
IM2B      IB1___F.
IM2C      IB1___F.
IM2D      IB1___F.
IM2E      IB1___F.
IM2F      IB1___F.
IM2G      IB1___F.
IM2H      IB1___F.
IM2I      IB1___F.
IM2J      IB1___F.
IM2K      IB1___F.
IM2L      IB1___F.
IM2M      IB1___F.
IM2N      IB1___F.
IM2O      IB1___F.
IM2P      IB1___F.
IM3A      IM3A__F.
IM3B      IM3A__F.
IM3C      IM3A__F.
IM3D      IM3A__F.
IM3E      IM3A__F.
IM3F      IM3A__F.
IM4       IB1___F.
IM5      $IA1SSTF.
IM6       IB1___F.
IM7      $IA1SSTF.
IM8       IM8___F.
IM9       IM9___F.
IM10A     IM9___F.
IM10B     IM9___F.
IM10C     IM9___F.
IM10D     IM9___F.
IM10E     IM9___F.
IM11      IM11__F.
IN1       IB1___F.
IN2A     $IN2A__F.
IN2PROV   IK4PROF.
IN3      $IA1SSTF.
IN4      $IA1SSTF.
IN5      $IN5___F.
IN6MIN   $IBR1__F.
IN6HRS   $IB5MO_F.
IN7      $IN7___F.
IN8MOS   $IB5MO_F.
IN8YRS   $IB5MO_F.
IN9AA     IB1___F.
IN9AB     IB1___F.
IN9AC    $IA1SSTF.
IN9AD    $IA1SSTF.
IN9AE    $IA1SSTF.
IN9AF    $IA1SSTF.
IN9AG    $IN9AG_F.
IN9BA     IB1___F.
IN9BB    $IA1SSTF.
IN9BC    $IA1SSTF.
IN9BD    $IA1SSTF.
IN9BE    $IA1SSTF.
IN9BF    $IA1SSTF.
IN9BG    $IN9AG_F.
IN9CA     IB1___F.
IN9CB    $IA1SSTF.
IN9CC    $IA1SSTF.
IN9CD    $IA1SSTF.
IN9CF    $IA1SSTF.
IN9CG    $IN9AG_F.
IN9DA     IB1___F.
IN9DB    $IA1SSTF.
IN9DC    $IA1SSTF.
IN9DD    $IA1SSTF.
IN9DE    $IA1SSTF.
IN9DF    $IA1SSTF.
IN9DG    $IN9AG_F.
IN9EA     IB1___F.
IN9EB    $IA1SSTF.
IN9EC    $IA1SSTF.
IN9ED    $IA1SSTF.
IN9EE    $IA1SSTF.
IN9EF    $IA1SSTF.
IN9EG    $IN9AG_F.
IN9FA     IB1___F.
IN9FB    $IA1SSTF.
IN9FC    $IA1SSTF.
IN9FD    $IA1SSTF.
IN9FE    $IA1SSTF.
IN9FF    $IA1SSTF.
IN9FG    $IN9AG_F.
IN9GA     IB1___F.
IN9GB    $IA1SSTF.
IN9GC    $IA1SSTF.
IN9GD    $IA1SSTF.
IN9GE    $IA1SSTF.
IN9GF    $IA1SSTF.
IN9GG    $IN9AG_F.
IN9HA     IB1___F.
IN9HB    $IA1SSTF.
IN9HC    $IA1SSTF.
IN9HD    $IA1SSTF.
IN9HE    $IA1SSTF.
IN9HF    $IA1SSTF.
IN9HG    $IN9AG_F.
IN9IA     IB1___F.
IO1       IO1___F.
IOBOX2   $IOBOX2F.
IOBOX3   $IOBOX2F.
IO2      $IBR1__F.
IO3O4    $IO3O4_F.
IO4A     $IO4A__F.
IO5      $IA1SSTF.
IO6      $IO6___F.
IO7      $IBR1__F.
IO8O9    $IO3O4_F.
IO9A     $IO4A__F.
IO10     $IA1SSTF.
IO11     $IO11__F.
IO12     $IA1SSTF.
IO13MO   $IB5MO_F.
IO13YR   $IB5YR_F.
IO14     $IA1SSTF.
IO15     $IO6___F.
IO16     $IBR1__F.
IO17O18  $IO3O4_F.
IO18A    $IO4A__F.
IO19     $IA1SSTF.
IO20     $IA1SSTF.
IO21     $IO6___F.
IO22     $IA1SSTF.
IO23     $IO11__F.
IO24     $IA1SSTF.
IO25MO   $IB5MO_F.
IO25YR   $IB5YR_F.
IO26     $IA1SSTF.
IO27     $IO6___F.
IO28     $IA1SSTF.
IO29     $IA1SSTF.
IO30     $IO6___F.
IO31     $IO31__F.
IOBOX4   $IBBOX2F.
IO32     $IA1SSTF.
IO33MO   $IB5MO_F.
IO33YR   $IB5YR_F.
IO33BX   $IO33BXF.
IO34     $IA1SSTF.
IO35     $IO35__F.
IOBOX5   $IOBOX5F.
IO36     $IA1SSTF.
IO37MO   $IB5MO_F.
IO37YR   $IB5YR_F.
IO37BX   $IO33BXF.
IO38     $IA1SSTF.
IO39MO   $IB5MO_F.
IO39YR   $IB5YR_F.
IO39BX   $IO33BXF.
IO40     $IA1SSTF.
IO41MO   $IB5MO_F.
IO41YR   $IB5YR_F.
IO42     $IA1SSTF.
IO43     $IB35A_F.
IP1       IB1___F.
IP2      $IB5MO_F.
IP3L1MO  $IB5MO_F.
IP3L1DY  $IB5MO_F.
IP3L1YR  $IB5YR_F.
IP3R1MO  $IP3R1MF.
IP3R1DY  $IP3R1MF.
IP3R1YR  $IP3R1YF.
IP3L2MO  $IB5MO_F.
IP3L2DY  $IB5MO_F.
IP3L2YR  $IB5YR_F.
IP3R2MO  $IP3R1MF.
IP3R2DY  $IP3R2DF.
IP3R2YR  $IP3R2YF.
IP3L3MO  $IB5MO_F.
IP3L3DY  $IB5MO_F.
IP3L3YR  $IB5YR_F.
IP3R3MO  $IP3R1MF.
IP3R3DY  $IP3R1MF.
IP3R3YR  $IP3R1YF.
IP4       IB1___F.
IP5      $IB5MO_F.
IP6EN1MO $IB5MO_F.
IP6EN1DY $IB5MO_F.
IP6EN1YR $IB5YR_F.
IP6EX1MO $IP6EX1F.
IP6EX1DY $IP6EX1F.
IP6EX1YR $IP6EX1G.
IP6EN2MO $IB5MO_F.
IP6EN2DY $IB5MO_F.
IP6EN2YR $IB5YR_F.
IP6EX2MO $IP6EX1F.
IP6EX2DY $IP6EX1F.
IP6EX2YR $IP6EX1G.
IP6EN3MO $IB5MO_F.
IP6EN3DY $IB5MO_F.
IP6EN3YR $IB5YR_F.
IP6EX3MO $IP6EX1F.
IP6EX3DY $IP6EX1F.
IP6EX3YR $IP6EX1G.
IR1       IR1___F.
IR2      $IR2___F.
IR3       IR1___F.
IR4      $IR2___F.
IR5A      IR5A__F.
IR5B      IR5A__F.
IR5C      IR5A__F.
IR5D      IR5A__F.
IR5E      IR5A__F.
IR5F      IR5A__F.
;
     LABEL

 /*****************************************************************************/
 /*                                                                           */
 /*                         Begin Labels for Card 01                          */
 /*                                                                           */
 /*****************************************************************************/

          IPID01   = '~PATIENT ID NUMBER'
          IREC01   = '~RECORD NUMBER'
          ISREC01  = '~SUBRECORD NUMBER'
          IITYPE   = '~WHAT IS THE INSTRUMENT TYPE?'
          IRTYPE   = '~RESPONDENT TYPE'
          ILANG    = '~QUESTIONNAIRE LANGUAGE VERSION'
          IREFMO   = '~REFERENCE BEGIN MONTH'
          IREFDY   = '~REFERENCE BEGIN DAY'
          IREFYR   = '~REFERENCE BEGIN YEAR'
          IENDMO   = '~REFERENCE END MONTH'
          IENDDY   = '~REFERENCE END DAY'
          IENDYR   = '~REFERENCE END YEAR'
          T6_STAT  = '~QUESTIONNAIRE STATUS'
          OBSDAYS6 = '~OBSERVATION DAYS WITHIN REFERENCE'
          GAP6FLAG = '~PATIENT HAD TIME GAP DURIMG THE'
          ADM6     = '~NUMBER OF INPATIENT ADMISSIONS'
          IPNGT6   = '~NUMBER OF INPATIENT NIGHTS'
          AMBVS6   = '~NUMBER OF AMBULATORY VISITS, INCLUDES'
          ERVS6    = '~NUMBER OF EMERGENCY ROOM VISITS'
          HCVS6    = '~NUMBER OF HOSPITAL CLINIC VISITS'
          OCVS6    = '~NUMBER OF OTHER CLINIC VISITS'
          MDVS6    = '~NUMBER OF PRIVATE MD VISITS'
          IA01CT   = '~COUNTER OF PEOPLE LISTED IN Q.A1.'
          IA1REL1  = '~RELATIONSHIP'
          IA1SEX1  = '~SEX'
          IA1AGE1  = '~AGE'
          IA1SST1  = '~(NAME) DIAGNOSED AS HIV POSITIVE'
          IA1REL2  = '~RELATIONSHIP'
          IA1SEX2  = '~SEX'
          IA1AGE2  = '~AGE'
          IA1SST2  = '~(NAME) DIAGNOSED AS HIV POSITIVE'
          IA1REL3  = '~RELATIONSHIP'
          IA1SEX3  = '~SEX'
          IA1AGE3  = '~AGE'
          IA1SST3  = '~(NAME) DIAGNOSED AS HIV POSITIVE'
          IA1REL4  = '~RELATIONSHIP'
          IA1SEX4  = '~SEX'
          IA1AGE4  = '~AGE'
          IA1SST4  = '~(NAME) DIAGNOSED AS HIV POSITIVE'
          IA1REL5  = '~RELATIONSHIP'
          IA1SEX5  = '~SEX'
          IA1AGE5  = '~AGE'
          IA1SST5  = '~(NAME) DIAGNOSED AS HIV POSITIVE'
          IA1REL6  = '~RELATIONSHIP'
          IA1SEX6  = '~SEX'
          IA1AGE6  = '~AGE'
          IA1SST6  = '~(NAME) DIAGNOSED AS HIV POSITIVE'
          IA1REL7  = '~RELATIONSHIP'
          IA1SEX7  = '~SEX'
          IA1AGE7  = '~AGE'
          IA1SST7  = '~(NAME) DIAGNOSED AS HIV POSITIVE'
          IA1REL8  = '~RELATIONSHIP'
          IA1SEX8  = '~SEX'
          IA1AGE8  = '~AGE'
          IA1SST8  = '~(NAME) DIAGNOSED AS HIV POSITIVE'
          IA1REL9  = '~RELATIONSHIP'
          IA1SEX9  = '~SEX'
          IA1AGE9  = '~AGE'
          IA1SST9  = '~(NAME) DIAGNOSED AS HIV POSITIVE'
          IA1REL10 = '~RELATIONSHIP'
          IA1SEX10 = '~SEX'
          IA1AGE10 = '~AGE'
          IA1SST10 = '~(NAME) DIAGNOSED AS HIV POSITIVE'
          IABOX1A  = '~CHILDREN LISTED?'
          IABOX1B  = '~SPOUSE/PARTNER LISTED?'
          IA2      = '~CURRENT MARITAL STATUS'
          IA3      = '~INVOLVED IN COMMITTED RELATIONSHIP'
          IA4      = '~SPOUSE/PARTNER DIAGNOSED HIV POSITIVE'
          IA5      = '~TYPE OF PLACE LIVED MOST OF THE TIME'
          IA6A     = '~TEMP DOUBLED UP WITH FRIEND/RELATIVE'
          IA6B     = '~SINGLE ROOM OCCUP OR "WELFARE HOTEL"'
          IA6C     = '~SPECIALIZED AIDS HOUSING'
          IA6D     = '~SHELTERS'
          IA6E     = '~STREET OR OTHER PUBLIC PLACE'
          IA6F     = '~NONE'
          IB1      = '~COVERED BY PRIV HEALTH INS PLAN, HMO'
          IBBOX2   = '~TIME 5 = PRIVATE INSURANCE'
          IBBOX3   = '~TIME 5 = PRIVATE INSURANCE'
          IB2      = '~SAME PRIVATE HEALTH INS AS LAST TIME'
          IB3      = '~COVERED WHOLE TIME OR ONLY PART TIME'
          IB4A     = '~JANUARY'
          IB4B     = '~FEBRUARY'
          IB4C     = '~MARCH'
          IB4D     = '~APRIL'
          IB4E     = '~MAY'
          IB4F     = '~JUNE'
          IB4G     = '~JULY'
          IB4H     = '~AUGUST'
          IB4I     = '~SEPTEMBER'
          IB4J     = '~OCTOBER'
          IB4K     = '~NOVEMBER'
          IB4L     = '~DECEMBER'
          IB5MO    = '~MONTH PREVIOUS HEALTH INSURANCE ENDED'
          IB5YR    = '~YEAR PREVIOUS HEALTH INSURANCE ENDED'
          IB6      = '~HAPPENED BECAUSE OF HIV INFECTION'
          IBBOX4   = '~LOOK AT Q. B-1. R ANSWERED:'
          IB7      = '~CURRENT PLAN INDIVIDUAL OR FAMILY'
          IB8      = '~HOW DO YOU GET HEALTH INSURANCE PLAN'
          IB9MO    = '~MONTH CURRENT HEALTH INSURANCE BEGAN'
          IB9YR    = '~YEAR CURRENT HEALTH INSURANCE BEGAN'
          IB10     = '~IS PLAN A HEALTH MAINTENANCE ORG/HMO'
          IB12     = '~COVERED BY MEDICAID/MEDICAID ST NAME'
          IB13     = '~COVERED WHOLE TIME OR PT TIME TIL NOW'
          IB14A    = '~JANUARY'
          IB14B    = '~FEBRUARY'
          IB14C    = '~MARCH'
          IB14D    = '~APRIL'
          IB14E    = '~MAY'
          IB14F    = '~JUNE'
          IB14G    = '~JULY'
          IB14H    = '~AUGUST'
          IB14I    = '~SEPTEMBER'
          IB14J    = '~OCTOBER'
          IB14K    = '~NOVEMBER'
          IB14L    = '~DECEMBER'
          IBBOX5   = '~TIME 3 = MEDICAID'
          IB16MO   = '~MONTH'
          IB16YR   = '~YEAR WHEN MEDICAID COVERAGE ENDED'
          IB17     = '~BETWEEN (REF. DATE) AND AUGUST 31,'
          IB18     = '~WERE YOU TURNED DOWN FOR MEDICAID?'
          IB19     = '~HAVE YOU BEEN COVERED BY MEDICARE'
          IB21     = '~COVERED BY OTHER PUBLIC ASSIST PROG'
          IBBOX6   = '~TIME 5 = OTHER PUBLIC ASSISTANCE'
          IBBOX7   = '~TIME 5 = OTHER PUBLIC ASSISTANCE'
          IB22     = '~SAME PUBLIC ASSIST PROG AS LAST TIME'
          IB23     = '~COVERED WHOLE TIME OR PT TIME TIL NOW'
          IB24A    = '~JANUARY'
          IB24B    = '~FEBRUARY'
          IB24C    = '~MARCH'
          IB24D    = '~APRIL'
          IB24E    = '~MAY'
          IB24F    = '~JUNE'
          IB24G    = '~JULY'
          IB24H    = '~AUGUST'
          IB24I    = '~SEPTEMBER'
          IB24J    = '~OCTOBER'
          IB24K    = '~NOVEMBER'
          IB24L    = '~DECEMBER'
          IB25MO   = '~MONTH'
          IB25YR   = '~YEAR'
          IBBOX8   = '~LOOK AT Q B-21. R ANSWERED:'
          IB26     = '~WHAT IS THE NAME OF CURRENT PROGRAM'
          IB27MO   = '~MONTH CURRENT PROGRAM COVERAGE BEGAN'
          IB27YR   = '~YEAR CURRENT PROGRAM COVERAGE BEGAN'
          IBBOX9   = '~TIME 5 - CHAMPUS/CHAMPVA'
          IB28     = '~ARE YOU COVERED BY CHAMPUS OR CHAMPVA'
          IB29     = '~IN CLINICAL TRIALS FOR ANY MEDICATION'
          IB31A1   = '~LENGTH OF TIME 1'
          IB31A2   = '~UNIT OF TIME 1'
          IB31B1   = '~LENGTH OF TIME 2'
          IB31B2   = '~UNIT OF TIME 2'
          IBBOX10  = '~DOES R HAVE PRIVATE INSURANCE?'
          IB32     = '~WHAT IS YOUR HEALTH INSURANCE PREMIUM'
          IB33     = '~DO YOU PAY WEEKLY,MONTHLY,QRTRLY,ETC'
          IB34     = '~DO YOU HAVE A DEDUCTIBLE? PROBE: IS'
          IB35A    = '~AMOUNT'
          IB35B    = '~IS DEDUCTIBLE DOLLAR AMOUNT OR'
          IB361    = '~DOES INSURANCE PAY WHEN HOSPITALIZED'
          IB36A1   = '~DO YOU HAVE A CO-PAYMENT, THAT IS, DO'
          IB36B1   = '~IS THERE A PERCENTAGE APPLIED TO THIS'
          IBR1     = '~PERCENTAGE PAID BY RESPONDENT'
          IBINS1   = '~PERCENTAGE PAID BY INSURANCE COMPANY'
          IB36D1   = '~AMOUNT YOU PAY PER HOSPITALIZATION'
          IB36E1   = '~ARE ANY DAYS FREE PER HOSPITALIZATION'
          IBDAYS1  = '~# OF DAYS FREE PER HOSPITALIZATION'
          IB36F1   = '~DOES THIS CHANGE AFTER CERTAIN $ AMT'
          IB36G1   = '~HOW DOES IT CHANGE?'
          IB362    = '~DOES INSURANCE PAY FOR DOCTOR VISITS'
          IB36A2   = '~DO YOU HAVE A CO-PAYMENT, THAT IS, DO'
          IB36B2   = '~IS THERE A PERCENTAGE APPLIED TO THIS'
          IBR2     = '~PERCENTAGE PAID BY RESPONDENT'
          IBINS2   = '~PERCENTAGE PAID BY INSURANCE COMPANY'
          IB36D2   = '~HOW MUCH DO YOU PAY PER DOCTOR VISIT?'
          IB36F2   = '~DOES THIS CHANGE AFTER CERTAIN $ AMT'
          IB36G2   = '~HOW DOES IT CHANGE?'
          IB363    = '~DOES INSURANCE PAY FOR PRESCRIPTIONS'
          IB36A3   = '~DO YOU HAVE A CO-PAYMENT, THAT IS, DO'
          IB36B3   = '~IS THERE A PERCENTAGE APPLIED TO THIS'
          IBR3     = '~PERCENTAGE PAID BY RESPONDENT'
          IBINS3   = '~PERCENTAGE PAID BY INSURANCE COMPANY'
          IB36D3   = '~HOW MUCH DO YOU PAY PER PRESCRIPTION?'
          IB36F3   = '~DOES THIS CHANGE AFTER CERTAIN $ AMT'
          IB36G3   = '~HOW DOES IT CHANGE?'
          IB364    = '~DOES INSURANCE PAY FOR MNTL HLTH SRVC'
          IB36A4   = '~DO YOU HAVE A CO-PAYMENT, THAT IS, DO'
          IB36B4   = '~IS THERE A PERCENTAGE APPLIED TO THIS'
          IBR4     = '~PERCENTAGE PAID BY RESPONDENT'
          IBINS4   = '~PERCENTAGE PAID BY INSURANCE COMPANY'
          IB36D4   = '~AMT YOU PAY PER MENTAL HEALTH SERVICE'
          IB36E4   = '~LIFETIME OR YRLY MAXIMUM INS WILL PAY'
          IB36DOL  = '~AMOUNT'
          IB36MAX  = '~TYPE OF MAXIMUM PAID'
          IB36F4   = '~DOES THIS CHANGE AFTER CERTAIN $ AMT'
          IB36G4   = '~HOW DOES IT CHANGE?'
          IB365    = '~DOES INSURANCE PAY FOR DENTAL VISITS'
          IB36A5   = '~DO YOU HAVE A CO-PAYMENT, THAT IS, DO'
          IB36B5   = '~IS THERE A PERCENTAGE APPLIED TO THIS'
          IBR5     = '~PERCENTAGE PAID BY RESPONDENT'
          IBINS5   = '~PERCENTAGE PAID BY INSURANCE COMPANY'
          IB36D5   = '~HOW MUCH DO YOU PAY PER DENTAL VISIT?'
          IB36F5   = '~DOES THIS CHANGE AFTER CERTAIN $ AMT'
          IB36G5   = '~HOW DOES IT CHANGE?'
          IC15A    = '~IN PAST 5 YRS, HAD SWOLLEN GLANDS'
          IC15B    = '~IN PAST 5 YRS, HAD PERSISTENT FEVER'
          IC15C    = '~IN PAST 5 YRS, HAD DIARRHEA'
          IC15D    = '~IN PAST 5 YRS, HAD UNINTENDED WT LOSS'
          IC15E    = '~NONE'
          IC16A    = '~IN PAST 5 YRS,HAD CANDIDIASIS(THRUSH)'
          IC16B    = '~IN PAST 5 YRS,HAD PCP(PNEUMOCYSTIS CA'
          IC16C    = '~IN PAST 5 YRS, HAD KAPOSI''S SARCOMA'
          IC16D    = '~IN PAST 5 YRS, HAD LYMPHOMA'
          IC16E    = '~IN PAST 5 YRS, HAD WASTING SYNDROME'
          IC16F    = '~IN PAST 5 YRS, HAD TB (TUBERCULOSIS)'
          IC16G    = '~IN PAST 5 YRS, HAD CRYPTOCOCCOSIS'
          IC16H    = '~IN PAST 5 YRS,HAD CMV(CYTOMEGALOVIRUS'
          IC16I    = '~IN PAST 5 YRS, HAD MAI'
          IC16J    = '~IN PAST 5 YRS, HAD CRYPTOSPORIDIOSIS'
          IC16K    = '~IN PAST 5 YRS, HAD DEMENTIA'
          IC16L    = '~IN PAST 5 YRS, HAD HERPES SIMPLEX'
          IC16M    = '~IN PAST 5 YRS, HAD HISTOPLASMOSIS'
          IC16N    = '~IN PAST 5 YRS,HAD TOXOPLASMOSIS(TOXO)'
          IC16O    = '~IN PAST 5 YRS, HAD ISOSPORIASIS'
          IC16P    = '~IN PAST 5 YRS,HAD LEUKOENCEPHALOPATHY'
          IC16Q    = '~IN PAST 5 YRS, HAD SALMONELLOSIS'
          IC16R    = '~NONE'
          IC17     = '~SINCE REF DATE HAVE YOU HAD A T4 TEST'
          IC18     = '~WHAT WAS YOUR MOST RECENT T4 COUNT'
          IC19MO   = '~MONTH OF MOST RECENT T4 TEST'
          IC19DY   = '~DAY OF MOST RECENT T4 TEST'
          IC19YR   = '~YEAR OF MOST RECENT T4 TEST'
          IC20     = '~SINCE REF DATE HAS T4 COUNT BEEN <200'
          ID1A     = '~PATIENT IN HOSP OVERNIGHT OR LONGER'
          ID1B     = '~# OF TIMES IN HOSP OVRNIGHT OR LONGER'
          ID06CT   = '~NUMBER OF INPATIENT STAY RECORDS'
          IE1A     = '~IN RES CARE,NURS HOME,HOSPICE OVRNGHT'
          IE1B     = '~#OF TIMES IN RES CARE,HURS HOME,HOSPC'
          IE08CT   = '~NUMBER OF NURSING HOME/RESIDENTIAL CARE'
          IF1      = '~GO TO HOSP EMERG ROOM FOR MEDCL CARE'
          IF1A     = '~# OF DIFFERENT EMERG ROOMS VISITED'
          IF10CT   = '~NUMBER OF EMERGENCY ROOM RECORDS'
          IF2      = '~GO TO HOSP CLINIC, OUT-PATIENT DEPT'
          IF2A     = '~# OF DIFFERENT HOSP CLINICS VISITED'
          IF11CT   = '~NUMBER OF HOSPITAL CLINIC RECORDS'
          IF3      = '~GO TO ANY OTHER MEDICAL CLINICS'
          IF3A     = '~# OF DIFFERENT MED CLINICS VISITED'
          IF12CT   = '~NUMBER OF MEDICAL CLINIC RECORDS'
          IF4      = '~GO TO A PRIVATE DOCTOR''S OFFICE'
          IF4A     = '~# OF DIFFERENT PRIV DR''S OFCS VISITED'
          IF13CT   = '~NUMBER OF PRIVATE DOCTOR''S OFFICE'
          IG1      = '~GO TO SUPPORT GRP, PSYCH COUNSEL/THER'
          IG1A     = '~# OF DIFFERENT SUPPORT GROUPS VISITED'
          IG14CT   = '~NUMBER OF MENTAL HEALTH PROVIDER'
          IG2      = '~GO TO ANY MEDICAL PRACTITIONERS'
          IG2A     = '~# OF DIFFERENT MED PRACT''S VISITED'
          IG15CT   = '~NUMBER OF MEDICAL PRACTITIONER RECORDS'
          IG3      = '~GO TO ANY ALTERNATIVE THERAPISTS'
          IG3A     = '~# OF DIFFERENT ALTRNTV THRPST VISITED'
          IG16CT   = '~NUMBER OF ALTERNATIVE THERAPIST RECORDS'
          IG4      = '~BUY/REPLACE SPECIAL MEDICAL EQUIPMENT'
          IG17CT   = '~NUMBER OF MEDICAL EQUIPMENT PROVIDER'
          IH1      = '~HAVE ANY PEOPLE HELPED YOU AT HOME'
          IH2      = '~BEEN HELPED AT HOME BY ANY OTH PEOPLE'
          IH19CT   = '~NUMBER OF HOME HEALTH CARE PROVIDER'
          II1      = '~GOT HELP FINDNG/KEEPNG PLACE TO LIVE'
          II21CT   = '~# OF DIFFERENT PROVIDERS YOU USED'
          II2      = '~RECEIVED HELP WITH CHILD CARE'
          II22CT   = '~# OF DIFFERENT PROVIDERS YOU USED'
          II3      = '~PEOPLE WITH HIV INFECTION OFTEN NEED'
          II23CT   = '~# OF DIFFERENT PROVIDERS YOU USED'
          II4      = '~RECEIVED HELP WITH TRANSPORTATION'
          II24CT   = '~# OF DIFFERENT PROVIDERS YOU USED'
          II5      = '~RECEIVED HELP WITH OBTAINING FOOD'
          II25CT   = '~# OF DIFFERENT PROVIDERS YOU USED'
          II6      = '~GOT HELP WITH FINANCIAL ASSISTANCE'
          II26CT   = '~# OF DIFFERENT PROVIDERS YOU USED'
          II7      = '~RECVNG ALCOHOL/DRUG TREATMENT/COUNSEL'
          II27CT   = '~# OF DIFFERENT PROVIDERS YOU USED'
          IJ1      = '~SEEN DENTIST,ORAL SURG,DNTL CARE PROV'
          IJ1A     = '~# OF TIMES SEEN DENTIST,ORAL SURG,ETC'
          IJ29CT   = '~NUMBER OF DENTAL VISIT RECORDS'
          IKSEX    = '~SEX OF PATIENT (MALE OR FEMALE)'
          IK1A     = '~FROM REF DATE,HAD SEXUALLY TRANS DIS'
          IK1B     = '~FROM REF DATE,HAD CHRONIC VAGINITIS'
          IK1C     = '~FROM REF DATE,HAD PELV INFLAM DISEASE'
          IK1D     = '~FROM REF DATE,HAD HERPES SIMPLEX'
          IK1E     = '~FROM REF DATE,HAD VAG CANDIDIASIS/YST'
          IK1F     = '~FROM REF DATE,HAD HUMAN PAPILLOMAVIRS'
          IK1G     = '~FROM REF DATE, HAD ABNORMAL PAP TEST'
          IK2      = '~SINCE REF DATE HAVE YOU BEEN PREGNANT'
          IK3      = '~DID YOU RECIEVE PRENATAL CARE?'
          IK4PROV  = '~PROVIDER ID'
          IK5A     = '~MEDICAID'
          IK5B     = '~OTHER PUBLIC ASSISTANCE'
          IK5C     = '~PRIVATE INSURANCE'
          IK5D     = '~MEDICARE'
          IK5E     = '~SELF PAY'
          IK5F     = '~OTHER'
          IK5FOS   = '~OTHER SPECIFIED'
          IK6      = '~RCVNG COUNSELNG RELATED TO HIV INFECT'
          IK7      = '~PROBLEMS FACED IN RCVNG PRENATAL CARE'
          IL1      = '~TAKEN ANY MEDICINES OR DRUGS LISTED'
          IL2      = '~TAKEN OTHER PRESCRIPTION MEDCINE/DRUG'
          IL32CT   = '~NUMBER OF PRESCRIPTION DRUG RECORDS'
          IL3      = '~TAKEN NON-PRESCRIPTION MEDICINES/DRGS'
          IL4CT    = '~# OF NON-PRESCRIPTION DRUGS LISTED'
          IL4A     = '~NON-PRESCRIPTION DRUG 1'
          IL4B     = '~NON-PRESCRIPTION DRUG 2'
          IL4C     = '~NON-PRESCRIPTION DRUG 3'
          IL4D     = '~NON-PRESCRIPTION DRUG 4'
          IL4E     = '~NON-PRESCRIPTION DRUG 5'
          IL4F     = '~NON-PRESCRIPTION DRUG 6'
          IL4G     = '~NON-PRESCRIPTION DRUG 7'
          IL4H     = '~NON-PRESCRIPTION DRUG 8'
          IL4I     = '~NON-PRESCRIPTION DRUG 9'
          IL4J     = '~NON-PRESCRIPTION DRUG 11'
          IL4K     = '~NON-PRESCRIPTION DRUG 11'
          IL4L     = '~NON-PRESCRIPTION DRUG 12'
          IL4M     = '~NON-PRESCRIPTION DRUG 13'
          IL4N     = '~NON-PRESCRIPTION DRUG 15'
          IL4O     = '~NON-PRESCRIPTION DRUG 16'
          IL4P     = '~NON-PRESCRIPTION DRUG 16'
          IL4Q     = '~NON-PRESCRIPTION DRUG 17'
          IL4R     = '~NON-PRESCRIPTION DRUG 18'
          IL4S     = '~NON-PRESCRIPTION DRUG 19'
          IL4T     = '~NON-PRESCRIPTION DRUG 20'
          IL4U     = '~NON-PRESCRIPTION DRUG 21'
          IL4V     = '~NON-PRESCRIPTION DRUG 22'
          IL4W     = '~NON-PRESCRIPTION DRUG 23'
          IL4X     = '~NON-PRESCRIPTION DRUG 24'
          IL5      = '~TOTAL AMNT PAID FOR NON-PRESCRIP MEDS'
          IM1      = '~IN GENERAL, HOW IS YOUR HEALTH'
          IM2A     = '~I HAVE PAIN AT NIGHT'
          IM2B     = '~I TAKE TABLETS TO HELP ME SLEEP'
          IM2C     = '~I HAVE UNBEARABLE PAIN'
          IM2D     = '~I AM TIRED ALL THE TIME'
          IM2E     = '~I FIND IT PAINFUL TO CHANGE POSITION'
          IM2F     = '~I''M IN PAIN WHEN I WALK'
          IM2G     = '~I''M WAKING IN THE EARLY HRS OF MORNG'
          IM2H     = '~EVERYTHING IS AN EFFORT'
          IM2I     = '~I LIE AWAKE FOR MOST OF THE NIGHT'
          IM2J     = '~I''M IN PAIN WHEN I''M STANDING'
          IM2K     = '~IT TAKES ME A LONG TIME TO GET TO SLEEP'
          IM2L     = '~I SOON RUN OUT OF ENERGY'
          IM2M     = '~I''M IN CONSTANT PAIN'
          IM2N     = '~I''M IN PAIN WHEN GOING UP AND DOWN'
          IM2O     = '~I SLEEP BADLY AT NIGHT'
          IM2P     = '~I''M IN PAIN WHEN I''M SITTING'
          IM3A     = '~HOW LONG HLTH LIMITS VIGOROUS ACTVTY'
          IM3B     = '~HOW LONG HLTH LIMITS MODERATE ACTVTY'
          IM3C     = '~WALK UPHILL/CLIMB FEW FLIGHTS OF STRS'
          IM3D     = '~BENDING, LIFTING, OR STOOPING'
          IM3E     = '~WALKING ONE BLOCK'
          IM3F     = '~EATING,DRESSING,BATHING,USING TOILET'
          IM4      = '~HLTH KEPT FROM WORK AT JOB,HOME,SCHL'
          IM5      = '~HEALTH KEEP YOU FRM ACTIVITIES BEFORE'
          IM6      = '~UNABLE TO DO SOME KINDS/AMTS OF WORK'
          IM7      = '~UNABLE TO DO ACTIV DUE TO HLTH BEFORE'
          IM8      = '~PAST MO, OFTEN TALK TO RELATVS/FRNDS'
          IM9      = '~PAST MO, HLTH LIMITED SOCIAL ACTIVITY'
          IM10A    = '~HAVE YOU BEEN A VERY NERVOUS PERSON?'
          IM10B    = '~HAVE YOU FELT CALM AND PEACEFUL?'
          IM10C    = '~HAVE YOU FELT DOWNHEARTED AND BLUE?'
          IM10D    = '~HAVE YOU BEEN A HAPPY PERSON?'
          IM10E    = '~FELT SO DWN IN DUMPS,NOTHING CHEER UP'
          IM11     = '~# OF FAMILY/FRNDS YOU CAN CONFIDE IN'
          IN1      = '~CERTAIN PLACE GO FOR MED CARE/ADVICE'
          IN2A     = '~PROVIDER TYPE'
          IN2PROV  = '~PROVIDER ID'
          IN3      = '~CERTAIN DOCTOR USUALLY SEEN AT PLACE'
          IN4      = '~DOES SOMEONE HELP YOU FILL OUT FORMS'
          IN5      = '~HOW DO YOU USUALLY GET THERE'
          IN6MIN   = '~# OF MINUTES IT TAKES TO GET THERE'
          IN6HRS   = '~# OF HOURS IT TAKES TO GET THERE'
          IN7      = '~WHEN YOU GET THERE, DO YOU USUALLY:'
          IN8MOS   = '~HOW MANY MONTHS BEEN GOING TO PLACE'
          IN8YRS   = '~HOW MANY YEARS BEEN GOING TO PLACE'
          IN9AA    = '~NEEDED EMERG CARE BUT DIDN''T GET IT'
          IN9AB    = '~KNOW WHERE CAN GO TO GET EMERG CARE'
          IN9AC    = '~HAVE INSURANCE THAT PAYS EMERG CARE'
          IN9AD    = '~AFFORD TO PAY FOR EMERG CARE YOURSELF'
          IN9AE    = '~HAVE TRANSPORTATION TO EMERGENCY CARE'
          IN9AF    = '~ANYONE REFUSE TO PROVIDE EMERG CARE'
          IN9AG    = '~WHY WERE YOU REFUSED EMERGENCY CARE'
          IN9BA    = '~NEEDED HOSP STAY BUT DIDN''T GET IT'
          IN9BB    = '~KNOW WHERE YOU CAN GET HOSP STAY'
          IN9BC    = '~(IF YOU KNEW WHERE TO GO) DID YOU HAVE'
          IN9BD    = '~AFFORD TO PAY FOR HOSP STAY YOURSELF'
          IN9BE    = '~HAVE TRANSPORTATION TO HOSPITAL STAY'
          IN9BF    = '~ANYONE REFUSE TO PROVIDE HOSP STAY'
          IN9BG    = '~WHY WERE YOU REFUSED HOSPITAL STAY'
          IN9CA    = '~NEEDED HOME SERVICES BUT DIDN''T GET'
          IN9CB    = '~KNOW WHERE CAN GO FOR HOME SERVICES'
          IN9CC    = '~HAVE INSURANCE PAYS FOR HOME SERVICES'
          IN9CD    = '~AFFORD TO PAY FOR HOME SRVCS YOURSELF'
          IN9CF    = '~ANYONE REFUSE TO PROVIDE HOME SRVCS'
          IN9CG    = '~WHY WERE YOU REFUSED HOME SERVICES'
          IN9DA    = '~NEEDED MNTL HLTH SRVC BUT DIDN''T GET'
          IN9DB    = '~KNOW WHERE CAN GET MNTL HLTH SERVICES'
          IN9DC    = '~HAVE INSUR THAT PAYS MNTL HLTH SRVCS'
          IN9DD    = '~AFFORD TO PAY MNTL HLTH SRVC YOURSELF'
          IN9DE    = '~HAVE TRANSPORTATION TO MNTL HLTH SRVC'
          IN9DF    = '~ANYONE REFUSE TO PROVIDE MNTL HL SRVC'
          IN9DG    = '~WHY WERE YOU REFUSED MNTL HLTH SRVCS'
          IN9EA    = '~NEEDED RESIDENTL CARE BUT DIDN''T GET'
          IN9EB    = '~KNOW WHERE CAN GO TO GET RESDNTL CARE'
          IN9EC    = '~(IF YOU KNEW WHERE TO GO) DID YOU HAVE'
          IN9ED    = '~AFFORD TO PAY RESIDENTL CARE YOURSELF'
          IN9EE    = '~HAVE TRANSPORTATION TO RESIDENTL CARE'
          IN9EF    = '~ANYONE REFUSE TO PROVIDE RESDNTL CARE'
          IN9EG    = '~WHY WERE YOU REFUSED RESIDENTIAL CARE'
          IN9FA    = '~NEEDED PRESCRIBED MED BUT DIDN''T GET'
          IN9FB    = '~KNOW WHERE CAN GO TO GET PRESCRBD MED'
          IN9FC    = '~HAVE INSURANCE THAT PAYS PRESCRBD MED'
          IN9FD    = '~AFFORD TO PAY PRESCRIBED MED YOURSELF'
          IN9FE    = '~HAVE TRANSPORT TO GET PRESCRIBED MEDS'
          IN9FF    = '~ANYONE REFUSE TO PROVIDE PRESCRBD MED'
          IN9FG    = '~WHY WERE YOU REFUSED PRESCRIBED MEDS'
          IN9GA    = '~NEEDED DENTAL SERVICES BUT DIDN''T GET'
          IN9GB    = '~KNOW WHERE CAN GO TO GET DENTAL SRVCS'
          IN9GC    = '~HAVE INSURANCE THAT PAYS DENTAL SRVCS'
          IN9GD    = '~AFFORD TO PAY DENTAL SERVCS YOURSELF'
          IN9GE    = '~HAVE TRANSPORTATION TO DENTAL SERVCS'
          IN9GF    = '~ANYONE REFUSE TO PROVIDE DENTAL SRVCS'
          IN9GG    = '~WHY WERE YOU REFUSED DENATL SERVICES'
          IN9HA    = '~NEEDED DRUG TREATMENT BUT DIDN''T GET'
          IN9HB    = '~KNOW WHERE CAN GO FOR DRUG TREATMENT'
          IN9HC    = '~HAVE INSURANCE TO PAY DRUG TREATMENT'
          IN9HD    = '~AFFORD TO PAY DRUG TREATMENT YOURSELF'
          IN9HE    = '~HAVE TRANSPORTATION TO DRUG TREATMENT'
          IN9HF    = '~ANYONE REFUSE TO PROVIDE DRUG TRTMENT'
          IN9HG    = '~WHY WERE YOU REFUSED DRUG TREATMENT'
          IN9IA    = '~YOU FELT THAT NO SERVICES WERE NEEDED?'
          IO1      = '~WORK FULL TIME,PT TIME,NOT WORKNG NOW'
          IOBOX2   = '~R WORKING PART TIME, LAST TIME R WAS:'
          IOBOX3   = '~R NOT WORKING, LAST TIME R WAS:'
          IO2      = '~# OF HRS WORKING NOW IN AVERAGE WEEK'
          IO3O4    = '~CURRENT OCCUP, IMPORTANT ACTIVITIES'
          IO4A     = '~# OF PEOPLE USUALLY EMPLOYED AT JOB'
          IO5      = '~CHANGE TYPE/AMNT OF WORK BECAUSE ILL'
          IO6      = '~WHAT TYPE OF CHANGE(S) DID YOU MAKE?'
          IO7      = '~# OF HRS WORKING NOW IN AVERAGE WEEK'
          IO8O9    = '~CURRENT OCCUP, IMPORTANT ACTIVITIES'
          IO9A     = '~# OF PEOPLE USUALLY EMPLOYED AT JOB'
          IO10     = '~ACTIVELY LOOKING FOR FULL TIME WORK'
          IO11     = '~REASON STOPPED WORK FT AT LAST JOB'
          IO12     = '~HAPPENED BECAUSE OF HIV INFECTION'
          IO13MO   = '~MONTH YOU LEFT THAT FULL TIME JOB'
          IO13YR   = '~YEAR YOU LEFT THAT FULL TIME JOB'
          IO14     = '~CHANGE TYPE/AMNT OF WORK BECAUSE ILL'
          IO15     = '~WHAT TYPE OF CHANGE(S) DID YOU MAKE?'
          IO16     = '~# OF HRS WORKING NOW IN AVERAGE WEEK'
          IO17O18  = '~CURRENT OCCUP, IMPORTANT ACTIVITIES'
          IO18A    = '~# OF PEOPLE USUALLY EMPLOYED AT JOB'
          IO19     = '~ACTIVELY LOOKING FOR FULL TIME WORK'
          IO20     = '~CHANGE TYPE/AMNT OF WORK BECAUSE ILL'
          IO21     = '~WHAT TYPE OF CHANGE(S) DID YOU MAKE?'
          IO22     = '~ACTIVELY LOOKING FOR FULL TIME WORK'
          IO23     = '~REASON STOPPED WORK FT AT LAST JOB'
          IO24     = '~HAPPENED BECAUSE OF HIV INFECTION'
          IO25MO   = '~MONTH YOU LEFT THAT FULL TIME JOB'
          IO25YR   = '~YEAR YOU LEFT THAT FULL TIME JOB'
          IO26     = '~CHANGE TYPE/AMNT OF WORK BECAUSE ILL'
          IO27     = '~WHAT TYPE OF CHANGE(S) DID YOU MAKE?'
          IO28     = '~ACTIVELY LOOKING FOR FULL TIME WORK'
          IO29     = '~CHANGE TYPE/AMNT OF WORK BECAUSE ILL'
          IO30     = '~WHAT TYPE OF CHANGE(S) DID YOU MAKE?'
          IO31     = '~TOTAL INCOME BEFORE TAXES FOR PAST MO'
          IOBOX4   = '~R WORKING FULL TIME (Q.O-1)'
          IO32     = '~RECVD SOC SEC DISABILITY PAYMENT'
          IO33MO   = '~MONTH RECVD 1ST SOC SEC DISAB PAYMENT'
          IO33YR   = '~YEAR RECVD 1ST SOC SEC DISAB PAYMENT'
          IO33BX   = '~1ST SOC SEC DISAB PAY BEFORE REF DATE'
          IO34     = '~APPLIED FOR SOC SEC DISABLTY PAYMENTS'
          IO35     = '~TURNED DOWN FOR SOC SEC DISAB PAYMNTS'
          IOBOX5   = '~R HAS: NO CHILDREN/1 OR MORE CHILDREN'
          IO36     = '~GOTTEN ASSISTANCE THROUGH AFDC/ADC'
          IO37MO   = '~MONTH RECEIVED 1ST AFDC PAYMENT'
          IO37YR   = '~YEAR RECEIVED 1ST AFDC PAYMENT'
          IO37BX   = '~1ST AFDC PAYMENT BEFORE REF DATE'
          IO38     = '~RECEIVED SUPPLEMENTAL SECURITY INCOME'
          IO39MO   = '~MONTH RECEIVED FIRST SSI PAYMENT'
          IO39YR   = '~YEAR RECEIVED FIRST SSI PAYMENT'
          IO39BX   = '~1ST SSI PAYMENT BEFORE REFERENCE DATE'
          IO40     = '~HAVE YOU RECEIVED FOOD STAMPS'
          IO41MO   = '~MONTH RECEIVED FIRST FOOD STAMPS'
          IO41YR   = '~YEAR RECEIVED FIRST FOOD STAMPS'
          IO42     = '~RCVD $ FROM PARENTS, FRIENDS, FAMILY'
          IO43     = '~HOW MUCH MONEY HAVE YOU RECEIVED'
          IP1      = '~FROM REF DT,BEEN OUT USA 2 WKS/MORE'
          IP2      = '~FROM REF DT,# TIMES OUT US 2 WKS/MORE'
          IP3L1MO  = '~MONTH YOU LEFT USA ON FIRST TRIP'
          IP3L1DY  = '~DAY YOU LEFT USA ON FIRST TRIP'
          IP3L1YR  = '~YEAR YOU LEFT USA ON FIRST TRIP'
          IP3R1MO  = '~MONTH YOU RETURNED TO USA FIRST TRIP'
          IP3R1DY  = '~DAY YOU RETURNED TO USA FIRST TRIP'
          IP3R1YR  = '~YEAR YOU RETURNED TO USA FIRST TRIP'
          IP3L2MO  = '~MONTH YOU LEFT USA ON SECOND TRIP'
          IP3L2DY  = '~DAY YOU LEFT USA ON SECOND TRIP'
          IP3L2YR  = '~YEAR YOU LEFT USA ON SECOND TRIP'
          IP3R2MO  = '~MONTH YOU RETURNED TO USA SECOND TRIP'
          IP3R2DY  = '~DAY YOU RETURNED TO USA SECOND TRIP'
          IP3R2YR  = '~DAY YOU RETURNED TO USA SECOND TRIP'
          IP3L3MO  = '~MONTH YOU LEFT USA ON THIRD TRIP'
          IP3L3DY  = '~DAY YOU LEFT USA ON THIRD TRIP'
          IP3L3YR  = '~YEAR YOU LEFT USA ON THIRD TRIP'
          IP3R3MO  = '~MONTH YOU RETURNED TO USA THIRD TRIP'
          IP3R3DY  = '~DAY YOU RETURNED TO USA THIRD TRIP'
          IP3R3YR  = '~YEAR YOU RETURNED TO USA THIRD TRIP'
          IP4      = '~FROM REF DT,IN JAIL/PRSN 2 WKS/MORE'
          IP5      = '~FROM REF DT,# TIMES JAIL/PRSN 2WKS/+'
          IP6EN1MO = '~MONTH ENTERED JAIL/PRISON FIRST TIME'
          IP6EN1DY = '~DAY ENTERED JAIL/PRISON FIRST TIME'
          IP6EN1YR = '~YEAR ENTERED JAIL/PRISON FIRST TIME'
          IP6EX1MO = '~MONTH'
          IP6EX1DY = '~MONTH RELEASED FRM JAIL/PRSN 1ST TIME'
          IP6EX1YR = '~DAY RELEASED FRM JAIL/PRSN 1ST TIME'
          IP6EN2MO = '~MONTH ENTERED JAIL/PRISON SECOND TIME'
          IP6EN2DY = '~DAY ENTERED JAIL/PRISON SECOND TIME'
          IP6EN2YR = '~YEAR ENTERED JAIL/PRISON SECOND TIME'
          IP6EX2MO = '~MONTH RELEASED FRM JAIL/PRSN 2ND TIME'
          IP6EX2DY = '~DAY RELEASED FRM JAIL/PRSN 2ND TIME'
          IP6EX2YR = '~YEAR RELEASED FRM JAIL/PRSN 2ND TIME'
          IP6EN3MO = '~MONTH ENTERED JAIL/PRISON THIRD TIME'
          IP6EN3DY = '~DAY ENTERED JAIL/PRISON THIRD TIME'
          IP6EN3YR = '~YEAR ENTERED JAIL/PRISON THIRD TIME'
          IP6EX3MO = '~MONTH RELEASED FRM JAIL/PRSN 3RD TIME'
          IP6EX3DY = '~DAY RELEASED FRM JAIL/PRSN 3RD TIME'
          IP6EX3YR = '~YEAR RLEASED FRM JAIL/PRSN 3RD TIME'
          IR1      = '~STATE CONFIDENCE IN R''S TRUTHFULNESS'
          IR2      = '~WHY?'
          IR3      = '~STATE CONFIDENCE IN R''S ACCURACY'
          IR4      = '~WHY?'
          IR5A     = '~ABLE TO UNDERSTAND QUESTIONS'
          IR5B     = '~COOPERATIVE'
          IR5C     = '~NO LANGUAGE PROBLEM'
          IR5D     = '~INTERVIEWED WITHOUT INTERRUPTION'
          IR5E     = '~SOBER'
          IR5F     = '~PHYSICALLY OR MENTALLY FATIGUED'
     ;
     RETURN;

 /*****************************************************************************/
 /*                                                                           */
 /*                        Input statement for Card 01                        */
 /*                                                                           */
 /*****************************************************************************/

     CRD01 :
     INPUT
               IPID01             001-009
               IREC01             010-011
               ISREC01            012-013
               IITYPE       $     014
               IRTYPE             015
               ILANG              016
               IREFMO             017-018
               IREFDY             019-020
               IREFYR             021-022
               IENDMO       $     023-024
               IENDDY       $     025-026
               IENDYR       $     027-028
               T6_STAT      $     029-030
               OBSDAYS6           031-033
               GAP6FLAG     $     034
               ADM6               035-036
               IPNGT6             037-039
               AMBVS6             040-042
               ERVS6              043-045
               HCVS6              046-048
               OCVS6              049-051
               MDVS6              052-054
               IA01CT             055-056
               IA1REL1      $     057-058
               IA1SEX1      $     059
               IA1AGE1      $     060-061
               IA1SST1      $     062
               IA1REL2      $     063-064
               IA1SEX2      $     065
               IA1AGE2      $     066-067
               IA1SST2      $     068
               IA1REL3      $     069-070
               IA1SEX3      $     071
               IA1AGE3      $     072-073
               IA1SST3      $     074
               IA1REL4      $     075-076
               IA1SEX4      $     077
               IA1AGE4      $     078-079
               IA1SST4      $     080
               IA1REL5      $     081-082
               IA1SEX5      $     083
               IA1AGE5      $     084-085
               IA1SST5      $     086
               IA1REL6      $     087-088
               IA1SEX6      $     089
               IA1AGE6      $     090-091
               IA1SST6      $     092
               IA1REL7      $     093-094
               IA1SEX7      $     095
               IA1AGE7      $     096-097
               IA1SST7      $     098
               IA1REL8      $     099-100
               IA1SEX8      $     101
               IA1AGE8      $     102-103
               IA1SST8      $     104
               IA1REL9      $     105-106
               IA1SEX9      $     107
               IA1AGE9      $     108-109
               IA1SST9      $     110
               IA1REL10     $     111-112
               IA1SEX10     $     113
               IA1AGE10     $     114-115
               IA1SST10     $     116
               IABOX1A            117
               IABOX1B            118
               IA2          $     119
               IA3          $     120
               IA4          $     121
               IA5                122-123
               IA6A               124
               IA6B               125
               IA6C               126
               IA6D               127
               IA6E               128
               IA6F               129
               IB1                130
               IBBOX2       $     131
               IBBOX3             132
               IB2          $     133
               IB3          $     134
               IB4A         $     135
               IB4B         $     136
               IB4C         $     137
               IB4D         $     138
               IB4E         $     139
               IB4F         $     140
               IB4G         $     141
               IB4H         $     142
               IB4I         $     143
               IB4J         $     144
               IB4K         $     145
               IB4L         $     146
               IB5MO        $     147-148
               IB5YR        $     149-150
               IB6          $     151
               IBBOX4       $     152
               IB7          $     153
               IB8          $     154-155
               IB9MO        $     156-157
               IB9YR        $     158-159
               IB10         $     160
               IB12         $     161
               IB13         $     162
               IB14A        $     163
               IB14B        $     164
               IB14C        $     165
               IB14D        $     166
               IB14E        $     167
               IB14F        $     168
               IB14G        $     169
               IB14H        $     170
               IB14I        $     171
               IB14J        $     172
               IB14K        $     173
               IB14L        $     174
               IBBOX5       $     175
               IB16MO       $     176-177
               IB16YR       $     178-179
               IB17         $     180
               IB18               181
               IB19               182
               IB21               183
               IBBOX6       $     184
               IBBOX7       $     185
               IB22         $     186
               IB23         $     187
               IB24A        $     188
               IB24B        $     189
               IB24C        $     190
               IB24D        $     191
               IB24E        $     192
               IB24F        $     193
               IB24G        $     194
               IB24H        $     195
               IB24I        $     196
               IB24J        $     197
               IB24K        $     198
               IB24L        $     199
               IB25MO       $     200-201
               IB25YR       $     202-203
               IBBOX8       $     204
               IB26         $     205-206
               IB27MO       $     207-208
               IB27YR       $     209-210
               IBBOX9             211
               IB28         $     212
               IB29               213
               IB31A1       $     214-215
               IB31A2       $     216
               IB31B1       $     217-218
               IB31B2       $     219
               IBBOX10            220
               IB32         $     221-226
               IB33         $     227-228
               IB34         $     229
               IB35A        $     230-235
               IB35B        $     236
               IB361        $     237
               IB36A1       $     238
               IB36B1       $     239
               IBR1         $     240-242
               IBINS1       $     243-245
               IB36D1       $     246-251
               IB36E1       $     252
               IBDAYS1      $     253-255
               IB36F1       $     256
               IB36G1       $     257-260
               IB362        $     261
               IB36A2       $     262
               IB36B2       $     263
               IBR2         $     264-266
               IBINS2       $     267-269
               IB36D2       $     270-275
               IB36F2       $     276
               IB36G2       $     277-280
               IB363        $     281
               IB36A3       $     282
               IB36B3       $     283
               IBR3         $     284-286
               IBINS3       $     287-289
               IB36D3       $     290-295
               IB36F3       $     296
               IB36G3       $     297-300
               IB364        $     301
               IB36A4       $     302
               IB36B4       $     303
               IBR4         $     304-306
               IBINS4       $     307-309
               IB36D4       $     310-315
               IB36E4       $     316
               IB36DOL      $     317-322
               IB36MAX      $     323
               IB36F4       $     324
               IB36G4       $     325-328
               IB365        $     329
               IB36A5       $     330
               IB36B5       $     331
               IBR5         $     332-334
               IBINS5       $     335-337
               IB36D5       $     338-343
               IB36F5       $     344
               IB36G5       $     345-348
               IC15A              349
               IC15B              350
               IC15C              351
               IC15D              352
               IC15E              353
               IC16A              354
               IC16B              355
               IC16C              356
               IC16D              357
               IC16E              358
               IC16F              359
               IC16G              360
               IC16H              361
               IC16I              362
               IC16J              363
               IC16K              364
               IC16L              365
               IC16M              366
               IC16N              367
               IC16O              368
               IC16P              369
               IC16Q              370
               IC16R              371
               IC17               372
               IC18         $     373
               IC19MO       $     374-375
               IC19DY       $     376-377
               IC19YR       $     378-379
               IC20         $     380
               ID1A               381
               ID1B         $     382-383
               ID06CT             384-385
               IE1A               386
               IE1B         $     387-388
               IE08CT             389-390
               IF1                391
               IF1A         $     392-393
               IF10CT             394-395
               IF2                396
               IF2A         $     397-398
               IF11CT             399-400
               IF3                401
               IF3A         $     402-403
               IF12CT             404-405
               IF4                406
               IF4A         $     407-408
               IF13CT             409-410
               IG1                411
               IG1A         $     412-413
               IG14CT             414-415
               IG2                416
               IG2A         $     417-418
               IG15CT             419-420
               IG3                421
               IG3A         $     422-423
               IG16CT             424-425
               IG4                426
               IG17CT             427-428
               IH1                429
               IH2                430
               IH19CT             431-432
               II1                433
               II21CT             434-435
               II2                436
               II22CT             437-438
               II3                439
               II23CT             440-441
               II4                442
               II24CT             443-444
               II5                445
               II25CT             446-447
               II6                448
               II26CT             449-450
               II7                451
               II27CT             452-453
               IJ1                454
               IJ1A         $     455-456
               IJ29CT             457-458
               IKSEX              459
               IK1A         $     460
               IK1B         $     461
               IK1C         $     462
               IK1D         $     463
               IK1E         $     464
               IK1F         $     465
               IK1G         $     466
               IK2          $     467
               IK3          $     468
               IK4PROV            469-475
               IK5A         $     476
               IK5B         $     477
               IK5C         $     478
               IK5D         $     479
               IK5E         $     480
               IK5F         $     481
               IK5FOS       $     482-483
               IK6          $     484
               IK7          $     485-486
               IL1                487
               IL2                488
               IL32CT             489-490
               IL3                491
               IL4CT              492-493
               IL4A         $     494-496
               IL4B         $     497-499
               IL4C         $     500-502
               IL4D         $     503-505
               IL4E         $     506-508
               IL4F         $     509-511
               IL4G         $     512-514
               IL4H         $     515-517
               IL4I         $     518-520
               IL4J         $     521-523
               IL4K         $     524-526
               IL4L         $     527-529
               IL4M         $     530-532
               IL4N         $     533-535
               IL4O         $     536-538
               IL4P         $     539-541
               IL4Q         $     542-544
               IL4R         $     545-547
               IL4S         $     548-550
               IL4T         $     551-553
               IL4U         $     554-556
               IL4V         $     557-559
               IL4W         $     560-562
               IL4X         $     563-565
               IL5          $     566-571
               IM1                572
               IM2A               573
               IM2B               574
               IM2C               575
               IM2D               576
               IM2E               577
               IM2F               578
               IM2G               579
               IM2H               580
               IM2I               581
               IM2J               582
               IM2K               583
               IM2L               584
               IM2M               585
               IM2N               586
               IM2O               587
               IM2P               588
               IM3A               589
               IM3B               590
               IM3C               591
               IM3D               592
               IM3E               593
               IM3F               594
               IM4                595
               IM5          $     596
               IM6                597
               IM7          $     598
               IM8                599
               IM9                600
               IM10A              601
               IM10B              602
               IM10C              603
               IM10D              604
               IM10E              605
               IM11               606-607
               IN1                608
               IN2A         $     609-610
               IN2PROV            611-617
               IN3          $     618
               IN4          $     619
               IN5          $     620-621
               IN6MIN       $     622-624
               IN6HRS       $     625-626
               IN7          $     627
               IN8MOS       $     628-629
               IN8YRS       $     630-631
               IN9AA              632
               IN9AB              633
               IN9AC        $     634
               IN9AD        $     635
               IN9AE        $     636
               IN9AF        $     637
               IN9AG        $     638-641
               IN9BA              642
               IN9BB        $     643
               IN9BC        $     644
               IN9BD        $     645
               IN9BE        $     646
               IN9BF        $     647
               IN9BG        $     648-651
               IN9CA              652
               IN9CB        $     653
               IN9CC        $     654
               IN9CD        $     655
               IN9CF        $     656
               IN9CG        $     657-660
               IN9DA              661
               IN9DB        $     662
               IN9DC        $     663
               IN9DD        $     664
               IN9DE        $     665
               IN9DF        $     666
               IN9DG        $     667-670
               IN9EA              671
               IN9EB        $     672
               IN9EC        $     673
               IN9ED        $     674
               IN9EE        $     675
               IN9EF        $     676
               IN9EG        $     677-680
               IN9FA              681
               IN9FB        $     682
               IN9FC        $     683
               IN9FD        $     684
               IN9FE        $     685
               IN9FF        $     686
               IN9FG        $     687-690
               IN9GA              691
               IN9GB        $     692
               IN9GC        $     693
               IN9GD        $     694
               IN9GE        $     695
               IN9GF        $     696
               IN9GG        $     697-700
               IN9HA              701
               IN9HB        $     702
               IN9HC        $     703
               IN9HD        $     704
               IN9HE        $     705
               IN9HF        $     706
               IN9HG        $     707-710
               IN9IA              711
               IO1                712
               IOBOX2       $     713
               IOBOX3       $     714
               IO2          $     715-717
               IO3O4        $     718-721
               IO4A         $     722
               IO5          $     723
               IO6          $     724-725
               IO7          $     726-728
               IO8O9        $     729-732
               IO9A         $     733
               IO10         $     734
               IO11         $     735-736
               IO12         $     737
               IO13MO       $     738-739
               IO13YR       $     740-741
               IO14         $     742
               IO15         $     743-744
               IO16         $     745-747
               IO17O18      $     748-751
               IO18A        $     752
               IO19         $     753
               IO20         $     754
               IO21         $     755-756
               IO22         $     757
               IO23         $     758-759
               IO24         $     760
               IO25MO       $     761-762
               IO25YR       $     763-764
               IO26         $     765
               IO27         $     766-767
               IO28         $     768
               IO29         $     769
               IO30         $     770-771
               IO31         $     772-773
               IOBOX4       $     774
               IO32         $     775
               IO33MO       $     776-777
               IO33YR       $     778-779
               IO33BX       $     780
               IO34         $     781
               IO35         $     782
               IOBOX5       $     783
               IO36         $     784
               IO37MO       $     785-786
               IO37YR       $     787-788
               IO37BX       $     789
               IO38         $     790
               IO39MO       $     791-792
               IO39YR       $     793-794
               IO39BX       $     795
               IO40         $     796
               IO41MO       $     797-798
               IO41YR       $     799-800
               IO42         $     801
               IO43         $     802-807
               IP1                808
               IP2          $     809-810
               IP3L1MO      $     811-812
               IP3L1DY      $     813-814
               IP3L1YR      $     815-816
               IP3R1MO      $     817-818
               IP3R1DY      $     819-820
               IP3R1YR      $     821-822
               IP3L2MO      $     823-824
               IP3L2DY      $     825-826
               IP3L2YR      $     827-828
               IP3R2MO      $     829-830
               IP3R2DY      $     831-832
               IP3R2YR      $     833-834
               IP3L3MO      $     835-836
               IP3L3DY      $     837-838
               IP3L3YR      $     839-840
               IP3R3MO      $     841-842
               IP3R3DY      $     843-844
               IP3R3YR      $     845-846
               IP4                847
               IP5          $     848-849
               IP6EN1MO     $     850-851
               IP6EN1DY     $     852-853
               IP6EN1YR     $     854-855
               IP6EX1MO     $     856-857
               IP6EX1DY     $     858-859
               IP6EX1YR     $     860-861
               IP6EN2MO     $     862-863
               IP6EN2DY     $     864-865
               IP6EN2YR     $     866-867
               IP6EX2MO     $     868-869
               IP6EX2DY     $     870-871
               IP6EX2YR     $     872-873
               IP6EN3MO     $     874-875
               IP6EN3DY     $     876-877
               IP6EN3YR     $     878-879
               IP6EX3MO     $     880-881
               IP6EX3DY     $     882-883
               IP6EX3YR     $     884-885
               IR1                886
               IR2          $     887-888
               IR3                889
               IR4          $     890-891
               IR5A               892
               IR5B               893
               IR5C               894
               IR5D               895
               IR5E               896
               IR5F               897
     ;
     RETURN;
     ;
     PROC FREQ ;  TABLES
          IPID01
          IREC01
          ISREC01
          IITYPE
          IRTYPE
          ILANG
          IREFMO
          IREFDY
          IREFYR
          IENDMO
          IENDDY
          IENDYR
          T6_STAT
          OBSDAYS6
          GAP6FLAG
          ADM6
          IPNGT6
          AMBVS6
          ERVS6
          HCVS6
          OCVS6
          MDVS6
          IA01CT
          IA1REL1
          IA1SEX1
          IA1AGE1
          IA1SST1
          IA1REL2
          IA1SEX2
          IA1AGE2
          IA1SST2
          IA1REL3
          IA1SEX3
          IA1AGE3
          IA1SST3
          IA1REL4
          IA1SEX4
          IA1AGE4
          IA1SST4
          IA1REL5
          IA1SEX5
          IA1AGE5
          IA1SST5
          IA1REL6
          IA1SEX6
          IA1AGE6
          IA1SST6
          IA1REL7
          IA1SEX7
          IA1AGE7
          IA1SST7
          IA1REL8
          IA1SEX8
          IA1AGE8
          IA1SST8
          IA1REL9
          IA1SEX9
          IA1AGE9
          IA1SST9
          IA1REL10
          IA1SEX10
          IA1AGE10
          IA1SST10
          IABOX1A
          IABOX1B
          IA2
          IA3
          IA4
          IA5
          IA6A
          IA6B
          IA6C
          IA6D
          IA6E
          IA6F
          IB1
          IBBOX2
          IBBOX3
          IB2
          IB3
          IB4A
          IB4B
          IB4C
          IB4D
          IB4E
          IB4F
          IB4G
          IB4H
          IB4I
          IB4J
          IB4K
          IB4L
          IB5MO
          IB5YR
          IB6
          IBBOX4
          IB7
          IB8
          IB9MO
          IB9YR
          IB10
          IB12
          IB13
          IB14A
          IB14B
          IB14C
          IB14D
          IB14E
          IB14F
          IB14G
          IB14H
          IB14I
          IB14J
          IB14K
          IB14L
          IBBOX5
          IB16MO
          IB16YR
          IB17
          IB18
          IB19
          IB21
          IBBOX6
          IBBOX7
          IB22
          IB23
          IB24A
          IB24B
          IB24C
          IB24D
          IB24E
          IB24F
          IB24G
          IB24H
          IB24I
          IB24J
          IB24K
          IB24L
          IB25MO
          IB25YR
          IBBOX8
          IB26
          IB27MO
          IB27YR
          IBBOX9
          IB28
          IB29
          IB31A1
          IB31A2
          IB31B1
          IB31B2
          IBBOX10
          IB32
          IB33
          IB34
          IB35A
          IB35B
          IB361
          IB36A1
          IB36B1
          IBR1
          IBINS1
          IB36D1
          IB36E1
          IBDAYS1
          IB36F1
          IB36G1
          IB362
          IB36A2
          IB36B2
          IBR2
          IBINS2
          IB36D2
          IB36F2
          IB36G2
          IB363
          IB36A3
          IB36B3
          IBR3
          IBINS3
          IB36D3
          IB36F3
          IB36G3
          IB364
          IB36A4
          IB36B4
          IBR4
          IBINS4
          IB36D4
          IB36E4
          IB36DOL
          IB36MAX
          IB36F4
          IB36G4
          IB365
          IB36A5
          IB36B5
          IBR5
          IBINS5
          IB36D5
          IB36F5
          IB36G5
          IC15A
          IC15B
          IC15C
          IC15D
          IC15E
          IC16A
          IC16B
          IC16C
          IC16D
          IC16E
          IC16F
          IC16G
          IC16H
          IC16I
          IC16J
          IC16K
          IC16L
          IC16M
          IC16N
          IC16O
          IC16P
          IC16Q
          IC16R
          IC17
          IC18
          IC19MO
          IC19DY
          IC19YR
          IC20
          ID1A
          ID1B
          ID06CT
          IE1A
          IE1B
          IE08CT
          IF1
          IF1A
          IF10CT
          IF2
          IF2A
          IF11CT
          IF3
          IF3A
          IF12CT
          IF4
          IF4A
          IF13CT
          IG1
          IG1A
          IG14CT
          IG2
          IG2A
          IG15CT
          IG3
          IG3A
          IG16CT
          IG4
          IG17CT
          IH1
          IH2
          IH19CT
          II1
          II21CT
          II2
          II22CT
          II3
          II23CT
          II4
          II24CT
          II5
          II25CT
          II6
          II26CT
          II7
          II27CT
          IJ1
          IJ1A
          IJ29CT
          IKSEX
          IK1A
          IK1B
          IK1C
          IK1D
          IK1E
          IK1F
          IK1G
          IK2
          IK3
          IK4PROV
          IK5A
          IK5B
          IK5C
          IK5D
          IK5E
          IK5F
          IK5FOS
          IK6
          IK7
          IL1
          IL2
          IL32CT
          IL3
          IL4CT
          IL4A
          IL4B
          IL4C
          IL4D
          IL4E
          IL4F
          IL4G
          IL4H
          IL4I
          IL4J
          IL4K
          IL4L
          IL4M
          IL4N
          IL4O
          IL4P
          IL4Q
          IL4R
          IL4S
          IL4T
          IL4U
          IL4V
          IL4W
          IL4X
          IL5
          IM1
          IM2A
          IM2B
          IM2C
          IM2D
          IM2E
          IM2F
          IM2G
          IM2H
          IM2I
          IM2J
          IM2K
          IM2L
          IM2M
          IM2N
          IM2O
          IM2P
          IM3A
          IM3B
          IM3C
          IM3D
          IM3E
          IM3F
          IM4
          IM5
          IM6
          IM7
          IM8
          IM9
          IM10A
          IM10B
          IM10C
          IM10D
          IM10E
          IM11
          IN1
          IN2A
          IN2PROV
          IN3
          IN4
          IN5
          IN6MIN
          IN6HRS
          IN7
          IN8MOS
          IN8YRS
          IN9AA
          IN9AB
          IN9AC
          IN9AD
          IN9AE
          IN9AF
          IN9AG
          IN9BA
          IN9BB
          IN9BC
          IN9BD
          IN9BE
          IN9BF
          IN9BG
          IN9CA
          IN9CB
          IN9CC
          IN9CD
          IN9CF
          IN9CG
          IN9DA
          IN9DB
          IN9DC
          IN9DD
          IN9DE
          IN9DF
          IN9DG
          IN9EA
          IN9EB
          IN9EC
          IN9ED
          IN9EE
          IN9EF
          IN9EG
          IN9FA
          IN9FB
          IN9FC
          IN9FD
          IN9FE
          IN9FF
          IN9FG
          IN9GA
          IN9GB
          IN9GC
          IN9GD
          IN9GE
          IN9GF
          IN9GG
          IN9HA
          IN9HB
          IN9HC
          IN9HD
          IN9HE
          IN9HF
          IN9HG
          IN9IA
          IO1
          IOBOX2
          IOBOX3
          IO2
          IO3O4
          IO4A
          IO5
          IO6
          IO7
          IO8O9
          IO9A
          IO10
          IO11
          IO12
          IO13MO
          IO13YR
          IO14
          IO15
          IO16
          IO17O18
          IO18A
          IO19
          IO20
          IO21
          IO22
          IO23
          IO24
          IO25MO
          IO25YR
          IO26
          IO27
          IO28
          IO29
          IO30
          IO31
          IOBOX4
          IO32
          IO33MO
          IO33YR
          IO33BX
          IO34
          IO35
          IOBOX5
          IO36
          IO37MO
          IO37YR
          IO37BX
          IO38
          IO39MO
          IO39YR
          IO39BX
          IO40
          IO41MO
          IO41YR
          IO42
          IO43
          IP1
          IP2
          IP3L1MO
          IP3L1DY
          IP3L1YR
          IP3R1MO
          IP3R1DY
          IP3R1YR
          IP3L2MO
          IP3L2DY
          IP3L2YR
          IP3R2MO
          IP3R2DY
          IP3R2YR
          IP3L3MO
          IP3L3DY
          IP3L3YR
          IP3R3MO
          IP3R3DY
          IP3R3YR
          IP4
          IP5
          IP6EN1MO
          IP6EN1DY
          IP6EN1YR
          IP6EX1MO
          IP6EX1DY
          IP6EX1YR
          IP6EN2MO
          IP6EN2DY
          IP6EN2YR
          IP6EX2MO
          IP6EX2DY
          IP6EX2YR
          IP6EN3MO
          IP6EN3DY
          IP6EN3YR
          IP6EX3MO
          IP6EX3DY
          IP6EX3YR
          IR1
          IR2
          IR3
          IR4
          IR5A
          IR5B
          IR5C
          IR5D
          IR5E
          IR5F
     ;