cdc:nos2.source:opl.opl871:deck:o26.002
Deck O26 Part 002
26 Modifications
Listing Sections
- Deck O26 Start
- Deck O26 Part 1 (Line 1456)
- Deck O26 Part 2 (Line 3152)
- Deck O26 Part 3 (Line 5051)
Source
Seq # *Modification Id* Act ----------------------------+ 03152 M00S02357.o26 +++| STD SI RESET SCAN INDEX 03153 M00S02358.o26 +++| PRT1 JMP KBIX RETURN 03154 M00S02359.o26 +++| 03155 M00S02360.o26 +++|* PROCESS CHARACTER TAB. 03156 M00S02361.o26 +++| 03157 M00S02362.o26 +++| PRT2 LDN 1R PRESET * * 03158 M00S02363.o26 +++| STD T1 03159 M00S02364.o26 +++| LDM KBUF CHECK FIRST CHARACTER 03160 M00S02365.o26 +++| LMN 1RD 03161 M00S02366.o26 +++| ZJN PRT3 IF *D* 03162 M00S02367.o26 +++| LMN 1RE&1RD 03163 M00S02368.o26 +++| ZJN PRT3 IF *E* 03164 M00S02369.o26 +++| LMN 1RF&1RE 03165 M00S02370.o26 +++| ZJN PRT5 IF *F* 03166 M00S02371.o26 +++| LMN 1RA&1RF 03167 M00S02372.o26 +++| ZJN PRT3 IF *A* 03168 M00S02373.o26 +++| LMN 1RN&1RA 03169 M00S02374.o26 +++| ZJN PRT4 IF *N* 03170 M00S02375.o26 +++| LMN 1RL&1RN 03171 M00S02376.o26 +++| NJN PRT6 IF NOT *L* 03172 M00S02377.o26 +++| PRT3 STM KBSA 03173 M00S02378.o26 +++| PRT4 LDM DBUF,KI SET TAB CHARACTER 03174 M00S02379.o26 +++| LPN 77 03175 M00S02380.o26 +++| PRT5 STD T1 SET TAB CHARACTER 03176 M00S02381.o26 +++| PRT6 LDD T1 STORE TAB CHARACTER 03177 M00S02382.o26 +++| STM KBUF,KI 03178 M00S02383.o26 +++| AOD KI CHECK FOR END OF BUFFER 03179 M00S02384.o26 +++| ADC -KBUFL 03180 M00S02385.o26 +++| PJN PRT7 IF BUFFER FULL 03181 M00S02386.o26 +++| LDM DBUF,KI CHECK FOR TAB COLUMN 03182 M00S02387.o26 +++| SHN 7 03183 M00S02388.o26 +++| MJN PRT8 IF TAB COLUMN 03184 M00S02389.o26 +++| LDD KI CHECK FOR LAST CHARACTER OF ORIGINAL LINE 03185 M00S02390.o26 +++| SBN 2 03186 M00S02391.o26 +++| LMD LC 03187 M00S02392.o26 +++| ZJN PRT8 IF AT LAST COLUMN 03188 M00S02393.o26 +++| LJM PRT2 LOOP UNTIL TAB COLUMN REACHED 03189 M00S02394.o26 +++| 03190 M00S02395.o26 +++|* BKSP OVER END OF BUFFER. 03191 M00S02396.o26 +++| 03192 M00S02397.o26 +++| PRT7 SOD KI CLEAR ENTRY 03193 M00S02398.o26 +++| LDN 1R 03194 M00S02399.o26 +++| STM KBUF,KI 03195 M00S02400.o26 +++| PRT8 JMP KBIX RETURN 03196 M00S02401.o26 +++| RDL SPACE 4,20 03197 M00S02402.o26 +++|** RDL - READ LINE FROM BUFFER. 03198 M00S02403.o26 +++|* 03199 M00S02404.o26 +++|* ENTRY (CA) = CHARACTER ADDRESS. 03200 M00S02405.o26 +++|* 03201 M00S02406.o26 +++|* EXIT (T4) = LAST CHARACTER ADDRESS. 03202 M00S02407.o26 +++|* (LC) = CHARACTER COUNT OF LINE. 03203 M00S02408.o26 +++|* 03204 M00S02409.o26 +++|* USES T1 - T3, CM - CM+4.
| Line S02410 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03205 M01S02410.241l630 ---|* 03206 M01S02411.241l630 ---|* CALLS SFL. 03207 M00S02412.o26 +++| 03208 M00S02413.o26 +++| 03209 M00S02414.o26 +++| RDL SUBR ENTRY/EXIT 03210 M00S02415.o26 +++| LDD IF 03211 M00S02416.o26 +++| NJN RDL1 IF INSERT SET
| Line S02417 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03212 M01S02417.v23l617 ---| LJM ERR ILLEGAL ENTRY
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03213 M01S00007.v23l617 +++| LJM ERR INCORRECT ENTRY 03214 M00S02418.o26 +++| 03215 M00S02419.o26 +++| RDL1 LDD IP+1 CHECK INSERT 03216 M00S02420.o26 +++| LMD IN+1 03217 M00S02421.o26 +++| NJN RDL2 IF IN RANGE 03218 M00S02422.o26 +++| LDD IP 03219 M00S02423.o26 +++| LMD IN 03220 M00S02424.o26 +++| NJN RDL2 IF IN RANGE 03221 M00S02425.o26 +++| LDC =C*OUT OF RANGE.* 03222 M00S02426.o26 +++| LJM ERR1 03223 M00S02427.o26 +++| 03224 M00S02428.o26 +++|* READ LINE FROM CM BUFFER. 03225 M00S02429.o26 +++| 03226 M00S02430.o26 +++| RDL2 LDN 19D READ LINE FROM BUFFER 03227 M00S02431.o26 +++| STD T1 03228 M00S02432.o26 +++| LDD IP 03229 M00S02433.o26 +++| SHN 6 03230 M00S02434.o26 +++| ADD RA 03231 M00S02435.o26 +++| SHN 6 03232 M00S02436.o26 +++| ADD IP+1 03233 M00S02437.o26 +++| CRM BUFR,T1 03234 M00S02438.o26 +++| LDC BUFR SET BUFFER ADDRESS 03235 M00S02439.o26 +++| STD T1 03236 M00S02440.o26 +++| LDD CA SET CHARACTER ADDRESS 03237 M00S02441.o26 +++| STD T4 03238 M00S02442.o26 +++| LDI T1 03239 M00S02443.o26 +++| ADM 1,T1 03240 M00S02444.o26 +++| ADM 2,T1 03241 M00S02445.o26 +++| ADM 3,T1 03242 M00S02446.o26 +++| ADM 4,T1 03243 M00S02447.o26 +++| NJN RDL3 IF NOT NULL BUFFER 03244 M00S02448.o26 +++| LDC 2R 03245 M00S02449.o26 +++| STI T1 03246 M00S02450.o26 +++| 03247 M00S02451.o26 +++|* UNPACK LINE INTO BUFFER. 03248 M00S02452.o26 +++| 03249 M00S02453.o26 +++| RDL3 LDI T1 03250 M00S02454.o26 +++| NJN RDL4 IF NON-ZERO BYTE 03251 M00S02455.o26 +++| LDD T1 03252 M00S02456.o26 +++| ADC -BUFR 03253 M00S02457.o26 +++| 03254 M00S02458.o26 +++|* CHECK FOR MULTIPLE OF 5. 03255 M00S02459.o26 +++| 03256 M00S02460.o26 +++| ADN 1 COMPENSATE FOR 0 03257 M00S02461.o26 +++| RDL3.1 SBN 5 03258 M00S02462.o26 +++| ZJN RDL5 IF END OF LINE 03259 M00S02463.o26 +++| PJN RDL3.1 IF NOT COMPLETE 03260 M00S02464.o26 +++| RDL4 LDI T1 UNPACK CHARACTER 03261 M00S02465.o26 +++| SHN -6 03262 M00S02466.o26 +++| STI T4 UPPER CHARACTER 03263 M00S02467.o26 +++| AOD T4 03264 M00S02468.o26 +++| LDI T1 UNPACK LOWER CHARACTER 03265 M00S02469.o26 +++| LPN 77 03266 M00S02470.o26 +++| STI T4 03267 M00S02471.o26 +++| AOD T1 03268 M00S02472.o26 +++| AOD T4 ADVANCE CHARACTER COUNT 03269 M00S02473.o26 +++| SBD CA 03270 M00S02474.o26 +++| ADC -KBUFL CHECK FOR END OF BUFFER 03271 M00S02475.o26 +++| MJN RDL3 IF BUFFER NOT FULL - LOOP 03272 M00S02476.o26 +++| 03273 M00S02477.o26 +++|* COPY LINE TO DUP BUFFER. 03274 M00S02478.o26 +++| 03275 M00S02479.o26 +++| RDL5 SOD T4 BACK UP IN BUFFER 03276 M00S02480.o26 +++| LDI T4 03277 M00S02481.o26 +++| ZJN RDL5 IF *00* CHARACTER 03278 M00S02482.o26 +++| AOD T4 FIRST *00* CHARACTER ADDRESS 03279 M00S02483.o26 +++| LDC DBUF+2 03280 M00S02484.o26 +++| STD T2 03281 M00S02485.o26 +++| LDD CA SET CHARACTER ADDRESS 03282 M00S02486.o26 +++| STD T1 03283 M00S02487.o26 +++| RDL6 LDI T2 REPLACE DUP CHARACTER
| Line S02488 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03284 M01S02488.241l630 ---| LPC 6000
| Line S00628 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03285 M01S00628.241l630 +++| SCN 77 03286 M00S02489.o26 +++| LMI T1 03287 M00S02490.o26 +++| STI T2 03288 M00S02491.o26 +++| AOD T2 03289 M00S02492.o26 +++| AOD T1 ADVANCE CHARACTER 03290 M00S02493.o26 +++| LMD T4 03291 M00S02494.o26 +++| NJN RDL6 IF NOT END OF LINE LOOP 03292 M00S02495.o26 +++| LDD T2 SET DUP BUFFER LENGTH 03293 M00S02496.o26 +++| ADC -DBUF 03294 M00S02497.o26 +++| STM DKLB 03295 M00S02498.o26 +++| 03296 M00S02499.o26 +++|* CLEAR TO END OF BUFFER. 03297 M00S02500.o26 +++| 03298 M00S02501.o26 +++| RDL7 LDI T2 BLANK FILL TO END OF BUFFERS
| Line S02502 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03299 M01S02502.241l630 ---| LPC 6000 DUP BUFFER
| Line S00629 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03300 M01S00629.241l630 +++| SCN 77 03301 M00S02503.o26 +++| ADN 1R 03302 M00S02504.o26 +++| STI T2 03303 M00S02505.o26 +++| LDN 1R KEYBOARD BUFFER 03304 M00S02506.o26 +++| STI T1 03305 M00S02507.o26 +++| AOD T2 03306 M00S02508.o26 +++| AOD T1 03307 M00S02509.o26 +++| SBD CA 03308 M00S02510.o26 +++| ADC -KBUFL CHECK FOR END OF BUFFER 03309 M00S02511.o26 +++| MJN RDL7 IF NOT END OF BUFFER - LOOP 03310 M00S02512.o26 +++| LDD T4 SET CHARACTER COUNT 03311 M00S02513.o26 +++| SBD CA 03312 M00S02514.o26 +++| STD LC 03313 M00S02515.o26 +++| LJM RDLX RETURN 03314 M00S02516.o26 +++| SDB SPACE 4,10 03315 M00S02517.o26 +++|** SDB - SHIFT DATA BLOCK IN CENTRAL MEMORY. 03316 M00S02518.o26 +++|* 03317 M00S02519.o26 +++|* ENTRY (A) = NUMBER OF CM WORDS TO BE SHIFTED. 03318 M00S02520.o26 +++|* (T3) = COUNT OF DATA BLOCKS SHIFTED. 03319 M00S02521.o26 +++|* (T4 - T5) = FWA OF DATA TO BE SHIFTED. 03320 M00S02522.o26 +++|* 03321 M00S02523.o26 +++|* USES T7, BUFM - BUFM+240. 03322 M00S02524.o26 +++| 03323 M00S02525.o26 +++| 03324 M00S02526.o26 +++| SDB SUBR ENTRY/EXIT 03325 M00S02527.o26 +++| STD T7 SET SHIFT COUNT 03326 M00S02528.o26 +++| LDD T4 SET CM SHIFT ADDRESS 03327 M00S02529.o26 +++| SHN 6 03328 M00S02530.o26 +++| ADD RA 03329 M00S02531.o26 +++| SHN 1 ADD COUNT OF SHIFTED BLOCKS 03330 M00S02532.o26 +++| ADD T3 03331 M00S02533.o26 +++| SHN 5 03332 M00S02534.o26 +++| ADD T5 03333 M00S02535.o26 +++| CRM BUFM,T7 03334 M00S02536.o26 +++| SBD T7 REPLACE BLOCK AT LOWER CM ADDRESS 03335 M00S02537.o26 +++| SDBA ADC -* (DISTANCE DATA IS BEING MOVED) 03336 M00S02538.o26 +++| CWM BUFM,T7 03337 M00S02539.o26 +++| UJN SDBX RETURN 03338 M00S02540.o26 +++| SDS SPACE 4,20 03339 M00S02541.o26 +++|** SDS - SET DISPLAY. 03340 M00S02542.o26 +++|* 03341 M00S02543.o26 +++|* ENTRY (A) = ADDRESS OF ADDRESS POINTER. 03342 M00S02544.o26 +++|* (DL) = LENGTH OF DISPLAY. 03343 M00S02545.o26 +++|* 03344 M00S02546.o26 +++|* EXIT (OT - OT+1) = FIRST LINE ADDRESS. 03345 M00S02547.o26 +++|* 03346 M00S02548.o26 +++|* USES T1 - T3. 03347 M00S02549.o26 +++|* 03348 M00S02550.o26 +++|* CALLS SFL. 03349 M00S02551.o26 +++| 03350 M00S02552.o26 +++| 03351 M00S02553.o26 +++| SDS2 LDD IN CHECK END OF DISPLAY 03352 M00S02554.o26 +++| SBD OT 03353 M00S02555.o26 +++| SHN 14 03354 M00S02556.o26 +++| ADD IN+1 03355 M00S02557.o26 +++| SBD OT+1 03356 M00S02558.o26 +++| SBD DL 03357 M00S02559.o26 +++| ZJN SDSX IF LAST LINE ON SCREEN 03358 M00S02560.o26 +++| LDD OT ADVANCE ONE LINE 03359 M00S02561.o26 +++| STD T2 03360 M00S02562.o26 +++| LDD OT+1 03361 M00S02563.o26 +++| STD T3 03362 M00S02564.o26 +++| LDN 1 03363 M00S02565.o26 +++| RJM SFL SEARCH FOR LINE 03364 M00S02566.o26 +++| LDD T2 03365 M00S02567.o26 +++| STD OT 03366 M00S02568.o26 +++| LDD T3 03367 M00S02569.o26 +++| STD OT+1 03368 M00S02570.o26 +++| 03369 M00S02571.o26 +++| SDS SUBR ENTRY/EXIT 03370 M00S02572.o26 +++| STD T1 SAVE INDEX 03371 M00S02573.o26 +++| LDI T1 03372 M00S02574.o26 +++| SBD OT 03373 M00S02575.o26 +++| SHN 14 03374 M00S02576.o26 +++| ADM 1,T1 03375 M00S02577.o26 +++| SBD OT+1 03376 M00S02578.o26 +++| MJN SDS1 IF LINE .LT. FIRST LINE 03377 M00S02579.o26 +++| SBD DL CHECK END OF SCREEN 03378 M00S02580.o26 +++| ZJN SDS2 IF AT END OF DISPLAY 03379 M00S02581.o26 +++| MJN SDSX IF LINE ON DISPLAY 03380 M00S02582.o26 +++| SDS1 LDI T1 SET DISPLAY ADDRESS 03381 M00S02583.o26 +++| STD OT 03382 M00S02584.o26 +++| LDM 1,T1 03383 M00S02585.o26 +++| STD OT+1 03384 M00S02586.o26 +++| UJN SDSX RETURN 03385 M00S02587.o26 +++| SFL SPACE 4,20 03386 M00S02588.o26 +++|** SFL - SEARCH FOR LINE. 03387 M00S02589.o26 +++|* 03388 M00S02590.o26 +++|* ENTRY (A) = NUMBER OF LINES TO ADVANCE/DECREMENT. 03389 M00S02591.o26 +++|* (T2 - T3) = CURRENT ADDRESS. 03390 M00S02592.o26 +++|* 03391 M00S02593.o26 +++|* EXIT (T2 - T3) = LINE ADDRESS. 03392 M00S02594.o26 +++|* 03393 M00S02595.o26 +++|* USES T1 - T3, CM - CM+4. 03394 M00S02596.o26 +++| 03395 M00S02597.o26 +++| 03396 M00S02598.o26 +++|* SEARCH BACKWARDS FOR LINE. 03397 M00S02599.o26 +++| 03398 M00S02600.o26 +++| SFL2 LDD T2 CHECK FOR START OF BUFFER 03399 M00S02601.o26 +++| LMD FT 03400 M00S02602.o26 +++| SHN 14 03401 M00S02603.o26 +++| LMD T3 03402 M00S02604.o26 +++| LMD FT+1 03403 M00S02605.o26 +++| ZJN SFLX IF AT START OF BUFFER 03404 M00S02606.o26 +++| 03405 M00S02607.o26 +++| SFL3 LDD T2 READ PREVIOUS WORD 03406 M00S02608.o26 +++| SHN 6 03407 M00S02609.o26 +++| ADD RA 03408 M00S02610.o26 +++| SHN 6 03409 M00S02611.o26 +++| ADD T3 03410 M00S02612.o26 +++| SBN 2 03411 M00S02613.o26 +++| CRD CM 03412 M00S02614.o26 +++| SOD T3 DECREMENT ADDRESS 03413 M00S02615.o26 +++| PJN SFL4 IF NO CARRY 03414 M00S02616.o26 +++| AOD T3 03415 M00S02617.o26 +++| SOD T2 03416 M00S02618.o26 +++| SFL4 LDD CM+4 03417 M00S02619.o26 +++| NJN SFL3 IF NOT END OF PREVOIUS LINE LOOP 03418 M00S02620.o26 +++| AOD T1 ADVANCE LINE NUMBER 03419 M00S02621.o26 +++| ADC 770000 03420 M00S02622.o26 +++| NJN SFL2 IF NOT COMPLETE 03421 M00S02623.o26 +++| 03422 M00S02624.o26 +++| SFL SUBR ENTRY/EXIT 03423 M00S02625.o26 +++| STD T1 SAVE LINE NUMBER 03424 M00S02626.o26 +++| MJN SFL2 IF SEARCH BACKWARDS 03425 M00S02627.o26 +++| 03426 M00S02628.o26 +++|* SEARCH FORWARD FOR LINE. 03427 M00S02629.o26 +++| 03428 M00S02630.o26 +++| SFL1 LDD T2 03429 M00S02631.o26 +++| LMD IN 03430 M00S02632.o26 +++| SHN 14 03431 M00S02633.o26 +++| LMD T3 03432 M00S02634.o26 +++| LMD IN+1 03433 M00S02635.o26 +++| ZJN SFLX IF ADDRESS = IN 03434 M00S02636.o26 +++| LDD T2 READ WORD 03435 M00S02637.o26 +++| SHN 6 03436 M00S02638.o26 +++| ADD RA 03437 M00S02639.o26 +++| SHN 6 03438 M00S02640.o26 +++| ADD T3 03439 M00S02641.o26 +++| CRD CM 03440 M00S02642.o26 +++| AOD T3 ADVANCE ADDRESS 03441 M00S02643.o26 +++| SHN -14 03442 M00S02644.o26 +++| RAD T2 03443 M00S02645.o26 +++| LDD CM+4 03444 M00S02646.o26 +++| NJN SFL1 IF NOT END OF LINE LOOP 03445 M00S02647.o26 +++| SOD T1 DECREMENT LINE COUNT 03446 M00S02648.o26 +++| NJN SFL1 IF ADVANCEMENT/DECREMENT NOT COMPLETE LOOP 03447 M00S02649.o26 +++| UJN SFLX RETURN 03448 M00S02650.o26 +++| SFN SPACE 4,20 03449 M00S02651.o26 +++|** SFN - SET FILE NAME. 03450 M00S02652.o26 +++|* 03451 M00S02653.o26 +++|* ENTRY (CA) = CHARACTER ADDRESS. 03452 M00S02654.o26 +++|* (SFSA) = NONZERO, TO CHECK RANDOM ADDRESS. 03453 M00S02655.o26 +++|* 03454 M00S02656.o26 +++|* EXIT (CA) = UPDATED. 03455 M00S02657.o26 +++|* 03456 M00S02658.o26 +++|* USES CM, AB+4. 03457 M00S02659.o26 +++|* 03458 M00S02660.o26 +++|* CALLS ASN, SFS. 03459 M00S02661.o26 +++| 03460 M00S02662.o26 +++| 03461 M00S02663.o26 +++| SFN SUBR ENTRY/EXIT 03462 M00S02664.o26 +++| LDD CA CHECK FOR END OF KEYBOARD BUFFER 03463 M00S02665.o26 +++| ADC -KBUF 03464 M00S02666.o26 +++| LMD KI 03465 M00S02667.o26 +++| ZJN SFN2 IF NO FILE NAME 03466 M00S02668.o26 +++| LDD CA ASSEMBLE NAME 03467 M00S02669.o26 +++| RJM ASN 03468 M00S02670.o26 +++| LMN 1R. 03469 M00S02671.o26 +++| ZJN SFN1 IF *.* 03470 M00S02672.o26 +++| LJM ERR FORMAT ERROR 03471 M00S02673.o26 +++| 03472 M00S02674.o26 +++| SFN1 LDD T1 UPDATE CHARACTER INDEX 03473 M00S02675.o26 +++| STD CA 03474 M00S02676.o26 +++| LDD AB CHECK ASSEMBLY 03475 M00S02677.o26 +++| ZJN SFN2 IF NO FILE NAME ASSEMBLED RETURN 03476 M00S02678.o26 +++| LDN 1 SET STATUS 03477 M00S02679.o26 +++| STD AB+4 03478 M00S02680.o26 +++| RJM SFS 03479 M00S02681.o26 +++| SFN2 LDN 0 CLEAR CONSOLE MESSAGE 03480 M00S02682.o26 +++| STD CM 03481 M00S02683.o26 +++| LDD CP 03482 M00S02684.o26 +++| ADN MS1W 03483 M00S02685.o26 +++| CWD CM 03484 M00S02686.o26 +++| ADN MS2W-MS1W 03485 M00S02687.o26 +++| CWD CM 03486 M00S02688.o26 +++| UJN SFNX RETURN 03487 M00S02689.o26 +++| SFS SPACE 4,20 03488 M00S02690.o26 +++|** SFS - SET FILE STATUS. 03489 M00S02691.o26 +++|* 03490 M00S02692.o26 +++|* ENTRY (AB - AB+4) = FILE NAME. 03491 M00S02693.o26 +++|* 03492 M00S02694.o26 +++|* EXIT (SFSA) = NONZERO, TO CHECK RANDOM ADDRESS. 03493 M00S02695.o26 +++|* 03494 M00S02696.o26 +++|* USES T1, T2, CM - CM+4. 03495 M00S02697.o26 +++| 03496 M00S02698.o26 +++| 03497 M00S02699.o26 +++| SFS SUBR ENTRY/EXIT 03498 M00S02700.o26 +++| LDN 0 03499 M00S02701.o26 +++| STM CRSB CLEAR WRITE LOCKOUT
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | ns2735 |
Seq # *Modification Id* Act ----------------------------+ 03500 M01S00010.ns2735 +++| LDN 1 03501 M01S00011.ns2735 +++| STM CIOA INITIALIZE TO NON TERMINAL TYPE 03502 M00S02702.o26 +++| LDD CP READ FIELD LENGTH STATUS WORD 03503 M00S02703.o26 +++| ADN FLSW 03504 M00S02704.o26 +++| CRD CM 03505 M00S02705.o26 +++| LDD CM SET END OF NFL 03506 M00S02706.o26 +++| SHN 6 03507 M00S02707.o26 +++| ADN 1 03508 M00S02708.o26 +++| STD T1 03509 M00S02709.o26 +++| LDC FNTN START OF FNT 03510 M00S02710.o26 +++| STD T2 03511 M00S02711.o26 +++| SFS1 LDN LENF ADVANCE FNT ADDRESS 03512 M00S02712.o26 +++| RAD T2 03513 M00S02713.o26 +++| SBD T1
| Line S02714 Modification History | |
|---|---|
M01 (Removed by) | ns2735 |
Seq # *Modification Id* Act ----------------------------+ 03514 M01S02714.ns2735 ---| PJN SFS2 IF END OF FILES
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | ns2735 |
Seq # *Modification Id* Act ----------------------------+ 03515 M01S00012.ns2735 +++| PJP SFS2 IF END OF FILES 03516 M00S02715.o26 +++| NFA T2,R READ FNT ENTRY 03517 M00S02716.o26 +++| CRD CM 03518 M00S02717.o26 +++| LDD CM 03519 M00S02718.o26 +++| ZJN SFS1 IF BLANK ENTRY 03520 M00S02719.o26 +++| LMD AB COMPARE FILE NAMES 03521 M00S02720.o26 +++| NJN SFS1 IF NO COMPARE ON BYTE 0 03522 M00S02721.o26 +++| LDD CM+1 03523 M00S02722.o26 +++| LMD AB+1 03524 M00S02723.o26 +++| NJN SFS1 IF NO COMPARE ON BYTE 1 03525 M00S02724.o26 +++| LDD CM+2 03526 M00S02725.o26 +++| LMD AB+2 03527 M00S02726.o26 +++| NJN SFS1 IF NO COMPARE ON BYTE 2 03528 M00S02727.o26 +++| LDD CM+3 03529 M00S02728.o26 +++| LMD AB+3 03530 M00S02729.o26 +++| SCN 77 03531 M00S02730.o26 +++| NJN SFS1 IF NO COMPARE ON BYTE 3 03532 M00S02731.o26 +++| LDD CM+3 03533 M00S02732.o26 +++| LPN 1 03534 M00S02733.o26 +++| STM CRSB SET WRITE LOCKOUT STATUS 03535 M00S02734.o26 +++| NFA T2,R READ FST INFORMATION 03536 M00S02735.o26 +++| ADN FSTL READ FST ENTRY 03537 M00S02736.o26 +++| CRD CM
| Line S00013 Modification History | |
|---|---|
M01 (Added by) | ns2735 |
Seq # *Modification Id* Act ----------------------------+ 03538 M01S00013.ns2735 +++| LDD CM GET EQUIPMENT TYPE 03539 M01S00014.ns2735 +++| SBK TTEQ CHECK FOR TERMINAL TYPE PSEUDO EQUIPMENT 03540 M01S00015.ns2735 +++| STM CIOA SET TO 0 IF TERMINAL TYPE 03541 M00S02737.o26 +++| LDD CM+4 SET LAST BUFFER STATUS 03542 M00S02738.o26 +++| STD AB+4 03543 M00S02739.o26 +++| SFS2 LDD RA STORE FILE NAME 03544 M00S02740.o26 +++| SHN 6 03545 M00S02741.o26 +++| ADN FET 03546 M00S02742.o26 +++| CWD AB 03547 M00S02743.o26 +++| ADN 1 SET RANDOM ACCESS BIT 03548 M00S02744.o26 +++| CRD CM 03549 M00S02745.o26 +++| LDD CM+1 03550 M00S02746.o26 +++| LPC 3777 03551 M00S02747.o26 +++| LMC 4000 03552 M00S02748.o26 +++| STD CM+1 03553 M00S02749.o26 +++| STM SFSA SET RANDOM ADDRESS FLAG 03554 M00S02750.o26 +++| LDD RA 03555 M00S02751.o26 +++| SHN 6 03556 M00S02752.o26 +++| ADN FET+1 03557 M00S02753.o26 +++| CWD CM 03558 M00S02754.o26 +++| LJM SFSX RETURN 03559 M00S02755.o26 +++| 03560 M00S02756.o26 +++| SFSA CON 0 RANDOM ADDRESS FLAG 03561 M00S02757.o26 +++| SIL SPACE 4,20 03562 M00S02758.o26 +++|** SIL - SET INSERT LINE. 03563 M00S02759.o26 +++|* 03564 M00S02760.o26 +++|* ENTRY (A) = INCREMENT FROM CURRENT POSITION. 03565 M00S02761.o26 +++|* 03566 M00S02762.o26 +++|* USES T1, T2, T3. 03567 M00S02763.o26 +++|* 03568 M00S02764.o26 +++|* CALLS SDS, SFL. 03569 M00S02765.o26 +++| 03570 M00S02766.o26 +++| 03571 M00S02767.o26 +++| SIL SUBR ENTRY/EXIT 03572 M00S02768.o26 +++| ZJN SIL1 IF NO CHANGE 03573 M00S02769.o26 +++| ADN 1 03574 M00S02770.o26 +++| STD T1 03575 M00S02771.o26 +++| LDD IP SEARCH FOR INSERT 03576 M00S02772.o26 +++| STD T2 03577 M00S02773.o26 +++| LDD IP+1 03578 M00S02774.o26 +++| STD T3 03579 M00S02775.o26 +++| LDD T1 SEARCH FOR LINE 03580 M00S02776.o26 +++| SBN 1 03581 M00S02777.o26 +++| RJM SFL 03582 M00S02778.o26 +++| LDD T2 SET LINE ADDRESS 03583 M00S02779.o26 +++| STD IP 03584 M00S02780.o26 +++| LDD T3 03585 M00S02781.o26 +++| STD IP+1 03586 M00S02782.o26 +++| SIL1 LDN 1 SET INSERT FLAG
| Line S00630 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03587 M01S00630.241l630 +++| STD DR 03588 M00S02783.o26 +++| STD IF 03589 M00S02784.o26 +++| LDN IP SET DISPLAY 03590 M00S02785.o26 +++| RJM SDS 03591 M00S02786.o26 +++| UJN SILX RETURN 03592 M00S02787.o26 +++| SIP SPACE 4,15 03593 M00S02788.o26 +++|** SIP - SET IN POINTER. 03594 M00S02789.o26 +++|* 03595 M00S02790.o26 +++|* USES CM - CM+4. 03596 M00S02791.o26 +++| 03597 M00S02792.o26 +++| 03598 M00S02793.o26 +++| SIP SUBR ENTRY/EXIT 03599 M00S02794.o26 +++| LDN ZERL STORE IN 03600 M00S02795.o26 +++| CRD CM 03601 M00S02796.o26 +++| LDD IN 03602 M00S02797.o26 +++| STD CM+3 03603 M00S02798.o26 +++| LDD IN+1 03604 M00S02799.o26 +++| STD CM+4 03605 M00S02800.o26 +++| LDD RA 03606 M00S02801.o26 +++| SHN 6 03607 M00S02802.o26 +++| ADN FET+2 03608 M00S02803.o26 +++| CWD CM 03609 M00S02804.o26 +++| UJN SIPX RETURN 03610 M00S02805.o26 +++| WRW SPACE 4,10 03611 M00S02806.o26 +++|** WRW - WRITE AND REWIND FILE. 03612 M00S02807.o26 +++|* 03613 M00S02808.o26 +++|* CALLS CIO, CRS, SIP. 03614 M00S02809.o26 +++| 03615 M00S02810.o26 +++| 03616 M00S02811.o26 +++| WRW SUBR ENTRY/EXIT 03617 M00S02812.o26 +++| RJM CRS CHECK RECORD STATUS 03618 M00S02813.o26 +++| RJM SIP STORE IN POINTER 03619 M00S02814.o26 +++| LDN 26 WRITE END OF RECORD 03620 M00S02815.o26 +++| RJM CIO 03621 M00S02816.o26 +++| LDN 52 REWIND 03622 M00S02817.o26 +++| RJM CIO 03623 M00S02818.o26 +++| UJN WRWX RETURN 03624 M00S02819.o26 +++| TABLE SPACE 4,10 03625 M00S02820.o26 +++|** RESIDENT TABLES AND BUFFERS. 03626 M00S02821.o26 +++| 03627 M00S02822.o26 +++| 03628 M00S02823.o26 +++| TSCN BSSZ 10 SCAN TABLE 03629 M00S02824.o26 +++| 03630 M00S02825.o26 +++| SFRA DATA H*SEARCH / * 03631 M00S02826.o26 +++| SFRB BSS 5 03632 M00S02827.o26 +++| TITLE RESIDENT ENTRY PROCESSORS. 03633 M00S02828.o26 +++| O26 SPACE 4 03634 M00S02829.o26 +++| QUAL O26 03635 M00S02830.o26 +++| DIS. SPACE 4,15 03636 M00S02831.o26 +++|*** DIS. 03637 M00S02832.o26 +++|* 03638 M00S02833.o26 +++|* WRITE AND REWIND FILE AND CALL DIS TO CONTROL POINT. 03639 M00S02834.o26 +++| 03640 M00S02835.o26 +++| 03641 M00S02836.o26 +++| DIS ENTRY 03642 M00S02837.o26 +++| RJM WRW WRITE AND REWIND FILE
| Line S02838 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03643 M01S02838.ns22000 ---| DIS1 LDM /COMDDSP/DDSA SET EQUIPMENT NUMBER IN IR
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03644 M02S00001.241l630 ---| DIS1 LDM /COMDDSP/DDSA SET EST ORDINAL IN IR
| Line S00631 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03645 M01S00631.241l630 +++| DIS1 LDN DSEQ SET EST ORDINAL IN INPUT REGISTER
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | ns2735 |
Seq # *Modification Id* Act ----------------------------+ 03646 M01S00016.ns2735 +++| LMC 4000 FORCE DIRECT CALL 03647 M00S02839.o26 +++| STD IR+4 03648 M00S02840.o26 +++| RJM DDS DROP DISPLAY 03649 M00S02841.o26 +++| RJM WIO WAIT I/O 03650 M00S02842.o26 +++| DIS2 LDC 2RDI SET *DIS* IN INPUT REGISTER 03651 M00S02843.o26 +++| STD IR 03652 M00S02844.o26 +++| LCN 1R6-1RS 03653 M00S02845.o26 +++| SHN 6 03654 M00S02846.o26 +++| RAD IR+1 03655 M00S02847.o26 +++| LDD IA WRITE INPUT REGISTER FOR *DIS* 03656 M00S02848.o26 +++| CWD IR 03657 M00S02849.o26 +++| LJM PPR EXIT TO PP RESIDENT 03658 M00S02850.o26 +++| DROP. SPACE 4,10 03659 M00S02851.o26 +++|*** DROP. 03660 M00S02852.o26 +++|* 03661 M00S02853.o26 +++|* WRITE AND REWIND FILE AND DROP DISPLAY. 03662 M00S02854.o26 +++| 03663 M00S02855.o26 +++| 03664 M00S02856.o26 +++| DRP ENTRY 03665 M00S02857.o26 +++| RJM WRW WRITE AND REWIND FILE 03666 M00S02858.o26 +++| DRP1 RJM DDS DROP DISPLAY 03667 M00S02859.o26 +++| RJM WIO WAIT I/O
| Line S02860 Modification History | |
|---|---|
M01 (Removed by) | o2612 |
Seq # *Modification Id* Act ----------------------------+ 03668 M01S02860.o2612 ---| LDN ZERL 03669 M01S02861.o2612 ---| CRD CM 03670 M01S02862.o2612 ---| LDN 10 SET MASK FOR *JCIW* 03671 M01S02863.o2612 ---| STD CM+4 03672 M01S02864.o2612 ---| LDN CCTS CLEAR *DIS* FLAG 03673 M01S02865.o2612 ---| STD CM+1 03674 M01S02866.o2612 ---| MONITOR SJCM 03675 M00S02867.o26 +++| LJM DPP DROP PP
| Line S02868 Modification History | |
|---|---|
M01 (Removed by) | ns2735 |
Seq # *Modification Id* Act ----------------------------+ 03676 M01S02868.ns2735 ---| ERR. SPACE 4,10 03677 M01S02869.ns2735 ---|*** ERR. 03678 M01S02870.ns2735 ---|* 03679 M01S02871.ns2735 ---|* SET ERROR FLAG. 03680 M01S02872.ns2735 ---| 03681 M01S02873.ns2735 ---| 03682 M01S02874.ns2735 ---| SEF ENTRY 03683 M01S02875.ns2735 ---| LDN ZERL 03684 M01S02876.ns2735 ---| CRD CM 03685 M01S02877.ns2735 ---| LDN PPET SET ERROR FLAG = PP ABORT 03686 M01S02878.ns2735 ---| STD CM+1 03687 M01S02879.ns2735 ---| MONITOR CEFM 03688 M01S02880.ns2735 ---| JMP RET RETURN 03689 M00S02881.o26 +++| XDIS. SPACE 4,8 03690 M00S02882.o26 +++|*** XDIS. 03691 M00S02883.o26 +++|* 03692 M00S02884.o26 +++|* CALL DIS TO CONTROL POINT ONLY. (NO WRITE) 03693 M00S02885.o26 +++| 03694 M00S02886.o26 +++| 03695 M00S02887.o26 +++| XDS ENTRY DIS1 03696 M00S02888.o26 +++| XDROP. SPACE 4,8 03697 M00S02889.o26 +++|*** XDROP. 03698 M00S02890.o26 +++|* 03699 M00S02891.o26 +++|* DROP DISPLAY ONLY. (NO WRITE) 03700 M00S02892.o26 +++| 03701 M00S02893.o26 +++| 03702 M00S02894.o26 +++| XDD ENTRY DRP1
| Line S02895 Modification History | |
|---|---|
M01 (Removed by) | o2612 |
Seq # *Modification Id* Act ----------------------------+ 03703 M01S02895.o2612 ---| GO. SPACE 4,10
| Line S02896 Modification History | |
|---|---|
M01 (Removed by) | o2612 |
M02 (Removed by) | ns2735 |
Seq # *Modification Id* Act ----------------------------+ 03704 M02S02896.ns2735 ---| HOLD. SPACE 4,8
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | o2612 |
M02 (Removed by) | ns2735 |
Seq # *Modification Id* Act ----------------------------+ 03705 M02S00023.ns2735 ---| HOLD. SPACE 4,10
| Line S02897 Modification History | |
|---|---|
M01 (Removed by) | ns2735 |
Seq # *Modification Id* Act ----------------------------+ 03706 M01S02897.ns2735 ---|*** HOLD. 03707 M01S02898.ns2735 ---|* 03708 M01S02899.ns2735 ---|* DROP DISPLAY AND WAIT FOR OPERATOR ASSIGNMENT. 03709 M01S02900.ns2735 ---| 03710 M01S02901.ns2735 ---| 03711 M01S02902.ns2735 ---| HOL ENTRY 03712 M01S02903.ns2735 ---| RJM DDS DROP DISPLAY
| Line S02904 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
M02 (Removed by) | ns2735 |
Seq # *Modification Id* Act ----------------------------+ 03713 M02S02904.ns2735 ---| RJM RDS REQUEST DISPLAY
| Line S00632 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
M02 (Removed by) | ns2735 |
Seq # *Modification Id* Act ----------------------------+ 03714 M02S00632.ns2735 ---| LDK RDSOS REQUEST DISPLAY 03715 M02S00633.ns2735 ---| RJM RID
| Line S02905 Modification History | |
|---|---|
M01 (Removed by) | ns2155 |
M02 (Removed by) | ns2735 |
Seq # *Modification Id* Act ----------------------------+ 03716 M02S02905.ns2735 ---| RJM MDC MODIFY CHANNELS
| Line S02906 Modification History | |
|---|---|
M01 (Removed by) | ns2735 |
Seq # *Modification Id* Act ----------------------------+ 03717 M01S02906.ns2735 ---| JMP RET RETURN 03718 M00S02907.o26 +++| TER SPACE 4,20 03719 M00S02908.o26 +++|* TERMINATE RESIDENT ROUTINES. 03720 M00S02909.o26 +++| 03721 M00S02910.o26 +++| 03722 M00S02911.o26 +++| QUAL 03723 M00S02912.o26 +++| HERE 03724 M00S02913.o26 +++| DIS HERE 03725 M00S02914.o26 +++| USE END 03726 M00S02915.o26 +++| OVL SPACE 4 03727 M00S02916.o26 +++|** OVERLAY AREA. 03728 M00S02917.o26 +++| 03729 M00S02918.o26 +++| 03730 M00S02919.o26 +++| OVL EQU *+5 03731 M00S02920.o26 +++| TITLE PRESET PROGRAM. 03732 M00S02921.o26 +++| PRS SPACE 4 03733 M00S02922.o26 +++|** TTAB - TAB TABLE. 03734 M00S02923.o26 +++|* ENTRY = COLUMN NUMBER. 03735 M00S02924.o26 +++| 03736 M00S02925.o26 +++|
| Line S02926 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03737 M01S02926.241l630 ---| ORG OVL 03738 M01S02927.241l630 ---| 03739 M00S02928.o26 +++| TTAB BSS 0 03740 M00S02929.o26 +++| DATA 11D 03741 M00S02930.o26 +++| DATA 18D 03742 M00S02931.o26 +++| DATA 30D 03743 M00S02932.o26 +++| CON 40D 03744 M00S02933.o26 +++| CON 50D 03745 M00S02934.o26 +++| CON 60D 03746 M00S02935.o26 +++| CON 73D 03747 M00S02936.o26 +++| DATA 80D 03748 M00S02937.o26 +++| DATA 0 END OF TABLE 03749 M00S02938.o26 +++| PRS SPACE 4,20 03750 M00S02939.o26 +++|** PRS - PRESET PROGRAM. 03751 M00S02940.o26 +++|* 03752 M00S02941.o26 +++|* EXIT (NC) = NUMBER OF CP-S. 03753 M00S02942.o26 +++| 03754 M00S02943.o26 +++| 03755 M00S02944.o26 +++| PRS5 LDN 0 CLEAR KEYBOARD AND TAB BUFFERS 03756 M00S02945.o26 +++| STD T1 03757 M00S02946.o26 +++| PRS6 LDN 1R BLANK FILL BUFFERS 03758 M00S02947.o26 +++| STM DBUF,T1
| Line S02948 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03759 M01S02948.241l630 ---| STM KBUF,T1 03760 M00S02949.o26 +++| STM BUFM,T1 03761 M00S02950.o26 +++| STM BUF,T1 03762 M00S02951.o26 +++| AOD T1 03763 M00S02952.o26 +++| LMC KBUFL 03764 M00S02953.o26 +++| NJN PRS6 IF NOT COMPLETLY FILLED 03765 M00S02954.o26 +++| STD T1 03766 M00S02955.o26 +++| LDC TTAB SET TAB TABLE ADDRESS 03767 M00S02956.o26 +++| STD T2 03768 M00S02957.o26 +++| PRS7 LDI T2 03769 M00S02958.o26 +++| ZJN PRS8 IF END OF TABLE 03770 M00S02959.o26 +++| STD T3 03771 M00S02960.o26 +++| LDC 6000 STORE TAB 03772 M00S02961.o26 +++| RAM DBUF+1,T3 03773 M00S02962.o26 +++| AOD T2 03774 M00S02963.o26 +++| UJN PRS7 CHECK FOR END OF TABLE 03775 M00S02964.o26 +++| 03776 M00S02965.o26 +++| PRS8 LDN ZERL CLEAR (RA - RA+FET-1) 03777 M00S02966.o26 +++| CRD CM 03778 M00S02967.o26 +++| PRS9 LDD RA 03779 M00S02968.o26 +++| SHN 6 03780 M00S02969.o26 +++| ADD T1 03781 M00S02970.o26 +++| CWD CM 03782 M00S02971.o26 +++| AOD T1 03783 M00S02972.o26 +++| LMN FET 03784 M00S02973.o26 +++| NJN PRS9 IF NOT COMPLETE
| Line S02974 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03785 M01S02974.241l630 ---| LDN NCPL SAVE NUMBER OF CP-S 03786 M01S02975.241l630 ---| CRD CM 03787 M01S02976.241l630 ---| AOD CM+1 03788 M01S02977.241l630 ---| STD NC
| Line S00634 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03789 M01S00634.241l630 +++| LDC SCT 03790 M01S00635.241l630 +++| LJM LOV LOAD COMMAND TABLE
| Line S02978 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03791 M01S02978.v23l617 ---| UJN PRSX RETURN 03792 M01S02979.v23l617 ---| 03793 M01S02980.v23l617 ---| PRS10 LDC PRSF * ILLEGAL CONTROL CARD.* 03794 M01S02981.v23l617 ---| RJM DFM
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | o264 |
M02 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03795 M02S00001.v23l617 ---| LDN 10 CLEAR *DIS* FLAG 03796 M02S00002.v23l617 ---| STD CM+4 03797 M02S00003.v23l617 ---| LDN CCTS 03798 M02S00004.v23l617 ---| STD CM+1 03799 M02S00005.v23l617 ---| MONITOR SJCM
| Line S02982 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03800 M01S02982.v23l617 ---| MONITOR ABTM 03801 M01S02983.v23l617 ---| LJM PPR EXIT TO PP RESIDENT 03802 M00S02984.o26 +++|
| Line S02985 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03803 M01S02985.241l630 ---| PRS SUBR ENTRY/EXIT 03804 M01S02986.241l630 ---| USE PRS
| Line S02987 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
M02 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03805 M02S02987.241l630 ---| RJM CUA CHECK USER ACCESS 03806 M02S02988.241l630 ---| NJN PRS10 IF ILLEGAL USER ACCESS
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2107 |
M02 (Removed by) | v23l617 |
M03 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03807 M03S00001.241l630 ---| LDN 0
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03808 M02S00008.241l630 ---| LDN 10
| Line S00636 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03809 M01S00636.241l630 +++| USE PRS 03810 M01S00637.241l630 +++| PRS LDN 10
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03811 M01S00009.v23l617 +++| STD CM+4 03812 M01S00010.v23l617 +++| LDN CCTS CLEAR *DIS* FLAG 03813 M01S00011.v23l617 +++| STD CM+1 03814 M01S00012.v23l617 +++| MONITOR SJCM
| Line S00017 Modification History | |
|---|---|
M01 (Added by) | ns2735 |
Seq # *Modification Id* Act ----------------------------+ 03815 M01S00017.ns2735 +++| LDD IR+4 03816 M01S00018.ns2735 +++| SHN 21-13 03817 M01S00019.ns2735 +++| MJN PRS0 IF DIRECT CALL
| Line S00013 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03818 M02S00013.241l630 ---| CATD CHECK ACCESS TO DISPLAY CONSOLE
| Line S00638 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03819 M01S00638.241l630 +++| CATD VU CHECK ACCESS TO DISPLAY CONSOLE
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | ns2735 |
Seq # *Modification Id* Act ----------------------------+ 03820 M02S00014.ns2735 ---|* LDN 0
| Line S00020 Modification History | |
|---|---|
M01 (Added by) | ns2735 |
Seq # *Modification Id* Act ----------------------------+ 03821 M01S00020.ns2735 +++| PRS0 LDN 0
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2107 |
Seq # *Modification Id* Act ----------------------------+ 03822 M01S00002.ns2107 +++| STD CM+1 03823 M00S02989.o26 +++| MONITOR DCPM DROP CPU
| Line S00639 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03824 M01S00639.241l630 +++|* LDN 0 03825 M01S00640.241l630 +++| STD T7 03826 M00S02990.o26 +++| LDD FL CHECK FIELD LENGTH 03827 M00S02991.o26 +++| SBN 2 03828 M00S02992.o26 +++| PJN PRS1 IF FIELD LENGTH \ 200 03829 M00S02993.o26 +++| LJM /O26/DIS2 LOAD *DIS* 03830 M00S02994.o26 +++|
| Line S02995 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03831 M01S02995.241l630 ---| PRS1 LDN 40 SET CONSTANT 40 03832 M01S02996.241l630 ---| STD FR 03833 M01S02997.241l630 ---| LDC OVL SET LOAD ADDRESS 03834 M01S02998.241l630 ---| STD LA 03835 M01S02999.241l630 ---| LDC PRO SET ROLLOUT PROCESSOR ADDRESS 03836 M01S03000.241l630 ---| STM /COMDDSP/ROFA 03837 M01S03001.241l630 ---| LDC 6000 SET X-COORDINATE 03838 M01S03002.241l630 ---| STD XC 03839 M01S03003.241l630 ---| LDN 0 CLEAR I/O BUSY FLAG 03840 M01S03004.241l630 ---| STD IO 03841 M01S03005.241l630 ---| STD KM CLEAR KEYBOARD MESSAGE 03842 M01S03006.241l630 ---| STD KI CLEAR KEYBOARD INDEX 03843 M01S03007.241l630 ---| STD T1 03844 M01S03008.241l630 ---| STM MSD CLEAR MASS STORAGE DESIGNATOR 03845 M01S03009.241l630 ---| PRS2 LDM PRSA,T1 MOVE PROGRAM TO PP RESIDENT 03846 M01S03010.241l630 ---| STM MSFW,T1 03847 M01S03011.241l630 ---| AOD T1
| Line S00641 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03848 M01S00641.241l630 +++| PRS1 LDC PRO SET ROLLOUT PROCESSOR ADDRESS 03849 M01S00642.241l630 +++| STM /COMDDSP/ROFA 03850 M01S00643.241l630 +++| LDC CH01 SET X-COORDINATE 03851 M01S00644.241l630 +++| STD XC 03852 M01S00645.241l630 +++| LDN DSEQ 03853 M01S00646.241l630 +++| SFA EST
| Line S00647 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
M02 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 03854 M02S00647.252l678 ---| ADK EQDE FETCH EST ENTRY FOR DISPLAY
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 03855 M01S00001.252l678 +++| ADK EQAE
| Line S00648 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03856 M01S00648.241l630 +++| CRD AB 03857 M01S00649.241l630 +++| LDD AB+2 03858 M01S00650.241l630 +++| ZJN PRS2 IF CC545 03859 M01S00651.241l630 +++| MDIN 03860 M01S00652.241l630 +++| PRS2 LDM PRSA,T7 MOVE SUBROUTINES TO DRIVER AREA 03861 M01S00653.241l630 +++| STM MSFW,T7 03862 M01S00654.241l630 +++| AOD T7 03863 M00S03012.o26 +++| LMC PRSAL 03864 M00S03013.o26 +++| NJN PRS2 IF PROGRAM NOT COMPLETLY MOVED
| Line S03014 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03865 M01S03014.241l630 ---| LDN ZERL 03866 M01S03015.241l630 ---| CRD CM CLEAR CONTROL POINT MESSAGES 03867 M01S03016.241l630 ---| LDD CP
| Line S00655 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03868 M01S00655.241l630 +++| STD CM+1 03869 M01S00656.241l630 +++| STD KM CLEAR DIRECT CELLS 03870 M01S00657.241l630 +++| STD KI 03871 M01S00658.241l630 +++| STM MSD CLEAR MS DRIVER PRESENT 03872 M01S00659.241l630 +++| STD IO 03873 M01S00660.241l630 +++| LDD CP CLEAR CONTROL POINT MESSAGES 03874 M00S03017.o26 +++| ADN MS1W 03875 M00S03018.o26 +++| CWD CM 03876 M00S03019.o26 +++| ADN MS2W-MS1W 03877 M00S03020.o26 +++| CWD CM 03878 M00S03021.o26 +++| ADN DBAW-MS2W CLEAR K-DISPLAY ADDRESS POINTERS 03879 M00S03022.o26 +++| CWD CM
| Line S03023 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03880 M01S03023.v23l617 ---| LDD CP READ JOB CONTROL 03881 M01S03024.v23l617 ---| ADN JCIW 03882 M01S03025.v23l617 ---| CRD CM 03883 M01S03026.v23l617 ---| LDD CM+3 03884 M01S03027.v23l617 ---| LPC 1000 03885 M01S03028.v23l617 ---| NJN PRS2.1 IF *DIS* FLAG ALREADY SET 03886 M01S03029.v23l617 ---| LDN ZERL 03887 M01S03030.v23l617 ---| CRD CM 03888 M00S03031.o26 +++| LDN 10 SET MASK FOR *JCIW* 03889 M00S03032.o26 +++| STD CM+4 03890 M00S03033.o26 +++| LDN SCTS SET *DIS* FLAG IN CPA 03891 M00S03034.o26 +++| STD CM+1 03892 M00S03035.o26 +++| MONITOR SJCM
| Line S03036 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03893 M01S03036.v23l617 ---| PRS2.1 LDN 0 CLEAR UPPER CASE
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03894 M01S00015.v23l617 +++|* LDN 0 CLEAR UPPER CASE 03895 M00S03037.o26 +++| STD UC 03896 M00S03038.o26 +++| STD IF CLEAR INSERT FLAG 03897 M00S03039.o26 +++| STD HF CLEAR HOLD FLAG 03898 M00S03040.o26 +++| STD SF CLEAR SCAN FLAG 03899 M00S03041.o26 +++| STD SI CLEAR SCAN INDEX 03900 M00S03042.o26 +++| STD SC CLEAR SCAN NUMBER 03901 M00S03043.o26 +++| STD T1 CLEAR FET 03902 M00S03044.o26 +++| LDD IR+2 STORE UPPER CASE CHARACTER 03903 M00S03045.o26 +++| SHN 14 03904 M00S03046.o26 +++| RAM KBIC 03905 M00S03047.o26 +++| LDN ZERL CLEAR RA - CBUF 03906 M00S03048.o26 +++| CRD CM 03907 M00S03049.o26 +++| PRS3 LDD RA CLEAR RA - CBUF 03908 M00S03050.o26 +++| SHN 6 03909 M00S03051.o26 +++| ADN FET 03910 M00S03052.o26 +++| ADD T1 03911 M00S03053.o26 +++| CWD CM 03912 M00S03054.o26 +++| AOD T1 03913 M00S03055.o26 +++| LMC CBUF 03914 M00S03056.o26 +++| NJN PRS3 IF NOT COMPLETE 03915 M00S03057.o26 +++| STD FT SET IN = OUT = FIRST 03916 M00S03058.o26 +++| STD IN 03917 M00S03059.o26 +++| STD OT 03918 M00S03060.o26 +++| LDC CBUF 03919 M00S03061.o26 +++| STD FT+1 03920 M00S03062.o26 +++| STD IN+1 03921 M00S03063.o26 +++| STD OT+1 03922 M00S03064.o26 +++| LDD FL SET LIMIT 03923 M00S03065.o26 +++| SHN 6 03924 M00S03066.o26 +++| STD CM+4 03925 M00S03067.o26 +++| STD LM+1 03926 M00S03068.o26 +++| SHN -14 03927 M00S03069.o26 +++| STD CM+3 03928 M00S03070.o26 +++| STD LM 03929 M00S03071.o26 +++| LDD RA STORE BUFFER STATUS 03930 M00S03072.o26 +++| SHN 6 03931 M00S03073.o26 +++| ADN FET 03932 M00S03074.o26 +++| CWM PRSB,TR 03933 M00S03075.o26 +++| CWM PRSC,ON 03934 M00S03076.o26 +++| CWD CM
| Line S03077 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03935 M01S03077.241l630 ---| LDC PRSDL/5 STORE SYNTAX TABLE 03936 M01S03078.241l630 ---| STD T1 03937 M01S03079.241l630 ---| LDD RA 03938 M01S03080.241l630 ---| SHN 6 03939 M01S03081.241l630 ---| ADN SBUF 03940 M01S03082.241l630 ---| CWM PRSD,T1 03941 M00S03083.o26 +++| 03942 M00S03084.o26 +++|* COMMON ENTRY. 03943 M00S03085.o26 +++| 03944 M00S03086.o26 +++| LDN IPRL CHECK SYSTEM CHARACTER SET
| Line S03087 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03945 M01S03087.241l630 ---| CRD AB 03946 M01S03088.241l630 ---| LDD AB+2 CHECK FOR 64 CHARACTER SET SYSTEM
| Line S00661 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03947 M01S00661.241l630 +++| CRD CM 03948 M01S00662.241l630 +++| LDD CM+2 03949 M00S03089.o26 +++| LPN 1 03950 M00S03090.o26 +++| NJN PRS4 IF 64 CHARACTER SET 03951 M00S03091.o26 +++| STM KBIG DISABLE ENTRY OF ZERO CHARACTER
| Line S03092 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03952 M01S03092.241l630 ---| LDC PSNI MODIFY INSTRUCTIONS 03953 M01S03093.241l630 ---| STM DKSC 03954 M01S03094.241l630 ---| LDM PRSE 03955 M01S03095.241l630 ---| STM DKSB
| Line S00663 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03956 M01S00663.241l630 +++| LDN PSNI 03957 M01S00664.241l630 +++| STM DKSC 03958 M01S00665.241l630 +++| LDC * 03959 M01S00666.241l630 +++| ORG *-1 03960 M01S00667.241l630 +++| LOC DKSB 03961 M01S00668.241l630 +++| UJN DKS2 63 CHARACTER SET SYSTEM 03962 M01S00669.241l630 +++| LOC *O 03963 M01S00670.241l630 +++| STM DKSB 03964 M01S00671.241l630 +++| LDD AB+2 03965 M01S00672.241l630 +++| ZJN PRS4 IF CC545 SYSTEM CONSOLE 03966 M01S00673.241l630 +++| LDC SBNI+63-60 03967 M01S00674.241l630 +++| STM DKSD 03968 M00S03096.o26 +++| PRS4 LDD RA 03969 M00S03097.o26 +++| SHN 6 03970 M00S03098.o26 +++| ADN FET 03971 M00S03099.o26 +++| CRD AB 03972 M00S03100.o26 +++| RJM SFS SET FILE STATUS
| Line S03101 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03973 M01S03101.241l630 ---| RJM RDS REQUEST DISPLAY
| Line S00675 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03974 M01S00675.241l630 +++| LDK RDSOS REQUEST DISPLAY 03975 M01S00676.241l630 +++| RJM RID
| Line S03102 Modification History | |
|---|---|
M01 (Removed by) | ns2155 |
Seq # *Modification Id* Act ----------------------------+ 03976 M01S03102.ns2155 ---| RJM MDC MODIFY CHANNELS 03977 M00S03103.o26 +++| LJM PRS5 COMPLETE 03978 M00S03104.o26 +++| 03979 M00S03105.o26 +++| PRSB VFD 42/0LINPUT,18/1 03980 M00S03106.o26 +++| 03981 M00S03107.o26 +++| VFD 12/0,12/4000,12/,6/FETL-5,18/CBUF 03982 M00S03108.o26 +++| 03983 M00S03109.o26 +++| PRSC VFD 60/CBUF
| Line S03110 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 03984 M01S03110.241l630 ---| TSFM SPACE 4 03985 M01S03111.241l630 ---|** TSFM - TABLE OF SPECIAL FORMATS. 03986 M01S03112.241l630 ---| 03987 M01S03113.241l630 ---| 03988 M01S03114.241l630 ---| PRSD BSS 0 03989 M01S03115.241l630 ---| LOC SBUF 03990 M01S03116.241l630 ---| TSFM BSS 0 03991 M01S03117.241l630 ---| AMG ENTER (A.) 03992 M01S03118.241l630 ---| BKS ENTER (BKSP.) 03993 M01S03119.241l630 ---| BKP ENTER (BKSPRU.) 03994 M01S03120.241l630 ---| BKN ENTER (BKSPRU,) 03995 M01S03121.241l630 ---| CEL ENTER (C.) 03996 M01S03122.241l630 ---| MVE ENTER (COPY.) 03997 M01S03123.241l630 ---| DEL ENTER (D,*) 03998 M01S03124.241l630 ---| DMC ENTER (D.) 03999 M01S03125.241l630 ---| DLE ENTER (DEL.) 04000 M01S03126.241l630 ---| DIS ENTER (DIS.) 04001 M01S03127.241l630 ---| DSF ENTER (DFL.) 04002 M01S03128.241l630 ---| DSL ENTER (DLL.) 04003 M01S03129.241l630 ---| DRP ENTER (DROP.) 04004 M01S03130.241l630 ---| DSC ENTER (DS,) 04005 M01S03131.241l630 ---| EFL ENTER (ENFL.) 04006 M01S03132.241l630 ---| EFN ENTER (ENFL,) 04007 M01S03133.241l630 ---| SEF ENTER (ERR.) 04008 M01S03134.241l630 ---| MRL ENTER (E.) 04009 M01S03135.241l630 ---| SFM ENTER (F.) 04010 M01S03136.241l630 ---| FIL ENTER (FILE.) 04011 M01S03137.241l630 ---| GTR ENTER (GETR,) 04012 M01S03138.241l630 ---| GTR1 ENTER (GETR.) 04013 M01S03139.241l630 ---| GET ENTER (GET,) 04014 M01S03140.241l630 ---| GET1 ENTER (GET.) 04015 M01S03141.241l630 ---| GGO ENTER (GO.) 04016 M01S03142.241l630 ---| GTR ENTER (GTR,) 04017 M01S03143.241l630 ---| GTR1 ENTER (GTR.) 04018 M01S03144.241l630 ---| HOL ENTER (HOLD.) 04019 M01S03145.241l630 ---| IGN ENTER (IGNORE.) 04020 M01S03146.241l630 ---| MRL ENTER (L.) 04021 M01S03147.241l630 ---| LST ENTER (LIST,) 04022 M01S03148.241l630 ---| LST1 ENTER (LIST.) 04023 M01S03149.241l630 ---| MVE ENTER (MOVE.) 04024 M01S03150.241l630 ---| MRG ENTER (M.) 04025 M01S03151.241l630 ---| MRN ENTER (N.) 04026 M01S03152.241l630 ---| ELN ENTER (P.) 04027 M01S03153.241l630 ---| RPC ENTER (RC,) 04028 M01S03154.241l630 ---| REC ENTER (RC.) 04029 M01S03155.241l630 ---| RPS ENTER (RM) 04030 M01S03156.241l630 ---| RPS ENTER (RS) 04031 M01S03157.241l630 ---| RDI ENTER (READI.) 04032 M01S03158.241l630 ---| RDN ENTER (READN.) 04033 M01S03159.241l630 ---| RNS ENTER (READNS.) 04034 M01S03160.241l630 ---| RDF ENTER (READ.) 04035 M01S03161.241l630 ---| RTN ENTER (RETURN.) 04036 M01S03162.241l630 ---| REW ENTER (REWIND.) 04037 M01S03163.241l630 ---| RFR ENTER (RFR.) 04038 M01S03164.241l630 ---| RIC ENTER (RI.) 04039 M01S03165.241l630 ---| RLR ENTER (RLR.) 04040 M01S03166.241l630 ---| RNR ENTER (RNR.) 04041 M01S03167.241l630 ---| ROC ENTER (RO.) 04042 M01S03168.241l630 ---| RPR ENTER (RPR.) 04043 M01S03169.241l630 ---| RPN ENTER (R,) 04044 M01S03170.241l630 ---| RWR ENTER (RWRITE.) 04045 M01S03171.241l630 ---| SCN ENTER (SCAN,) 04046 M01S03172.241l630 ---| SML ENTER (S.) 04047 M01S03173.241l630 ---| SKP ENTER (SKIPEI.)
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | o263 |
M02 (Removed by) | o267 |
M03 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 04048 M03S00010.241l630 ---| SPE ENTER (SP.)
| Line S03174 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 04049 M01S03174.241l630 ---| TAB ENTER (TAB,) 04050 M01S03175.241l630 ---| UCC ENTER (UCC=) 04051 M01S03176.241l630 ---| UNL ENTER (UNLOAD.) 04052 M01S03177.241l630 ---| WRT ENTER (WRITE.) 04053 M01S03178.241l630 ---| WRF ENTER (WRITEF.) 04054 M01S03179.241l630 ---| WTW ENTER (WRITEW.) 04055 M01S03180.241l630 ---| XDS ENTER (XDIS.) 04056 M01S03181.241l630 ---| XDD ENTER (XDROP.) 04057 M01S03182.241l630 ---| VFD 60/ END OF TABLE 04058 M01S03183.241l630 ---| 04059 M01S03184.241l630 ---| LOC *O 04060 M01S03185.241l630 ---| PRSDL EQU *-PRSD 04061 M01S03186.241l630 ---| .1 SET PRSDL/5+SBUF+37 04062 M01S03187.241l630 ---| CBUF EQU .1/40*40 04063 M01S03188.241l630 ---| 04064 M01S03189.241l630 ---| 04065 M01S03190.241l630 ---| PRSE BSS 0 04066 M01S03191.241l630 ---| LOC DKSB 04067 M01S03192.241l630 ---| UJN DKS2 63 CHARACTER SET SYSTEM 04068 M01S03193.241l630 ---| LOC *O
| Line S03194 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 04069 M01S03194.v23l617 ---| 04070 M01S03195.v23l617 ---| PRSF DATA C* ILLEGAL CONTROL CARD.* 04071 M01S03196.v23l617 ---| 04072 M01S03197.v23l617 ---|
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 04073 M01S00016.v23l617 +++| SPACE 4,10 04074 M00S03198.o26 +++|*CALL COMPCUA
| Line S00677 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 04075 M01S00677.241l630 +++| SPACE 4,10 04076 M01S00678.241l630 +++|** DUMP INSTRUCTION MODIFICATION BLOCK. 04077 M01S00679.241l630 +++| 04078 M01S00680.241l630 +++| 04079 M01S00681.241l630 +++| USE LOV 04080 M01S00682.241l630 +++| DIMB 04081 M01S00683.241l630 +++| OVERFLOW 04082 M01S00684.241l630 +++| COMMAND (COMMAND TABLE.) 04083 M01S00685.241l630 +++| SCT SPACE 4,10 04084 M01S00686.241l630 +++|** SCT - STORE COMMAND TABLE. 04085 M01S00687.241l630 +++|* 04086 M01S00688.241l630 +++|* USES T1. 04087 M01S00689.241l630 +++| 04088 M01S00690.241l630 +++| 04089 M01S00691.241l630 +++| SCT ENTRY
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | o269 |
Seq # *Modification Id* Act ----------------------------+ 04090 M01S00010.o269 +++| ISTORE INT,(LDN TSFM-1) SET TABLE ADDRESS
| Line S00692 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 04091 M01S00692.241l630 +++| LDC TCMDL/5 04092 M01S00693.241l630 +++| STD T1 04093 M01S00694.241l630 +++| LDD RA STORE COMMAND TABLE 04094 M01S00695.241l630 +++| SHN 6 04095 M01S00696.241l630 +++| ADN SBUF 04096 M01S00697.241l630 +++| CWM TCMD,T1 04097 M01S00698.241l630 +++| JMP RET RETURN 04098 M01S00699.241l630 +++| TSFM SPACE 4,10 04099 M01S00700.241l630 +++|** TSFM - TABLE OF SPECIAL FORMATS. 04100 M01S00701.241l630 +++| 04101 M01S00702.241l630 +++| 04102 M01S00703.241l630 +++| QUAL 04103 M01S00704.241l630 +++| TCMD BSS 0 04104 M01S00705.241l630 +++| LOC SBUF 04105 M01S00706.241l630 +++| TSFM BSS 0 04106 M01S00707.241l630 +++| AMG ENTER (A.) 04107 M01S00708.241l630 +++| BKS ENTER (BKSP.) 04108 M01S00709.241l630 +++| BKP ENTER (BKSPRU.) 04109 M01S00710.241l630 +++| BKN ENTER (BKSPRU,) 04110 M01S00711.241l630 +++| CEL ENTER (C.) 04111 M01S00712.241l630 +++| MVE ENTER (COPY.) 04112 M01S00713.241l630 +++| DEL ENTER (D,*) 04113 M01S00714.241l630 +++| DMC ENTER (D.) 04114 M01S00715.241l630 +++| DLE ENTER (DEL.) 04115 M01S00716.241l630 +++| DIS ENTER (DIS.) 04116 M01S00717.241l630 +++| DSF ENTER (DFL.) 04117 M01S00718.241l630 +++| DSL ENTER (DLL.) 04118 M01S00719.241l630 +++| DRP ENTER (DROP.) 04119 M01S00720.241l630 +++| DSC ENTER (DS,) 04120 M01S00721.241l630 +++| EFL ENTER (ENFL.) 04121 M01S00722.241l630 +++| EFN ENTER (ENFL,) 04122 M01S00723.241l630 +++| SEF ENTER (ERR.) 04123 M01S00724.241l630 +++| MRL ENTER (E.) 04124 M01S00725.241l630 +++| SFM ENTER (F.) 04125 M01S00726.241l630 +++| FIL ENTER (FILE.) 04126 M01S00727.241l630 +++| GTR ENTER (GETR,) 04127 M01S00728.241l630 +++| GTR1 ENTER (GETR.) 04128 M01S00729.241l630 +++| GET ENTER (GET,) 04129 M01S00730.241l630 +++| GET1 ENTER (GET.) 04130 M01S00731.241l630 +++| GGO ENTER (GO.) 04131 M01S00732.241l630 +++| GTR ENTER (GTR,) 04132 M01S00733.241l630 +++| GTR1 ENTER (GTR.) 04133 M01S00734.241l630 +++| HOL ENTER (HOLD.) 04134 M01S00735.241l630 +++| IGN ENTER (IGNORE.) 04135 M01S00736.241l630 +++| MRL ENTER (L.) 04136 M01S00737.241l630 +++| LST ENTER (LIST,) 04137 M01S00738.241l630 +++| LST1 ENTER (LIST.) 04138 M01S00739.241l630 +++| MVE ENTER (MOVE.) 04139 M01S00740.241l630 +++| MRG ENTER (M.) 04140 M01S00741.241l630 +++| MRN ENTER (N.) 04141 M01S00742.241l630 +++| ELN ENTER (P.) 04142 M01S00743.241l630 +++| RPC ENTER (RC,) 04143 M01S00744.241l630 +++| REC ENTER (RC.) 04144 M01S00745.241l630 +++| RPS ENTER (RM) 04145 M01S00746.241l630 +++| RPS ENTER (RS) 04146 M01S00747.241l630 +++| RDI ENTER (READI.) 04147 M01S00748.241l630 +++| RDN ENTER (READN.) 04148 M01S00749.241l630 +++| RNS ENTER (READNS.) 04149 M01S00750.241l630 +++| RDF ENTER (READ.) 04150 M01S00751.241l630 +++| RTN ENTER (RETURN.) 04151 M01S00752.241l630 +++| REW ENTER (REWIND.) 04152 M01S00753.241l630 +++| RFR ENTER (RFR.) 04153 M01S00754.241l630 +++| RIC ENTER (RI.) 04154 M01S00755.241l630 +++| RLR ENTER (RLR.) 04155 M01S00756.241l630 +++| RNR ENTER (RNR.) 04156 M01S00757.241l630 +++| ROC ENTER (RO.) 04157 M01S00758.241l630 +++| RPR ENTER (RPR.) 04158 M01S00759.241l630 +++| RPN ENTER (R,) 04159 M01S00760.241l630 +++| RWR ENTER (RWRITE.) 04160 M01S00761.241l630 +++| SCN ENTER (SCAN,) 04161 M01S00762.241l630 +++| SML ENTER (S.) 04162 M01S00763.241l630 +++| SKP ENTER (SKIPEI.) 04163 M01S00764.241l630 +++| TAB ENTER (TAB,) 04164 M01S00765.241l630 +++| UCC ENTER (UCC=) 04165 M01S00766.241l630 +++| UNL ENTER (UNLOAD.) 04166 M01S00767.241l630 +++| WRT ENTER (WRITE.) 04167 M01S00768.241l630 +++| WRF ENTER (WRITEF.) 04168 M01S00769.241l630 +++| WTW ENTER (WRITEW.) 04169 M01S00770.241l630 +++| XDS ENTER (XDIS.) 04170 M01S00771.241l630 +++| XDD ENTER (XDROP.) 04171 M01S00772.241l630 +++| VFD 60/ END OF TABLE 04172 M01S00773.241l630 +++| 04173 M01S00774.241l630 +++| LOC *O 04174 M01S00775.241l630 +++| ECMDO EQU * END OF COMMAND OVERLAY 04175 M01S00776.241l630 +++| TCMDL EQU *-TCMD 04176 M01S00777.241l630 +++| .1 SET TCMDL/5+SBUF+37 04177 M01S00778.241l630 +++| CBUF EQU .1/40*40 04178 M00S03199.o26 +++| COMMAND (FILE COMMANDS.) 04179 M00S03200.o26 +++| BKSP. SPACE 4,10 04180 M00S03201.o26 +++|*** BKSP.CCCCCCC. 04181 M00S03202.o26 +++|* 04182 M00S03203.o26 +++|* BACKSPACE FILE *CCCCCCC*. IF *CCCCCCC* IS MISSING, 04183 M00S03204.o26 +++|* PREVIOUS FILE NAME WILL BE USED. 04184 M00S03205.o26 +++| 04185 M00S03206.o26 +++| 04186 M00S03207.o26 +++| BKS ENTRY 04187 M00S03208.o26 +++| LDN 42 BACKSPACE
| Line S03209 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 04188 M01S03209.241l630 ---| JMP IOF RETURN
| Line S00779 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 04189 M01S00779.241l630 +++|* UJN IOF ISSUE FUNCTION 04190 M01S00780.241l630 +++| IOF SPACE 4,10 04191 M01S00781.241l630 +++|** IOF - I/O FUNCTION PROCESSOR. 04192 M01S00782.241l630 +++|* 04193 M01S00783.241l630 +++|* ENTRY (A) - CIO FUNCTION TO ISSUE. 04194 M01S00784.241l630 +++|* 04195 M01S00785.241l630 +++|* EXIT TO *RET*. 04196 M01S00786.241l630 +++|* 04197 M01S00787.241l630 +++|* CALLS CIO. 04198 M01S00788.241l630 +++| 04199 M01S00789.241l630 +++| 04200 M01S00790.241l630 +++| IOF STD T6 04201 M01S00791.241l630 +++| RJM SFN SET FILE NAME 04202 M01S00792.241l630 +++| LDD T6 04203 M01S00793.241l630 +++| RJM CIO 04204 M01S00794.241l630 +++| JMP RET RETURN 04205 M00S03210.o26 +++| BKSPRU, SPACE 4,10 04206 M00S03211.o26 +++|*** BKSPRU,X. 04207 M00S03212.o26 +++|* 04208 M00S03213.o26 +++|* BACKSPACE CURRENT FILE *X* PHYSICAL RECORDS. 04209 M00S03214.o26 +++| 04210 M00S03215.o26 +++| 04211 M00S03216.o26 +++| BKN ENTRY 04212 M00S03217.o26 +++| RJM ADD ASSEMBLE DECIMAL DIGITS 04213 M00S03218.o26 +++| LMN 1R. 04214 M00S03219.o26 +++| ZJN BKN1 IF *.* NO ERROR 04215 M00S03220.o26 +++| LJM ERR FORMAT ERROR 04216 M00S03221.o26 +++| 04217 M00S03222.o26 +++| BKN1 LDD AB+4 STORE PRU COUNT 04218 M00S03223.o26 +++| STM TIOD 04219 M00S03224.o26 +++| LDN 46 BACKSPACE PRU 04220 M00S03225.o26 +++| STM TIOD+1 04221 M00S03226.o26 +++| LDN 5 SKIP RECORDS 04222 M00S03227.o26 +++| RJM CIO 04223 M00S03228.o26 +++| JMP RET RETURN 04224 M00S03229.o26 +++| BKSPRU. SPACE 4,10 04225 M00S03230.o26 +++|*** BKSPRU.CCCCCCC. 04226 M00S03231.o26 +++|* 04227 M00S03232.o26 +++|* BACKSPACE FILE *CCCCCCC* ONE PRU. IF *CCCCCCC* 04228 M00S03233.o26 +++|* IS MISSING, PREVIOUS FILE NAME WILL BE USED. 04229 M00S03234.o26 +++| 04230 M00S03235.o26 +++| 04231 M00S03236.o26 +++| BKP ENTRY 04232 M00S03237.o26 +++| LDN 46 BACKSPACE 04233 M00S03238.o26 +++| JMP IOF RETURN 04234 M00S03239.o26 +++| FILE. SPACE 4,10 04235 M00S03240.o26 +++|*** FILE.CCCCCCC. 04236 M00S03241.o26 +++|* 04237 M00S03242.o26 +++|* SET FILE NAME = *CCCCCCC*. 04238 M00S03243.o26 +++| 04239 M00S03244.o26 +++| 04240 M00S03245.o26 +++| FIL ENTRY 04241 M00S03246.o26 +++| RJM SFN SET FILE NAME 04242 M00S03247.o26 +++| JMP RET RETURN 04243 M00S03248.o26 +++| RC. SPACE 4,15 04244 M00S03249.o26 +++|*** RC.CCCCCCC. 04245 M00S03250.o26 +++|* 04246 M00S03251.o26 +++|* REWIND, READ, AND REWIND FILE *CCCCCCC*. IF 04247 M00S03252.o26 +++|* *CCCCCCC* IS MISSING, FILE *COMPILE* WILL BE 04248 M00S03253.o26 +++|* READ. 04249 M00S03254.o26 +++| 04250 M00S03255.o26 +++| 04251 M00S03256.o26 +++| REC ENTRY 04252 M00S03257.o26 +++| LDN 6 SET SCAN INDEX 04253 M00S03258.o26 +++| STM TSCN 04254 M00S03259.o26 +++| LDN 1 SET SCAN FLAG 04255 M00S03260.o26 +++| STD SF 04256 M00S03261.o26 +++| LDN 0 CLEAR SCAN INDEX 04257 M00S03262.o26 +++| STD SI 04258 M00S03263.o26 +++| STM TSCN+1 04259 M00S03264.o26 +++| LDC =C*COMPILE* SET FILE NAME 04260 M00S03265.o26 +++| LJM ROC1 04261 M00S03266.o26 +++| READ. SPACE 4,15 04262 M00S03267.o26 +++|*** READ.CCCCCCC. 04263 M00S03268.o26 +++|* 04264 M00S03269.o26 +++|* REWIND, READ, AND REWIND FILE *CCCCCCC*. IF 04265 M00S03270.o26 +++|* *CCCCCCC* IS MISSING, PREVIOUS FILE NAME WILL 04266 M00S03271.o26 +++|* BE USED. 04267 M00S03272.o26 +++| 04268 M00S03273.o26 +++| 04269 M00S03274.o26 +++| RDF ENTRY 04270 M00S03275.o26 +++| RJM SFN SET FILE NAME 04271 M00S03276.o26 +++| RDF1 LDN 50 REWIND 04272 M00S03277.o26 +++| RJM CIO 04273 M00S03278.o26 +++| LDN 12 READ 04274 M00S03279.o26 +++| RJM CIO 04275 M00S03280.o26 +++| LDN 1 DUMMY REQUEST 04276 M00S03281.o26 +++| RJM CIO 04277 M00S03282.o26 +++| LDN 50 REWIND 04278 M00S03283.o26 +++| RJM CIO 04279 M00S03284.o26 +++| LJM RNR3 04280 M00S03285.o26 +++| READI. SPACE 4,15 04281 M00S03286.o26 +++|*** READI.CCCCCCC. 04282 M00S03287.o26 +++|* 04283 M00S03288.o26 +++|* SKIP TO END OF INFORMATION, BKSP, BKSP, AND READ 04284 M00S03289.o26 +++|* FILE *CCCCCCC*. IF *CCCCCCC* IS MISSING, 04285 M00S03290.o26 +++|* PREVIOUS FILE NAME WILL BE USED. 04286 M00S03291.o26 +++| 04287 M00S03292.o26 +++| 04288 M00S03293.o26 +++| RDI ENTRY 04289 M00S03294.o26 +++| RJM SFN SET FILE NAME 04290 M00S03295.o26 +++| LDN 3 SKIP TO END OF INFORMATION 04291 M00S03296.o26 +++| RJM CIO 04292 M00S03297.o26 +++| 04293 M00S03298.o26 +++|* ENTRY FROM *RPR*. 04294 M00S03299.o26 +++| 04295 M00S03300.o26 +++| RDI1 LDC 20640 SKIP BACKWARDS 2 RECORDS 04296 M00S03301.o26 +++| 04297 M00S03302.o26 +++|* ENTRY FROM *RLR*. 04298 M00S03303.o26 +++| 04299 M00S03304.o26 +++| RDI2 STM TIOD+1 04300 M00S03305.o26 +++| SHN -14 04301 M00S03306.o26 +++| STM TIOD 04302 M00S03307.o26 +++| LDN 5 SKIP RECORDS 04303 M00S03308.o26 +++| RJM CIO 04304 M00S03309.o26 +++| LJM RNR1 04305 M00S03310.o26 +++| READN. SPACE 4,15 04306 M00S03311.o26 +++|*** READN.CCCCCCC. 04307 M00S03312.o26 +++|* 04308 M00S03313.o26 +++|* READ FILE *CCCCCCC*. NO REWIND. IF *CCCCCCC* 04309 M00S03314.o26 +++|* IS MISSING, PREVIOUS FILE WILL BE READ. STOPS ON 04310 M00S03315.o26 +++|* BUFFER FULL OR EOR. 04311 M00S03316.o26 +++| 04312 M00S03317.o26 +++| 04313 M00S03318.o26 +++| RDN ENTRY 04314 M00S03319.o26 +++| RJM SFN SET FILE NAME 04315 M00S03320.o26 +++| RJM SIP STORE IN POINTER 04316 M00S03321.o26 +++| LDN 12 READ 04317 M00S03322.o26 +++| RJM CIO 04318 M00S03323.o26 +++| LDN 1 DUMMY 04319 M00S03324.o26 +++| RJM CIO 04320 M00S03325.o26 +++| LJM RNR4 04321 M00S03326.o26 +++| READNS. SPACE 4,15 04322 M00S03327.o26 +++|*** READNS.CCCCCCC. 04323 M00S03328.o26 +++|* 04324 M00S03329.o26 +++|* READ FILE *CCCCCCC* NON-STOP. NO REWIND. IF 04325 M00S03330.o26 +++|* *CCCCCCC* IS MISSING, PREVIOUS FILE WILL BE READ. 04326 M00S03331.o26 +++|* STOPS ON BUFFER FULL OR EOF. 04327 M00S03332.o26 +++| 04328 M00S03333.o26 +++| 04329 M00S03334.o26 +++| RNS ENTRY 04330 M00S03335.o26 +++| RJM SFN SET FILE NAME 04331 M00S03336.o26 +++| RJM SIP STORE IN POINTER 04332 M00S03337.o26 +++| LDC 250 READ NON-STOP 04333 M00S03338.o26 +++| RJM CIO 04334 M00S03339.o26 +++| LDN 1 DUMMY 04335 M00S03340.o26 +++| RJM CIO 04336 M00S03341.o26 +++| LJM RNR4 04337 M00S03342.o26 +++| RETURN. SPACE 4,10 04338 M00S03343.o26 +++|*** RETURN.CCCCCCC. 04339 M00S03344.o26 +++|* 04340 M00S03345.o26 +++|* RETURN FILE CCCCCC. IF *CCCCCCC* IS MISSING, 04341 M00S03346.o26 +++|* PREVIOUS FILE NAME WILL BE USED. 04342 M00S03347.o26 +++| 04343 M00S03348.o26 +++| 04344 M00S03349.o26 +++| RTN ENTRY
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | o266 |
Seq # *Modification Id* Act ----------------------------+ 04345 M01S00001.o266 +++| LDN 0 CLEAR WRITE LOCKOUT STATUS 04346 M01S00002.o266 +++| STM CRSB 04347 M00S03350.o26 +++| LDN 70 RETURN 04348 M00S03351.o26 +++| JMP IOF RETURN 04349 M00S03352.o26 +++| REWIND. SPACE 4,10 04350 M00S03353.o26 +++|*** REWIND.CCCCCCC. 04351 M00S03354.o26 +++|* 04352 M00S03355.o26 +++|* REWIND FILE CCCCCC. IF *CCCCCCC* IS MISSING, 04353 M00S03356.o26 +++|* PREVIOUS FILE NAME WILL BE USED. 04354 M00S03357.o26 +++| 04355 M00S03358.o26 +++| 04356 M00S03359.o26 +++| REW ENTRY 04357 M00S03360.o26 +++| LDN 50 REWIND 04358 M00S03361.o26 +++| JMP IOF RETURN 04359 M00S03362.o26 +++| RFR. SPACE 4,10 04360 M00S03363.o26 +++|*** RFR.CCCCCCC. 04361 M00S03364.o26 +++|* 04362 M00S03365.o26 +++|* REWIND AND READ FILE *CCCCCCC*. IF *CCCCCCC* 04363 M00S03366.o26 +++|* IS MISSING, PREVIOUS FILE NAME WILL BE USED. 04364 M00S03367.o26 +++| 04365 M00S03368.o26 +++| 04366 M00S03369.o26 +++| RFR ENTRY 04367 M00S03370.o26 +++| RJM SFN SET FILE NAME 04368 M00S03371.o26 +++| LDN 50 REWIND 04369 M00S03372.o26 +++| RJM CIO 04370 M00S03373.o26 +++| UJN RNR2 04371 M00S03374.o26 +++| RI. SPACE 4,10 04372 M00S03375.o26 +++|*** RI.CCCCCCC. 04373 M00S03376.o26 +++|* 04374 M00S03377.o26 +++|* REWIND, READ, AND REWIND FILE *CCCCCCC*. IF 04375 M00S03378.o26 +++|* *CCCCCCC* IS MISSING, FILE *INPUT* WILL BE 04376 M00S03379.o26 +++|* READ. 04377 M00S03380.o26 +++| 04378 M00S03381.o26 +++| 04379 M00S03382.o26 +++| RIC ENTRY 04380 M00S03383.o26 +++| LDC =C*INPUT* SET FILE NAME 04381 M00S03384.o26 +++| LJM ROC1 04382 M00S03385.o26 +++| RLR. SPACE 4,10 04383 M00S03386.o26 +++|*** RLR.CCCCCCC. 04384 M00S03387.o26 +++|* 04385 M00S03388.o26 +++|* READ LAST RECORD ON FILE *CCCCCCC*. IF *CCCCCCC* 04386 M00S03389.o26 +++|* IS MISSING, PREVIOUS FILE NAME WILL BE USED. 04387 M00S03390.o26 +++| 04388 M00S03391.o26 +++| 04389 M00S03392.o26 +++| RLR ENTRY 04390 M00S03393.o26 +++| RJM SFN SET FILE NAME 04391 M00S03394.o26 +++| LDN 3 SKIP TO END OF INFORMATION 04392 M00S03395.o26 +++| RJM CIO 04393 M00S03396.o26 +++| LDC 10640 SKIP BACKWARDS 1 RECORD 04394 M00S03397.o26 +++| LJM RDI2 CAUSE RECORD SKIP 04395 M00S03398.o26 +++| RNR. SPACE 4,20 04396 M00S03399.o26 +++|*** RNR.CCCCCCC. 04397 M00S03400.o26 +++|* 04398 M00S03401.o26 +++|* READ NEXT RECORD ON FILE *CCCCCCC*. IF *CCCCCCC* 04399 M00S03402.o26 +++|* IS MISSING, PREVIOUS FILE NAME WILL BE USED. 04400 M00S03403.o26 +++| 04401 M00S03404.o26 +++| 04402 M00S03405.o26 +++| RNR ENTRY 04403 M00S03406.o26 +++| RJM SFN SET FILE NAME 04404 M00S03407.o26 +++| 04405 M00S03408.o26 +++|* ENTRY FROM *RDI*. 04406 M00S03409.o26 +++| 04407 M00S03410.o26 +++| RNR1 LDD RA SET IN = OUT 04408 M00S03411.o26 +++| SHN 6 04409 M00S03412.o26 +++| ADN FET+3 04410 M00S03413.o26 +++| CRD CM 04411 M00S03414.o26 +++| SBN 1 04412 M00S03415.o26 +++| CWD CM 04413 M00S03416.o26 +++| 04414 M00S03417.o26 +++|* ENTRY FROM *RFR*. 04415 M00S03418.o26 +++| 04416 M00S03419.o26 +++| RNR2 LDN 12 READ 04417 M00S03420.o26 +++| RJM CIO 04418 M00S03421.o26 +++| LDN 1 DUMMY 04419 M00S03422.o26 +++| RJM CIO 04420 M00S03423.o26 +++| 04421 M00S03424.o26 +++|* ENTRY FROM *RDF*. 04422 M00S03425.o26 +++| 04423 M00S03426.o26 +++| RNR3 LDN 1 SET HOLD FLAG 04424 M00S03427.o26 +++| STD HF 04425 M00S03428.o26 +++| LDN FT SET DISPLAY = LINE 0 04426 M00S03429.o26 +++| RJM SDS 04427 M00S03430.o26 +++| 04428 M00S03431.o26 +++|* ENTRY FROM *RDN* AND *RNS*. 04429 M00S03432.o26 +++| 04430 M00S03433.o26 +++| RNR4 LDN 0 CLEAR SCAN 04431 M00S03434.o26 +++| STD SC 04432 M00S03435.o26 +++| STD SI 04433 M00S03436.o26 +++| JMP CIF CLEAR INSERT FLAG 04434 M00S03437.o26 +++| RO. SPACE 4,15 04435 M00S03438.o26 +++|*** RO.CCCCCCC. 04436 M00S03439.o26 +++|* 04437 M00S03440.o26 +++|* REWIND, READ, AND REWIND FILE *CCCCCCC*. IF 04438 M00S03441.o26 +++|* *CCCCCCC* IS MISSING, FILE *OUTPUT* WILL BE 04439 M00S03442.o26 +++|* READ. 04440 M00S03443.o26 +++| 04441 M00S03444.o26 +++| 04442 M00S03445.o26 +++| ROC ENTRY 04443 M00S03446.o26 +++| LDN 4 SET SCAN INDEX 04444 M00S03447.o26 +++| STM TSCN 04445 M00S03448.o26 +++| LDN 10D 04446 M00S03449.o26 +++| STM TSCN+1 04447 M00S03450.o26 +++| LDN 0 04448 M00S03451.o26 +++| STM TSCN+2 04449 M00S03452.o26 +++| STD SI CLEAR SCAN INDEX 04450 M00S03453.o26 +++| LDN 1 SET SCAN FLAG 04451 M00S03454.o26 +++| STD SF 04452 M00S03455.o26 +++| LDC =C*OUTPUT* SET FILE NAME 04453 M00S03456.o26 +++| 04454 M00S03457.o26 +++|* ENTRY FROM *RIC* AND *REC*. 04455 M00S03458.o26 +++| 04456 M00S03459.o26 +++| ROC1 RJM SDF 04457 M00S03460.o26 +++| LDD CA SET FILE NAME 04458 M00S03461.o26 +++| RJM SFN 04459 M00S03462.o26 +++| LJM RDF1 04460 M00S03463.o26 +++| RPR. SPACE 4,10 04461 M00S03464.o26 +++|*** RPR.CCCCCCC. 04462 M00S03465.o26 +++|* 04463 M00S03466.o26 +++|* READ PREVIOUS RECORD ON FILE *CCCCCCC*. IF 04464 M00S03467.o26 +++|* *CCCCCCC* IS MISSING, PREVIOUS FILE NAME WILL BE 04465 M00S03468.o26 +++|* USED. 04466 M00S03469.o26 +++| 04467 M00S03470.o26 +++| 04468 M00S03471.o26 +++| RPR ENTRY 04469 M00S03472.o26 +++| RJM SFN SET FILE NAME 04470 M00S03473.o26 +++| LJM RDI1 SKIP BACK 2 RECORDS 04471 M00S03474.o26 +++| SKIPEI. SPACE 4,10 04472 M00S03475.o26 +++|*** SKIPEI.CCCCCCC. 04473 M00S03476.o26 +++|* 04474 M00S03477.o26 +++|* SKIP TO END OF INFORMATION ON FILE . IF 04475 M00S03478.o26 +++|* *CCCCCCC* IS MISSING, PREVIOUS FILE NAME 04476 M00S03479.o26 +++|* WILL BE USED. 04477 M00S03480.o26 +++| 04478 M00S03481.o26 +++| 04479 M00S03482.o26 +++| SKP ENTRY 04480 M00S03483.o26 +++| LDN 3 SKIPEI 04481 M00S03484.o26 +++| JMP IOF RETURN 04482 M00S03485.o26 +++| UNLOAD. SPACE 4,10 04483 M00S03486.o26 +++|*** UNLOAD.CCCCCCC. 04484 M00S03487.o26 +++|* 04485 M00S03488.o26 +++|* UNLOAD FILE *CCCCCCC*. IF *CCCCCCC* IS MISSING, 04486 M00S03489.o26 +++|* PREVIOUS FILE NAME WILL BE USED. 04487 M00S03490.o26 +++| 04488 M00S03491.o26 +++| 04489 M00S03492.o26 +++| UNL ENTRY
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | o266 |
Seq # *Modification Id* Act ----------------------------+ 04490 M01S00003.o266 +++| LDN 0 CLEAR WRITE LOCKOUT STATUS 04491 M01S00004.o266 +++| STM CRSB 04492 M00S03493.o26 +++| LDN 60 UNLOAD 04493 M00S03494.o26 +++| JMP IOF RETURN 04494 M00S03495.o26 +++| WRITE. SPACE 4,15 04495 M00S03496.o26 +++|*** WRITE.CCCCCCC. 04496 M00S03497.o26 +++|* 04497 M00S03498.o26 +++|* WRITE BUFFER TO FILE *CCCCCCC*. IF *CCCCCCC* 04498 M00S03499.o26 +++|* IS MISSING, PREVIOUS FILE NAME WILL BE USED. 04499 M00S03500.o26 +++| 04500 M00S03501.o26 +++| 04501 M00S03502.o26 +++| WRT ENTRY 04502 M00S03503.o26 +++| RJM SFN SET FILE NAME 04503 M00S03504.o26 +++| RJM CRS CHECK RECORD STATUS 04504 M00S03505.o26 +++| RJM SIP STORE IN POINTER 04505 M00S03506.o26 +++| LDN 26 WRITE END OF RECORD 04506 M00S03507.o26 +++| RJM CIO 04507 M00S03508.o26 +++| LDN 17 SET PSEUDO REQUEST TO REWIND POINTERS 04508 M00S03509.o26 +++| RJM CIO 04509 M00S03510.o26 +++| JMP CIF CLEAR INSERT FLAG 04510 M00S03511.o26 +++| WRITEF. SPACE 4,10 04511 M00S03512.o26 +++|*** WRITEF.CCCCCCC. 04512 M00S03513.o26 +++|* 04513 M00S03514.o26 +++|* WRITE BUFFER TO FILE *CCCCCCC* WITH AN EOF MARK. 04514 M00S03515.o26 +++|* IF *CCCCCCC* IS MISSING, PREVIOUS FILE NAME WILL 04515 M00S03516.o26 +++|* BE USED. 04516 M00S03517.o26 +++| 04517 M00S03518.o26 +++| 04518 M00S03519.o26 +++| WRF ENTRY 04519 M00S03520.o26 +++| RJM SFN SET FILE NAME 04520 M00S03521.o26 +++| RJM CRS CHECK RECORD STATUS 04521 M00S03522.o26 +++| RJM SIP STORE IN POINTER 04522 M00S03523.o26 +++| LDN 36 WRITE END OF FILE 04523 M00S03524.o26 +++| RJM CIO 04524 M00S03525.o26 +++| LDN 17 SET PSEUDO REQUEST TO REWIND POINTERS 04525 M00S03526.o26 +++| RJM CIO 04526 M00S03527.o26 +++| JMP CIF CLEAR INSERT FLAG 04527 M00S03528.o26 +++| WRITEW. SPACE 4,20 04528 M00S03529.o26 +++|*** WRITEW.CCCCCCC. 04529 M00S03530.o26 +++|* 04530 M00S03531.o26 +++|* WRITE FROM START OF BUFFER UP TO INSERT LINE TO 04531 M00S03532.o26 +++|* FILE *CCCCCCC*. IF *CCCCCCC* IS MISSING, 04532 M00S03533.o26 +++|* PREVIOUS FILE NAME WILL BE USED. 04533 M00S03534.o26 +++| 04534 M00S03535.o26 +++| 04535 M00S03536.o26 +++| WTW ENTRY 04536 M00S03537.o26 +++| LDD IF 04537 M00S03538.o26 +++| NJN WTW1 IF INSERT 04538 M00S03539.o26 +++| JMP ERR 04539 M00S03540.o26 +++| 04540 M00S03541.o26 +++| WTW1 RJM SFN SET FILE NAME 04541 M00S03542.o26 +++| RJM CRS CHECK RECORD STATUS 04542 M00S03543.o26 +++| LDN ZERL SET INSERT ADDRESS 04543 M00S03544.o26 +++| CRD CM 04544 M00S03545.o26 +++| CRD AB 04545 M00S03546.o26 +++| LDD IP 04546 M00S03547.o26 +++| STD CM+3 04547 M00S03548.o26 +++| LDD IP+1 04548 M00S03549.o26 +++| STD CM+4 04549 M00S03550.o26 +++| LDC CBUF 04550 M00S03551.o26 +++| STD AB+4 04551 M00S03552.o26 +++| LDD RA WRITE IN 04552 M00S03553.o26 +++| SHN 6 04553 M00S03554.o26 +++| ADN FET+2 04554 M00S03555.o26 +++| CWD CM 04555 M00S03556.o26 +++| ADN 1 04556 M00S03557.o26 +++| CWD AB SET OUT = FIRST 04557 M00S03558.o26 +++| LDN 26 WRITE END OF RECORD 04558 M00S03559.o26 +++| RJM CIO 04559 M00S03560.o26 +++| LDN 13 DUMMY 04560 M00S03561.o26 +++| RJM CIO 04561 M00S03562.o26 +++| JMP CIF CLEAR INSERT FLAG 04562 M00S03563.o26 +++| SDF SPACE 4,15 04563 M00S03564.o26 +++|** SDF - SET DEFINED FILE. 04564 M00S03565.o26 +++|* 04565 M00S03566.o26 +++|* ENTRY (A) = ADDRESS OF FILE NAME. 04566 M00S03567.o26 +++|* (CA) = CHARACTER ADDRESS. 04567 M00S03568.o26 +++|* 04568 M00S03569.o26 +++|* USES AB - AB+4. 04569 M00S03570.o26 +++|* 04570 M00S03571.o26 +++|* CALLS SFS. 04571 M00S03572.o26 +++| 04572 M00S03573.o26 +++| 04573 M00S03574.o26 +++| SDF SUBR ENTRY/EXIT 04574 M00S03575.o26 +++| STM SDFA 04575 M00S03576.o26 +++| LDD CA CHECK BUFFER 04576 M00S03577.o26 +++| ADC -KBUF 04577 M00S03578.o26 +++| LMD KI 04578 M00S03579.o26 +++| NJN SDFX IF FILE SPECIFIED 04579 M00S03580.o26 +++| LDD MA 04580 M00S03581.o26 +++| CWM **,ON MOVE FILE NAME 04581 M00S03582.o26 +++| SDFA EQU *-1 04582 M00S03583.o26 +++| SBN 1 04583 M00S03584.o26 +++| CRD AB 04584 M00S03585.o26 +++| LDN 1 SET STATUS 04585 M00S03586.o26 +++| STD AB+4 04586 M00S03587.o26 +++| RJM SFS SET FILE STATUS 04587 M00S03588.o26 +++| UJN SDFX RETURN 04588 M00S03589.o26 +++| COMMAND (LINE ENTRY AND DATA MOVE.) 04589 M00S03590.o26 +++| A. SPACE 4,10 04590 M00S03591.o26 +++|*** A.CCC-CCC 04591 M00S03592.o26 +++|* 04592 M00S03593.o26 +++|* MERGE CHARACTERS *CCC-CCC* WITH FOLLOWING LINE 04593 M00S03594.o26 +++|* EXCEPT TABBED OR SPACED AREA UP TO CARRAGE RETURN.
| Line S03595 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 04594 M01S03595.241l630 ---| 04595 M01S03596.241l630 ---| 04596 M01S03597.241l630 ---| AMG ENTRY 04597 M01S03598.241l630 ---| RJM ELB ENTER LINE IN BUFFER 04598 M01S03599.241l630 ---| JMP RET 04599 M00S03600.o26 +++| C. SPACE 4,20 04600 M00S03601.o26 +++|*** C.CCC-CCC 04601 M00S03602.o26 +++|* 04602 M00S03603.o26 +++|* ENTER CHARACTERS *CCC-CCC* IN BUFFER. *CCC-CCC* 04603 M00S03604.o26 +++|* MAY CONSIST OF UP TO 90 CHARACTERS. 04604 M00S03605.o26 +++| 04605 M00S03606.o26 +++| 04606 M00S03607.o26 +++| CEL ENTRY 04607 M00S03608.o26 +++| LDD CA CHECK FOR COPY NEXT LINE 04608 M00S03609.o26 +++| ADC -KBUF 04609 M00S03610.o26 +++| LMD KI 04610 M00S03611.o26 +++| NJN CEL3 IF NOT COPY NEXT LINE 04611 M00S03612.o26 +++| LDD IF 04612 M00S03613.o26 +++| NJN CEL1 IF INSERT SET 04613 M00S03614.o26 +++| JMP ERR MESSAGE = *FORMAT ERROR.* 04614 M00S03615.o26 +++| 04615 M00S03616.o26 +++| CEL1 RJM RDL READ LINE 04616 M00S03617.o26 +++| LDD LC SET KEYBOARD INDEX 04617 M00S03618.o26 +++| ADN 2 04618 M00S03619.o26 +++| STD KI 04619 M00S03620.o26 +++| ADC -KBUFL 04620 M00S03621.o26 +++| MJN CEL2 IF WITHIN BUFFER 04621 M00S03622.o26 +++| LDC KBUFL-1 SET LAST CHARACTER ADDRESS 04622 M00S03623.o26 +++| STD KI 04623 M00S03624.o26 +++| CEL2 JMP KBIX RETURN 04624 M00S03625.o26 +++|
| Line S00795 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 04625 M01S00795.241l630 +++|* ENTRY FROM *MRL*. 04626 M01S00796.241l630 +++| 04627 M01S00797.241l630 +++| AMG ENTRY 04628 M00S03626.o26 +++| CEL3 RJM ELB ENTER LINE IN BUFFER 04629 M00S03627.o26 +++| JMP RET RETURN 04630 M00S03628.o26 +++| COPY SPACE 4,8 04631 M00S03629.o26 +++|*** COPY. 04632 M00S03630.o26 +++|* 04633 M00S03631.o26 +++|* COPY DATA FROM BLOCK STARTING AT INSERT *8* AND 04634 M00S03632.o26 +++|* ENDING AT INSERT *9* INTO BLOCK AT INSERT MARKER. 04635 M00S03633.o26 +++| 04636 M00S03634.o26 +++| 04637 M00S03635.o26 +++|*MVE ENTRY 04638 M00S03636.o26 +++| DEL. SPACE 4,15 04639 M00S03637.o26 +++|*** DEL. 04640 M00S03638.o26 +++|* 04641 M00S03639.o26 +++|* DELETE LINES AFTER INSERT MARK. 04642 M00S03640.o26 +++| 04643 M00S03641.o26 +++| 04644 M00S03642.o26 +++| DLE ENTRY 04645 M00S03643.o26 +++| LDD IF 04646 M00S03644.o26 +++| ZJN DLE1 IF NO INSERT 04647 M00S03645.o26 +++| LDD IP RESET IN 04648 M00S03646.o26 +++| STD IN 04649 M00S03647.o26 +++| LDD IP+1 04650 M00S03648.o26 +++| STD IN+1 04651 M00S03649.o26 +++| UJN DLE2 04652 M00S03650.o26 +++| 04653 M00S03651.o26 +++| DLE1 LDD FT CLEAR BUFFER 04654 M00S03652.o26 +++| STD IN 04655 M00S03653.o26 +++| LDD FT+1 04656 M00S03654.o26 +++| STD IN+1
| Line S03655 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 04657 M01S03655.241l630 ---| DLE2 LDN IN SET DISPLAY 04658 M01S03656.241l630 ---| RJM SDS 04659 M01S03657.241l630 ---| RJM SIP SET IN POINTER
| Line S00798 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 04660 M01S00798.241l630 +++| DLE2 RJM SIP STORE IN POINTER 04661 M01S00799.241l630 +++| LDN IN 04662 M01S00800.241l630 +++| 04663 M01S00801.241l630 +++|* ENTRY FROM *DEL*. 04664 M01S00802.241l630 +++| 04665 M01S00803.241l630 +++| DLE3 RJM SDS SET DISPLAY 04666 M00S03658.o26 +++| JMP CIF CLEAR INSERT FLAG 04667 M00S03659.o26 +++| D,* SPACE 4,15 04668 M00S03660.o26 +++|*** D,* 04669 M00S03661.o26 +++|* 04670 M00S03662.o26 +++|* DELETE FROM INSERT *8* THROUGH INSERT *9*. 04671 M00S03663.o26 +++| 04672 M00S03664.o26 +++| 04673 M00S03665.o26 +++| DEL ENTRY 04674 M00S03666.o26 +++| LDD MA MOVE INSERT PARAMETERS 04675 M00S03667.o26 +++| CWM CFCB,ON 04676 M00S03668.o26 +++| LDD MA 04677 M00S03669.o26 +++| CRD T2 (SET T2 - T6) 04678 M00S03670.o26 +++| LDD T2 04679 M00S03671.o26 +++| ADD T3 04680 M00S03672.o26 +++| ZJN DEL1 IF NO INSERT *8* 04681 M00S03673.o26 +++| LDD T2 04682 M00S03674.o26 +++| SBD T4 04683 M00S03675.o26 +++| SHN 14 04684 M00S03676.o26 +++| ADD T3 04685 M00S03677.o26 +++| SBD T5 04686 M00S03678.o26 +++| PJN DEL1 IF *I8* .GT. *I9* 04687 M00S03679.o26 +++| RJM MBD MOVE BUFFER DOWN
| Line S03680 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 04688 M01S03680.241l630 ---| LDC CFCB SET DISPLAY 04689 M01S03681.241l630 ---| RJM SDS 04690 M01S03682.241l630 ---| JMP CIF CLEAR INSERT FLAG
| Line S00804 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 04691 M01S00804.241l630 +++| LDC CFCB 04692 M01S00805.241l630 +++| JMP DLE3 SET DISPLAY 04693 M00S03683.o26 +++| 04694 M00S03684.o26 +++| DEL1 JMP ERR FORMAT ERROR 04695 M00S03685.o26 +++| D. SPACE 4,10 04696 M00S03686.o26 +++|*** D.CCC-CCC 04697 M00S03687.o26 +++|* 04698 M00S03688.o26 +++|* MERGE *CCC-CCC* WITH REMAINDER OF CHARACTERS 04699 M00S03689.o26 +++|* CHARACTERS IN DUP BUFFER EXCEPT TABBED AREA OR 04700 M00S03690.o26 +++|* SPACED AREA UP TO CARRIAGE RETURN. 04701 M00S03691.o26 +++| 04702 M00S03692.o26 +++| 04703 M00S03693.o26 +++| DMC ENTRY AMG 04704 M00S03694.o26 +++| E. SPACE 4,8 04705 M00S03695.o26 +++|*** E.CCC-CCC 04706 M00S03696.o26 +++|* 04707 M00S03697.o26 +++|* MERGE *CCC-CCC* WITH REMAINDER OF CHARACTERS 04708 M00S03698.o26 +++|* CHARACTERS IN DUP BUFFER EXCEPT TABBED OR SPACED 04709 M00S03699.o26 +++|* AREA. 04710 M00S03700.o26 +++| L. SPACE 4,20 04711 M00S03701.o26 +++|*** L.CCC-CCC 04712 M00S03702.o26 +++|* 04713 M00S03703.o26 +++|* MERGE CHARACTERS *CCC-CCC* WITH REMAINDER OF 04714 M00S03704.o26 +++|* FOLLOWING LINE EXCEPT TABBED OR SPACED AREA. 04715 M00S03705.o26 +++| 04716 M00S03706.o26 +++| 04717 M00S03707.o26 +++| MRL ENTRY 04718 M00S03708.o26 +++| LDD KI COPY REMAINDER OF LINE 04719 M00S03709.o26 +++| MRL1 ADC -KBUFL CHECK FOR END OF BUFFER 04720 M00S03710.o26 +++| PJN MRL2 IF END OF BUFFER 04721 M00S03711.o26 +++| LDM DBUF,KI COPY CHARACTER FROM DUP BUFFER 04722 M00S03712.o26 +++| LPN 77 CLEAR TAB IF SET 04723 M00S03713.o26 +++| STM KBUF,KI ENTER INTO KEYBOARD BUFFER 04724 M00S03714.o26 +++| AOD KI ADVANCE 04725 M00S03715.o26 +++| UJN MRL1 LOOP FOR NEXT CHARACTER 04726 M00S03716.o26 +++| 04727 M00S03717.o26 +++| MRL2 LDC KBUF+2 SET CHARACTER ADDRESS 04728 M00S03718.o26 +++| STD CA
| Line S03719 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 04729 M01S03719.241l630 ---| RJM ELB ENTER LINE 04730 M01S03720.241l630 ---| JMP RET RETURN
| Line S00806 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 04731 M01S00806.241l630 +++| LJM CEL3 ENTER LINE AND RETURN 04732 M00S03721.o26 +++| MOVE. SPACE 4,20 04733 M00S03722.o26 +++|*** MOVE. 04734 M00S03723.o26 +++|* 04735 M00S03724.o26 +++|* MOVE DATA FROM BLOCK STARTING AT INSERT *8* AND 04736 M00S03725.o26 +++|* ENDING AT INSERT *9* INTO BLOCK AT INSERT MARKER. 04737 M00S03726.o26 +++| 04738 M00S03727.o26 +++| 04739 M00S03728.o26 +++| MVE ENTRY 04740 M00S03729.o26 +++| LDD MA SET MOVE PARAMETERS 04741 M00S03730.o26 +++| CWM CFCB,ON 04742 M00S03731.o26 +++| LDD MA 04743 M00S03732.o26 +++| CRD AB 04744 M00S03733.o26 +++| LDD AB 04745 M00S03734.o26 +++| SHN 14 04746 M00S03735.o26 +++| LMD AB+1 04747 M00S03736.o26 +++| ZJN MVE1 IF INSERT *8* NOT SET 04748 M00S03737.o26 +++| LDD AB+2 04749 M00S03738.o26 +++| SHN 14 04750 M00S03739.o26 +++| LMD AB+3 04751 M00S03740.o26 +++| NJN MVE2 IF INSERT *9* SET 04752 M00S03741.o26 +++| MVE1 LDC =C*INSERT 8 OR 9 NOT SET.* 04753 M00S03742.o26 +++| JMP ERR1 04754 M00S03743.o26 +++| 04755 M00S03744.o26 +++| MVE2 LDD AB+2 CALCULATE BLOCK SIZE 04756 M00S03745.o26 +++| SBD AB 04757 M00S03746.o26 +++| SHN 14 04758 M00S03747.o26 +++| ADD AB+3 04759 M00S03748.o26 +++| SBD AB+1 04760 M00S03749.o26 +++| STD T7 04761 M00S03750.o26 +++| SHN -14 04762 M00S03751.o26 +++| ZJN MVE4 IF BLOCK .LT. 10000
| Line S03752 Modification History | |
|---|---|
M01 (Removed by) | o2610 |
Seq # *Modification Id* Act ----------------------------+ 04763 M01S03752.o2610 ---| MVE3 LDC =C*BLOCK TOO LARGE.* 04764 M01S03753.o2610 ---| JMP ERR1 04765 M01S03754.o2610 ---| 04766 M01S03755.o2610 ---| MVE4 LDD LM CHECK BLOCK SIZE 04767 M01S03756.o2610 ---| SBD IN 04768 M01S03757.o2610 ---| SHN 14 04769 M01S03758.o2610 ---| ADD LM+1 04770 M01S03759.o2610 ---| SBD IN+1 04771 M01S03760.o2610 ---| SBD T7 04772 M01S03761.o2610 ---| MJN MVE3 IF NO ROOM
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | o2610 |
Seq # *Modification Id* Act ----------------------------+ 04773 M01S00006.o2610 +++| LDC MVEB *DATA OVERFLOW.* 04774 M01S00007.o2610 +++| JMP ERR1 04775 M01S00008.o2610 +++| 04776 M01S00009.o2610 +++| MVE4 RJM CRB CHECK ROOM IN BUFFER
| Line S03762 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 04777 M01S03762.241l630 ---| LDD IP SET INSERT ADDRESS
| Line S00807 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 04778 M01S00807.241l630 +++| LDD IF 04779 M01S00808.241l630 +++| ZJN MVE5 IF INSERT NOT SET 04780 M01S00809.241l630 +++| LCN IN-IP 04781 M01S00810.241l630 +++| MVE5 ADN IN 04782 M01S00811.241l630 +++| STD T3 04783 M01S00812.241l630 +++| LDI T3 SET INSERT ADDRESS 04784 M00S03763.o26 +++| STD OT 04785 M00S03764.o26 +++| STD T2
| Line S03765 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 04786 M01S03765.241l630 ---| LDD IP+1
| Line S00813 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 04787 M01S00813.241l630 +++| LDM 1,T3 04788 M00S03766.o26 +++| STD OT+1 04789 M00S03767.o26 +++| STD T3
| Line S03768 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 04790 M01S03768.241l630 ---| LDD IF 04791 M01S03769.241l630 ---| NJN MVE5 IF INSERT SET 04792 M01S03770.241l630 ---| LDD IN SET INSERT ADDRESS 04793 M01S03771.241l630 ---| STD OT 04794 M01S03772.241l630 ---| STD T2 04795 M01S03773.241l630 ---| LDD IN+1 04796 M01S03774.241l630 ---| STD OT+1 04797 M01S03775.241l630 ---| STD T3 04798 M01S03776.241l630 ---| MVE5 LDD T2 CHECK DATA BLOCK LIMITS
| Line S00814 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 04799 M01S00814.241l630 +++| LDD T2 CHECK DATA BLOCK LIMITS 04800 M00S03777.o26 +++| SBD AB 04801 M00S03778.o26 +++| SHN 14 04802 M00S03779.o26 +++| ADD T3 04803 M00S03780.o26 +++| SBD AB+1 04804 M00S03781.o26 +++| PJN MVE6 IF - 8 - BEFORE INSERT 04805 M00S03782.o26 +++| LDD T7 SET INSERT INCREMENT 04806 M00S03783.o26 +++| STD AB+4 04807 M00S03784.o26 +++| MVE6 LDD T2 04808 M00S03785.o26 +++| SBD AB+2 04809 M00S03786.o26 +++| SHN 14 04810 M00S03787.o26 +++| ADD T3 04811 M00S03788.o26 +++| SBD AB+3 04812 M00S03789.o26 +++| PJN MVE7 IF - 9 - BEFORE OR AT INSERT 04813 M00S03790.o26 +++| LDD AB+4 04814 M00S03791.o26 +++| NJN MVE7 IF - 8 - AFTER INSERT 04815 M00S03792.o26 +++| LJM ERR MESSAGE = *FORMAT ERROR.* 04816 M00S03793.o26 +++| 04817 M00S03794.o26 +++| MVE7 RJM MBU MOVE BUFFER UP 04818 M00S03795.o26 +++| LDD AB+4 SET FWA 04819 M00S03796.o26 +++| RAD AB+1 04820 M00S03797.o26 +++| STD T5 04821 M00S03798.o26 +++| SHN -14 04822 M00S03799.o26 +++| RAD AB 04823 M00S03800.o26 +++| STD T4 04824 M00S03801.o26 +++| LDD IN+1 SAVE IN ADDRESS 04825 M00S03802.o26 +++| ADD T7 04826 M00S03803.o26 +++| STM MVEA+1 04827 M00S03804.o26 +++| SHN -14 04828 M00S03805.o26 +++| ADD IN 04829 M00S03806.o26 +++| ADC LDCI 04830 M00S03807.o26 +++| STM MVEA 04831 M00S03808.o26 +++| LDD AB+4 SET LWA 04832 M00S03809.o26 +++| RAD AB+3 04833 M00S03810.o26 +++| STD IN+1 04834 M00S03811.o26 +++| SHN -14 04835 M00S03812.o26 +++| RAD AB+2 04836 M00S03813.o26 +++| STD IN 04837 M00S03814.o26 +++| RJM MBD MOVE BUFFER DOWN 04838 M00S03815.o26 +++| MVEA LDC ** RESET IN 04839 M00S03816.o26 +++| STD IN+1 04840 M00S03817.o26 +++| SHN -14 04841 M00S03818.o26 +++| STD IN 04842 M00S03819.o26 +++| LDM KBUF 04843 M00S03820.o26 +++| LMN 1RC 04844 M00S03821.o26 +++| ZJN MVE8 IF *COPY*
| Line S03822 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 04845 M01S03822.241l630 ---| LDD AB SET MOVE ADDRESS 04846 M01S03823.241l630 ---| STD T2 04847 M01S03824.241l630 ---| LDD AB+1 04848 M01S03825.241l630 ---| STD T3 04849 M01S03826.241l630 ---| LDD AB+2 SET FIRST ADDRESS 04850 M01S03827.241l630 ---| STD T4 04851 M01S03828.241l630 ---| LDD AB+3 04852 M01S03829.241l630 ---| STD T5
| Line S00815 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 04853 M01S00815.241l630 +++| LDD MA 04854 M01S00816.241l630 +++| CWD AB SET MOVE AND FIRST ADDRESSES 04855 M01S00817.241l630 +++| CRD T2 04856 M00S03830.o26 +++| RJM MBD MOVE BUFFER DOWN 04857 M00S03831.o26 +++| MVE8 LDN ZERL CLEAR INSERT *8* AND *9* 04858 M00S03832.o26 +++| CRM CFCB,ON 04859 M00S03833.o26 +++| RJM SIP STORE IN POINTER 04860 M00S03834.o26 +++| JMP RET RETURN
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | o2610 |
Seq # *Modification Id* Act ----------------------------+ 04861 M01S00010.o2610 +++| 04862 M01S00011.o2610 +++| MVEB DATA C*DATA OVERFLOW.* 04863 M00S03835.o26 +++| M. SPACE 4,8 04864 M00S03836.o26 +++|*** M.CCC-CCC 04865 M00S03837.o26 +++|* 04866 M00S03838.o26 +++|* MERGE CHARACTERS *CCC-CCC* WITH 04867 M00S03839.o26 +++|* REMAINDER OF FOLLOWING LINE. 04868 M00S03840.o26 +++| 04869 M00S03841.o26 +++| 04870 M00S03842.o26 +++| MRG ENTRY MRL 04871 M00S03843.o26 +++| N. SPACE 4,8 04872 M00S03844.o26 +++|*** N.CCC-CCC 04873 M00S03845.o26 +++|* 04874 M00S03846.o26 +++|* MERGE CHARACTERS EXCEPT TABBED AREA. 04875 M00S03847.o26 +++| 04876 M00S03848.o26 +++| 04877 M00S03849.o26 +++| MRN ENTRY MRL 04878 M00S03850.o26 +++| P. SPACE 4,10 04879 M00S03851.o26 +++|*** P.CCC-CCC 04880 M00S03852.o26 +++|* 04881 M00S03853.o26 +++|* ENTER CHARACTERS *CCC-CCC* IN BUFFER. *CCC-CCC* 04882 M00S03854.o26 +++|* MAY CONSIST OF UP TO 96 CHARACTERS. 04883 M00S03855.o26 +++| 04884 M00S03856.o26 +++| 04885 M00S03857.o26 +++| ELN ENTRY 04886 M00S03858.o26 +++| RJM ELB ENTER LINE IN BUFFER
| Line S03859 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 04887 M01S03859.241l630 ---| LDN 2 RETURN TO SAVE *P.* 04888 M01S03860.241l630 ---| LJM RET1
| Line S00818 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 04889 M01S00818.241l630 +++| LDM DBFB 04890 M01S00819.241l630 +++| LMC SRSF 04891 M01S00820.241l630 +++| ADD LL 04892 M01S00821.241l630 +++| NJN ELN1 IF NOT END OF BUFFER ON RIGHT SCREEN 04893 M01S00822.241l630 +++| LDD IF 04894 M01S00823.241l630 +++| ADD HF 04895 M01S00824.241l630 +++| NJN ELN1 IF NOT ROLLING W/O INSERT POINTER 04896 M01S00825.241l630 +++| STM DBFD 04897 M01S00826.241l630 +++| AOD KD INHIBIT PRIORITY LINE USAGE 04898 M01S00827.241l630 +++| ELN1 LDN 2 04899 M01S00828.241l630 +++| LJM RET1 RETURN TO SAVE *P.* 04900 M00S03861.o26 +++| ELB SPACE 4,20 04901 M00S03862.o26 +++|** ELB - ENTER LINE IN BUFFER. 04902 M00S03863.o26 +++|* 04903 M00S03864.o26 +++|* ENTRY (CA) = CHARACTER ADDRESS. 04904 M00S03865.o26 +++|* (IF) = INSERT FLAG. 04905 M00S03866.o26 +++|* (IP - IP+1) = INSERT ADDRESS. 04906 M00S03867.o26 +++|* 04907 M00S03868.o26 +++|* USES T1 - T7, CM - CM+4, BUF - BUF+50. 04908 M00S03869.o26 +++|* 04909 M00S03870.o26 +++|* CALLS MBU. 04910 M00S03871.o26 +++| 04911 M00S03872.o26 +++| 04912 M00S03873.o26 +++| ELB SUBR ENTRY/EXIT 04913 M00S03874.o26 +++| RJM PKL PACK LINE INTO BUF 04914 M00S03875.o26 +++| LDD IN SET INPUT ADDRESS 04915 M00S03876.o26 +++| STD T2 04916 M00S03877.o26 +++| LDD IN+1 04917 M00S03878.o26 +++| STD T3
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | o2610 |
Seq # *Modification Id* Act ----------------------------+ 04918 M01S00012.o2610 +++| RJM CRB CHECK ROOM IN BUFFER 04919 M00S03879.o26 +++| LDD IF 04920 M00S03880.o26 +++| ZJN ELB1 IF NO INSERT 04921 M00S03881.o26 +++| 04922 M00S03882.o26 +++|* PROCESS INSERTED LINE. 04923 M00S03883.o26 +++| 04924 M00S03884.o26 +++| LDD IP SET INSERT ADDRESS 04925 M00S03885.o26 +++| STD T2 04926 M00S03886.o26 +++| LDD IP+1 04927 M00S03887.o26 +++| STD T3 04928 M00S03888.o26 +++| RJM MBU MOVE BUFFER UP 04929 M00S03889.o26 +++| LDD T7 ADVANCE INSERT ADDRESS 04930 M00S03890.o26 +++| RAD IP+1 04931 M00S03891.o26 +++| SHN -14 04932 M00S03892.o26 +++| RAD IP 04933 M00S03893.o26 +++| 04934 M00S03894.o26 +++|* STORE LINE IN CM. 04935 M00S03895.o26 +++| 04936 M00S03896.o26 +++| ELB1 LDD T2 STORE LINE 04937 M00S03897.o26 +++| SHN 6 04938 M00S03898.o26 +++| ADD RA 04939 M00S03899.o26 +++| SHN 6 04940 M00S03900.o26 +++| ADD T3 04941 M00S03901.o26 +++| CWM BUF,T7 04942 M00S03902.o26 +++| LDD T7 ADVANCE IN 04943 M00S03903.o26 +++| RAD IN+1 04944 M00S03904.o26 +++| SHN -14 04945 M00S03905.o26 +++| RAD IN 04946 M00S03906.o26 +++| RJM SIP SET IN POINTER 04947 M00S03907.o26 +++| LJM ELBX RETURN
| Line S00013 Modification History | |
|---|---|
M01 (Added by) | o2610 |
Seq # *Modification Id* Act ----------------------------+ 04948 M01S00013.o2610 +++|CRB SPACE 4,10 04949 M01S00014.o2610 +++|** CRB - CHECK ROOM IN BUFFER. 04950 M01S00015.o2610 +++|* 04951 M01S00016.o2610 +++|* ENTRY (IN - IN+1) = LWA+1 OF DATA IN BUFFER. 04952 M01S00017.o2610 +++|* (LM - LM+1) = LIMIT ADDRESS. 04953 M01S00018.o2610 +++|* (T7) = LENGTH OF NEW LINE OR BLOCK. 04954 M01S00019.o2610 +++|* 04955 M01S00020.o2610 +++|* ERROR TO *ERR1* IF INSUFFICIENT ROOM IN BUFFER. 04956 M01S00021.o2610 +++| 04957 M01S00022.o2610 +++| 04958 M01S00023.o2610 +++| CRB SUBR ENTRY/EXIT 04959 M01S00024.o2610 +++| LDD IN 04960 M01S00025.o2610 +++| SBD LM 04961 M01S00026.o2610 +++| SHN 14 04962 M01S00027.o2610 +++| ADD IN+1 04963 M01S00028.o2610 +++| SBD LM+1 COMPLEMENT OF WORDS AVAILABLE 04964 M01S00029.o2610 +++| ADD T7 WORDS NEEDED 04965 M01S00030.o2610 +++| MJN CRBX IF ROOM FOR DATA 04966 M01S00031.o2610 +++| LDC MVEB *DATA OVERFLOW.* 04967 M01S00032.o2610 +++| JMP ERR1 ERROR EXIT 04968 M00S03908.o26 +++| MBU SPACE 4,10 04969 M00S03909.o26 +++|** MBU - MOVE BUFFER UP. 04970 M00S03910.o26 +++|* 04971 M00S03911.o26 +++|* ENTRY (T2 - T3) = FWA TO MOVE. 04972 M00S03912.o26 +++|* (IN - IN+1) = LWA+1 TO MOVE. 04973 M00S03913.o26 +++|* (T7) = DISTANCE TO MOVE. 04974 M00S03914.o26 +++|* 04975 M00S03915.o26 +++|* USES T1, T4, BUFM - BUFM+240. 04976 M00S03916.o26 +++| 04977 M00S03917.o26 +++| 04978 M00S03918.o26 +++| MBU SUBR ENTRY/EXIT
| Line S00033 Modification History | |
|---|---|
M01 (Added by) | o2610 |
Seq # *Modification Id* Act ----------------------------+ 04979 M01S00033.o2610 +++| RJM CRB CHECK ROOM IN BUFFER 04980 M00S03919.o26 +++| LDD IN COMPUTE MOVE WORD COUNT 04981 M00S03920.o26 +++| SBD T2 04982 M00S03921.o26 +++| SHN 14 04983 M00S03922.o26 +++| ADD IN+1 04984 M00S03923.o26 +++| SBD T3 04985 M00S03924.o26 +++| SHN 13D SET BLOCK COUNT 04986 M00S03925.o26 +++| STD T1 04987 M00S03926.o26 +++| SHN -13D SET ODD SIZE 04988 M00S03927.o26 +++| STD T4
| Line S03928 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 04989 M01S03928.241l630 ---| ZJN MBU1 IF NO ODD BLOCK
| Line S00829 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 04990 M01S00829.241l630 +++| ZJN MBU2 IF NO ODD BLOCK 04991 M00S03929.o26 +++| 04992 M00S03930.o26 +++|* MOVE SHORT BLOCK. 04993 M00S03931.o26 +++| 04994 M00S03932.o26 +++| LDD IN READ SHORT BLOCK 04995 M00S03933.o26 +++| SHN 6 04996 M00S03934.o26 +++| ADD RA 04997 M00S03935.o26 +++| SHN 6 04998 M00S03936.o26 +++| ADD IN+1 04999 M00S03937.o26 +++| SBD T4
| Line S03938 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 05000 M01S03938.241l630 ---| CRM BUFM,T4
| Line S00830 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 05001 M01S00830.241l630 +++| MBU1 CRM BUFM,T4 05002 M00S03939.o26 +++| SBD T4 STORE ODD BLOCK 05003 M00S03940.o26 +++| ADD T7 05004 M00S03941.o26 +++| CWM BUFM,T4
| Line S03942 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 05005 M01S03942.241l630 ---| MBU1 LDD T1 05006 M01S03943.241l630 ---| ZJN MBUX IF NO FULL BLOCKS
| Line S00831 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 05007 M01S00831.241l630 +++| MBU2 SOD T1 05008 M01S00832.241l630 +++| MJN MBUX IF NO FULL BLOCKS 05009 M01S00833.241l630 +++| LDN 40 05010 M01S00834.241l630 +++| STD T4 SET FULL BLOCK SIZE 05011 M00S03944.o26 +++| 05012 M00S03945.o26 +++|* MOVE FULL BLOCKS. 05013 M00S03946.o26 +++| 05014 M00S03947.o26 +++| LDD T2 READ BLOCK 05015 M00S03948.o26 +++| SHN 6 05016 M00S03949.o26 +++| ADD RA 05017 M00S03950.o26 +++| SHN 1 05018 M00S03951.o26 +++| ADD T1
| Line S03952 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 05019 M01S03952.241l630 ---| SBN 1 05020 M00S03953.o26 +++| SHN 5 05021 M00S03954.o26 +++| ADD T3
| Line S03955 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 05022 M01S03955.241l630 ---| CRM BUFM,FR 05023 M01S03956.241l630 ---| SBD FR STORE BLOCK 05024 M01S03957.241l630 ---| ADD T7 05025 M01S03958.241l630 ---| CWM BUFM,FR 05026 M01S03959.241l630 ---| SOD T1 DECREMENT BLOCK COUNT 05027 M01S03960.241l630 ---| UJN MBU1 LOOP
| Line S00835 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 05028 M01S00835.241l630 +++| UJN MBU1 MOVE BLOCK 05029 M00S03961.o26 +++| COMMAND (DISPLAY, TAB, DUP AND SCAN CONTROL.) 05030 M00S03962.o26 +++| DFL. SPACE 4,10 05031 M00S03963.o26 +++|*** DFL. 05032 M00S03964.o26 +++|* 05033 M00S03965.o26 +++|* START DISPLAY AT FIRST LINE OF FILE AND HOLD. 05034 M00S03966.o26 +++| 05035 M00S03967.o26 +++| 05036 M00S03968.o26 +++| DSF ENTRY 05037 M00S03969.o26 +++| LDN FT SET DISPLAY ADDRESS 05038 M00S03970.o26 +++| RJM SDS 05039 M00S03971.o26 +++| LDN 1 SET HOLD FLAG 05040 M00S03972.o26 +++| STD HF 05041 M00S03973.o26 +++| JMP RET RETURN 05042 M00S03974.o26 +++| DLL. SPACE 4,15 05043 M00S03975.o26 +++|*** DLL. 05044 M00S03976.o26 +++|* 05045 M00S03977.o26 +++|* DISPLAY LAST PART OF FILE. 05046 M00S03978.o26 +++| 05047 M00S03979.o26 +++| 05048 M00S03980.o26 +++| DSL ENTRY 05049 M00S03981.o26 +++| LDD IN SET END OF FILE ADDRESS 05050 M00S03982.o26 +++| STD T2
Proceed to Part 3
cdc/nos2.source/opl.opl871/deck/o26.002.txt · Last modified: by 127.0.0.1