@XQT $PL1TAX
$PL1TAX VER 2  05/27/99 14:36:16
    
**  PL1TAX SOURCE LISTING  **   
     #  STATEMENT   
     1. *   
     2. * PP.DEMOB  
     3. *   
     4. * TABLES - INTERMEDIATE 
     5. *   
     6. *FILES  
     7.  OLD FILE PL1TAXDATA 80 
     8. 
     9. *WORKINGSTORAGE 
    10.  CT/COUNTY TYPE/A8  
    11. 
    12. *RECORDS
    13.  LASTNAME/LAST NAME/1-12
    14.  FIRSTNAME/FIRST NAME/13-20 
    15.  AGE//21-22 
    16.  RACE//23   
    17.  SEX//24
    18.  COUNTY//25-26  
    19.  COMPANY//27-36 
    20.  PHONE//37-46   
    21.  AREACODE/AREA CODE/37-39   
    22.  SSN//47-55 
    23.  SALARY//56-60/N
    24. 
    25. *INSTRUCTIONS   
    26.  IF COUNTY = 00-24  
    27.     CT = COSTAL 
    28.  ELSEIF COUNTY = 25-40  
    29.     CT = VALLEY 
    30.  ELSEIF COUNTY = 41-57  
    31.     CT = MOUNTAIN   
    32.  ELSE   
    33.     CT = LAST   
    34.  ENDIF  
    35. 
    36. *TABLES 
    37.  TABLE ='COUNTY TYPE BY COMPANY #1',/   
    38.  STUB COUNTY LABELS COSTAL, VALLEY, MOUNTAIN, LAST  
    39.  STUB COUNTY GROUPS 01-24,25-40,41-57,58
    40.  SPREAD COMPANY 10 CODES
    41. 
    42.  TABLE ='COUNTY TYPE BY COMPANY #2',/   
    43.  STUB CT CODES COSTAL, VALLEY, MOUNTAIN, LAST   
    44.  SPREAD COMPANY 10 CODES
    45. 
    46.  TABLE ='COUNTY TYPE BY COMPANY #3',/   
    47.  STUB CT 5 CODES
    48.  SPREAD COMPANY 10 CODES
    49. 
    50.  TABLE ='COMPANY BY SEX',/  
    
**  PL1TAX SOURCE LISTING  **   
     #  STATEMENT   
    51.  STUB COMPANY 10 CODES  
    52.  SPREAD SEX LABELS MALE, FEMALE 
    53.  SPREAD SEX CODES M,F   
    54. 
    55.  TABLE ='COMPANY BY SEX (ACCUMULATED SALARY)',/ 
    56.  STUB COMPANY 10 CODES  
    57.  SPREAD SEX LABELS MALE, FEMALE 
    58.  SPREAD SEX CODES M,F   
    59. 
    60.  TABLE ='COMPANY BY SEX (INCLUDE PERCENTS)',/   
    61.  STUB COMPANY 10 CODES  
    62.  SPREAD SEX LABELS MALE, FEMALE 
    63.  SPREAD SEX CODES M,F   
    64. 

** $PL1TAX SOURCE LISTING  **   

COUNTY TYPE BY COMPANY #1 COUNTY COMPANY TOTAL BURROUGHS CDC DEC IBM PRIME UNIVAC WANG TOTAL 961 126 159 138 151 126 125 136 COSTAL 291 45 52 46 39 26 36 47 VALLEY 327 34 48 48 55 51 38 53 MOUNTAIN 328 44 56 43 53 47 49 36 LAST 15 3 3 1 4 2 2 0
COUNTY TYPE BY COMPANY #2 COUNTY TYPE COMPANY TOTAL BURROUGHS CDC DEC IBM PRIME UNIVAC WANG TOTAL 1000 128 168 143 157 129 130 145 COSTAL 291 45 52 46 39 26 36 47 VALLEY 327 34 48 48 55 51 38 53 MOUNTAIN 328 44 56 43 53 47 49 36 LAST 54 5 12 6 10 5 7 9
COUNTY TYPE BY COMPANY #3 COUNTY TYPE COMPANY TOTAL BURROUGHS CDC DEC IBM PRIME UNIVAC WANG TOTAL 1000 128 168 143 157 129 130 145 COSTAL 291 45 52 46 39 26 36 47 LAST 54 5 12 6 10 5 7 9 MOUNTAIN 328 44 56 43 53 47 49 36 VALLEY 327 34 48 48 55 51 38 53
COMPANY BY SEX COMPANY SEX TOTAL MALE FEMALE TOTAL 1000 592 408 BURROUGHS 128 74 54 CDC 168 97 71 DEC 143 75 68 IBM 157 103 54 PRIME 129 78 51 UNIVAC 130 74 56 WANG 145 91 54
COMPANY BY SEX (ACCUMULATED SALARY) COMPANY SEX TOTAL MALE FEMALE TOTAL 1000 592 408 BURROUGHS 128 74 54 CDC 168 97 71 DEC 143 75 68 IBM 157 103 54 PRIME 129 78 51 UNIVAC 130 74 56 WANG 145 91 54
COMPANY BY SEX (INCLUDE PERCENTS) COMPANY SEX TOTAL MALE FEMALE TOTAL 1000 592 408 BURROUGHS 128 74 54 CDC 168 97 71 DEC 143 75 68 IBM 157 103 54 PRIME 129 78 51 UNIVAC 130 74 56 WANG 145 91 54
** PL1TAX INSTRUCTIONS/READ COUNTS ** ** OLD 1000 READ ** OLD 1000 SELECTED ** PL1TAX OUTPUT FILE COUNTS ** ** CPU TIME 0.1646 SECONDS ** CPU/RECORD 0.1646 MILLISECONDS ** CPU/SELECT 0.1646 MILLISECONDS ** PL1TAX START 05/27/99 14:36:16 ** ** PL1TAX END 05/27/99 14:36:22 ** ** PL1TAX TOTAL 05/27/99 00:00:06 ** ** CPU/TOTAL 2.7433333 PERCENT @BK2,E