* This program reads the 1991 Malaysia Census file *.
* DATE: JUNE 30, 1999.
* NAME: Yih-Jin Young.
* PURPOSE:  THIS PROGRAM READS THE 1991 MALAYSIA CENSUS FILE.
* DATA SOURCE: malay91.dat (SEE REFERENCE GUIDE FOR DETAILS).
* OUTPUT FILE: mcon91.sav.

SET HEADER=OFF.
SET LENGTH=99999. 
SET MXWARNS=99999.

DATA LIST FILE = 'y:\malaysia\data\census91\malay91.dat'
 / P1 1 P2 2-3 P3 4-5 P4 6-7 P5 8-10 P6 11 P7 12-14
  P8 15-16 P9 17-19 P10 20-21 P11 22 P12 23-24
  P13 25-26 P14 27-30 P15 31-32 P16 33-34 P17 35
  P18 36-37 P19 38 P20 39 P21 40 P22 41-42 P23 43
  P24 44 P25 45-46 P26 47-48 P27 49-51 P28 52
  P29 53-54 P30 55-56 P31 57-59 P32 TO P36 60-64
  P37 65-66 P38 67 P39 68-69 P40 70-72 P41 73-77
  P42 TO P44 78-80 AD 2-5 ADUSUAL 45-48 ADPREV 53-56.

COMPUTE OCC=P40.
RECODE OCC (11 THRU 199=1)(201 THRU 219=2)(300 THRU 399=3)
 (400 THRU 490=4)(500 THRU 599=5)(600 THRU 649=6)
 (700 THRU 990=7).

COMPUTE INDUSTRY = P41.
RECODE INDUSTRY (11111 THRU 13029=1)(21000 THRU 29090=2)
  (31110 THRU 39099=3)(41010 THRU 42000=4)
  (50011 THRU 50029=5)(61110 THRU 63200=6)
  (71110 THRU 72009=7)(81011 THRU 83300=8)
  (91110 THRU 96000=9).

VARIABLE LABELS
	P1      'Census Form Identific'
	P2	'State'				  
       	 P3	'Administrative District'
	P4	'Census District'		   
	P5	'Enumeration Block'         
        	P6      'Urban/Rural'
	P7	'Living Quarter Number'	    
	P8	'Household Number'		    	
	P9	'Person Number'			
	P10	'Relationship to Head of Household'
	P11	'Sex'				
	P12	'Date of Birth'			
	P13	'Month of Birth'	
	P14	'Year of Birth'		
	P15	'Age in Completed Years'
        P16	'Place of Birth'
	P17	'Marital Status'
	P18	'Ethnic Group'
	P19	'Religion'
	P20	'Ever Attended School'
	P21	'Current School Attendance'
	P22	'Level of Schooling'	
	P23	'Certificates Obtained'		  
	P24	'Place of Usual Residence'
	P25	'Place of Usual Residence (State)'			
	P26	'Place of Usual Residence (Administative District)'	
	P27	'Place of Usual Residence (LAA)'		
	P28	'Place of Previous Residen (Present House)'
	P29	'Place of Previous Residen (State)'		
	P30	'Place of Previous Residen (Administative District)'
	P31	'Place of Previous Residen (LAA)'			
	P32     'Citizenship'			
	P33	'Work During the Last 7 Days'
	P34	'Work 1 Hour During the Last 7 Days'  		
	P35	'Job to Return to'		       
	P36	'Looking for Job During the Last 7 Days'	        
	P37	'Reason Not Seeking Job'	 
	P38	'Ever Worked Before' 	    
 	P39	'Number of Hours Worked in the Last 7 Days'	
	P40	'Principal Occupation'		   
	P41	'Main Industry'			         
	P42	'Employment Status'        
	P43	'Labor Force Status'       
	P44	'Migrant Status'           
        	AD      'Administrative District'
        	ADUSUAL 'Usual Administrative District'
        	ADPREV  'Previous Administrative District'.

