␣␣␣␣A1 = 42
  1. Definition
    00052 0 70000 1 00010 14A1 CPYCDBUF,1 INTO EDT 0014
  2. Reference
    00053 1 77777 1 00052 15TXIA1,1,−1 CARD BUFFER EDT 0015
␣␣␣␣A2 = 44
  1. Definition
    00054 0 00000 0 00054 16A2 HTRA2 FALSE END OF FILE IN READING CARD EDT 0016
  2. Reference
    00054 0 00000 0 00054 16A2 HTRA2 FALSE END OF FILE IN READING CARD EDT 0016
␣␣␣␣A3 = 50
  1. Definition
    00062 1 77777 1 00063 22A3 TXIA4,1,−1 EDT 0022
  2. Reference
    00065 0 02000 0 00062 25TRAA3 EDT 0025
␣␣␣␣A4 = 51
  1. Definition
    00063−3 00063 1 00066 23A4 TXLA5,1,* SUM EDT 0023
  2. References (2)
    00057 0 62200 0 00063 19STDA4 EDT 0019
    00062 1 77777 1 00063 22A3 TXIA4,1,−1 EDT 0022
␣␣␣␣A5 = 54
  1. Definition
    00066 0 76000 0 00006 26A5 COM EDT 0026
  2. Reference
    00063−3 00063 1 00066 23A4 TXLA5,1,* SUM EDT 0023
␣␣␣␣A6 = 59
  1. Definition
    00073−0 50000 0 00010 31A6 CALCDBUF SET UP EDT 0031
  2. Reference
    00071 0 10000 0 00073 29TZEA6 EDT 0029
␣␣␣␣A7 = 65
  1. Definition
    00101−0 50000 1 00161 37A7 CALTABLE+14,1 EDT 0037
  2. Reference
    00106 2 00001 1 00101 42A8 TIXA7,1,1 EDT 0042
␣␣␣␣A8 = 70
  1. Definition
    00106 2 00001 1 00101 42A8 TIXA7,1,1 EDT 0042
  2. Reference
    00104 0 02000 0 00106 40TRAA8 SITUATION EDT 0040
␣␣␣␣A9 = 72
  1. Definition
    00110 0 76300 0 00022 44A9 LLS18 EDT 0044
  2. Reference
    00105 0 02000 0 00110 41TRAA9 EDT 0041
␣␣␣␣L1 = 173
  1. Definition
    00255 0 00000 0 00001 156L1 HTR1 FALSE EOF IN READING MASTER TAPE EDT 0165
  2. References (3)
    00267 0 40000 0 00255 166RD6 ADDL1 EDT 0175
    00273 0 02000 0 00255 170TRAL1 EDT 0179
    00350 0 40000 0 00255 217MV5 ADDL1 EDT 0226
␣␣␣␣LB = 136
  1. Definition
    115 EDT 0124
    00210 0 76200 0 00321 116LB RCD PRESSES LOAD CARDS BUTTON EDT 0125
  2. References (2)
    00113 0 07400 4 00210 50EOFEND TSXLB,4 SEQUENCE EOF-END EDT 0050
    00124 0 07400 4 00210 59TSXLB,4 MR-END EDT 0059
␣␣␣A10 = 74
  1. Definition
    00112 0 02000 0 00112 46A10 TRA* EDT 0046
  2. Reference
    00111 0 62100 0 00112 45STAA10 EDT 0045
␣␣␣CL1 = 151
  1. Definition
    00227 0 60200 1 00000 133CL1 SLW0,1 EDT 0142
  2. Reference
    00230 2 00001 1 00227 134TIXCL1,1,1 EDT 0143
␣␣␣CS1 = 124
  1. Definition
    00174 0 70000 1 00353 103CS1 CPYMAINBF,1
  2. References (2)
    00175 1 77777 1 00174 104TXICS1,1,−1
    00177 2 00001 2 00173 106TIXCS1−1,2,1
