The text read off it
[90.05 sample-program listing, PDF p.204]
Sample-program compilation listing — printer output page 13 of 16 (label CHECK.NEW.DEPT) (PDF p.204).
DATE 10/18/61 TIME 2.45 ACCOUNT ID. CT PUBLICATIONS PAGE 13
00441 0500 00 0 00131 10001 +41 CLA 5)INSURANCE
00442 0074 00 4 00264 10010 +42 TSX SYS)180,4
00443 0 00003 0 00035 10001 +43 PZE INS.PREM,,3
00444 1 00004 1 00413 10010 +44 TXI SYS)267,1,4
00445 000004000003 10000 +45 OCT 000004000003
00446 0774 00 1 00006 10000 +46 AXT 6,1
00447 0500 00 0 00132 10001 +47 CLA 5)RETIREMENT
00450 0074 00 4 00264 10010 +48 TSX SYS)180,4
00451 0 00000 0 00037 10001 +49 PZE RET.PREM,,0
00452 1 00004 1 00413 10010 +50 TXI SYS)267,1,4
00453 000004000003 10000 +51 OCT 000004000003
00454 0774 00 1 00006 10000 +52 AXT 6,1
00455 4500 00 0 01725 10001 +53 CAL CP)+25
00456 0320 00 0 00020 10001 +54 ANS 3)DEPARTMENT
00457 0760 00 0 00006 10000 +55 COM
00460 4320 00 0 01700 10001 +56 ANA CP)+4
00461 4602 00 0 00020 10001 +57 ORS 3)DEPARTMENT
00462 0441 00 0 01753 10001 +58 LDI CP)+47
00463 0604 00 0 00205 10010 +59 STI SYS)133
00464 0074 00 4 00266 10010 +60 TSX SYS)182,4
00465 1 00017 1 00363 10010 +61 TXI SYS)243,1,15
00466 0441 00 0 01754 10001 +62 LDI CP)+48
00467 0604 00 0 00205 10010 +63 STI SYS)133
00470 0074 00 4 00266 10010 +64 TSX SYS)182,4
00471 1 00004 1 00363 10010 +65 TXI SYS)243,1,4
00472 0441 00 0 01755 10001 +66 LDI CP)+49
00473 0604 00 0 00205 10010 +67 STI SYS)133
00474 0074 00 4 00266 10010 +68 TSX SYS)182,4
00475 1 00002 1 00363 10010 +69 TXI SYS)243,1,2
00476 0441 00 0 01756 10001 +70 LDI CP)+50
00477 0604 00 0 00205 10010 +71 STI SYS)133
00500 0074 00 4 00266 10010 +72 TSX SYS)182,4
00501 1 00002 1 00363 10010 +73 TXI SYS)243,1,2
00502 0441 00 0 01757 10001 +74 LDI CP)+51
00503 0604 00 0 00205 10010 +75 STI SYS)133
00504 0074 00 4 00266 10010 +76 TSX SYS)182,4
00505 1 00002 1 00363 10010 +77 TXI SYS)243,1,2
00506 0500 00 0 00134 10001 +78 CLA 3)BONDPURCHASES
00507 0074 00 4 00264 10010 +79 TSX SYS)180,4
00510 0 00001 0 00042 10001 +80 PZE 2)BONDENOMINATION,,1
00511 1 00004 1 00413 10010 +81 TXI SYS)267,1,4
00512 000005000004 10000 +82 OCT 000005000004
00513 0774 00 1 00007 10000 +83 AXT 7,1
00514 0074 00 4 00011 10010 +84 TSX IOC)9,4
00515 0 00000 0 04005 10010 +85 PZE PAYFILE,,0
00516 7 00024 0 00020 10001 +86 IOST PAYRECORD,,20
00517 0074 00 4 00261 10010 +87 TSX SYS)177,4
00520 0 00000 0 00001 10010 +88 PZE IOC)1
00521 0074 00 4 00262 10010 +89 TSX SYS)178,4
00522 0 01727 0 01726 10101 +90 PZE CP)+26,,CP)+27
00523 0 01731 0 01730 10101 +91 PZE CP)+28,,CP)+29
00524 0074 00 4 00261 10010 +92 TSX SYS)177,4
00525 0 00000 0 00001 10010 +93 PZE IOC)1
00526 1 00000 0 00050 10010 +94 TXI IOC)40,0
00527 4500 00 0 00047 10001 CHECK.NEW.DEPT CAL CURRENT.DEPT