VALUE LABELS
	P1	
		2	'Living Quarters Form' 
		3 	'Household Form'
		4	'Person Form'/
	P2	01	'Johore'
		02	'Kedah'
		03	'Kelantan'
		04	'Melaka'
		05	'Negeri Sembilan'
		06	'Pahang'
		07	'Pulau Pinang'
		08	'Perak'
		09	'Perlis'
		10	'Selangor'
		11	'Trengganu'
		12	'Sabah'
		13	'Sarawak'
		14	'Wilayah Persekutuan Kuala Lumpur'
               		15	'Wilayah Persekutuan Labuan'/
        	P6	 
		1	'Metropolitan (75,000 persons and over)'
		2	'Urban, Large (10,000 - 74,999 persons)'
		3	'Urban, Small (1,000 - 9,999 persons)'
		4	'Rural (999 persons or fewer)'/
   	P10	01	'Head'
		02	'Spouse of Head'
		03	'Unmarried Child of Head'
		04	'Married Child of Head'
		05	'Daughter-in-law/Son-in-law of Head'
		06	'Grandchild of Head'
		07	'Father/Mother of Head or of Spouse of Head'
		08	'Brother/Sister of Head'
		09	'Other Persons Related to Head'
		10	'Other Persons Unrelated to Head'
		11	'Visitors'/
   	 P11	
                	1	'Male'
		2	'Female'/
	   P13
  		01      'January'      
        	02      'February'
        	03      'March'
        	04      'April'
        	05      'May'
        	06      'June'
        	07      'July'
        	08      'August'
        	09      'September'
        	10      'October'
        	11      'November'
        	12      'December'/
 	P15	00	'Less than 1 year of age'
		01	'1 year old'
		02	'2 years old'
		03	'3 years old'
		98	'98 years old'
		99	'99 years old and over'/
    P16 P25 P29	01	'Johore'
		02	'Kedah'
		03	'Kelantan'
		04	'Melaka'
		05	'Negeri Sembilan'
		06	'Pahang'
		07	'Pulau Pinang'
		08	'Perak'
		09	'Perlis'
		10	'Selangor'
		11	'Trengganu'
		12	'Sabah'
		13	'Sarawak'
		14	'Wilayah Persekutuan Kuala Lumpur'
               		15	'Wilayah Persekutuan Labuan'
		16	'Singapore'
		17	'Indonesia'
		18	'Philippines'
		19	'Thailand'
                	20      'Brunei Darussalam'
		21	'Vietnam'
		22	'China'
		23	'India/Pakistan/Bangladesh/Sri Lanka'
		24	'Other countries'
		99	'Unknown'/
    P17		1	'Never married'
		2	'Currently married'
        		3	'Widowed'
		4	'Divorced/permanently separated'
		0	'Not Applicable'/
    P18		01	'Malays'
                	02      'Other Bumiputera'
               		03	'Chinese'
                	04      'Indians'        
 	          	05      'Others'
                	06      'Non-Malayian Citizen'/
    P19		1	'Islam'
		2	'Christianity'
		3	'Hinduism'
		4	'Buddhism'
		5	'Confucianism/Taoism'
		6	'Tribal/Folk Religion'
		7	'Other'
		8	'No Religion'
                	9       'Unknown'/
    P20         1	'Yes'
		2	'No' 
                9       'Unknown'/
    P21	        1	'Yes'
		2	'No, completed school' 
                9       'Unknown'
                0       'Valid blank'/
    P22	        00      'Never attended school'
                01      'Kindergarten'
                02	'Standard 1'
	        03	'Standard 2'
	        04	'Standard 3'
	        05	'Standard 4'
	        06	'Standard 5'
	        07	'Standard 6'
                08	'Remove/Form 1'
		09	'Form 2'
		10	'Form 3'
		11	'Form 4'
		12	'Form 5'
		13	'Form 6 lower'
		14	'Form 6 upper'
		15	'Vocation Form 4'
		16	'Vocational Form 5'
		17	'College'
		18      'University'
		99	'Unknown'/
    P23		1	'None'
		2	'SRP/LCE (Lower Certificate of Edu)'
		3	'SPM/SP, MCE/SC (Malaysian Certif of Edu)'
		4	'SPVM/MCVE (Malaysian Certi of Voc Edu)'
		5	'STPM/HSC/STA (Higher School Certificate)'
		6	'Diploma'
		7	'Degree'
		9	'Unknown'
                0       'Not Applicable'/
    P24	        1        'Yes'
                2        'No'
                9        'Unknown'/
    P26 P30	     
               00         'When state codes = 16 - 24'
               99         'Unknown'/
    P27 P31   998         'Rural'
              999         'Unknown'
              000         'When state codes = 16-24'/ 
    P28	        1           'This house'
                2           'Different house (usual)'
                3           'Different house (previous)'
                9           'Unknown'
                0           'Not Applicable'/
    P32	        1	'Malaysian Citizens'
		2	'Singapore'
		3	'Indonesian'
		4	'Philippines'
		5	'Thailand'
                6       'Brunei Darussalam'
		7	'Others'/
    P33 to P36 P38 
                1	'Yes'
		2	'No' 
                9       'Unknown'
                0       'Valid blank'/
    P37		01	'Believe no suitable job available'
		02	'Bad weather'
		03	'Illness/confinement'
		04	'New job to start soon'
	        05	'Waiting for answers to job applications'
		06	'No qualifications'                                 
                07      'Schooling'
                08      'Housework'
		09	'Going for further studies'
		10	'Disabled'
		11	'Not interested'
		12	'Retired'
		13	'Too Young'
		14	'Other'
		99	'Unknown'
		00	'Not Applicable'/
    P39	        01	'1 hour'
	        02	'2  hours'
                99      'Unknown'
		00	'Valid blank'/
    OCC         1       'Professional, Technical and Related Workers'
		2	'Administrative and Managerial Workers'
		3	'Clerical and Related Workers'
		4	'Sales Worker'
		5	'Service Workers'
		6	'Agricultural, Animal husbandry and forestry workers'
		7       'Production and Related Worker, transport equipment'
           	995	'Activities inadequately described'
       		996	'Occupation unknown'
                997     'Unemployed'
                998     'Outside labor force'
                999     'Unknown labor force status'
		000	'Valid blank'/
    INDUSTRY	1	'Agriculture, Forestry, Hunting and Fishing'
		2	'Mining and Quarrying'
		3	'Manufacturing'
		4	'Electricity, Gas and Water'
		5	'Construction'
		6	'Wholesale and Retail Trade, Restaurant, Hotels'
		7	'Transport, Storage and Communication'
		8	'Financing, Insurance, Real Estate and Busi Service'
		9	'Community, Social and Personal Services'
	     99500      'Activities Not Adequately Defined'
	     99600      'Industry unknown'
             99700      'Unemployed'
             99800      'Outside labor force'
	     99900      'Unknown labour force status'
	     00000      'Valid blank'/
    P42	 	1	'Employer' 
		2	'Employee'
		3	'Own Account Worker' 
		4	'Unpaid Family Worker'
                	5       'Unknown'
                	6       'First time job seeker'
                	7       'Other employed'
                	8       'Outside labor force'
                	9       'Unknown labor force status'
		0	'Valid blank'/
    P43		1	'Employed (at work)'
		2	'Employed (not at work)'
		3	'Active Unemployed'
		4	'Inactive unemployed'
		5	'Outside Labour Force'
		6	'Unknown'
                9       'Unknown labor force status' 
		0	'Valid blank'/
    P44	        1       'Non migrant'
                2       'Migrant'
                9       'Unknown'/
    AD ADUSUAL ADPREV
         101	'BATU PAHAT'
	 102	'JOHOR BAHARU'
	 103	'KELUANG'
	 104	'KOTA TINGGI'
	 105	'MERSING'
	 106	'MUAR'
	 107	'PONTIAN'
	 108	'SEGAMAT'
	 109	'UNKNOWN, JOHOR'
         201	'BALING'
	 202	'BANDAR BAHARU'
	 203	'KOTA SETAR'
	 204	'KUALA MUDA'
	 205	'KUBANG PASU'
	 206	'KULIM'
	 207	'PULAU LANGKAWI'
	 208	'PADANG TERAP'
	 209	'SIK'
	 210	'YAN'
	 211	'PENDANG'
	 299	'UNKNOWN, KEDAH'
         301	'BACHOK'
	 302	'KOTA BAHARU'
	 303	'MACHANG'
	 304	'PASIR MAS'
	 305	'PASIR PUTEH'
	 306	'TANAH MERAH'
	 307	'TUMPAT'
	 308	'GUA MUSANG'
	 309	'KUALA KERAI'
         310    'JELI'
	 311	'UNKNOWN, KELANTAN'
         401	'ALOR GAJAH (DAERAH UTARA)'
  	 402	'JASIN (DAERAH SELATAN)'
         403	'MELAKA TENGAH'
	 499	'UNKNOWN, MELAKA'
         501	'JELEBU'
   	 502	'KUALA PILAH'
	 503	'PORT DICKSON'
	 504	'REMBAU'
	 505	'SEREMBAN'
	 506	'TAMPIN'
	 507	'JEMPUL'
	 599	'UNKNOWN, NS'
         601	'BENTONG'
	 602	'CAMERON HIGHLANDS'
	 603	'JERANTUT'
	 604	'KUANTAN'
	 605	'LIPIS'
	 606	'PEKAN'
	 607	'RAUB'
	 608	'TEMERLOH'
	 609	'ROMPIN'
         610    'MARAN'
	 699	'UNKNOWN, PAHANG'
         701	'BUKIT MERTAJAM (TENGAH)'
         702    'BUTTERWORTH (SEBERANG ERAI UTARA)'
         703	'NIBONG TEBAL (SELATAN)'
	 704	'PULAU PINANG TIMUR LAUT'
	 705	'PULAU PINANG BARAT DAYA'
	 799	'UNKNOWN, P. PINANG'
         801	'BATANG PADANG'
	 802	'DINDING'
	 803	'KINTA'
	 804	'KERIAN'
	 805	'KUALA KANGSAR'
	 806	'LARUT DAN MATANG'
	 807	'HILIR PERAK'
	 808	'HULU PERAK'
	 809	'PERAK TENGAH'
	 899	'UNKNOWN, PERAK'
         901	'PERLIS'
	 999 	'UNKNOWN, PERLIS'
        1001	'GOMBAK'
	1002	'KELANG'
	1003	'KUALA LANGAT'
	1004	'KUALA SELANGOR'
	1005	'PETALING'
	1006	'SABAK BERNAM'
	1007	'SEPANG'
	1008	'ULU LANGAT'
	1009	'ULU SELANGOR'
	1099	'UNKNOWN, SELANGOR'
        1101	'BESUT'
	1102	'DUNGUN'
	1103	'KEMAMAN'
	1104	'KUALA TRENGGANU'
	1105	'MARANG'
	1106	'ULU TRENGGANU'
        1107    'SETIU'
	1199	'UNKNOWN, TRENGGANU'
        1201	'TAWAU'
        1202	'LAHAD DATU'
	1203	'SEMPORNA'
	1204	'SANDAKAN'
	1205	'KINABATANGAN'
	1206	'BELURAN'    
	1207	'KOTA KINABALU'
	1208	'RANAU'
	1209	'KOTA BELUD'
	1210	'TUARAN'
	1211	'PENAMPANG'
	1212	'PAPAR'
	1213	'KUDAT'
	1214	'KOTA MARUDU'
	1215	'PITAS'
	1216	'BEAUFORT'
	1217	'KUALA PENYU'
	1218	'SIPITANG'
	1219	'TENOM'
	1220	'NABAWAN'   
	1221	'KEINGAU'
	1222	'TAMBUNAN'
	1223	'KUNAK'
	1299	'UNKNOWN, SABAH'
        1301	'KUCHING'       
	1302	'BAU'    
        1303	'LUNDU'
        1304    'SAMARAHAN'
	1305	'SERIAN'
	1306	'SIMUNJAN'
	1307	'SRI AMAN'  
	1308	'LUBOK ANTU'
        1309    'BETONG'
        1310	'SARATOK'
	1311	'SARIKEI'
	1312	'MARADONG'
        1313    'DARO'
	1314	'JULAU'
	1315	'SIBU'
        1316    'DALAT'
	1317	'MUKAH'
	1318	'KANOWIT'
	1319	'BINTULU'
        1320    'TATU'
	1321	'KAPIT'
	1322	'SONG'
	1323	'BELAGA'
	1324	'MIRI'
        1325    'MARUDI'
	1326	'LIMBANG'
	1327	'LAWAS'
        1399	'UNKNOWN, SARAWAK'
        1401    'KUALA LUMPUR'
        1501    'LABUAN'.