␣␣␣CS2 = 130
  1. Definition
    00202 0 70000 1 00353 109CS2 CPYMAINBF,1
  2. Reference
    00204 3 77745 1 00202 111CS3 TXHCS2,1,−27
␣␣␣CS3 = 132
  1. Definition
    00204 3 77745 1 00202 111CS3 TXHCS2,1,−27
  2. Reference
    00203 1 77777 1 00204 110TXICS3,1,−1
␣␣␣MV1 = 225
  1. Definition
    00341 0 73400 2 00000 210MV1 PAX0,2 EDT 0219
  2. Reference
    00351 0 02000 0 00341 218TRAMV1 EDT 0227
␣␣␣MV2 = 226
  1. Definition
    00342 1 77777 1 00343 211MV2 TXIMV3,1,−1 EDT 0220
  2. Reference
    00347 1 77777 2 00342 216MV4 TXIMV2,2,−1 EDT 0225
␣␣␣MV3 = 227
  1. Definition
    00343−3 00343 1 00352 212MV3 TXLMV6,1,* EDT 0221
  2. References (2)
    00332 0 62200 0 00343 203STDMV3 CORRECT PART OF THE MAIN BUFFER EDT 0212
    00342 1 77777 1 00343 211MV2 TXIMV3,1,−1 EDT 0220
␣␣␣MV4 = 231
  1. Definition
    00347 1 77777 2 00342 216MV4 TXIMV2,2,−1 EDT 0225
  2. Reference
    00345−3 00352 2 00347 214TXLMV4,2,MAINBF−1 EDT 0223
␣␣␣MV5 = 232
  1. Definition
    00350 0 40000 0 00255 217MV5 ADDL1 EDT 0226
  2. Reference
    00337−0 12000 0 00350 208TMIMV5 EDT 0217
␣␣␣MV6 = 234
  1. Definition
    00352 0 02000 4 00001 219MV6 TRA1,4 EDT 0228
  2. Reference
    00343−3 00343 1 00352 212MV3 TXLMV6,1,* EDT 0221
␣␣␣RD1 = 163
  1. Definition
    00243−0 70000 0 00300 146RD1 CADFSTWD EDT 0155
  2. Reference
    00241 0 02000 0 00243 144TRARD1 EDT 0153
␣␣␣RD2 = 168
  1. Definition
    00250 0 73400 1 00000 151RD2 PAX0,1 EDT 0160
  2. Reference
    00270 0 02000 0 00250 167TRARD2 EDT 0176
␣␣␣RD3 = 170
  1. Definition
    00252−3 00352 1 00271 153RD3 TXLRD7,1,MAINBF−1 EDT 0162
  2. Reference
    00254 1 77777 1 00252 155RD4 TXIRD3,1,−1 E0T 0164
␣␣␣RD4 = 172
  1. Definition
    00254 1 77777 1 00252 155RD4 TXIRD3,1,−1 E0T 0164
  2. Reference
    00272 0 02000 0 00254 169TRARD4 EDT 0I78
␣␣␣RD5 = 174
  1. Definition
    00256−0 77300 0 00377 157RD5 RQL255 EDT 0166
  2. Reference
    00274 0 02000 0 00256 171TRARD5 EDT 0180
␣␣␣RD6 = 183
  1. Definition
    00267 0 40000 0 00255 166RD6 ADDL1 EDT 0175
  2. Reference
    00246−0 12000 0 00267 149TMIRD6 E0T 0158
␣␣␣RD7 = 185
  1. Definition
    00271−0 70000 0 00000 168RD7 CAD0 EDT 0I77
  2. Reference
    00252−3 00352 1 00271 153RD3 TXLRD7,1,MAINBF−1 EDT 0162
␣␣␣RD8 = 189
  1. Definition
    00275 0 76400 0 00205 172RD8 BST5 EDT 0181
  2. References (2)
    00261 0 02000 0 00275 160TRARD8 EDT 0169
    00265−0 10000 0 00275 164TNZRD8 EDT 0173
