@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