COMPUTE ADMINDIS= AD.
RECODE ADMINDIS
 (	101	=	1	)
 (	102	=	2	)
 (	103	=	3	)
 (	104	=	4	)
 (	105	=	5	)
 (	106	=	6	)
 (	107	=	7	)
 (	108	=	8	)
 (	109	=	99	)
 (	201	=	9	)
 (	202	=	10	)
 (	203	=	11	)
 (	204	=	12	)
 (	205	=	13	)
 (	206	=	14	)
 (	207	=	15	)
 (	208	=	16	)
 (	209	=	17	)
 (	210	=	18	)
 (	211	=	11	)
 (	299	=	99	)
 (	301	=	19	)
 (	302	=	20	)
 (	303	=	21	)
 (	304	=	22	)
 (	305	=	23	)
 (	306	=	24	)
 (	307	=	25	)
 (	308	=	26	)
 (	309	=	26	)
 (	310	=	24	)
 (	311	=	99	)
 (	401	=	27	)
 (	402	=	28	)
 (	403	=	29	)
 (	499	=	99	)
 (	501	=	30	)
 (	502	=	31	)
 (	503	=	32	)
 (	504	=	33	)
 (	505	=	34	)
 (	506	=	35	)
 (	507	=	31	)
 (	599	=	99	)
 (	601	=	36	)
 (	602	=	37	)
 (	603	=	38	)
 (	604	=	39	)
 (	605	=	40	)
 (	606	=	41	)
 (	607	=	42	)
 (	608	=	43	)
 (	609	=	41	)
 (	610	=	41	)
 (	699	=	99	)
 (	701	=	44	)
 (	702	=	45	)
 (	703	=	46	)
 (	704	=	47	)
 (	705	=	48	)
 (	799	=	99	)
 (	801	=	49	)
 (	802	=	50	)
 (	803	=	51	)
 (	804	=	52	)
 (	805	=	53	)
 (	806	=	54	)
 (	807	=	55	)
 (	808	=	56	)
 (	809	=	53	)
 (	899	=	99	)
 (	901	=	57	)
 (	999	=	99	)
 (	1001	=	59	)
 (	1002	=	58	)
 (	1003	=	59	)
 (	1004	=	61	)
 (	1005	=	61	)
 (	1006	=	62	)
 (	1007	=	58	)
 (	1008	=	63	)
 (	1009	=	64	)
 (	1099	=	99	)
 (	1101	=	65	)
 (	1102	=	66	)
 (	1103	=	67	)
 (	1104	=	68	)
 (	1105	=	69	)
 (	1106	=	70	)
 (	1107	=	68	)
 (	1199	=	99	)
 (	1201	=	97	)
 (	1202	=	97	)
 (	1203	=	97	)
 (	1204	=	97	)
 (	1205	=	97	)
 (	1206	=	97	)
 (	1207	=	97	)
 (	1208	=	97	)
 (	1209	=	97	)
 (	1210	=	97	)
 (	1211	=	97	)
 (	1212	=	97	)
 (	1213	=	97	)
 (	1214	=	97	)
 (	1215	=	97	)
 (	1216	=	97	)
 (	1217	=	97	)
 (	1218	=	97	)
 (	1219	=	97	)
 (	1220	=	97	)
 (	1221	=	97	)
 (	1222	=	97	)
 (	1223	=	97	)
 (	1299	=	99	)
 (	1301	=	96	)
 (	1302	=	96	)
 (	1303	=	96	)
 (	1304	=	96	)
 (	1305	=	96	)
 (	1306	=	96	)
 (	1307	=	96	)
 (	1308	=	96	)
 (	1309	=	96	)
 ( 	1310	=	96	)
 (	1311	=	96	)
 (	1312	=	96	)
 (	1313	=	96	)
 (	1314	=	96	)
 (	1315	=	96	)
 (	1316	=	96	)
 (	1317	=	96	)
 (	1318	=	96	)
 (	1319	=	96	)
 (	1320	=	96	)
 (	1321	=	96	)
 (	1322	=	96	)
 (	1323	=	96	)
 (	1324	=	96	)
 (	1325	=	96	)
 (	1326	=	96	)
 (	1327	=	96	)
 (	1399	=	99	)
 (	1401	=	60	)
 (	1501	=	95	) .

