* DATE: JULY 5, 1999.
* NAME: YIH-JIN YOUNG.
* PURPOSE:  THIS PROGRAM READS THE 1980 INDONESIA CENSUS FILE. 
* HOUSEHOLD RECORD TYPE.
* DATA SOURCE: indo80.dat (SEE REFERENCE GUIDE FOR DETAILS).
* OUTPUT FILE: NONE. 
* NUMBER OF CASES =1,502,064.

set blanks=sysmis/undefined=nowarn /mxwarns=6000000.
file handle new /name='y:\indonesia\data\census80\indo80.dat'
 /mode=image
 /lrecl=129.
 
DATA LIST FILE=new FIXED
 / V1 1-2 V2 3-4 V3 5 V8 16 V28 42.
 
SELECT IF V8=2.
FRE VAR V1 V28.