options nocenter linesize=80 pagesize=59;
libname current '';

filename arpuf_a  'c:\arpuf_a.asc';

data test1;
infile arpuf_a  lrecl=585;
   input        @1              UNIQUEID $10.
                @11             CASE_SEX $1.
                @12             CASERACE 4.
                @16             CASE_AGE 4.
                @20             AGE_AM00 8.
                @28             CHLDAM00 8.
                @36             TOTCAM00 8.
                @44             EXITDATE 8.
                @52             COUNTYCD 8.
                @60             URBRURAL 3.
                @63             CASETYPE 3.
                @66             COHORTID 3.
                @69             SURVFLAG 3.
                @72             (MEDRAM00-MEDRAM12) (13*3.)
                @111            (MEDRBM01-MEDRBM12) (12*3.)
                @147            (FOODAM00-FOODAM12) (13*3.)
                @186            (FOODBM01-FOODBM12) (12*3.)
                @222            (TNFRBM01-TNFRBM12) (12*3.)
                @258            (TNFRAM00-TNFRAM12) (13*3.)
                @297            (TNFBBM01-TNFBBM12) (12*8.)
                @393            (TNFBAM00-TNFBAM12) (13*8.)
                @497            TNFR3YB 8.
                @505            (EARNBQ01- EARNBQ04) (4*8.)
                @537            (EARNAQ00- EARNAQ04) (5*8.)
                @577            EMP4QB 8.
        ;

run;