VALUE LABELS ADMINDIS
	1	'BATU PAHAT'
	2	'JOHOR BAHARU'
	3	'KELUANG'
	4	'KOTA TINGGI'
	5	'MERSING'
	6	'MUAR'
	7	'PONTIAN'
	8	'SEGAMAT'
	9	'BALING'
	10	'BANDAR BAHARU'
	11	'KOTA SETAR'
	12	'KUALA MUDA'
	13	'KUBANG PASU'
	14	'KULIM'
	15	'PULAU LANGKAWI'
	16	'PADANG TERAP'
	17	'SIK'
	18	'YAN'
	19	'BACHOK'
	20	'KOTA BAHARU'
	21	'MACHANG'
	22	'PASIR MAS'
	23	'PASIR PUTEH'
	24	'TANAH MERAH'
	25	'TUMPAT'
	26	'ULU KELANTAN'
	27	'ALOR GAJAH (DAERAH UTARA)'
	28	'JASIN (DAERAH SELATAN)'
	29	'MELAKA TENGAH'
	30	'JELEBU'
	31	'KUALA PILAH'
	32	'PORT DICKSON'
	33	'REMBAU'
	34	'SEREMBAN'
	35	'TAMPIN'
	36	'BENTONG'
	37	'CAMERON HIGHLANDS'
	38	'JERANTUT'
	39	'KUANTAN'
	40	'LIPIS'
	41	'PEKAN'
	42	'RAUB'
	43	'TEMERLOH'
	44	'BUKIT MERTAJAM (TENGAH)'
	45	'BUTTERWORTH (SEBERANG ERAI UTARA)'
	46	'NIBONG TEBAL (SELATAN)'
	47	'PULAU PINANG TIMUR LAUT'
	48	'PULAU PINANG BARAT DAYA'
	49	'BATANG PADANG'
	50	'DINDING'
	51	'KINTA'
	52	'KERIAN'
	53	'KUALA KANGSAR'
	54	'LARUT DAN MATANG'
	55	'HILIR PERAK'
	56	'HULU PERAK'
	57	'PERLIS'
	58	'KELANG'
	59	'KUALA LANGAT'
	60	'KUALA LUMPUR'
	61	'KUALA SELANGOR'
	62	'SABAK BERNAM'
	63	'ULU LANGAT'
	64	'ULU SELANGOR'
	65	'BESUT'
	66	'DUNGUN'
	67	'KEMAMAN'
	68	'KUALA TRENGGANU'
	69	'MARANG'
	70	'ULU TRENGGANU'
	97	'SABA STATE'
	96	'SARAWAK'       
	95	'LABUAN'
        99	'UNKNOWN'.