␣␣␣WR1 = 203
  1. Definition
    00313 0 36100 1 00353 187WR1 ACLMAINBF,1 EDT 0196
  2. Reference
    00315 3 00315 1 00313 189WR2 TXHWR1,1,* EDT 0198
␣␣␣WR2 = 205
  1. Definition
    00315 3 00315 1 00313 189WR2 TXHWR1,1,* EDT 0198
  2. References (2)
    00307 0 62200 0 00315 183STDWR2 EDT 0192
    00314 1 77777 1 00315 188TXIWR2,1,−1 EDT 0197
␣␣␣WR3 = 210
  1. Definition
    00322 0 70000 2 00353 194WR3 CPYMAINBF,2 EDT 0203
  2. Reference
    00326 3 00353 2 00322 198WR5 TXHWR3,2,MAINBF EDT 0207
␣␣␣WR4 = 212
  1. Definition
    00324 3 00324 2 00326 196WR4 TXHWR5,2,* EDT 0205
  2. References (2)
    00310 0 62200 0 00324 184STDWR4 EDT 0193
    00323 1 77777 2 00324 195TXIWR4,2,−1 EDT 0204
␣␣␣WR5 = 214
  1. Definition
    00326 3 00353 2 00322 198WR5 TXHWR3,2,MAINBF EDT 0207
  2. Reference
    00324 3 00324 2 00326 196WR4 TXHWR5,2,* EDT 0205
␣␣MOVE = 216
  1. Definition
    200 EDT 0209
    00330−0 50000 0 00010 201MOVE CALCDBUF MOVES A PROGRAM CARD FROM EDT 0210
  2. Reference
    00130 0 07400 4 00330 63PRGPRG TSXMOVE,4 SEQUENCE PROG-PROG EDT 0063
␣␣READ = 155
  1. Definition
    137 EDT 0I46
    00233−0 76000 0 00012 138READ RTT READS RECORD EDT 0147
  2. References (4)
    00116 0 07400 4 00233 53TSXREAD,4 EDT 0053
    00135 0 07400 4 00233 68TSXREAD,4 EDT 0068
    00242 0 02000 0 00233 145TRAREAD EDT 0154
    00276 0 00000 0 00233 173HTRREAD ERROR IN READING MASTER TAPE EDT 0182
␣␣SAVE = 140
  1. Definition
    120 EDT 0129
    00214−0 50000 0 00012 121SAVE CALCDBUF+2 SAVES CONTROL INFORMATION EDT 0130
  2. References (4)
    00114 0 07400 4 00214 51EOFMR TSXSAVE,4 SEQUENCE EOF-MR EDT 0051
    00120 0 07400 4 00214 55EOFNR TSXSAVE,4 SEQUENCE EOF-NR E0T 0055
    00133 0 07400 4 00214 66TSXSAVE,4 MR-MR EDT 0066
    00140 0 07400 4 00214 71TSXSAVE,4 MR-NR EDT 0071
␣ADDMK = 193
  1. Definition
    00301 0 00000 0 77777 176ADDMK −1 EDT 0185
  2. References (2)
    00244−0 32000 0 00301 147ANAADDMK EDT 0156
    00335−0 32000 0 00301 206ANAADDMK EDT 0215
␣CDBUF = 8
  1. Definition
    00010 93CDBUF SYN8 EDT 0093
  2. References (11)
    00052 0 70000 1 00010 14A1 CPYCDBUF,1 INTO EDT 0014
    00055−0 50000 0 00010 17CALCDBUF TEST EDT 0017
    00060−0 50000 0 00010 20CALCDBUF CHECK EDT 0020
    00064 0 36100 1 00011 24ACLCDBUF+1,1 EDT 0024
    00067 0 36100 0 00011 27ACLCDBUF+1 EDT 0027
    00073−0 50000 0 00010 31A6 CALCDBUF SET UP EDT 0031
    00214−0 50000 0 00012 121SAVE CALCDBUF+2 SAVES CONTROL INFORMATION EDT 0130
    00217−0 50000 0 00013 124CALCDBUF+3 EDT 0133
    00330−0 50000 0 00010 201MOVE CALCDBUF MOVES A PROGRAM CARD FROM EDT 0210
    00334−0 50000 0 00010 205CALCDBUF EDT 0214
    00344−0 50000 1 00011 213CALCDBUF+1,1 EDT 0222
