* DATE: JULY 14, 1999.
* NAME: YIH-JIN YOUNG.
* PURPOSE:  THIS PROGRAM READS THE 1985 SUPAS FILE.   
* HOUSEHOLD RECORD TYPE I.
* DATA SOURCE: indo85.dat (SEE REFERENCE GUIDE FOR DETAILS).
* OUTPUT FILE: NONE. 
* NUMBER OF CASES =126,966.
                                                           

file handle new /name='y:\indonesia\data\census85\indo85.dat'
            /mode=image
            /lrecl=214.
DATA LIST FILE= new fixed
   /RT 17-18                      
    PROVINCE 1-2 V04 25-28.

SELECT IF RT=5.
FRE VAR PROVINCE V04.