SELECT IF P1=4.
*FRE VAR ALL.

* CONSTRUCT CONTEXTUAL VARIABLES *.

SELECT IF (ADMINDIS LE 70).
SELECT IF P1=4. 

COMPUTE EDU490=0.
IF (P22 GE 8 AND P22 LE 18) EDU490=1.
 
 
COMPUTE MARRY190=0.
IF (P17=1) MARRY190=1.

 
COMPUTE CWORK=0.
IF (P33=1) CWORK=1.
 
SORT CASES BY ADMINDIS.
 

* PROP. OF WOMEN 15-34 GT PRIMARY EDUCATION *.
TEMPORARY.
SELECT IF (P15 GE 15 AND P15 LE 34 AND P11=2).
AGGREGATE OUTFILE='y:\malaysia\data\contextuals\e490_m.sav'
 /BREAK=ADMINDIS
 /E490 = MEAN (EDU490).
 
* proportion of women 15-24 who are single 15-24.
TEMPORARY.
SELECT IF (P15 GE 15 AND P15 LE 24 AND P11=2).
AGGREGATE OUTFILE='y:\malaysia\data\contextuals\MAR190_M.SAV'
 /BREAK=ADMINDIS
 /MAR190 = MEAN (MARRY190).
 
* PROPORTION OF CHILDREN IN LABOR FORCE 10-14 YEARS OLD *. 
TEMPORARY.
SELECT IF (P15 GE 10 AND P15 LE 14).
AGGREGATE OUTFILE='y:\malaysia\data\contextuals\CHWK190_M.SAV'
 /BREAK=ADMINDIS
 /CHWK190 = MEAN (CWORK).
 
MATCH FILES FILE='y:\malaysia\data\contextuals\MAR190_M.SAV'
  /FILE='y:\malaysia\data\contextuals\CHWK190_M.SAV'/FILE='y:\malaysia\data\contextuals\E490_M.SAV'
  /BY ADMINDIS. 
SAVE OUTFILE='y:\malaysia\data\contextuals\MCON91.SAV'.
EXPORT OUTFILE= 'y:\malaysia\data\contextuals\MCON91.POR'.
EXECUTE.
  
import file='y:\malaysia\data\contextuals\MCON91.por'.
execute.

des var all.