␣CLEAR = 149
  1. Definition
    130 EDT 0139
    00225−0 75400 0 00000 131CLEAR PXD0,0 CLEARS MAIN BUFFER EDT 0140
  2. References (4)
    00115 0 07400 4 00225 52TSXCLEAR,4 EDT 0052
    00121 0 07400 4 00225 56TSXCLEAR,4 EDT 0056
    00134 0 07400 4 00225 67TSXCLEAR,4 EDT 0067
    00141 0 07400 4 00225 72TSXCLEAR,4 EDT 0072
␣EOFMR = 76
  1. Definition
    00114 0 07400 4 00214 51EOFMR TSXSAVE,4 SEQUENCE EOF-MR EDT 0051
  2. Reference
    00144 0 00041 0 00114 75EOFMR,0,33 EDT 0075
␣EOFNR = 80
  1. Definition
    00120 0 07400 4 00214 55EOFNR TSXSAVE,4 SEQUENCE EOF-NR E0T 0055
  2. Reference
    00145 0 00042 0 00120 76EOFNR,0,34 EDT 0076
␣FSTWD = 192
  1. Definition
    00300 0 00000 0 00000 175FSTWD EDT 0184
  2. References (2)
    00243−0 70000 0 00300 146RD1 CADFSTWD EDT 0155
    00251−0 50000 0 00300 152CALFSTWD EDT 0161
␣IDEOF = 114
  1. Definition
    00162 0 00000 0 00004 89IDEOF 4 EDT 0089
  2. Reference
    00042−0 50000 0 00162 6CALIDEOF INITIALISE THIS CARD EDT 0006
␣PRGMR = 90
  1. Definition
    00132 0 07400 4 00302 65PRGMR TSXWRITE,4 SEQUENCE PROG-MR EDT 0065
  2. References (2)
    00151 0 00001 0 00132 80PRGMR,0,1 EDT 0080
    00156 0 00011 0 00132 85PRGMR,0,9 EDT 0085
␣PRGNR = 95
  1. Definition
    00137 0 07400 4 00302 70PRGNR TSXWRITE,4 SEQUENCE PROG-NR EDT 0070
  2. References (2)
    00152 0 00002 0 00137 81PRGNR,0,2 EDT 0081
    00157 0 00012 0 00137 86PRGNR,0,10 EDT 0086
␣SITWD = 117
  1. Definition
    00165 0 00000 0 00000 92SITWD EDT 0092
  2. References (2)
    00077 0 60200 0 00165 35SLWSITWD WORD EDT 0035
    00103 0 34000 0 00165 39CASSITWD EDT 0039
␣TABLE = 99
  1. Definition
    00143 0 00047 0 00113 74TABLE EOFEND,0,39 EDT 0074
  2. Reference
    00101−0 50000 1 00161 37A7 CALTABLE+14,1 EDT 0037
␣WRITE = 194
  1. Definition
    177 EDT 0186
    00302 0 50000 0 00223 178WRITE CLAEIGHTR WRITES RECORD FROM MAIN BUFFER EDT 0187
  2. References (4)
    00123 0 07400 4 00302 58PRGEND TSXWRITE,4 SEQUENCE PROG-END EDT 0058
    00125 0 07400 4 00302 60PRGEOF TSXWRITE,4 SEQUENCE PR0G-EOF EDT 0060
    00132 0 07400 4 00302 65PRGMR TSXWRITE,4 SEQUENCE PROG-MR EDT 0065
    00137 0 07400 4 00302 70PRGNR TSXWRITE,4 SEQUENCE PROG-NR EDT 0070
