// JOB                                                                          
/*SERVICE ?                                                                     
/*ROUTE PRINT RMT402                                                            
//  EXEC SPSSX                                                                  
//IN  DD DSN=                                                                   
//OUT  DD DSN=                                                                  
//SYSIN  DD *                                                                   
TITLE Census 1991: enumeration area correspondence file, 1986-1991.             
DATA LIST   FILE=IN RECORDS=1/                                                  
    PROV      1 -    2                                                          
    FED91      3 -    5                                                         
    EA91      6 -    8                                                          
    FED86      9 -   11                                                         
    EA86     12 -   14                                                          
    EA86PART     15 -   15  (A)                                                 
VARIABLE LABELS                                                                 
  PROV  'Province code'                                                         
  FED91  'Federal electoral district code - 1991'                               
  EA91  'Enumeration area code - 1991'                                          
  FED86  'Federal electoral district code - 1986'                               
  EA86  'Enumeration area code - 1996'                                          
  EA86PART  '1986 enumeration area part flag'                                   
VALUE LABELS                                                                    
    PROV   10  'Newfoundland'                                                   
          11  'Prince Edward Island'                                            
          12  'Nova Scotia'                                                     
          13  'New Brunswick'                                                   
          24  'Quebec'                                                          
          35  'Ontario'                                                         
          46  'Manitoba'                                                        
          47  'Saskatchewan'                                                    
          48  'Alberta'                                                         
          59  'British Columbia'                                                
          60  'Yukon Territory'                                                 
          61  'Northwest Territories'                                           
         /                                                                      
    EA86PART   '*'  'part of 1986 EA'                                           
         /                                                                      
SAVE OUTFILE=OUT                                                                
EXECUTE