141 FORCE NEW RECORD
00051 0 01303 0 01443 2HTRX−1,0,LOCREC CARD FOR DE
01303 3ORGLOCREC
TD01303 3 00000 0 00051 4TXH41 5560 FT 34
01304 0 07400 4 00740 5TSXPRINT,4
01305 0 01244 0 01237 6HTRMACHIN,0,MACHIN+5
01306−0 53400 2 00000 7LXD0,2 IR 2EQUALS 2 FOR STATE B, BCD IS SET UP
01307 3 00001 2 01322 8TXHPRIN,2,1
01310 0 50000 0 01437 9CLAA1
01311 0 60100 0 01336 10STOPR1
01312 0 50000 0 01440 11CLAA2
01313 0 60100 0 01400 12STOPR2
01314 0 50000 0 01441 13CLAA3
01315 0 60100 0 01403 14STOPR3
01316 0 50000 0 01442 15CLAA4
01317 0 60100 0 01411 16STOPR4
01320 0 50000 0 01443 17CLAA5
01321 0 60100 0 01416 18STOPR5
01322 0 07400 4 00740 19PRIN TSXPRINT,4
01323 0 01437 0 01325 20HTRPR,0,PR+74
01324 0 02000 0 00221 21TRADIGRTN
01325 606060606060 22PR BCD2␣␣␣␣␣␣␣␣␣␣␣␣
01326 606060606060 23
01327 233025234260 24BCD7CHECK␣SUM␣ERROR␣IN␣READING␣DRUM␣1.␣␣THE␣ST
01330 626444602551 25
01331 514651603145 26
01332 605125212431 27
01333 452760245164 28
01334 446001336060 29
01335 633025606263 30
01336 216325602260 31PR1 BCD1ATE␣B␣
01337 234624314527 32BCD CODING␣USED␣BY␣SECTION␣II,␣BLOCK␣2,␣HAS␣BEEN␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣
01340 606462252460 33
01341 227060622523 34
01342 633146456031 35
01343 317360224346 36
01344 234260027360 37
01345 302162602225 38
01346 254560606060 39
01347 606060606060 40
01350 606060606060 41
01351 606060606060 42BCD2␣␣␣␣␣␣␣␣␣␣␣␣
01352 606060606060 43
01353 512521246031 44BCD READ␣INTO␣LOCATIONS␣5566␣THROUGH␣6565.␣␣THE␣COMPUTED␣CHECK␣S
01354 456346604346 45
01355 232163314645 46
01356 626005050606 47
01357 606330514664 48
01360 273060060506 49
01361 053360606330 50
01362 256023464447 51
01363 646325246023 52
01364 302523426062 53
01365 644473604346 54BCD UM,␣LOCATION␣5561,␣IS␣COMPARED␣TO␣THE␣PERMANENT␣␣␣␣␣␣␣␣␣␣␣␣␣
01366 232163314645 55
01367 600505060173 56
01370 603162602346 57
01371 444721512524 58
01372 606346606330 59
01373 256047255144 60
01374 214525456360 61
01375 606060606060 62
01376 606060606060 63
01377 626321632560 64BCD1STATE␣
01400 226062644460 65PR2 BCD3B␣SUM␣IN␣LOCATION␣
01401 314560434623 66
01402 216331464560 67
01403 050506023360 68PR3 BCD65562.␣␣COPY␣LOOP␣BEGINS␣AT␣LOCATION␣
01404 602346477060 69
01405 434646476022 70
01406 252731456260 71
01407 216360434623 72
01410 216331464560 73
01411 050503043360 74PR4 BCD55534.␣␣STARTING␣DRUM␣ADDRESS␣I
01412 606263215163 75
01413 314527602451 76
01414 644460212424 77
01415 512562626031 78
01416 626001000000 79PR5 BCD5S␣1000.␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣
01417 336060606060 80
01420 606060606060 81
01421 606060606060 82
01422 606060606060 83
01423 263165256021 84BCD FIVE␣ATTEMPTS␣HAVE␣BEEN␣MADE␣TO␣READ␣THIS␣BLOCK␣OF␣PROGRAM␣C
01424 636325444763 85
01425 626030216525 86
01426 602225254560 87
01427 442124256063 88
01430 466051252124 89
01431 606330316260 90
01432 224346234260 91
01433 462660475146 92
01434 275121446023 93
01435 465151252363 94BCD2ORRECTLY.␣␣␣
01436 437033606060 95
01437 216325602160 96A1 BCD1ATE␣A␣
01440 216062644460 97A2 BCD1A␣SUM␣
01441 050506033360 98A3 BCD15563.␣
01442 050505053360 99A4 BCD15555.␣
01443 626071255146 100A5 BCD1S␣ZERO
01444 0 00000 0 00000 101X