BUFSIZ = 154
  1. Definition
    00232 0 00000 0 77425 136BUFSIZ −MAINBF EDT 0145
  2. Reference
    00226 0 53400 1 00232 132LXABUFSIZ,1 EDT 0141
CHKSUM = 191
  1. Definition
    00277 0 00000 0 00000 174CHKSUM EDT 0183
  2. References (4)
    00240 0 70000 0 00277 143CPYCHKSUM EDT 0152
    00263 0 36100 0 00277 162ACLCHKSUM EDT 0171
    00316 0 60200 0 00277 190SLWCHKSUM EDT 0199
    00320 0 70000 0 00277 192CPYCHKSUM EDT 0201
EIGHTL = 146
  1. Definition
    00222 0 00000 0 00000 127EIGHTL EDT 0136
  2. References (3)
    00215 0 60200 0 00222 122SLWEIGHTL FROM MR OR NR CARD EDT 0131
    00312−0 50000 0 00222 186CALEIGHTL EDT 0195
    00321 0 70000 0 00222 193CPYEIGHTL EDT 0202
EIGHTR = 147
  1. Definition
    00223 0 00000 0 00000 128EIGHTR EDT 0137
  2. References (2)
    00220 0 60200 0 00223 125SLWEIGHTR EDT 0134
    00302 0 50000 0 00223 178WRITE CLAEIGHTR WRITES RECORD FROM MAIN BUFFER EDT 0187
EOFEND = 75
  1. Definition
    47 EDT 0047
    48 THERE FOLLOW THE 8 POSSIBLE SITUATION SUBROUTINES EDT 0048
    49 EDT 0049
    00113 0 07400 4 00210 50EOFEND TSXLB,4 SEQUENCE EOF-END EDT 0050
  2. Reference
    00143 0 00047 0 00113 74TABLE EOFEND,0,39 EDT 0074
ILLEGL = 71
  1. Definition
    00107 0 00000 0 00107 43ILLEGL HTRILLEGL SEARCH FAILED. ILLEGAL SITUATION. EDT 0043
  2. Reference
    00107 0 00000 0 00107 43ILLEGL HTRILLEGL SEARCH FAILED. ILLEGAL SITUATION. EDT 0043
LASTCD = 116
  1. Definition
    00164 0 00000 0 00000 91LASTCD EDT 0091
  2. References (2)
    00047 0 60200 0 00164 11SLWLASTCD INTO LAST CARD EDT 0011
    00076−0 50100 0 00164 34ORALASTCD SITUATION EDT 0034
MAINBF = 235
  1. Definition
    220 EDT 0229
    00353 0 00000 0 00000 221MAINBF MAIN BUFFER STARTS HERE EDT 0230
  2. References (10)
    00174 0 70000 1 00353 103CS1 CPYMAINBF,1
    00202 0 70000 1 00353 109CS2 CPYMAINBF,1
    00232 0 00000 0 77425 136BUFSIZ −MAINBF EDT 0145
    00252−3 00352 1 00271 153RD3 TXLRD7,1,MAINBF−1 EDT 0162
    00253−0 70000 1 00352 154CADMAINBF−1,1 E0T 0163
    00313 0 36100 1 00353 187WR1 ACLMAINBF,1 EDT 0196
    00322 0 70000 2 00353 194WR3 CPYMAINBF,2 EDT 0203
    00326 3 00353 2 00322 198WR5 TXHWR3,2,MAINBF EDT 0207
    00345−3 00352 2 00347 214TXLMV4,2,MAINBF−1 EDT 0223
    00346 0 60200 2 00352 215SLWMAINBF−1,2 EDT 0224
NEWBEG = 148
  1. Definition
    00224 0 00000 0 00000 129NEWBEG EDT 0138
  2. References (4)
    00216 0 62100 0 00224 123STANEWBEG EDT 0132
    00245 0 40200 0 00224 148SUBNEWBEG E0T 0157
    00303 0 40200 0 00224 179SUBNEWBEG INTO SECONDARY TAPE EDT 0188
    00336 0 40200 0 00224 207SUBNEWBEG EDT 0216
