The text read off it
[90.05 sample-program listing, PDF p.192]
Compilation of Sample Problem, printer listing page 1 (PDF p.192).
COMPILATION OF SAMPLE PROBLEM
DATE 10/18/61 TIME 2.45 ACCOUNT ID. CT PUBLICATIONS PAGE 1
*COMPILE LIST CT PUBLICATIONS
CTC
*DATA
1,00 71175 MASTER 1RECORD L
2,00 71177 DAT 2
3,00 EMPLOYEE.NUM 3
71200 BER
4,00 71201 DEPARTMENT 4 AA
5,00 71202 EMPLOYEE 4 AAAA
6,00 71203 NAME 3 A(15)
7,00 71204 TRIGGERS 2 AAA
8,00 71205 RATE 2 IR99V999
9,00 71206 DATE 2
10,00 71207 MONTH 3 AA
11,00 71210 DAY 3 AA
12,00 71211 YEAR 3 AA
13,00 71212 EXEMPTIONS 2 IR99
14,00 71213 TOTALS 2
15,00 71214 GROSS 3 IR9(4)V99
16,00 71215 RETIREMENT 3 IR999V99
17,00 71216 INSURANCE 3 IR999V99
18,00 71217 FICA 2 IR999V99
19,00 71220 WHT 2 IR9(4)V99
20,00 71221 BONDEDUCTION 2 IR99V99
21,00 BONDACCUMULATI 2 IR999V99
71222 ON
22,00 BONDENOMINATIO 2 IR999V99
71223 N
23,00 71224 DETAIL 01RECORD
24,00 71226 EMPLOYEE.NUMBER 02
25,00 71227 DEPARTMENT 03 AA
26,00 71230 EMPLOYEE 03 AAAA
27,00 71231 DATE 02
28,00 71232 MONTH 03 AA
29,00 71233 DAY 03 AA
30,00 71234 YEAR 03 AA
31,00 71235 HOURS 02 99V9
32,00 71236 CHECK 01RECORD
33,00 71240 CNTRLCHAR 02 A '1'
34,00 71241 DATE 02
35,00 71242 MONTH 03 AA
36,00 GN)001 03 A '-'
37,00 71244 DAY 03 AA
38,00 GN)002 03 A '-'
39,00 71246 YEAR 03 AA
40,00 GN)003 03 A(30) ' '
41,00 71250 EMPLOYEE.NUMBER 02 A(6)
42,00 71251 ENDFRSTLINE 02RCDMRK A
43,00 71252 CNTRLCHARSECLIN 02 A '2'
44,00 71253 NAME 02 A(18)
45,00 GN)004 02 A(20) ' '
46,00 71255 AMOUNT 02 $8889.99
47,00 71256 PAYRECORD 1RECORD