@XQT $PL1TAX $PL1TAX VER 2 05/27/99 14:40:57 ** PL1TAX SOURCE LISTING ** # STATEMENT 1. * 2. * PP.DEMOC 3. * 4. * TABLES - ADVANCED 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 SEX=M 27. TABLE T1 28. ENDIF 29. IF SALARY > 50000 30. TABLE T1 31. ENDIF 32. 33. *TABLES 34. TABLE ='4 DIMENSIONAL TABLE',/, 35. ='SEX BY AGE BY COUNTY BY COMPANY',/ 36. STUB SEX LABELS MALE, FEMALE 37. STUB SEX CODES M,F 38. STUB AGE GROUPS 00-17,18-65,66-99 39. STUB COUNTY GROUPS 01-10,11-20,21-30,31-40 40. SPREAD COMPANY 10 CODES 41. 42. TABLE ='SEX AND AGE BY COMPANY',/ 43. ROW /SEX-AGE/ LABELS MALE,FEMALE,/,KIDS,ADULTS,RETIRED 44. ROW SEX=M 45. ROW SEX=F 46. ROW AGE=00-17 47. ROW AGE=18-65 48. ROW AGE=66-99 49. SPREAD COMPANY 10 CODES 50. ** PL1TAX SOURCE LISTING ** # STATEMENT 51. TABLE ='COMPANY AGE GROUPINGS',/ 52. STUB COMPANY 10 CODES 53. COLUMN AGE LABELS TOTAL, KIDS, TEENS, YUPPIES, ADULTS, RETIRED, 80S 54. COLUMN AGE=AGE 55. COLUMN AGE=00-17 56. COLUMN AGE=13-19 57. COLUMN AGE=22-35 58. COLUMN AGE=19-65 59. COLUMN AGE=66-99 60. COLUMN AGE=80-89 61. 62. TABLE :T1 ='SPECIAL CASE TABLE',/ 63. STUB COUNTY GROUPS 01-30,31-60 64. SPREAD COMPANY 10 CODES ** $PL1TAX SOURCE LISTING **
4 DIMENSIONAL TABLE SEX BY AGE BY COUNTY BY COMPANY SEX COMPANY AGE TOTAL BURROUGHS CDC DEC IBM PRIME UNIVAC WANG COUNTY TOTAL 618 79 100 94 94 77 74 100 00-17 37 7 4 4 8 4 3 7 01-10 4 1 1 0 0 0 1 1 11-20 5 3 0 0 2 0 0 0 21-30 12 1 1 2 3 3 0 2 31-40 16 2 2 2 3 1 2 4 18-65 391 43 57 56 65 49 51 70 01-10 64 9 13 9 8 7 11 7 11-20 63 9 9 10 10 4 10 11 21-30 123 15 19 18 18 16 11 26 31-40 141 10 16 19 29 22 19 26 66-99 190 29 39 34 21 24 20 23 01-10 37 10 7 9 0 4 3 4 11-20 32 4 5 6 5 3 5 4 21-30 69 7 13 10 10 9 9 11 31-40 52 8 14 9 6 8 3 4 MALE 363 46 56 54 60 46 41 60 00-17 25 5 3 4 3 4 2 4 01-10 2 0 1 0 0 0 1 0 11-20 2 2 0 0 0 0 0 0 21-30 9 1 0 2 1 3 0 2 31-40 12 2 2 2 2 1 1 2 18-65 222 24 29 28 41 25 30 45 01-10 38 7 5 7 6 3 8 2 11-20 32 4 3 3 8 2 5 7 21-30 70 8 10 8 12 8 5 19 31-40 82 5 11 10 15 12 12 17 66-99 116 17 24 22 16 17 9 11 01-10 23 6 6 6 0 3 0 2 11-20 20 3 3 2 4 3 3 2 21-30 44 4 8 7 7 7 5 6 31-40 29 4 7 7 5 4 1 1 FEMALE 255 33 44 40 34 31 33 40 4 DIMENSIONAL TABLE SEX BY AGE BY COUNTY BY COMPANY SEX COMPANY AGE TOTAL BURROUGHS CDC DEC IBM PRIME UNIVAC WANG COUNTY 00-17 12 2 1 0 5 0 1 3 01-10 2 1 0 0 0 0 0 1 11-20 3 1 0 0 2 0 0 0 21-30 3 0 1 0 2 0 0 0 31-40 4 0 0 0 1 0 1 2 18-65 169 19 28 28 24 24 21 25 01-10 26 2 8 2 2 4 3 5 11-20 31 5 6 7 2 2 5 4 21-30 53 7 9 10 6 8 6 7 31-40 59 5 5 9 14 10 7 9 66-99 74 12 15 12 5 7 11 12 01-10 14 4 1 3 0 1 3 2 11-20 12 1 2 4 1 0 2 2 21-30 25 3 5 3 3 2 4 5 31-40 23 4 7 2 1 4 2 3
SEX AND AGE BY COMPANY SEX-AGE COMPANY TOTAL BURROUGHS CDC DEC IBM PRIME UNIVAC WANG MALE 592 74 97 75 103 78 74 91 FEMALE 408 54 71 68 54 51 56 54 KIDS 59 11 6 8 11 8 6 9 ADULTS 593 73 94 81 98 75 78 94 RETIRED 348 44 68 54 48 46 46 42
COMPANY AGE GROUPINGS COMPANY AGE TOTAL KIDS TEENS YUPPIES ADULTS RETIRED 80S TOTAL 1000 59 67 233 580 348 107 BURROUGHS 128 11 13 34 71 44 10 CDC 168 6 7 29 93 68 28 DEC 143 8 10 36 79 54 21 IBM 157 11 8 41 97 48 14 PRIME 129 8 10 27 74 46 11 UNIVAC 130 6 11 23 74 46 14 WANG 145 9 8 43 92 42 9
SPECIAL CASE TABLE COUNTY COMPANY TOTAL BURROUGHS CDC DEC IBM PRIME UNIVAC WANG TOTAL 1107 140 189 151 178 135 141 173 01-30 447 73 73 64 63 45 54 75 31-60 660 67 116 87 115 90 87 98
** PL1TAX INSTRUCTIONS/READ COUNTS ** ** OLD 1000 READ ** OLD 1000 SELECTED ** PL1TAX OUTPUT FILE COUNTS ** ** CPU TIME 0.1778 SECONDS ** CPU/RECORD 0.1778 MILLISECONDS ** CPU/SELECT 0.1778 MILLISECONDS ** PL1TAX START 05/27/99 14:40:57 ** ** PL1TAX END 05/27/99 14:41:01 ** ** PL1TAX TOTAL 05/27/99 00:00:04 ** ** CPU/TOTAL 4.4449999 PERCENT @BK2,E