ONE2CS = 118
  1. Definition
    94 THERE FOLLOW THE 7 SUBROUTINES EDT 0094
    95 ONE2CS, LB, SAVE, CLEAR, READ, WRITE, MOVE EDT 0095
    96 EDT 0096
    00166−0 76000 0 00012 97ONE2CS RTT TRANSCRIBES EDT 0097
  2. Reference
    00044 0 07400 4 00166 8TSXONE2CS,4 TSX TO TRANSCRIBE SPECIAL FIRST RCD EDT 0008
PRGEND = 83
  1. Definition
    00123 0 07400 4 00302 58PRGEND TSXWRITE,4 SEQUENCE PROG-END EDT 0058
  2. References (2)
    00146 0 00007 0 00123 77PRGEND,0,7 EDT 0077
    00153 0 00017 0 00123 82PRGEND,0,15 EDT 0082
PRGEOF = 85
  1. Definition
    00125 0 07400 4 00302 60PRGEOF TSXWRITE,4 SEQUENCE PR0G-EOF EDT 0060
  2. References (2)
    00147 0 00004 0 00125 78PRGEOF,0,4 EDT 0078
    00154 0 00014 0 00125 83PRGEOF,0,12 EDT 0083
PRGPRG = 88
  1. Definition
    00130 0 07400 4 00330 63PRGPRG TSXMOVE,4 SEQUENCE PROG-PROG EDT 0063
  2. References (3)
    00150 0 00000 0 00130 79PRGPRG,0,0 EDT 0079
    00155 0 00010 0 00130 84PRGPRG,0,8 E0T 0084
    00160 0 00020 0 00130 87PRGPRG,0,16 EDT 0087
REENTR = 37
  1. Definition
    00045−0 50000 0 00163 9REENTR CALTHISCD MAIN LOOP REENTRY EDT 0009
  2. References (6)
    00117 0 02000 0 00045 54TRAREENTR E0T 0054
    00122 0 02000 0 00045 57TRAREENTR EDT 0057
    00127 0 02000 0 00045 62TRAREENTR EDT 0062
    00131 0 02000 0 00045 64TRAREENTR MR-PR0G, NR-PROG EDT 0064
    00136 0 02000 0 00045 69TRAREENTR EDT 0069
    00142 0 02000 0 00045 73TRAREENTR EDT 0073
THISCD = 115
  1. Definition
    00163 0 00000 0 00000 90THISCD EDT 0090
  2. References (3)
    00043 0 60200 0 00163 7SLWTHISCD TO END FILE EDT 0007
    00045−0 50000 0 00163 9REENTR CALTHISCD MAIN LOOP REENTRY EDT 0009
    00075 0 62100 0 00163 33STATHISCD AND EDT 0033
ZERO14 = 113
  1. Definition
    00161 0 00000 0 00016 88ZERO14 14 EDT 0088
  2. References (8)
    00051−0 53400 1 00161 13LXDZERO14,1 THE NEXT CARD EDT 0013
    00061−0 53400 1 00161 21LXDZERO14,1 EDT 0021
    00100 0 53400 1 00161 36LXAZERO14,1 TABLE SEARCH EDT 0036
    00171−0 53400 1 00161 100LXDZERO14,1
    00200−0 53400 1 00161 107LXDZERO14,1
    00237−0 53400 1 00161 142LXDZERO14,1 EDT 0I51
    00311−0 53400 3 00161 185LXDZERO14,3 EDT 0194
    00333−0 53400 1 00161 204LXDZERO14,1 EDT 0213
ZEROTW = 135
  1. Definition
    00207 0 00000 0 00002 114ZEROTW 2
  2. Reference
    00172 0 53400 2 00207 101LXAZEROTW,2