/* SAMPLE SAS PROGRAM "WT93IDN.SAS" */

/* Data Extraction from World Tables of Economic
   and Social Indicators 1950-1992  */

/* Program uses the known data layout for Countries 
   in performing the data extraction for a Country */


filename in1  'U:\ArchiveData\sind\059\da6159' lrecl = 937;
libname ssd 'U:\Users\your_netid\';
options ls=79;

data ssd.wt93;
 infile in1 lrecl=937;

 input country $1-3@;
 if country='IDN' then do;
  input #1 popi $5-34 @245 (pop60-pop92)(21.)
        #110 popu $5-34 @245 (popu60-popu92)(21.)
        #112 laba $5-34 @245 (laba60-laba92)(21.)
        #113 labs $5-34 @245 (labs60-labs92)(21.)
        #114 ger1m $5-34 @245 (ger1m60-ger1m92)(21.)
        #115 ger1f $5-34 @245 (ger1f60-ger1f92)(21.)
        #116 ger2m $5-34 @245 (ger2m60-ger2m92)(21.)
        #117 gnp $5-34 @245 (gnp60-gnp92)(21.)
        #118 gny $5-34 @245 (gny60-gny92)(21.)
        #136;
 end;
 else delete;
 run ;

 proc print data=ssd.wt93;
 run;