cdc:nos2.source:opl.opl871:deck:dsp.001
Deck DSP Part 001
81 Modifications
Listing Sections
- Deck DSP Start
- Deck DSP Part 1 (Line 1278)
- Deck DSP Part 2 (Line 2901)
- Deck DSP Part 3 (Line 4154)
- Deck DSP Part 4 (Line 5602)
Source
Seq # *Modification Id* Act ----------------------------+
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2358 |
M02 (Removed by) | ns2369 |
Seq # *Modification Id* Act ----------------------------+ 01278 M02S00001.ns2369 ---| LDN 1 SELECT NO DROP OF DISK SPACE
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | ns2369 |
Seq # *Modification Id* Act ----------------------------+ 01279 M01S00012.ns2369 +++|* LDN 1 DROP QFT ENTRY ONLY
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2358 |
Seq # *Modification Id* Act ----------------------------+ 01280 M01S00002.ns2358 +++| STM OVL0-1 01281 M00S00958.dsp +++| EXECUTE 0DQ,OVL0 DROP QFT ENTRY 01282 M00S00959.dsp +++| UJN FNB2 CONTINUE 01283 M00S00960.dsp +++| 01284 M00S00961.dsp +++| FNB1 LDN 40 CLEAR QFT INTERLOCK 01285 M00S00962.dsp +++| RJM FQI FUNCTION INTERLOCK 01286 M00S00963.dsp +++| FNB2 LDN 0 CLEAR GLOBAL ENTRY 01287 M00S00964.dsp +++| STD QA 01288 M00S00965.dsp +++| 01289 M00S00966.dsp +++|* PROCESS LOCAL FNT ENTRY. 01290 M00S00967.dsp +++| 01291 M00S00968.dsp +++| FNB3 LDD FA 01292 M00S00969.dsp +++| ZJN FNBX IF NO FILE 01293 M00S00970.dsp +++| LDN 0 01294 M00S00971.dsp +++|* LDN 1 (IF FILE CREATED BY *DSP*) 01295 M00S00972.dsp +++| FNBB EQU *-1 01296 M00S00973.dsp +++| ZJN FNB4 IF FILE NOT CREATED BY *DSP* 01297 M00S00974.dsp +++| LDN 0 RETURN FILE 01298 M00S00975.dsp +++| STM OVL2-1 01299 M00S00976.dsp +++| EXECUTE 0DF,OVL2 DROP FILE 01300 M00S00977.dsp +++| UJN FNB5 CONTINUE 01301 M00S00978.dsp +++| 01302 M00S00979.dsp +++| FNB4 NFA FA,R SET FILE NOT BUSY 01303 M00S00980.dsp +++| ADN FSTL 01304 M00S00981.dsp +++| CRD FS 01305 M00S00982.dsp +++| LDD FS+4 SET FILE NOT BUSY 01306 M00S00983.dsp +++| SCN 1 01307 M00S00984.dsp +++| LMN 1 01308 M00S00985.dsp +++| STD FS+4 01309 M00S00986.dsp +++| NFA FA,R 01310 M00S00987.dsp +++| ADN FSTL 01311 M00S00988.dsp +++| CWD FS
| Line S00989 Modification History | |
|---|---|
M01 (Removed by) | ns2358 |
Seq # *Modification Id* Act ----------------------------+ 01312 M01S00989.ns2358 ---| FNB5 LDN 0 CLEAR FNT POINTER 01313 M01S00990.ns2358 ---| STD FA 01314 M01S00991.ns2358 ---| LJM FNBX RETURN
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2358 |
Seq # *Modification Id* Act ----------------------------+ 01315 M01S00003.ns2358 +++| LDN 0 CLEAR FNT POINTER 01316 M01S00004.ns2358 +++| STD FA 01317 M01S00005.ns2358 +++| FNB5 LJM FNBX RETURN 01318 M00S00992.dsp +++| FQI SPACE 4,10 01319 M00S00993.dsp +++|** FQI - FUNCTION QFT INTERLOCK. 01320 M00S00994.dsp +++|* 01321 M00S00995.dsp +++|* ENTRY (A) = 0, SET QFT INTERLOCK. 01322 M00S00996.dsp +++|* (A) = 40, CLEAR QFT INTERLOCK. 01323 M00S00997.dsp +++|* (QA) = QFT ORDINAL. 01324 M00S00998.dsp +++|* 01325 M00S00999.dsp +++|* EXIT QFT INTERLOCK CLEARED. 01326 M00S01000.dsp +++|* (A) = 0, IF OPERATION COMPLETE. 01327 M00S01001.dsp +++|* 01328 M00S01002.dsp +++|* USES CM - CM+4. 01329 M00S01003.dsp +++|* 01330 M00S01004.dsp +++|* MACROS DELAY, MONITOR, PAUSE, SFA. 01331 M00S01005.dsp +++|* 01332 M00S01006.dsp +++|* NOTE IF QFT INTERLOCK CANNOT BE SET OR CLEARED, AND 01333 M00S01007.dsp +++|* THE OPERATOR OVERRIDES THE JOB, SOME INTERLOCKS 01334 M00S01008.dsp +++|* MAY NOT BE CLEARED. 01335 M00S01009.dsp +++| 01336 M00S01010.dsp +++| 01337 M00S01011.dsp +++| FQI SUBR ENTRY/EXIT 01338 M00S01012.dsp +++| STM FQIA PRESERVE FUNCTION 01339 M00S01013.dsp +++| FQI1 LDC ** 01340 M00S01014.dsp +++| FQIA EQU *-1 01341 M00S01015.dsp +++| STD CM+1 01342 M00S01016.dsp +++| LDN 0 01343 M00S01017.dsp +++| STD CM+2 01344 M00S01018.dsp +++| SFA QFT,QA GET QFT ADDRESS 01345 M00S01019.dsp +++| STD CM+4 01346 M00S01020.dsp +++| SHN -14 01347 M00S01021.dsp +++| STD CM+3 01348 M00S01022.dsp +++| MONITOR UTEM UPDATE TABLE ENTRY 01349 M00S01023.dsp +++| LDD CM+1 CHECK FOR FUNCTION COMPLETE 01350 M00S01024.dsp +++| ZJN FQIX IF FUNCTION COMPLETE 01351 M00S01025.dsp +++| DELAY 01352 M00S01026.dsp +++| PAUSE 01353 M00S01027.dsp +++| LDD CM+1 CHECK FOR OPERATOR OVERRIDE 01354 M00S01028.dsp +++| LMN ORET 01355 M00S01029.dsp +++| NJN FQI1 IF NO OVERRIDE 01356 M00S01030.dsp +++| LDN 1 SET ERROR STATUS 01357 M00S01031.dsp +++| LJM FQIX RETURN 01358 M00S01032.dsp +++| GEA SPACE 4,10 01359 M00S01033.dsp +++|** GEA - GET EJT ADDRESS. 01360 M00S01034.dsp +++|* 01361 M00S01035.dsp +++|* ENTRY (AEOA) = EJT ORDINAL. 01362 M00S01036.dsp +++|* 01363 M00S01037.dsp +++|* EXIT (A) = ADDRESS OF EJT. 01364 M00S01038.dsp +++|* 01365 M00S01039.dsp +++|* MACROS SFA. 01366 M00S01040.dsp +++| 01367 M00S01041.dsp +++| 01368 M00S01042.dsp +++| GEA SUBR ENTRY/EXIT 01369 M00S01043.dsp +++| LDM EJTO LOAD EJT ORDINAL 01370 M00S01044.dsp +++| SFA EJT 01371 M00S01045.dsp +++| UJN GEAX RETURN 01372 M00S01046.dsp +++| GFA SPACE 4,10 01373 M00S01047.dsp +++|** GFA - GET PARAMETER BLOCK ADDRESS. 01374 M00S01048.dsp +++|* 01375 M00S01049.dsp +++|* ENTRY (IR+3 - IR+4) = PARAMETER BLOCK ADDRESS. 01376 M00S01050.dsp +++|* 01377 M00S01051.dsp +++|* EXIT (A) = ABSOLUTE ADDRESS. 01378 M00S01052.dsp +++| 01379 M00S01053.dsp +++| 01380 M00S01054.dsp +++| GFA SUBR ENTRY/EXIT 01381 M00S01055.dsp +++| LDD IR+3 01382 M00S01056.dsp +++| LPN 37 01383 M00S01057.dsp +++| SHN 6 01384 M00S01058.dsp +++| ADD RA 01385 M00S01059.dsp +++| SHN 6 01386 M00S01060.dsp +++| ADD IR+4 01387 M00S01061.dsp +++| UJN GFAX RETURN 01388 M00S01062.dsp +++| RFN SPACE 4,10 01389 M00S01063.dsp +++|** RFN - READ FAMILY NAME. 01390 M00S01064.dsp +++|* 01391 M00S01065.dsp +++|* EXIT (A) = CM ADDRESS OF FAMILY NAME. 01392 M00S01066.dsp +++|* 01393 M00S01067.dsp +++|* USES CM - CM+4. 01394 M00S01068.dsp +++|* 01395 M00S01069.dsp +++|* MACROS SFA. 01396 M00S01070.dsp +++| 01397 M00S01071.dsp +++| 01398 M00S01072.dsp +++| RFN SUBR ENTRY/EXIT 01399 M00S01073.dsp +++| LDD CP READ FAMILY POINTER 01400 M00S01074.dsp +++| ADN PFCW 01401 M00S01075.dsp +++| CRD CM 01402 M00S01076.dsp +++| SFA EST,CM+3 READ EST 01403 M00S01077.dsp +++| ADK EQDE 01404 M00S01078.dsp +++| CRD CM 01405 M00S01079.dsp +++| LDD CM+4 SET FAMILY ADDRESS 01406 M00S01080.dsp +++| SHN 3 01407 M00S01081.dsp +++| ADN PFGL 01408 M00S01082.dsp +++| UJN RFNX RETURN
| Line S00051 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01409 M01S00051.242l642 +++| RMS SPACE 4,10 01410 M01S00052.242l642 +++|** RMS - READ MASS STORAGE. 01411 M01S00053.242l642 +++|* 01412 M01S00054.242l642 +++|* ENTRY (A) = BUFFER ADDRESS. 01413 M01S00055.242l642 +++|* (T5 - T7) = MASS STORAGE PARAMETERS. 01414 M01S00056.242l642 +++|* 01415 M01S00057.242l642 +++|* EXIT (A) .GE. 0. 01416 M01S00058.242l642 +++|* 01417 M01S00059.242l642 +++|* ERROR TO *EER*. 01418 M01S00060.242l642 +++|* 01419 M01S00061.242l642 +++|* CALLS RDS. 01420 M01S00062.242l642 +++| 01421 M01S00063.242l642 +++| 01422 M01S00064.242l642 +++| RMS SUBR ENTRY/EXIT 01423 M01S00065.242l642 +++| RJM RDS 01424 M01S00066.242l642 +++| PJN RMSX IF SUCCESSFUL READ 01425 M01S00067.242l642 +++| LJM EER EVALUATE ERROR RETURN 01426 M00S01083.dsp +++| SQO SPACE 4,10 01427 M00S01084.dsp +++|** SQO - SET QFT OWNERSHIP. 01428 M00S01085.dsp +++|* 01429 M00S01086.dsp +++|* EXIT QFT UPDATED. 01430 M00S01087.dsp +++|* 01431 M00S01088.dsp +++|* USES CN - CN+4, FN - FN+4, UN - UN+4. 01432 M00S01089.dsp +++|* 01433 M00S01090.dsp +++|* CALLS GEA, GFO, SSJ. 01434 M00S01091.dsp +++|* 01435 M00S01092.dsp +++|* MACROS SFA. 01436 M00S01093.dsp +++| 01437 M00S01094.dsp +++| 01438 M00S01095.dsp +++| SQO3 LDD CN+2 SET FO,UI IN SYSTEM SECTOR 01439 M00S01096.dsp +++| STM IOSS+JSNQ*5+2 01440 M00S01097.dsp +++| LDD CN+3 01441 M00S01098.dsp +++| STM IOSS+JSNQ*5+3 01442 M00S01099.dsp +++| 01443 M00S01100.dsp +++| SQO SUBR ENTRY 01444 M00S01101.dsp +++| RJM GEA GET EJT ADDRESS 01445 M00S01102.dsp +++| ADK JSNE GET *FO,UI* FROM EJT 01446 M00S01103.dsp +++| CRD CN 01447 M00S01104.dsp +++| LDD CN+2 SET *FO,UI* IN SYSTEM SECTOR 01448 M00S01105.dsp +++| ADD CN+3 01449 M00S01106.dsp +++| NJN SQO3 IF FAMILY ORDINAL AND UI .NE. 0 01450 M00S01107.dsp +++| LDD MA SAVE FILE NAME 01451 M00S01108.dsp +++| CWD FN 01452 M00S01109.dsp +++| CRD UN 01453 M00S01110.dsp +++| LDD CP DETERMINE FAMILY ORDINAL FROM CPA 01454 M00S01111.dsp +++| ADK PFCW 01455 M00S01112.dsp +++| CRD CN 01456 M00S01113.dsp +++| SFA EST,CN+3 GET FAMILY EST ORDINAL 01457 M00S01114.dsp +++| ADK EQDE 01458 M00S01115.dsp +++| CRD CN 01459 M00S01116.dsp +++| LDD CN+4 LOAD MST ADDRESS 01460 M00S01117.dsp +++| SHN 3 01461 M00S01118.dsp +++| ADK PFGL 01462 M00S01119.dsp +++| CRD FN 01463 M00S01120.dsp +++| CRM FOSS,ON 01464 M00S01121.dsp +++|* LDN (NONZERO) 01465 M00S01122.dsp +++| RJM GFO GET FAMILY ORDINAL 01466 M00S01123.dsp +++| RJM SSJ CHECK FOR SSJ= BLOCK 01467 M00S01124.dsp +++| ZJN SQO1 IF NO SSJ= BLOCK PRESENT 01468 M00S01125.dsp +++| ADK UIDS GET USER INDEX 01469 M00S01126.dsp +++| UJN SQO2 CONTINUE 01470 M00S01127.dsp +++| 01471 M00S01128.dsp +++| SQO1 LDD CP GET UI FROM CPA 01472 M00S01129.dsp +++| ADK UIDW 01473 M00S01130.dsp +++| SQO2 CRD CN 01474 M00S01131.dsp +++| CRM OASS,ON 01475 M00S01132.dsp +++| LDD FN+4 SET FO,UI IN QFT 01476 M00S01133.dsp +++| SHN 6 01477 M00S01134.dsp +++| LMD CN+3 01478 M00S01135.dsp +++| SCN 37 CLEAR CHARGE REQUIRED BIT 01479 M00S01136.dsp +++| LMD CN+3 01480 M00S01137.dsp +++| STD CN+2 01481 M00S01138.dsp +++| LDD CN+4 01482 M00S01139.dsp +++| STD CN+3 01483 M00S01140.dsp +++| LDD MA RESTORE FILE NAME 01484 M00S01141.dsp +++| CWD UN 01485 M00S01142.dsp +++| CRD FN 01486 M00S01143.dsp +++| LJM SQO3 CONTINUE 01487 M00S01144.dsp +++| SSJ SPACE 4,10 01488 M00S01145.dsp +++|** SSJ - CHECK FOR SSJ= BLOCK. 01489 M00S01146.dsp +++|*
| Line S01147 Modification History | |
|---|---|
M01 (Removed by) | ns2323 |
Seq # *Modification Id* Act ----------------------------+ 01490 M01S01147.ns2323 ---|* EXIT (A) = 0, NO SSJ= BLOCK PRESENT. 01491 M01S01148.ns2323 ---|* (A) = SSJ= BLOCK ADDRESS.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2323 |
Seq # *Modification Id* Act ----------------------------+ 01492 M01S00001.ns2323 +++|* EXIT (A) = 0 IF NO SSJ= BLOCK PRESENT. 01493 M01S00002.ns2323 +++|* (A) = SSJ= BLOCK ADDRESS IF PRESENT. 01494 M00S01149.dsp +++|* 01495 M00S01150.dsp +++|* USES CM - CM+4.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2323 |
Seq # *Modification Id* Act ----------------------------+ 01496 M01S00003.ns2323 +++|* 01497 M01S00004.ns2323 +++|* MACROS NFA. 01498 M00S01151.dsp +++| 01499 M00S01152.dsp +++| 01500 M00S01153.dsp +++| SSJ SUBR ENTRY/EXIT 01501 M00S01154.dsp +++| LDD CP CHECK FOR SSJ= 01502 M00S01155.dsp +++| ADC SEPW 01503 M00S01156.dsp +++| CRD CM 01504 M00S01157.dsp +++| LDD CM 01505 M00S01158.dsp +++| LPN 4 01506 M00S01159.dsp +++| ZJN SSJX IF NOT SSJ= 01507 M00S01160.dsp +++| LDD CM+3 CHECK IF SSJ= BLOCK PRESENT 01508 M00S01161.dsp +++| LPN 37
| Line S01162 Modification History | |
|---|---|
M01 (Removed by) | ns2323 |
Seq # *Modification Id* Act ----------------------------+ 01509 M01S01162.ns2323 ---| SHN 14 01510 M01S01163.ns2323 ---| LMD CM+4
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | ns2323 |
Seq # *Modification Id* Act ----------------------------+ 01511 M01S00005.ns2323 +++| ADD CM+4 01512 M00S01164.dsp +++| ZJN SSJX IF NO SSJ= BLOCK
| Line S01165 Modification History | |
|---|---|
M01 (Removed by) | ns2323 |
Seq # *Modification Id* Act ----------------------------+ 01513 M01S01165.ns2323 ---| SHN 14 SET SSJ= ADDRESS 01514 M01S01166.ns2323 ---| ADD RA 01515 M01S01167.ns2323 ---| SHN 6
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | ns2323 |
Seq # *Modification Id* Act ----------------------------+ 01516 M01S00006.ns2323 +++| NFA SSJN SET SSJ= BLOCK ADDRESS 01517 M00S01168.dsp +++| UJN SSJX RETURN 01518 M00S01169.dsp +++| VCA SPACE 4,14 01519 M00S01170.dsp +++|** VCA - VALIDATE CENTRAL ADDRESS. 01520 M00S01171.dsp +++|* 01521 M00S01172.dsp +++|* ENTRY (A) = CENTRAL ADDRESS TO VALIDATE. 01522 M00S01173.dsp +++|* 01523 M00S01174.dsp +++|* EXIT (A) = 0, IF ADDRESS .LE. 1, OR .GE. FL. 01524 M00S01175.dsp +++|* (A) = CENTRAL ADDRESS IF VALID. 01525 M00S01176.dsp +++|* (T1 - T2) = CENTRAL ADDRESS. 01526 M00S01177.dsp +++|* 01527 M00S01178.dsp +++|* USES T1, T2. 01528 M00S01179.dsp +++| 01529 M00S01180.dsp +++| 01530 M00S01181.dsp +++| VCA1 STD T1 CLEAR UPPER PART OF ADDRESS 01531 M00S01182.dsp +++| VCA2 LDN 0 SET BAD ADDRESS FLAG 01532 M00S01183.dsp +++| 01533 M00S01184.dsp +++| VCA SUBR ENTRY/EXIT 01534 M00S01185.dsp +++| STD T2 01535 M00S01186.dsp +++| SCN 1 01536 M00S01187.dsp +++| ZJN VCA1 IF ADDRESS .LE. 1 01537 M00S01188.dsp +++| SCN 77 01538 M00S01189.dsp +++| SHN 6 01539 M00S01190.dsp +++| STD T1 01540 M00S01191.dsp +++| SHN 6 01541 M00S01192.dsp +++| SBD FL 01542 M00S01193.dsp +++| PJN VCA2 IF ADDRESS .GE. FL 01543 M00S01194.dsp +++| LDD T1 01544 M00S01195.dsp +++| SHN 14 01545 M00S01196.dsp +++| LMD T2 01546 M00S01197.dsp +++| UJN VCAX RETURN
| Line S00068 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01547 M01S00068.242l642 +++| WMS SPACE 4,10 01548 M01S00069.242l642 +++|** WMS - WRITE MASS STORAGE. 01549 M01S00070.242l642 +++|* 01550 M01S00071.242l642 +++|* ENTRY (A) = BUFFER ADDRESS. 01551 M01S00072.242l642 +++|* (T5 - T7) = MASS STORAGE PARAMETERS. 01552 M01S00073.242l642 +++|* 01553 M01S00074.242l642 +++|* EXIT (A) .GE. 0. 01554 M01S00075.242l642 +++|* 01555 M01S00076.242l642 +++|* ERROR TO *EER*. 01556 M01S00077.242l642 +++|* 01557 M01S00078.242l642 +++|* CALLS WDS. 01558 M01S00079.242l642 +++| 01559 M01S00080.242l642 +++| 01560 M01S00081.242l642 +++| WMS SUBR ENTRY/EXIT 01561 M01S00082.242l642 +++| RJM WDS 01562 M01S00083.242l642 +++| PJN WMSX IF SUCCESSFUL WRITE 01563 M01S00084.242l642 +++| LJM EER EVALUATE ERROR RETURN 01564 M00S01198.dsp +++| SPACE 4,10 01565 M00S01199.dsp +++|** COMMON DECKS. 01566 M00S01200.dsp +++|
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | dsp16 |
Seq # *Modification Id* Act ----------------------------+ 01567 M01S00001.dsp16 +++| 01568 M00S01201.dsp +++| EJT$ SET 1 CALCULATE EJT ADDRESS 01569 M00S01202.dsp +++| IFP$ EQU 1 ASSEMBLE REMOTE INITIALIZATION CODE 01570 M00S01203.dsp +++| QFT$ SET 1 CALCULATE QFT ADDRESS 01571 M00S01204.dsp +++|*CALL COMPGFP
| Line S01205 Modification History | |
|---|---|
M01 (Removed by) | dsp16 |
Seq # *Modification Id* Act ----------------------------+ 01572 M01S01205.dsp16 ---|*CALL COMPIAM 01573 M00S01206.dsp +++| GFO$ SET 1 CONVERT FAMILY NAME TO FAMILY ORDINAL 01574 M00S01207.dsp +++| GFM$ SET 1 CONVERT FAMILY ORDINAL TO FAMILY NAME 01575 M00S01208.dsp +++|*CALL COMPUFT
| Line S00085 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01576 M01S00085.242l642 +++| QUAL MIO 01577 M01S00086.242l642 +++| WDS EQU WMS USE *WMS* IN PLACE OF *WDS* 01578 M00S01209.dsp +++| WEI$ SET 1 ALLOW *DSP* TO SPECIFY EOI BUFFER 01579 M00S01210.dsp +++|*CALL COMPWEI
| Line S00087 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01580 M01S00087.242l642 +++| QUAL * 01581 M01S00088.242l642 +++| WEI EQU /MIO/WEI
| Line S01211 Modification History | |
|---|---|
M01 (Removed by) | ns2185 |
Seq # *Modification Id* Act ----------------------------+ 01582 M01S01211.ns2185 ---|*CALL COMPWSS 01583 M00S01212.dsp +++| SPACE 4,10 01584 M00S01213.dsp +++|* THE FOLLOWING SUBROUTINES MAY BE OVERLAID BY *DSP* OVERLAYS. 01585 M00S01214.dsp +++| SPACE 4,10 01586 M00S01215.dsp +++| OVL4 EQU *+5 LOAD ADDRESS FOR *DSP* OVERLAYS 01587 M00S01216.dsp +++| 01588 M00S01217.dsp +++| ERRNG OVL2-5-* OVERFLOW INTO *0DF* 01589 M00S01218.dsp +++| ERRNG OVL0-5-* OVERFLOW INTO *0DQ* 01590 M00S01219.dsp +++| TITLE FILE INITIALIZATION ROUTINES.
| Line S01220 Modification History | |
|---|---|
M01 (Removed by) | dsp46 |
Seq # *Modification Id* Act ----------------------------+ 01591 M01S01220.dsp46 ---| AMS SPACE 4,10
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | dsp46 |
Seq # *Modification Id* Act ----------------------------+ 01592 M01S00001.dsp46 +++| AMS SPACE 4,20 01593 M00S01221.dsp +++|** AMS - ASSIGN MASS STORAGE. 01594 M00S01222.dsp +++|* 01595 M00S01223.dsp +++|* ENTRY (FS - FS+4) = FST ENTRY. 01596 M00S01224.dsp +++|* (FA) = NFL FNT OFFSET. 01597 M00S01225.dsp +++|* 01598 M00S01226.dsp +++|* EXIT (FS - FS+4) = FST ENTRY. 01599 M00S01227.dsp +++|* MASS STORAGE ASSIGNED.
| Line S01228 Modification History | |
|---|---|
M01 (Removed by) | dsp46 |
Seq # *Modification Id* Act ----------------------------+ 01600 M01S01228.dsp46 ---|* EOI WRITTEN.
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | dsp46 |
Seq # *Modification Id* Act ----------------------------+ 01601 M01S00002.dsp46 +++|* SYSTEM SECTOR AND EOI WRITTEN. 01602 M00S01229.dsp +++|* (T5) = EQUIPMENT. 01603 M00S01230.dsp +++|*
| Line S01231 Modification History | |
|---|---|
M01 (Removed by) | dsp46 |
Seq # *Modification Id* Act ----------------------------+ 01604 M01S01231.dsp46 ---|* USES CM - CM+4, FS - FS+4, T5 - T7.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | dsp46 |
Seq # *Modification Id* Act ----------------------------+ 01605 M01S00003.dsp46 +++|* USES T5, T6, CM - CM+4, FS - FS+4. 01606 M00S01232.dsp +++|*
| Line S01233 Modification History | |
|---|---|
M01 (Removed by) | dsp46 |
Seq # *Modification Id* Act ----------------------------+ 01607 M01S01233.dsp46 ---|* CALLS PDF, WEI.
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | dsp46 |
Seq # *Modification Id* Act ----------------------------+ 01608 M01S00004.dsp46 +++|* CALLS PDF, WEI, WSS. 01609 M00S01234.dsp +++|* 01610 M00S01235.dsp +++|* MACROS ENDMS, MONITOR, NFA, SETMS. 01611 M00S01236.dsp +++| 01612 M00S01237.dsp +++| 01613 M00S01238.dsp +++| AMS SUBR ENTRY/EXIT 01614 M00S01239.dsp +++| LDD FS+2 01615 M00S01240.dsp +++| NJN AMSX IF FILE USED 01616 M00S01241.dsp +++| LDD FS+1 01617 M00S01242.dsp +++| NJN AMS2 IF FILE ASSIGNED 01618 M00S01243.dsp +++| 01619 M00S01244.dsp +++|* ASSIGN MASS STORAGE. 01620 M00S01245.dsp +++| 01621 M00S01246.dsp +++| AMS1 LDN ZERL CLEAR PARAMETERS 01622 M00S01247.dsp +++| CRD CM 01623 M00S01248.dsp +++| LDN OUTS SET *RTCM* PARAMETER FOR OUTPUT FILE 01624 M00S01249.dsp +++| STD CM+2 01625 M00S01250.dsp +++| LDM LFAL SET ACCESS LEVEL SELECTION 01626 M00S01251.dsp +++| ADN 40 01627 M00S01252.dsp +++| SHN 6 01628 M00S01253.dsp +++| STD CM+3 01629 M00S01254.dsp +++| MONITOR RTCM REQUEST TRACK CHAIN 01630 M00S01255.dsp +++| LDD CM+1 SET EQUIPMENT
| Line S01256 Modification History | |
|---|---|
M01 (Removed by) | dsp14 |
Seq # *Modification Id* Act ----------------------------+ 01631 M01S01256.dsp14 ---| STD T5 01632 M00S01257.dsp +++| STD FS 01633 M00S01258.dsp +++| LDD CM+4 01634 M00S01259.dsp +++| NJN AMS2 IF TRACK ASSIGNED 01635 M00S01260.dsp +++| RJM PDF PROCESS DEVICE FULL 01636 M00S01261.dsp +++| UJN AMS1 RETRY MASS STORAGE ALLOCATION 01637 M00S01262.dsp +++| 01638 M00S01263.dsp +++|* UPDATE FNT/FST. 01639 M00S01264.dsp +++| 01640 M00S01265.dsp +++| AMS2 STD FS+1 SET FIRST TRACK 01641 M00S01266.dsp +++| STD FS+2 01642 M00S01267.dsp +++| STD T6
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | dsp14 |
Seq # *Modification Id* Act ----------------------------+ 01643 M01S00001.dsp14 +++| LDD FS SET *EST* ORDINAL 01644 M01S00002.dsp14 +++| STD T5 01645 M00S01268.dsp +++| LDN FSMS SET FIRST SECTOR
| Line S01269 Modification History | |
|---|---|
M01 (Removed by) | dsp46 |
Seq # *Modification Id* Act ----------------------------+ 01646 M01S01269.dsp46 ---| STD T7 01647 M00S01270.dsp +++| STD FS+3 01648 M00S01271.dsp +++| LDN 14 SET FILE BUSY 01649 M00S01272.dsp +++| STD FS+4
| Line S01273 Modification History | |
|---|---|
M01 (Removed by) | dsp46 |
Seq # *Modification Id* Act ----------------------------+ 01650 M01S01273.dsp46 ---| 01651 M01S01274.dsp46 ---|* WRITE EOI AND UPDATE TRT. 01652 M01S01275.dsp46 ---| 01653 M00S01276.dsp +++| NFA FA,R WRITE FST 01654 M00S01277.dsp +++| ADN FSTL 01655 M00S01278.dsp +++| CWD FS
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | dsp46 |
Seq # *Modification Id* Act ----------------------------+ 01656 M01S00005.dsp46 +++| 01657 M01S00006.dsp46 +++|* WRITE SYSTEM SECTOR AND EOI. 01658 M01S00007.dsp46 +++|
| Line S01279 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01659 M01S01279.242l642 ---| SETMS WRITE,NE
| Line S00089 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01660 M01S00089.242l642 +++| SETMS IO
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | dsp46 |
Seq # *Modification Id* Act ----------------------------+ 01661 M01S00008.dsp46 +++| RJM WSS WRITE SYSTEM SECTOR 01662 M00S01280.dsp +++| LDC BFMS ADDRESS OF EOI BUFFER 01663 M00S01281.dsp +++| RJM WEI WRITE EOI 01664 M00S01282.dsp +++| ENDMS
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | dsp46 |
Seq # *Modification Id* Act ----------------------------+ 01665 M01S00009.dsp46 +++| 01666 M01S00010.dsp46 +++|* UPDATE TRT. 01667 M01S00011.dsp46 +++| 01668 M00S01283.dsp +++| LDD T5 SET EQUIPMENT 01669 M00S01284.dsp +++| STD CM+1 01670 M00S01285.dsp +++| LDD T6 SET TRACK 01671 M00S01286.dsp +++| LPC 3777 01672 M00S01287.dsp +++| STD CM+2 01673 M00S01288.dsp +++| LDD T7 SET SECTOR 01674 M00S01289.dsp +++| STD CM+3 01675 M00S01290.dsp +++| MONITOR DTKM DROP TRACKS AND UPDATE TRT
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2171 |
Seq # *Modification Id* Act ----------------------------+ 01676 M01S00002.ns2171 +++| LDM SLM SET SECTOR COUNT 01677 M01S00003.ns2171 +++| STM DPPC+1 01678 M01S00004.ns2171 +++| LDN CDCS SET DECREMENT FUNCTION 01679 M01S00005.ns2171 +++| STM DPPB 01680 M00S01291.dsp +++| LJM AMSX RETURN 01681 M00S01292.dsp +++| CSL SPACE 4,10 01682 M00S01293.dsp +++|** CSL - CHECK FOR SPECIAL LID. 01683 M00S01294.dsp +++|* 01684 M00S01295.dsp +++|* ENTRY (A) = LID (MAY BE SPECIAL CODE). 01685 M00S01296.dsp +++|* 01686 M00S01297.dsp +++|* EXIT (A) = LID, IF NO SPECIAL CODE. 01687 M00S01298.dsp +++|* (A) = 0 IF SPECIAL CODE = *LCZR*. 01688 M00S01299.dsp +++|* (A) = PID IF SPECIAL CODE = *LCPD*. 01689 M00S01300.dsp +++|* 01690 M00S01301.dsp +++|* USES T1, CM - CM+4. 01691 M00S01302.dsp +++| 01692 M00S01303.dsp +++| 01693 M00S01304.dsp +++| CSL1 SHN 14 RESTORE LID AND EXIT 01694 M00S01305.dsp +++| LMD T1 01695 M00S01306.dsp +++| 01696 M00S01307.dsp +++| 01697 M00S01308.dsp +++| CSL SUBR ENTRY/EXIT 01698 M00S01309.dsp +++| STD T1 01699 M00S01310.dsp +++| SHN -14 01700 M00S01311.dsp +++| NJN CSL1 IF NOT SPECIAL CODE 01701 M00S01312.dsp +++| LDD T1 01702 M00S01313.dsp +++| ZJN CSLX IF ZERO LID 01703 M00S01314.dsp +++| SBN LCZR 01704 M00S01315.dsp +++| ZJN CSLX IF *ZERO LID* CODE SPECIFIED 01705 M00S01316.dsp +++| ERRNZ LCPD-2 CODE DEPENDS ON VALUE 01706 M00S01317.dsp +++| ERRNZ MXLC-3 CODE DEPENDS ON VALUE 01707 M00S01318.dsp +++|
| Line S01319 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01708 M01S01319.v23l617 ---|* GET PID FROM LID TABLE.
| Line S00040 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01709 M01S00040.v23l617 +++|* CREATE HOST PID USING THE MACHINE ID. 01710 M00S01320.dsp +++|
| Line S01321 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01711 M01S01321.v23l617 ---| LDC LIDP GET LID POINTER
| Line S00041 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01712 M01S00041.v23l617 +++| LDK MMFL GET MACHINE ID 01713 M00S01322.dsp +++| CRD CM
| Line S01323 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01714 M01S01323.v23l617 ---| LDD CM 01715 M01S01324.v23l617 ---| SHN 14 01716 M01S01325.v23l617 ---| LMD CM+1 01717 M01S01326.v23l617 ---| ADN 1 READ FIRST WORD OF LID TABLE 01718 M01S01327.v23l617 ---| CRD CM 01719 M01S01328.v23l617 ---| LDD CM+1 01720 M01S01329.v23l617 ---| SCN 77 01721 M01S01330.v23l617 ---| SHN 6 01722 M01S01331.v23l617 ---| LMD CM 01723 M01S01332.v23l617 ---| SHN 6
| Line S00042 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01724 M01S00042.v23l617 +++| LDN 1RM 01725 M01S00043.v23l617 +++| SHN 14 01726 M01S00044.v23l617 +++| LMD CM MERGE *M* WITH MACHINE ID 01727 M00S01333.dsp +++| UJN CSLX RETURN 01728 M00S01334.dsp +++| EDF SPACE 4,25 01729 M00S01335.dsp +++|** EDF - ENTER DEFERRED FILE. 01730 M00S01336.dsp +++|* 01731 M00S01337.dsp +++|* ENTRY (QT) = QUEUE TYPE. 01732 M00S01338.dsp +++|* (ST) = STATUS WORD. 01733 M00S01339.dsp +++|* (FA) = NFL FNT ENTRY OFFSET. 01734 M00S01340.dsp +++|* 01735 M00S01341.dsp +++|* EXIT *BFMS* CONTAINS UPDATED SYSTEM SECTOR FOR QUEUED FILE. 01736 M00S01342.dsp +++|* (FS - FS+4) = QUEUED FILE FST ENTRY. 01737 M00S01343.dsp +++|* (ST) = STATUS WORD. 01738 M00S01344.dsp +++|* 01739 M00S01345.dsp +++|* ERROR TO *ERR*, IF ONE OF THE FOLLOWING OCCURS, 01740 M00S01346.dsp +++|* THIS ROUTING NOT ALLOWED. 01741 M00S01347.dsp +++|* 01742 M00S01348.dsp +++|* USES QA, ST, FN - FN+4, FS - FS+4. 01743 M00S01349.dsp +++|* 01744 M00S01350.dsp +++|* CALLS FNB, FQI. 01745 M00S01351.dsp +++|* 01746 M00S01352.dsp +++|* MACROS ERROR, NFA. 01747 M00S01353.dsp +++| 01748 M00S01354.dsp +++| 01749 M00S01355.dsp +++| EDF4 AOM DPPA SET FILE NOT BUSY 01750 M00S01356.dsp +++| LJM DPP DROP PPU 01751 M00S01357.dsp +++| 01752 M00S01358.dsp +++| EDF SUBR ENTRY/EXIT 01753 M00S01359.dsp +++| 01754 M00S01360.dsp +++|* USE QUEUE TYPE FROM SYSTEM SECTOR, IF NOT SPECIFIED IN CALL. 01755 M00S01361.dsp +++| 01756 M00S01362.dsp +++| LDD ST CHECK IF DISPOSITION CODE SPECIFIED 01757 M00S01363.dsp +++| LPC DCFL 01758 M00S01364.dsp +++| NJN EDF1 IF DISPOSITION CODE SPECIFIED 01759 M00S01365.dsp +++| LDM IOSS+JSNQ*5+4 USE QUEUE TYPE FROM SYSTEM SECTOR 01760 M00S01366.dsp +++| SHN -11 01761 M00S01367.dsp +++| STD QT 01762 M00S01368.dsp +++| 01763 M00S01369.dsp +++|* DETERMINE IF QUEUE TYPE HAS CHANGED. 01764 M00S01370.dsp +++| 01765 M00S01371.dsp +++| EDF1 LDM IOSS+JSNQ*5+4 01766 M00S01372.dsp +++| SHN -11 01767 M00S01373.dsp +++| LMD QT 01768 M00S01374.dsp +++| ZJN EDF2 IF NO CHANGE IN QUEUE TYPE 01769 M00S01375.dsp +++| ERROR /ERR/EC26 * DSP - THIS ROUTING NOT ALLOWED.* 01770 M00S01376.dsp +++| 01771 M00S01377.dsp +++| EDF2 LDN DSFL FLAG DATA IN SYSTEM SECTOR 01772 M00S01378.dsp +++| RAD ST 01773 M00S01379.dsp +++| LDM GQSS GET ORDINAL NUMBER 01774 M00S01380.dsp +++| STD QA 01775 M00S01381.dsp +++| LDN 0 SET *INTERLOCK* FUNCTION 01776 M00S01382.dsp +++| RJM FQI FUNCTION QFT INTERLOCK 01777 M00S01383.dsp +++| NJN EDF4 IF ENTRY NOT INTERLOCKED 01778 M00S01384.dsp +++| NFA FA,R READ FNT ENTRY OF FILE 01779 M00S01385.dsp +++| CRD FN
| Line S01386 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01780 M01S01386.242l642 ---| ADN FSTG
| Line S00090 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01781 M01S00090.242l642 +++| ADN FSTL 01782 M00S01387.dsp +++| CRD FS 01783 M00S01388.dsp +++| LDM IOSS+JSNQ*5+4 CLEAR ATTACHED TO EJT BIT 01784 M00S01389.dsp +++| SCN 77 01785 M00S01390.dsp +++| STM IOSS+JSNQ*5+4 01786 M00S01391.dsp +++| 01787 M00S01392.dsp +++|* DETERMINE IF FILE IS BEING REQUEUED. 01788 M00S01393.dsp +++| 01789 M00S01394.dsp +++| LDM FGSS CHECK IF FILE BEING REQUEUED 01790 M00S01395.dsp +++| LPN 2 01791 M00S01396.dsp +++| ZJN EDF3 IF FILE NOT BEING REQUEUED 01792 M00S01397.dsp +++| LDC RQFL SAVE *FILE BEING REQUEUED* STATUS 01793 M00S01398.dsp +++| RAD ST
| Line S01399 Modification History | |
|---|---|
M01 (Removed by) | ns2663 |
Seq # *Modification Id* Act ----------------------------+ 01794 M01S01399.ns2663 ---| LDC LDCI+1RR ISSUE *ARRQ* MESSAGE AT TERMINATION 01795 M01S01400.ns2663 ---| STM DSPA 01796 M01S01401.ns2663 ---| LDC 2RRQ 01797 M01S01402.ns2663 ---| STM DSPA+1 01798 M00S01403.dsp +++| EDF3 LJM EDFX RETURN 01799 M00S01404.dsp +++| EFN SPACE 4,15 01800 M00S01405.dsp +++|** EFN - ENTER FILE NAME IN FNT TABLE. 01801 M00S01406.dsp +++|*
| Line S01407 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01802 M01S01407.v23l617 ---|* ENTRY (UN - UN+4) = FILE NAME.
| Line S00045 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01803 M01S00045.v23l617 +++|* ENTRY (FN - FN+4) = FILE NAME. 01804 M00S01408.dsp +++|* 01805 M00S01409.dsp +++|* EXIT (FS - FS+4) = FST ENTRY. 01806 M00S01410.dsp +++|* (FA) = NFL FNT OFFSET. 01807 M00S01411.dsp +++|* (FNBB) INCREMENTED. 01808 M00S01412.dsp +++|* (LFAL) = ACCESS LEVEL OF NEW FILE. 01809 M00S01413.dsp +++|* 01810 M00S01414.dsp +++|* ERROR TO *DPP*, IF DUPLICATE FILE ROUND. 01811 M00S01415.dsp +++|*
| Line S01416 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01812 M01S01416.v23l617 ---|* USES FS, CM - CM+4.
| Line S00046 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01813 M01S00046.v23l617 +++|* USES FS, CM - CM+4, UN - UN+4. 01814 M00S01417.dsp +++|* 01815 M00S01418.dsp +++|* CALLS *0BF*. 01816 M00S01419.dsp +++|* 01817 M00S01420.dsp +++|* MACROS EXECUTE, MONITOR, NFA. 01818 M00S01421.dsp +++| 01819 M00S01422.dsp +++| 01820 M00S01423.dsp +++| EFN1 AOM FNBB SET FILE CREATED BY *DSP* 01821 M00S01424.dsp +++| NFA FA,R 01822 M00S01425.dsp +++| ADK FUTL 01823 M00S01426.dsp +++| CRD CM 01824 M00S01427.dsp +++| LDD CM+2 01825 M00S01428.dsp +++| LPN 7 01826 M00S01429.dsp +++| STM LFAL 01827 M00S01430.dsp +++| 01828 M00S01431.dsp +++| EFN SUBR ENTRY/EXIT
| Line S00047 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01829 M01S00047.v23l617 +++| LDD MA GET FILE NAME 01830 M01S00048.v23l617 +++| CWD FN 01831 M01S00049.v23l617 +++| CRD UN 01832 M00S01432.dsp +++| LDN NEEQ SET NO MASS STORAGE ASSIGNMENT 01833 M00S01433.dsp +++| STD FS 01834 M00S01434.dsp +++| LDN 0 SELECT NO RETURN WITHOUT FILE CREATED 01835 M00S01435.dsp +++| STM OVL0-1 01836 M00S01436.dsp +++| EXECUTE 0BF,OVL0 BEGIN FILE 01837 M00S01437.dsp +++| UJN EFN1 NO DUPLICATE ENTRY 01838 M00S01438.dsp +++|
| Line S01439 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01839 M01S01439.241l630 ---| MONITOR HNGM HANG PP
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01840 M01S00003.241l630 +++|* PROCESS ADVANCE EXIT FROM *0BF* (FILE ALREADY EXISTS). 01841 M01S00004.241l630 +++| 01842 M01S00005.241l630 +++| LDN SWET SET SYSTEM SOFTWARE ERROR 01843 M01S00006.241l630 +++| STD CM+2 01844 M01S00007.241l630 +++| LDC * SET ADDRESS WHERE ERROR DETECTED 01845 M01S00008.241l630 +++| STD CM+1 01846 M01S00009.241l630 +++| MONITOR CHGM CONDITIONALLY HANG PP 01847 M00S01440.dsp +++| LJM DPP DROP PP 01848 M00S01441.dsp +++| EQF SPACE 4,10 01849 M00S01442.dsp +++|** EQF - ENTER QUEUED FILE IN GLOBAL TABLE. 01850 M00S01443.dsp +++|* 01851 M00S01444.dsp +++|* EXIT (QA) = ORDINAL OF ENTRY.
| Line S01445 Modification History | |
|---|---|
M01 (Removed by) | ns2369 |
Seq # *Modification Id* Act ----------------------------+ 01852 M01S01445.ns2369 ---|* QFT UPDATED.
| Line S00013 Modification History | |
|---|---|
M01 (Added by) | ns2369 |
Seq # *Modification Id* Act ----------------------------+ 01853 M01S00013.ns2369 +++|* (FNBA) = 1 (CREATION MODE). 01854 M01S00014.ns2369 +++|* QFT BUFFER INITIALIZED. 01855 M00S01446.dsp +++|* *QFT FULL.* MESSAGE ISSUED TO OPERATOR, IF 01856 M00S01447.dsp +++|* CANNOT MAKE AN ENTRY IN THE QFT. 01857 M00S01448.dsp +++|* 01858 M00S01449.dsp +++|* USES QA, CM - CM+7. 01859 M00S01450.dsp +++|* TO *RCL* IF QFT FULL. 01860 M00S01451.dsp +++|* 01861 M00S01452.dsp +++|* CALLS CTE, FNB, GEA. 01862 M00S01453.dsp +++|* 01863 M00S01454.dsp +++|* MACROS ERROR, PAUSE, SFA. 01864 M00S01455.dsp +++| 01865 M00S01456.dsp +++| 01866 M00S01457.dsp +++| EQF SUBR ENTRY/EXIT
| Line S01458 Modification History | |
|---|---|
M01 (Removed by) | ns2556 |
Seq # *Modification Id* Act ----------------------------+ 01867 M01S01458.ns2556 ---| LDM SBSN SET SUBSYSTEM NAME AS JSN
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | ns2556 |
Seq # *Modification Id* Act ----------------------------+ 01868 M01S00016.ns2556 +++| LDM FJSN SET FORCED JSN OR SUBSYSTEM NAME 01869 M00S01459.dsp +++| STD CM+3
| Line S01460 Modification History | |
|---|---|
M01 (Removed by) | ns2556 |
Seq # *Modification Id* Act ----------------------------+ 01870 M01S01460.ns2556 ---| LDM SBSN+1
| Line S00017 Modification History | |
|---|---|
M01 (Added by) | ns2556 |
Seq # *Modification Id* Act ----------------------------+ 01871 M01S00017.ns2556 +++| LDM FJSN+1 01872 M00S01461.dsp +++| STD CM+4 01873 M00S01462.dsp +++| LDD FB CHECK FOR JOB TERMINATION 01874 M00S01463.dsp +++| SHN 21-11 01875 M00S01464.dsp +++| PJN EQF2 IF NOT FINAL ROUTE FOR TERMINATING JOB 01876 M00S01465.dsp +++| RJM GEA GET EJT-S JSN 01877 M00S01466.dsp +++| ADK JSNE 01878 M00S01467.dsp +++| CRD CM+3 01879 M00S01468.dsp +++| EQF1 LDN 0 ZERO FILL JSN 01880 M00S01469.dsp +++| STD CM+5 01881 M00S01470.dsp +++| STD CM+6 01882 M00S01471.dsp +++| AOM EQFA PREVENT ALLOCATION OF NEW JSN 01883 M00S01472.dsp +++| UJN EQF4 CONTINUE 01884 M00S01473.dsp +++|
| Line S01474 Modification History | |
|---|---|
M01 (Removed by) | ns2493 |
Seq # *Modification Id* Act ----------------------------+ 01885 M01S01474.ns2493 ---| EQF2 LDD FB+1
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | ns2493 |
Seq # *Modification Id* Act ----------------------------+ 01886 M01S00021.ns2493 +++| EQF2 LDM FSJS 01887 M01S00022.ns2493 +++| NJN EQF1 IF FORCED JSN 01888 M01S00023.ns2493 +++| LDD FB+1 01889 M00S01475.dsp +++| SHN 21-13 01890 M00S01476.dsp +++| PJN EQF3 IF NOT SUBSYSTEM INITIATION 01891 M00S01477.dsp +++| LDM SBID 01892 M00S01478.dsp +++| ZJN EQF1 IF SUBSYSTEM ID NOT SPECIFIED 01893 M00S01479.dsp +++| SBK LSSI+1 01894 M00S01480.dsp +++| PJN EQF1 IF SPECIFIED SUBSYSTEM IS IN *SSCT* TABLE 01895 M00S01481.dsp +++| EQF3 LDN ZERL SET UP FOR *CTE* CALL (ASSIGN NEW JSN) 01896 M00S01482.dsp +++| CRD CM+3 01897 M00S01483.dsp +++| EQF4 LDN 7 SET CREATION + ATTACH + INTERLOCK 01898 M00S01484.dsp +++| STD CM+7 01899 M00S01485.dsp +++| LDC PQFT REQUEST QFT ENTRY 01900 M00S01486.dsp +++|* LDC PQFT+10000 (IF NEW JSN NOT NEEDED) 01901 M00S01487.dsp +++| EQFA EQU *-2 01902 M00S01488.dsp +++| RJM CTE CREATE TABLE ENTRY 01903 M00S01489.dsp +++| NJN EQF6 IF ENTRY MADE 01904 M00S01490.dsp +++| LDD CP CONSOLE MESSAGE = * QFT FULL.* 01905 M00S01491.dsp +++| ADK MS2W 01906 M00S01492.dsp +++| CWM EQFB,TR 01907 M00S01493.dsp +++| PAUSE 01908 M00S01494.dsp +++| LDD FB CHECK IF ERROR PROCESSING NEEDED 01909 M00S01495.dsp +++| LPN 1 01910 M00S01496.dsp +++| ADD CM+1 CHECK FOR ERROR FLAG AT CONTROL POINT 01911 M00S01497.dsp +++| ZJN EQF5 IF NO ERROR PROCESSING NEEDED 01912 M00S01498.dsp +++| ERROR /ERR/EC25 * DSP - QFT FULL.* 01913 M00S01499.dsp +++| 01914 M00S01500.dsp +++| EQF5 LJM RCL RECALL PP 01915 M00S01501.dsp +++| 01916 M00S01502.dsp +++| EQF6 LDD CM+1 SAVE QFT ORDINAL 01917 M00S01503.dsp +++| STD QA
| Line S01504 Modification History | |
|---|---|
M01 (Removed by) | ns2369 |
Seq # *Modification Id* Act ----------------------------+ 01918 M01S01504.ns2369 ---| AOM FNBA SET ENTRY MADE BY *DSP*
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | ns2369 |
Seq # *Modification Id* Act ----------------------------+ 01919 M01S00015.ns2369 +++| AOM FNBA SET CREATION MODE QFT ENTRY 01920 M00S01505.dsp +++| SFA QFT,QA GET ASSIGNED JSN 01921 M00S01506.dsp +++| ADK JSNQ 01922 M00S01507.dsp +++| CRM IOSS,ON 01923 M00S01508.dsp +++| LDN 0 CLEAR INTERLOCK AND CREATION BITS 01924 M00S01509.dsp +++| STM IOSS+JSNQ*5+4 01925 M00S01510.dsp +++| LDD FS SET EQUIPMENT 01926 M00S01511.dsp +++| STM IOSS+ENTQ*5+0 01927 M00S01512.dsp +++| LDD FS+1 SET TRACK 01928 M00S01513.dsp +++| STM IOSS+ENTQ*5+1 01929 M00S01514.dsp +++| LJM EQFX RETURN 01930 M00S01515.dsp +++| 01931 M00S01516.dsp +++| EQFB DATA C* QFT FULL.* 01932 M00S01517.dsp +++| GLI SPACE 4,10 01933 M00S01518.dsp +++|** GLI - GET LOGICAL IDENTIFIERS. 01934 M00S01519.dsp +++|* 01935 M00S01520.dsp +++|* ENTRY (QT) = DESTINATION QUEUE TYPE. 01936 M00S01521.dsp +++|* 01937 M00S01522.dsp +++|* EXIT DLID/SLID SAVED FOR SYSTEM SECTOR AND QFT. 01938 M00S01523.dsp +++|* 01939 M00S01524.dsp +++|* USES T1, CN - CN+4. 01940 M00S01525.dsp +++|* 01941 M00S01526.dsp +++|* CALLS CSL, GFA. 01942 M00S01527.dsp +++| 01943 M00S01528.dsp +++| 01944 M00S01529.dsp +++| GLI SUBR ENTRY/EXIT 01945 M00S01530.dsp +++| LDM SLSS PROPAGATE OLD VALUES OF DLID/SLID 01946 M00S01531.dsp +++| LPN 77 01947 M00S01532.dsp +++| STM SLID 01948 M00S01533.dsp +++| LDM SLSS+1 01949 M00S01534.dsp +++| STM SLID+1 01950 M00S01535.dsp +++| LDM IOSS+INSQ*5+2 01951 M00S01536.dsp +++| SCN 77 01952 M00S01537.dsp +++| SHN 6 01953 M00S01538.dsp +++| LMM IOSS+INSQ*5+1 01954 M00S01539.dsp +++| SHN 6 01955 M00S01540.dsp +++| STM DLID+1 01956 M00S01541.dsp +++| SHN -14 01957 M00S01542.dsp +++| STM DLID 01958 M00S01543.dsp +++| LDD QT 01959 M00S01544.dsp +++| LMK INQT 01960 M00S01545.dsp +++| ZJN GLI1 IF ROUTE TO INPUT 01961 M00S01546.dsp +++| LDM SLID SET DLID = SLID FOR OUTPUT FILES 01962 M00S01547.dsp +++| STM DLID 01963 M00S01548.dsp +++| LDM SLID+1 01964 M00S01549.dsp +++| STM DLID+1 01965 M00S01550.dsp +++| GLI1 LDD FB+1 01966 M00S01551.dsp +++| LPN FRLD 01967 M00S01552.dsp +++| ZJN GLI4 IF DLID/SLID NOT SPECIFIED 01968 M00S01553.dsp +++| 01969 M00S01554.dsp +++|* GET DLID FROM PARAMETER BLOCK. 01970 M00S01555.dsp +++| 01971 M00S01556.dsp +++| RJM GFA GET SLID/DLID 01972 M00S01557.dsp +++| ADN 2 01973 M00S01558.dsp +++| CRD CN 01974 M00S01559.dsp +++| LDD CN+1 CHECK DLID 01975 M00S01560.dsp +++| LPN 77 01976 M00S01561.dsp +++| SHN 14 01977 M00S01562.dsp +++| LMD CN+2 01978 M00S01563.dsp +++| RJM CSL CHECK FOR SPECIAL LID 01979 M00S01564.dsp +++| STM DLID+1 SAVE DLID 01980 M00S01565.dsp +++| SHN -14 01981 M00S01566.dsp +++| STM DLID 01982 M00S01567.dsp +++| 01983 M00S01568.dsp +++|* GET SLID FROM PARAMETER BLOCK. 01984 M00S01569.dsp +++| 01985 M00S01570.dsp +++| LDD CN+1 CHECK SLID 01986 M00S01571.dsp +++| SCN 77 01987 M00S01572.dsp +++| SHN 6 01988 M00S01573.dsp +++| LMD CN 01989 M00S01574.dsp +++| ZJN GLI4 IF NO CHANGE IN SLID 01990 M00S01575.dsp +++| SHN 6 01991 M00S01576.dsp +++| GLI2 RJM CSL CHECK FOR SPECIAL LID 01992 M00S01577.dsp +++| STM SLID+1 SAVE SLID 01993 M00S01578.dsp +++| SHN -14 01994 M00S01579.dsp +++| STM SLID 01995 M00S01580.dsp +++| GLI3 UJN GLI5 SET ATTRIBUTES 01996 M00S01581.dsp +++| 01997 M00S01582.dsp +++|* CHECK IF DEFAULT SLID NEEDED. 01998 M00S01583.dsp +++| 01999 M00S01584.dsp +++| GLI4 LDM SLID 02000 M00S01585.dsp +++| ADM SLID+1 02001 M00S01586.dsp +++| NJN GLI5 IF SLID NONZERO
| Line S01587 Modification History | |
|---|---|
M01 (Removed by) | dsp31 |
Seq # *Modification Id* Act ----------------------------+ 02002 M01S01587.dsp31 ---| LDN 2
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | dsp31 |
Seq # *Modification Id* Act ----------------------------+ 02003 M01S00001.dsp31 +++| LDN LCPD 02004 M00S01588.dsp +++| UJN GLI2 SET SLID TO PID 02005 M00S01589.dsp +++| 02006 M00S01590.dsp +++|* GET ATTRIBUTES OF DLID/SLID. 02007 M00S01591.dsp +++| 02008 M00S01592.dsp +++| GLI5 LDM DLID GET DLID ATTRIBUTES 02009 M00S01593.dsp +++| SHN 14 02010 M00S01594.dsp +++| LMM DLID+1 02011 M00S01595.dsp +++| ZJN GLI6 IF NO DLID 02012 M00S01596.dsp +++| RJM VID GET ATTRIBUTES FROM LID TABLE
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | dsp19 |
Seq # *Modification Id* Act ----------------------------+ 02013 M01S00001.dsp19 +++| ZJN GLI6 IF LID TABLE NOT FOUND 02014 M00S01597.dsp +++| STM DLAT SAVE ATTRIBUTES 02015 M00S01598.dsp +++| GLI6 LDM SLID GET SLID ATTRIBUTES 02016 M00S01599.dsp +++| SHN 14 02017 M00S01600.dsp +++| LMM SLID+1 02018 M00S01601.dsp +++| ZJN GLI7 IF NO SLID 02019 M00S01602.dsp +++| RJM VID GET ATTRIBUTES FROM LID TABLE
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | dsp19 |
Seq # *Modification Id* Act ----------------------------+ 02020 M01S00002.dsp19 +++| ZJN GLI7 IF LID TABLE NOT FOUND 02021 M00S01603.dsp +++| STM SLAT SAVE ATTRIBUTES 02022 M00S01604.dsp +++| GLI7 LJM GLIX RETURN 02023 M00S01605.dsp +++| ISS SPACE 4,25 02024 M00S01606.dsp +++|** ISS - INITIALIZE SYSTEM SECTORS. 02025 M00S01607.dsp +++|* 02026 M00S01608.dsp +++|* ENTRY (FN - FN+4) = QUEUED FILE FNT ENTRY. 02027 M00S01609.dsp +++|* (FS - FS+4) = FST ENTRY 02028 M00S01610.dsp +++|* (FA) = NFL FNT ENTRY OFFSET. 02029 M00S01611.dsp +++|* (ST) = STATUS WORD. 02030 M00S01612.dsp +++|* (QT) = DESTINATION QUEUE TYPE. 02031 M00S01613.dsp +++|* 02032 M00S01614.dsp +++|* EXIT *BFMS* CONTAINS SYSTEM SECTOR FOR QUEUED FILE. 02033 M00S01615.dsp +++|* (FS - FS+4) = QUEUED FILE FST ENTRY 02034 M00S01616.dsp +++|* 02035 M00S01617.dsp +++|* USES CM - CM+4, T1 - T7. 02036 M00S01618.dsp +++|* 02037 M00S01619.dsp +++|* CALLS EQF, GEA, GLI, RFN, SSJ, SSR. 02038 M00S01620.dsp +++|* 02039 M00S01621.dsp +++|* MACROS NFA. 02040 M00S01622.dsp +++| 02041 M00S01623.dsp +++| 02042 M00S01624.dsp +++| ISS SUBR ENTRY 02043 M00S01625.dsp +++| LDC FNTN READ INPUT FILE FNT 02044 M00S01626.dsp +++| STM SSRB 02045 M00S01627.dsp +++| NFA FNTN 02046 M00S01628.dsp +++| CRD CM 02047 M00S01629.dsp +++| ADN FSTL 02048 M00S01630.dsp +++| CRD T5 02049 M00S01631.dsp +++| LDN INFT SET DESIRED FILE TYPE 02050 M00S01632.dsp +++| STM SSRA 02051 M00S01633.dsp +++| LDD ST CHECK IF CALLED BY SUBSYSTEM 02052 M00S01634.dsp +++| LPN SSFL 02053 M00S01635.dsp +++| NJN ISS1 IF NOT CALLED BY A SUBSYSTEM 02054 M00S01636.dsp +++| LDD QT CHECK IF SUBSYSTEM OUTPUT FILE 02055 M00S01637.dsp +++| LMK INQT 02056 M00S01638.dsp +++| NJN ISS1 IF OUTPUT FROM A SUBSYSTEM 02057 M00S01639.dsp +++| AOM ISSA SET INPUT FILE NOT READ 02058 M00S01640.dsp +++| UJN ISS2 CONTINUE 02059 M00S01641.dsp +++| 02060 M00S01642.dsp +++| ISS1 LDD T5 02061 M00S01643.dsp +++| RJM SSR READ INPUT FILE SYSTEM SECTOR 02062 M00S01644.dsp +++| ZJN ISS4 IF INPUT FILE SYSTEM SECTOR READ 02063 M00S01645.dsp +++| ISS2 LDC 501 CLEAR SYSTEM SECTOR BUFFER 02064 M00S01646.dsp +++| STD T1 02065 M00S01647.dsp +++| ISS3 LDN 0 02066 M00S01648.dsp +++| STM BFMS,T1 02067 M00S01649.dsp +++| SOD T1 02068 M00S01650.dsp +++| PJN ISS3 IF MORE TO CLEAR 02069 M00S01651.dsp +++| RJM GLI GET SLID/DLID 02070 M00S01652.dsp +++| LDD ST CHECK ORIGIN TYPE OF CALLING CP 02071 M00S01653.dsp +++| LPN SYFL 02072 M00S01654.dsp +++| ZJN ISS7 IF CP NOT *SYOT* 02073 M00S01655.dsp +++| LCN 0 02074 M00S01656.dsp +++| STM VASS+5*AAWC+3 02075 M00S01657.dsp +++| STM VASS+5*AAWC+4 02076 M00S01658.dsp +++| UJN ISS7 SET DEFAULT TID 02077 M00S01659.dsp +++| 02078 M00S01660.dsp +++|* SET DEFAULT DESTINATION TERMINAL ID (TID). 02079 M00S01661.dsp +++| 02080 M00S01662.dsp +++| ISS4 RJM GLI GET SLID/DLID
| Line S01663 Modification History | |
|---|---|
M01 (Removed by) | dsp48 |
Seq # *Modification Id* Act ----------------------------+ 02081 M01S01663.dsp48 ---| LDN QFTE*5 CLEAR QFT IN SYSTEM SECTOR
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | dsp48 |
Seq # *Modification Id* Act ----------------------------+ 02082 M01S00001.dsp48 +++| LDN QFTE*5-1 CLEAR QFT IN SYSTEM SECTOR 02083 M00S01664.dsp +++| STD T1 02084 M00S01665.dsp +++| ISS5 LDN 0 CLEAR QFT 02085 M00S01666.dsp +++| STM IOSS,T1 02086 M00S01667.dsp +++| SOD T1 02087 M00S01668.dsp +++| PJN ISS5 IF NOT FINISHED 02088 M00S01669.dsp +++| LDN DDSSL CLEAR FILE DEPENDENT INFORMATION 02089 M00S01670.dsp +++| STD T1 02090 M00S01671.dsp +++| ISS6 LDN 0 02091 M00S01672.dsp +++| STM JISS,T1 02092 M00S01673.dsp +++| SOD T1 02093 M00S01674.dsp +++| PJN ISS6 IF MORE TO CLEAR 02094 M00S01675.dsp +++| 02095 M00S01676.dsp +++|* SET ROUTING INFORMATION FROM EJT. 02096 M00S01677.dsp +++| 02097 M00S01678.dsp +++| ISS7 LDC ** 02098 M00S01679.dsp +++| ISSA EQU *-1 (INPUT FILE NOT READ FLAG) 02099 M00S01680.dsp +++| NJN ISS8 IF INPUT FILE NOT READ 02100 M00S01681.dsp +++| RJM GEA GET EJT ADDRESS 02101 M00S01682.dsp +++| ADK SCLE 02102 M00S01683.dsp +++| CRD CM 02103 M00S01684.dsp +++| LDD CM SET ORIGIN TYPE OF EJT 02104 M00S01685.dsp +++| SCN 60 02105 M00S01686.dsp +++| STM IOSS+SCLQ*5+0 02106 M00S01687.dsp +++| LDD CM+1 SET DEFAULT ROUTING INFORMATION 02107 M00S01688.dsp +++| STM IOSS+SCLQ*5+1 02108 M00S01689.dsp +++| LDD CM+2 02109 M00S01690.dsp +++| STM IOSS+SCLQ*5+2 02110 M00S01691.dsp +++| 02111 M00S01692.dsp +++|* SET CREATION DATE AND MACHINE ID. 02112 M00S01693.dsp +++|* SET CREATION FAMILY AND USER NAME. 02113 M00S01694.dsp +++| 02114 M00S01695.dsp +++| ISS8 LDC MMFL SET MACHINE ID 02115 M00S01696.dsp +++| CRD CM 02116 M00S01697.dsp +++| LDD CM 02117 M00S01698.dsp +++| STM CMSS 02118 M00S01699.dsp +++| STM RMSS 02119 M00S01700.dsp +++| RJM RFN READ CREATION FAMILY NAME 02120 M00S01701.dsp +++| CRM FMSS,ON 02121 M00S01702.dsp +++| RJM SSJ CHECK FOR SSJ= BLOCK 02122 M00S01703.dsp +++| ZJN ISS9 IF NO SSJ= ADDRESS 02123 M00S01704.dsp +++| ADK UIDS USER NAME 02124 M00S01705.dsp +++| UJN ISS10 READ USER NAME 02125 M00S01706.dsp +++| 02126 M00S01707.dsp +++| ISS9 LDD CP READ USER NAME 02127 M00S01708.dsp +++| ADK UIDW 02128 M00S01709.dsp +++| ISS10 CRM ACSS,ON 02129 M00S01710.dsp +++| LDM FMSS+3 ZERO FILL FAMILY NAME 02130 M00S01711.dsp +++| SCN 77 02131 M00S01712.dsp +++| STM FMSS+3 02132 M00S01713.dsp +++| LDN 0 02133 M00S01714.dsp +++| STM FMSS+4
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2580 |
Seq # *Modification Id* Act ----------------------------+ 02134 M01S00002.ns2580 +++| 02135 M01S00003.ns2580 +++|* SET CHARGE AND PROJECT NUMBERS. 02136 M01S00004.ns2580 +++| 02137 M01S00005.ns2580 +++| NFA CHGN 02138 M01S00006.ns2580 +++| CRM CHSS,TR 02139 M01S00007.ns2580 +++| ERRNZ PJSS-CHSS-5 CHARGE AND PROJECT NUMBER NOT CONTIGUOUS 02140 M01S00008.ns2580 +++| ERRNZ CHGN-PJ1N-1 CHARGE AND PROJECT NUMBER NOT CONTIGUOUS 02141 M01S00009.ns2580 +++| 02142 M01S00010.ns2580 +++|* ENTER FILE INTO QFT. 02143 M01S00011.ns2580 +++| 02144 M00S01715.dsp +++| RJM EQF ENTER QUEUED FILE 02145 M00S01716.dsp +++| 02146 M00S01717.dsp +++|* SET ORIGINAL AND CREATION JSN-S IN SYSTEM SECTOR. 02147 M00S01718.dsp +++| 02148 M00S01719.dsp +++| LDM IOSS+JSNQ*5+0 02149 M00S01720.dsp +++| STM OJSS 02150 M00S01721.dsp +++| LDM IOSS+JSNQ*5+1 02151 M00S01722.dsp +++| STM OJSS+1 02152 M00S01723.dsp +++| RJM GEA SET CREATION JSN 02153 M00S01724.dsp +++| ADK JSNE 02154 M00S01725.dsp +++| CRD CM 02155 M00S01726.dsp +++| LDD CM 02156 M00S01727.dsp +++| STM CJSS 02157 M00S01728.dsp +++| LDD CM+1 02158 M00S01729.dsp +++| STM CJSS+1 02159 M00S01730.dsp +++| LJM ISSX RETURN 02160 M00S01731.dsp +++| PDF SPACE 4,15 02161 M00S01732.dsp +++|** PDF - PROCESS DEVICE FULL. 02162 M00S01733.dsp +++|* 02163 M00S01734.dsp +++|* ENTRY (FB - FB+1) = FLAG BITS. 02164 M00S01735.dsp +++|* 02165 M00S01736.dsp +++|* ERROR TO *ERR*, IF ONE OF THE FOLLOWING OCCURS, 02166 M00S01737.dsp +++|* DEVICE FULL. 02167 M00S01738.dsp +++|* 02168 M00S01739.dsp +++|* USES CM - CM+4. 02169 M00S01740.dsp +++|* 02170 M00S01741.dsp +++|* EXIT *DEVICE FULL* MESSAGE ISSUED TO OPERATOR. 02171 M00S01742.dsp +++|* 02172 M00S01743.dsp +++|* MACROS ERROR, MONITOR, PAUSE. 02173 M00S01744.dsp +++| 02174 M00S01745.dsp +++| 02175 M00S01746.dsp +++| PDF SUBR ENTRY/EXIT 02176 M00S01747.dsp +++| PDFA LDN 0 CHECK IF ROUTINE PREVIOUSLY CALLED 02177 M00S01748.dsp +++|* LDN 1 02178 M00S01749.dsp +++| NJN PDF1 IF ROUTINE PREVIOUSLY CALLED 02179 M00S01750.dsp +++| AOM PDFA SET ROUTINE PREVIOUSLY CALLED 02180 M00S01751.dsp +++| LDD CP CONSOLE MESSAGE = *TRACK LIMIT.* 02181 M00S01752.dsp +++| ADK MS2W 02182 M00S01753.dsp +++| CWM PDFB,TR 02183 M00S01754.dsp +++| LDN ZERL CLEAR PARAMETERS 02184 M00S01755.dsp +++| CRD CM 02185 M00S01756.dsp +++| LDK TKLE SET TRACK LIMIT EVENT 02186 M00S01757.dsp +++| STD CM+4 02187 M00S01758.dsp +++|* LDN 0 SET SYSTEM EVENT 02188 M00S01759.dsp +++|* STD CM+3 02189 M00S01760.dsp +++| MONITOR EATM 02190 M00S01761.dsp +++| PDF1 PAUSE 02191 M00S01762.dsp +++| LDD FB 02192 M00S01763.dsp +++| LPN 1 02193 M00S01764.dsp +++| ADD CM+1 02194 M00S01765.dsp +++| ZJN PDFX IF NO ERROR PROCESSING NEEDED 02195 M00S01766.dsp +++| PDF2 ERROR /ERR/EC27 * DSP - DEVICE FULL.* 02196 M00S01767.dsp +++| 02197 M00S01768.dsp +++| PDFB DATA C*TRACK LIMIT.* 02198 M00S01769.dsp +++| RCL SPACE 4,10 02199 M00S01770.dsp +++|** RCL - RECALL PP. 02200 M00S01771.dsp +++| 02201 M00S01772.dsp +++| 02202 M00S01773.dsp +++| RCL BSS 0 ENTRY 02203 M00S01774.dsp +++| RJM FNB SET FILE NOT BUSY 02204 M00S01775.dsp +++| LDN ZERL DEFAULT TO TIMED RECALL 02205 M00S01776.dsp +++| CRD CM 02206 M00S01777.dsp +++| LDD MA 02207 M00S01778.dsp +++| CWD IR 02208 M00S01779.dsp +++| MONITOR RECM RECALL PP 02209 M00S01780.dsp +++| LJM PPR ENTER PP RESIDENT 02210 M00S01781.dsp +++| SDC SPACE 4,10 02211 M00S01782.dsp +++|** SDC - SET DISPOSITION CODE. 02212 M00S01783.dsp +++|* 02213 M00S01784.dsp +++|* ENTRY (SDCA) = TABLE INDEX SET BY *DDC*. 02214 M00S01785.dsp +++|* = 0, IF NO DISPOSITION CODE SPECIFIED. 02215 M00S01786.dsp +++|* 02216 M00S01787.dsp +++|* EXIT QFT AND SYSTEM SECTOR UPDATED. 02217 M00S01788.dsp +++|* 02218 M00S01789.dsp +++|* USES T0, T1. 02219 M00S01790.dsp +++|* 02220 M00S01791.dsp +++| 02221 M00S01792.dsp +++| 02222 M00S01793.dsp +++| SDC SUBR ENTRY EXIT 02223 M00S01794.dsp +++| LDD ST CHECK IF DISPOSITION CODE SPECIFIED 02224 M00S01795.dsp +++| LPC DCFL 02225 M00S01796.dsp +++| ZJN SDCX IF DISPOSITION CODE NOT SPECIFIED 02226 M00S01797.dsp +++| LDC ** 02227 M00S01798.dsp +++| SDCA EQU *-1 (*TODC* TABLE ENTRY SET BY *DDC*) 02228 M00S01799.dsp +++| STD T1 02229 M00S01800.dsp +++| LPN 77 02230 M00S01801.dsp +++| STD T0 02231 M00S01802.dsp +++| LDC ** SET DISPOSITION CODE IN SYSTEM SECTOR 02232 M00S01803.dsp +++| SDCB EQU *-1 02233 M00S01804.dsp +++| STM DCSS 02234 M00S01805.dsp +++| LDM IOSS+SCLQ*5+3 02235 M00S01806.dsp +++| SCN 77 02236 M00S01807.dsp +++| LMD T0 02237 M00S01808.dsp +++| STM IOSS+SCLQ*5+3 02238 M00S01809.dsp +++| LDM IOSS+JSNQ*5+4 SET DISPOSITION CODE IN QFT 02239 M00S01810.dsp +++| LMD T1 02240 M00S01811.dsp +++| LPN 77 02241 M00S01812.dsp +++| LMD T1 02242 M00S01813.dsp +++| STM IOSS+JSNQ*5+4 02243 M00S01814.dsp +++| UJN SDCX RETURN 02244 M00S01815.dsp +++| SPR SPACE 4,10 02245 M00S01816.dsp +++|** SPR - SET PRIORITY. 02246 M00S01817.dsp +++|* 02247 M00S01818.dsp +++|* ENTRY (FB - FB+1) = FLAG BITS. 02248 M00S01819.dsp +++|* (QT) = QUEUE TYPE.
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | ns2156 |
Seq # *Modification Id* Act ----------------------------+ 02249 M01S00016.ns2156 +++|* (T3) .NE. 0, IF SPECIAL REQUEUE OPERATION. 02250 M00S01820.dsp +++|* 02251 M00S01821.dsp +++|* EXIT QFT UPDATED. 02252 M00S01822.dsp +++|* (FGSS) = FLAG SET IF PRIORITY PRESENT. 02253 M00S01823.dsp +++|* 02254 M00S01824.dsp +++|* USES CN - CN+4, T1 - T5. 02255 M00S01825.dsp +++|* 02256 M00S01826.dsp +++|* CALLS CET, GFA. 02257 M00S01827.dsp +++| 02258 M00S01828.dsp +++| 02259 M00S01829.dsp +++| SPR SUBR ENTRY/EXIT 02260 M00S01830.dsp +++| LDD FB+1 CHECK PRIORITY 02261 M00S01831.dsp +++| SHN 21-11 02262 M00S01832.dsp +++| MJN SPR2 IF PRIORITY SPECIFIED
| Line S00017 Modification History | |
|---|---|
M01 (Added by) | ns2156 |
Seq # *Modification Id* Act ----------------------------+ 02263 M01S00017.ns2156 +++| LDD T3 02264 M01S00018.ns2156 +++| NJN SPRX IF SPECIAL REQUEUE OPERATION 02265 M00S01833.dsp +++| LDD FB+1 CHECK IF DEFERRED ROUTE 02266 M00S01834.dsp +++| SHN 21-0 02267 M00S01835.dsp +++| MJN SPRX IF DEFERRED ROUTE 02268 M00S01836.dsp +++| LDM FGSS CHECK IF PRIORITY PREVIOUSLY SPECIFIED 02269 M00S01837.dsp +++| LPN 4 02270 M00S01838.dsp +++| NJN SPR3 IF PRIORITY PREVIOUSLY SPECIFIED
| Line S01839 Modification History | |
|---|---|
M01 (Removed by) | ns2156 |
Seq # *Modification Id* Act ----------------------------+ 02271 M01S01839.ns2156 ---| LDC RTCL USER REAL TIME CLOCK
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | ns2156 |
Seq # *Modification Id* Act ----------------------------+ 02272 M01S00019.ns2156 +++| SPR0 LDC RTCL USE REAL TIME CLOCK 02273 M00S01840.dsp +++| CRD T1
| Line S01841 Modification History | |
|---|---|
M01 (Removed by) | ns2156 |
Seq # *Modification Id* Act ----------------------------+ 02274 M01S01841.ns2156 ---| LJM SPR5 SET ENTRY TIME IN QFT
| Line S00020 Modification History | |
|---|---|
M01 (Added by) | ns2156 |
Seq # *Modification Id* Act ----------------------------+ 02275 M01S00020.ns2156 +++| SPR1 LJM SPR5 SET ENTRY TIME IN QFT 02276 M00S01842.dsp +++| 02277 M00S01843.dsp +++| SPR2 RJM GFA READ PRIORITY 02278 M00S01844.dsp +++| ADN 3 02279 M00S01845.dsp +++| CRD CN
| Line S01846 Modification History | |
|---|---|
M01 (Removed by) | ns2156 |
Seq # *Modification Id* Act ----------------------------+ 02280 M01S01846.ns2156 ---| LDD CN+4
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | ns2156 |
Seq # *Modification Id* Act ----------------------------+ 02281 M01S00021.ns2156 +++| LDD T3 02282 M01S00022.ns2156 +++| ZJN SPR2.1 IF NOT SPECIAL REQUEUE OPERATION 02283 M01S00023.ns2156 +++| LDD CN+2 02284 M01S00024.ns2156 +++| NJN SPR0 IF NEW ENTRY TIME NEEDED 02285 M01S00025.ns2156 +++| LDD CN+3 GET ENTRY TIME 02286 M01S00026.ns2156 +++| STD T1 02287 M01S00027.ns2156 +++| LDD CN+4 02288 M01S00028.ns2156 +++| STD T2 02289 M01S00029.ns2156 +++| UJN SPR1 SET ENTRY TIME IN QFT ENTRY 02290 M01S00030.ns2156 +++| 02291 M01S00031.ns2156 +++| SPR2.1 LDD CN+4 02292 M00S01847.dsp +++| STM PRSS 02293 M00S01848.dsp +++| LDM FGSS SET PRIORITY FLAG 02294 M00S01849.dsp +++| SCN 4 02295 M00S01850.dsp +++| LMN 4 02296 M00S01851.dsp +++| STM FGSS 02297 M00S01852.dsp +++| LDD FB+1 CHECK IF DEFERRED ROUTE 02298 M00S01853.dsp +++| SHN 21-0 02299 M00S01854.dsp +++| MJN SPR6 IF DEFERRED ROUTE 02300 M00S01855.dsp +++| SPR3 LDM FGSS CLEAR PRIORITY SPECIFIED FLAG 02301 M00S01856.dsp +++| SCN 4 02302 M00S01857.dsp +++| STM FGSS 02303 M00S01858.dsp +++| LDM PRSS CONVERT PRIORITY INTO ENTRY TIME 02304 M00S01859.dsp +++| STD T1 02305 M00S01860.dsp +++| LDD QT GET QUEUE TYPE 02306 M00S01861.dsp +++| LMK INQT 02307 M00S01862.dsp +++| ZJN SPR4 IF INPUT FILE 02308 M00S01863.dsp +++| LDN OTQT SET OUTPUT QUEUE TYPE 02309 M00S01864.dsp +++| SPR4 STD T2 02310 M00S01865.dsp +++| LDM IOSS+SCLQ*5+0 02311 M00S01866.dsp +++| SCN 77 02312 M00S01867.dsp +++| SHN 6 02313 M00S01868.dsp +++| LMD T2 02314 M00S01869.dsp +++| RJM CET CALCULATE ENTRY TIME 02315 M00S01870.dsp +++| SPR5 LDD T2 SET ENTRY TIME IN QFT ENTRY 02316 M00S01871.dsp +++| STM IOSS+ENTQ*5+4 02317 M00S01872.dsp +++| LDD T1 02318 M00S01873.dsp +++| STM IOSS+ENTQ*5+3 02319 M00S01874.dsp +++| SPR6 LJM SPRX RETURN 02320 M00S01875.dsp +++| SQS SPACE 4,15 02321 M00S01876.dsp +++|** SQS - SET QUEUED FILE SYSTEM SECTOR IN *BFMS*. 02322 M00S01877.dsp +++|* 02323 M00S01878.dsp +++|* ENTRY (FS - FS+4) = FST ENTRY. 02324 M00S01879.dsp +++|* (ST) = STATUS WORD. 02325 M00S01880.dsp +++|* (FA) = NFL FNT OFFSET. 02326 M00S01881.dsp +++|* (QT) = QUEUE TYPE. 02327 M00S01882.dsp +++|* (FN - FN+4) = FILE NAME. 02328 M00S01883.dsp +++|* 02329 M00S01884.dsp +++|* EXIT (FN - FN+4) = NFL FNT/FST ENTRY. 02330 M00S01885.dsp +++|* (FS - FS+4) = NFL FNT/FST ENTRY. 02331 M00S01886.dsp +++|* (QT) = QUEUE TYPE. 02332 M00S01887.dsp +++|* (QA) = ORDINAL OF GLOBAL *QFT* TABLE ENTRY. 02333 M00S01888.dsp +++|* 02334 M00S01889.dsp +++|* USES FN - FN+4. 02335 M00S01890.dsp +++|* 02336 M00S01891.dsp +++|* USES AMS, EFN, SPR, USS, VMS. 02337 M00S01892.dsp +++|* 02338 M00S01893.dsp +++|* MACROS NFA. 02339 M00S01894.dsp +++| 02340 M00S01895.dsp +++| 02341 M00S01896.dsp +++| SQS SUBR ENTRY/EXIT 02342 M00S01897.dsp +++| LDD ST CHECK IF FILE CREATION NEEDED 02343 M00S01898.dsp +++| LPN FCFL 02344 M00S01899.dsp +++| ZJN SQS1 IF FILE EXISTS 02345 M00S01900.dsp +++| RJM EFN ENTER FILE NAME 02346 M00S01901.dsp +++| SQS1 RJM AMS ASSIGN MASS STORAGE 02347 M00S01902.dsp +++| LDD FS SET EQUIPMENT 02348 M00S01903.dsp +++| RJM VMS VALIDATE MASS STORAGE 02349 M00S01904.dsp +++| NFA FA,R READ FNT OF EXISTING FILE 02350 M00S01905.dsp +++| CRD FN 02351 M00S01906.dsp +++| LDD FN+4 SET FILE TYPE 02352 M00S01907.dsp +++| LPN 77 02353 M00S01908.dsp +++| LMC QFFT*100 02354 M00S01909.dsp +++| STD FN+4 02355 M00S01910.dsp +++| RJM USS SET SYSTEM SECTOR 02356 M00S01911.dsp +++| RJM SPR SET PRIORITY 02357 M00S01912.dsp +++| UJN SQSX RETURN 02358 M00S01913.dsp +++| SSR SPACE 4,20 02359 M00S01914.dsp +++|** SSR - SYSTEM SECTOR READ. 02360 M00S01915.dsp +++|* 02361 M00S01916.dsp +++|* ENTRY (A) = EST ORDINAL. 02362 M00S01917.dsp +++|* (T6) = FIRST TRACK. 02363 M00S01918.dsp +++|* (CM - CM+4) = FNT ENTRY. 02364 M00S01919.dsp +++|* (SSRB) = NFL FNT ENTRY OFFSET. 02365 M00S01920.dsp +++|* 02366 M00S01921.dsp +++|* EXIT (A) = 0 IF NO ERRORS AND DATA IN SYSTEM SECTOR.
| Line S01922 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 02367 M01S01922.242l642 ---|* (A) = 1, IF NO DATA IN SYSTEM SECTOR. 02368 M01S01923.242l642 ---|* (A) = -1, IF ERRORS ENCOUNTERED WHILE READING SYSTEM 02369 M01S01924.242l642 ---|* SECTOR. 02370 M01S01925.242l642 ---|* (T4) = CHANNEL. 02371 M01S01926.242l642 ---|* ERROR LOG MESSAGE ISSUED IF ERROR.
| Line S00091 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 02372 M01S00091.242l642 +++|* .GT. 0 IF NO DATA IN SYSTEM SECTOR. 02373 M01S00092.242l642 +++|* .LT. 0 IF ERRORS IN SYSTEM SECTOR DATA. 02374 M00S01927.dsp +++|* DRIVER PRESET. 02375 M00S01928.dsp +++|* 02376 M00S01929.dsp +++|* USES T1, T3, T5. 02377 M00S01930.dsp +++|* 02378 M00S01931.dsp +++|* CALLS RSS, SSE. 02379 M00S01932.dsp +++|* 02380 M00S01933.dsp +++|* MACROS ENDMS, NFA, SETMS. 02381 M00S01934.dsp +++| 02382 M00S01935.dsp +++| 02383 M00S01936.dsp +++| SSR2 ENDMS 02384 M00S01937.dsp +++|* LDN 0 RETURN (NO ERRORS) 02385 M00S01938.dsp +++| 02386 M00S01939.dsp +++| SSR SUBR ENTRY/EXIT 02387 M00S01940.dsp +++| STD T5 02388 M00S01941.dsp +++| LMN NEEQ 02389 M00S01942.dsp +++| ZJN SSR1 IF NO FILE 02390 M00S01943.dsp +++| LDD CM+4 02391 M00S01944.dsp +++| SHN -6
| Line S01945 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 02392 M01S01945.242l642 ---| LMC QFFT
| Line S00093 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 02393 M01S00093.242l642 +++| SSR1 LMC QFFT 02394 M00S01946.dsp +++|* LMC INFT (READ JOB INPUT FILE) 02395 M00S01947.dsp +++| SSRA EQU *-1 (SET BY *ISS*)
| Line S01948 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 02396 M01S01948.242l642 ---| NJN SSR1 IF FILE NOT ALREADY QUEUE FILE 02397 M01S01949.242l642 ---| SETMS READ
| Line S00094 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 02398 M01S00094.242l642 +++| NJN SSRX IF NOT ALREADY QUEUE FILE 02399 M01S00095.242l642 +++| SETMS IO 02400 M00S01950.dsp +++| LDN 0 02401 M00S01951.dsp +++| RJM RSS READ SYSTEM SECTOR 02402 M00S01952.dsp +++| ZJN SSR2 IF NO ERRORS 02403 M00S01953.dsp +++| 02404 M00S01954.dsp +++|* PROCESS SYSTEM SECTOR ERROR. 02405 M00S01955.dsp +++| 02406 M00S01956.dsp +++| LDN 0 SET FNT TYPE 02407 M00S01957.dsp +++| STD T3 02408 M00S01958.dsp +++| LDC * 02409 M00S01959.dsp +++| SSRB EQU *-1 (FNT OFFSET OF FILE READ) 02410 M00S01960.dsp +++| STD T1 02411 M00S01961.dsp +++| NFA T1,R 02412 M00S01962.dsp +++| RJM SSE REPORT SYSTEM SECTOR ERROR 02413 M00S01963.dsp +++| LCN 1 FLAG SYSTEM SECTOR ERROR 02414 M00S01964.dsp +++| UJN SSRX RETURN WITH ERROR
| Line S01965 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 02415 M01S01965.242l642 ---| 02416 M01S01966.242l642 ---| SSR1 LDN 1 FLAG ERROR RETURN 02417 M01S01967.242l642 ---| UJN SSRX RETURN 02418 M00S01968.dsp +++| USS SPACE 4,20 02419 M00S01969.dsp +++|** USS - UPDATE SYSTEM SECTOR. 02420 M00S01970.dsp +++|* 02421 M00S01971.dsp +++|* ENTRY (FN - FN+4) = QUEUED FILE FNT ENTRY. 02422 M00S01972.dsp +++|* (FS - FS+4) = FST ENTRY. 02423 M00S01973.dsp +++|* (FA) = NFL FNT ENTRY OFFSET. 02424 M00S01974.dsp +++|* 02425 M00S01975.dsp +++|* EXIT *BFMS* CONTAINS SYSTEM SECTOR FOR QUEUED FILE.
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | dsp44 |
Seq # *Modification Id* Act ----------------------------+ 02426 M01S00008.dsp44 +++|* (QT) = QUEUE TYPE.
| Line S00032 Modification History | |
|---|---|
M01 (Added by) | ns2156 |
Seq # *Modification Id* Act ----------------------------+ 02427 M01S00032.ns2156 +++|* (T3) .NE. 0, IF VALID SPECIAL REQUEUE FLAG SET.
| Line S01976 Modification History | |
|---|---|
M01 (Removed by) | dsp44 |
Seq # *Modification Id* Act ----------------------------+ 02428 M01S01976.dsp44 ---|* (QT) = QUEUE TYPE.
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | dsp44 |
Seq # *Modification Id* Act ----------------------------+ 02429 M01S00009.dsp44 +++|* REPEAT COUNT SET, IF VALID SPECIAL REQUEUE FLAG SET. 02430 M00S01977.dsp +++|* 02431 M00S01978.dsp +++|* ERROR TO *ERR* IF ERROR READING *QFFT* FILE SYSTEM SECTOR. 02432 M00S01979.dsp +++|*
| Line S01980 Modification History | |
|---|---|
M01 (Removed by) | ns2156 |
Seq # *Modification Id* Act ----------------------------+ 02433 M01S01980.ns2156 ---|* USES T6, CM - CM+4.
| Line S00033 Modification History | |
|---|---|
M01 (Added by) | ns2156 |
Seq # *Modification Id* Act ----------------------------+ 02434 M01S00033.ns2156 +++|* USES QT, T3, T6, CM - CM+4. 02435 M00S01981.dsp +++|*
| Line S01982 Modification History | |
|---|---|
M01 (Removed by) | dsp44 |
Seq # *Modification Id* Act ----------------------------+ 02436 M01S01982.dsp44 ---|* CALLS EDF, GLI, ISS, SQE, SQO, SSR.
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | dsp44 |
Seq # *Modification Id* Act ----------------------------+ 02437 M01S00010.dsp44 +++|* CALLS EDF, GFA, GLI, ISS, SQO, SSR. 02438 M00S01983.dsp +++|*
| Line S01984 Modification History | |
|---|---|
M01 (Removed by) | ns2156 |
Seq # *Modification Id* Act ----------------------------+ 02439 M01S01984.ns2156 ---|* MACROS ERROR, NFA.
| Line S00034 Modification History | |
|---|---|
M01 (Added by) | ns2156 |
Seq # *Modification Id* Act ----------------------------+ 02440 M01S00034.ns2156 +++|* MACROS ERROR, ISTORE, NFA. 02441 M00S01985.dsp +++| 02442 M00S01986.dsp +++| 02443 M00S01987.dsp +++| USS2 RJM ISS INITIALIZE SYSTEM SECTOR 02444 M00S01988.dsp +++| RJM SQO SET QFT OWNERSHIP
| Line S00035 Modification History | |
|---|---|
M01 (Added by) | ns2156 |
Seq # *Modification Id* Act ----------------------------+ 02445 M01S00035.ns2156 +++| USS3 LDN 0 SET NORMAL EXIT 02446 M01S00036.ns2156 +++| STD T3 02447 M00S01989.dsp +++| 02448 M00S01990.dsp +++| USS SUBR ENTRY/EXIT 02449 M00S01991.dsp +++| 02450 M00S01992.dsp +++|* SET QUEUE FILE TYPE. 02451 M00S01993.dsp +++| 02452 M00S01994.dsp +++| LDM SDCA GET ENTRY FROM *TODC* TABLE 02453 M00S01995.dsp +++| SHN -11 02454 M00S01996.dsp +++| STD QT 02455 M00S01997.dsp +++|
| Line S01998 Modification History | |
|---|---|
M01 (Removed by) | dsp44 |
Seq # *Modification Id* Act ----------------------------+ 02456 M01S01998.dsp44 ---|* READ SYSTEM SECTOR IF FILE HAS BEEN DEFERRED ROUTED.
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | dsp44 |
Seq # *Modification Id* Act ----------------------------+ 02457 M01S00011.dsp44 +++|* READ SYSTEM SECTOR INFORMATION IF IT EXISTS. 02458 M00S01999.dsp +++| 02459 M00S02000.dsp +++| LDD FS+1 SET FIRST TRACK 02460 M00S02001.dsp +++| STD T6 02461 M00S02002.dsp +++| LDD FA READ CURRENT FNT ENTRY 02462 M00S02003.dsp +++| STM SSRB SAVE FNT OFFSET 02463 M00S02004.dsp +++| NFA FA,R 02464 M00S02005.dsp +++| CRD CM 02465 M00S02006.dsp +++| LDD FS 02466 M00S02007.dsp +++| RJM SSR READ SYSTEM SECTOR
| Line S02008 Modification History | |
|---|---|
M01 (Removed by) | dsp44 |
Seq # *Modification Id* Act ----------------------------+ 02467 M01S02008.dsp44 ---| MJN USS1 IF ERROR ON *QFFT* FILE
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | dsp44 |
Seq # *Modification Id* Act ----------------------------+ 02468 M01S00012.dsp44 +++| MJP USS1 IF ERROR ON *QFFT* FILE 02469 M00S02009.dsp +++| NJN USS2 IF SYSTEM SECTOR NOT READ 02470 M00S02010.dsp +++|
| Line S02011 Modification History | |
|---|---|
M01 (Removed by) | dsp44 |
Seq # *Modification Id* Act ----------------------------+ 02471 M01S02011.dsp44 ---|* SET FNT/FST FOR DEFERRED ROUTED FILE (SYSTEM SECTOR 02472 M01S02012.dsp44 ---|* INFORMATION IS ALREADY PRESENT).
| Line S00013 Modification History | |
|---|---|
M01 (Added by) | dsp44 |
Seq # *Modification Id* Act ----------------------------+ 02473 M01S00013.dsp44 +++|* SET FNT/FST FOR DEFERRED ROUTED OR ATTACHED QUEUE FILE 02474 M01S00014.dsp44 +++|* (SYSTEM SECTOR INFORMATION IS ALREADY PRESENT). 02475 M00S02013.dsp +++| 02476 M00S02014.dsp +++| RJM GLI GET LID INFORMATION 02477 M00S02015.dsp +++| RJM EDF ENTER DEFERRED FILE
| Line S02016 Modification History | |
|---|---|
M01 (Removed by) | ns2156 |
Seq # *Modification Id* Act ----------------------------+ 02478 M01S02016.ns2156 ---| UJN USSX RETURN
| Line S00037 Modification History | |
|---|---|
M01 (Added by) | ns2156 |
Seq # *Modification Id* Act ----------------------------+ 02479 M01S00037.ns2156 +++| 02480 M01S00038.ns2156 +++|* CHECK FOR SPECIAL REQUEUE FLAG. 02481 M01S00039.ns2156 +++| 02482 M01S00040.ns2156 +++| LDD ST 02483 M01S00041.ns2156 +++| LPN DSFL 02484 M01S00042.ns2156 +++| ZJN USS3 IF FILE NOT PREVIOUSLY ROUTED 02485 M01S00043.ns2156 +++| LDM EBIT+1 02486 M01S00044.ns2156 +++| LPC EFRQ 02487 M01S00045.ns2156 +++| STD T3 02488 M01S00046.ns2156 +++| ZJN USS0 IF SPECIAL REQUEUE FLAG NOT SPECIFIED 02489 M01S00047.ns2156 +++| ISTORE DSPG,(UJN DSP4) 02490 M01S00048.ns2156 +++| ISTORE DSPH,(UJN DSP5)
| Line S00049 Modification History | |
|---|---|
M01 (Added by) | ns2156 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 02491 M02S00049.242l642 ---| ISTORE DSPI,(UJN DSP7)
| Line S00096 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 02492 M01S00096.242l642 +++| ISTORE DSPI,(UJN DSP6.2)
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | dsp44 |
Seq # *Modification Id* Act ----------------------------+ 02493 M01S00015.dsp44 +++| 02494 M01S00016.dsp44 +++|* SET REPEAT COUNT FOR SPECIAL REQUEUE OPERATION. 02495 M01S00017.dsp44 +++| 02496 M01S00018.dsp44 +++| LDD FB 02497 M01S00019.dsp44 +++| SHN 21-2 02498 M01S00020.dsp44 +++| PJN USS0 IF REPEAT COUNT NOT SPECIFIED 02499 M01S00021.dsp44 +++| RJM GFA READ REPEAT COUNT 02500 M01S00022.dsp44 +++| ADN 4 02501 M01S00023.dsp44 +++| CRD CM 02502 M01S00024.dsp44 +++| LDD CM+3 SET REPEAT COUNT 02503 M01S00025.dsp44 +++| LPN 77 02504 M01S00026.dsp44 +++| STM IOSS+INSQ*5+4 02505 M01S00027.dsp44 +++| STM RCSS
| Line S00050 Modification History | |
|---|---|
M01 (Added by) | ns2156 |
Seq # *Modification Id* Act ----------------------------+ 02506 M01S00050.ns2156 +++| USS0 LJM USSX RETURN 02507 M00S02017.dsp +++| 02508 M00S02018.dsp +++| USS1 ERROR /ERR/EC24 * DSP - QUEUED FILE READ ERROR.* 02509 M00S02019.dsp +++| VMS SPACE 4,10 02510 M00S02020.dsp +++|** VMS - VALIDATE MASS STORAGE. 02511 M00S02021.dsp +++|* 02512 M00S02022.dsp +++|* ENTRY (A) = EQUIPMENT. 02513 M00S02023.dsp +++|* 02514 M00S02024.dsp +++|* EXIT (CM - CM+4) = EST ENTRY. 02515 M00S02025.dsp +++|* (T5) = EQUIPMENT. 02516 M00S02026.dsp +++|* 02517 M00S02027.dsp +++|* ERROR TO *ERR*, IF ONE OF THE FOLLOWING OCCURS, 02518 M00S02028.dsp +++|* FILE NOT ON REMOVABLE DEVICE. 02519 M00S02029.dsp +++|* FILE NOT ON MASS STORAGE. 02520 M00S02030.dsp +++|* 02521 M00S02031.dsp +++|* USES T5, CM - CM+4. 02522 M00S02032.dsp +++|* 02523 M00S02033.dsp +++|* MACROS ERROR, SFA. 02524 M00S02034.dsp +++| 02525 M00S02035.dsp +++| 02526 M00S02036.dsp +++| VMS1 SHN 21-10-21+13 02527 M00S02037.dsp +++| PJN VMSX IF NOT REMOVABLE DEVICE 02528 M00S02038.dsp +++| ERROR /ERR/EC20 * DSP - FILE ON REMOVABLE DEVICE.* 02529 M00S02039.dsp +++| 02530 M00S02040.dsp +++| VMS SUBR ENTRY/EXIT 02531 M00S02041.dsp +++| STD T5 SET EQUIPMENT 02532 M00S02042.dsp +++| SFA EST READ EST ENTRY 02533 M00S02043.dsp +++| ADK EQDE 02534 M00S02044.dsp +++| CRD CM 02535 M00S02045.dsp +++| LDD CM CHECK FOR MASS STORAGE 02536 M00S02046.dsp +++| SHN 21-13 02537 M00S02047.dsp +++| MJN VMS1 IF MASS STORAGE 02538 M00S02048.dsp +++| ERROR /ERR/EC02 * DSP - FILE NOT ON MASS STORAGE.* 02539 M00S02049.dsp +++| SPACE 4,10 02540 M00S02050.dsp +++|** COMMON DECKS. 02541 M00S02051.dsp +++|
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | dsp16 |
Seq # *Modification Id* Act ----------------------------+ 02542 M01S00002.dsp16 +++| 02543 M00S02052.dsp +++| CET$ SET 1 CALCULATE ENTRY TIME 02544 M00S02053.dsp +++|*CALL COMPCPE 02545 M00S02054.dsp +++|*CALL COMPCTE 02546 M00S02055.dsp +++|*CALL COMPC2D 02547 M00S02056.dsp +++|*CALL COMPRJC
| Line S02057 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 02548 M01S02057.242l642 ---|*CALL COMPRSS
| Line S00097 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 02549 M01S00097.242l642 +++| QUAL MIO 02550 M01S00098.242l642 +++| RDS EQU RMS USE *RMS* IN PLACE OF *RDS* 02551 M01S00099.242l642 +++|*CALL COMPRSS 02552 M01S00100.242l642 +++| QUAL * 02553 M01S00101.242l642 +++| RSS EQU /MIO/RSS 02554 M00S02058.dsp +++|*CALL COMPSSE 02555 M00S02059.dsp +++|*CALL COMPVID
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | dsp46 |
Seq # *Modification Id* Act ----------------------------+ 02556 M01S00012.dsp46 +++| QUAL MIO3 02557 M01S00013.dsp46 +++| WCS$ SET 1 WRITE CONSECUTIVE SECTORS 02558 M01S00014.dsp46 +++| WDS EQU WMS USE *WMS* IN PLACE OF *WDS* 02559 M01S00015.dsp46 +++|*CALL COMPWSS 02560 M01S00016.dsp46 +++| QUAL * 02561 M01S00017.dsp46 +++| WSS EQU /MIO3/WSS 02562 M00S02060.dsp +++| SPACE 4,10 02563 M00S02061.dsp +++|* THE FOLLOWING SUBROUTINES MAY BE OVERLAID BY ZERO-LEVEL 02564 M00S02062.dsp +++|* OVERLAYS. 02565 M00S02063.dsp +++| SPACE 4,10 02566 M00S02064.dsp +++| OVL5 EQU *+5 LOAD ADDRESS FOR OVERLAY *3DC* 02567 M00S02065.dsp +++| SPACE 4,10 02568 M00S02066.dsp +++| ERRNG OVL0-5-* OVERFLOW INTO *0BF* 02569 M00S02067.dsp +++| ERRNG OVL1-5-* OVERFLOW INTO *0AV* 02570 M00S02068.dsp +++| TITLE FILE INITIALIZATION ROUTINES (OVERLAYABLE). 02571 M00S02069.dsp +++| CFN SPACE 4,10 02572 M00S02070.dsp +++|** CFN - COMPARE FILE NAMES. 02573 M00S02071.dsp +++|* 02574 M00S02072.dsp +++|* ENTRY (T1) = FWA OF FNT ENTRY 02575 M00S02073.dsp +++|* (FN - FN+4) = FILE NAME. 02576 M00S02074.dsp +++|* 02577 M00S02075.dsp +++|* EXIT (A) = 0, IF FILE FOUND. 02578 M00S02076.dsp +++|* (A) .GT. 0, FILE ASSIGNED TO CP, BUT NOT DESIRED FILE. 02579 M00S02077.dsp +++|* (A) .LT. 0, NO ENTRY. 02580 M00S02078.dsp +++| 02581 M00S02079.dsp +++| 02582 M00S02080.dsp +++| CFN1 LCN 1 NO FILE FOUND 02583 M00S02081.dsp +++| 02584 M00S02082.dsp +++| CFN SUBR ENTRY/EXIT 02585 M00S02083.dsp +++| LDI T1 02586 M00S02084.dsp +++| ZJN CFN1 IF NO ENTRY 02587 M00S02085.dsp +++| LMD FN 02588 M00S02086.dsp +++| NJN CFNX IF NO COMPARE 02589 M00S02087.dsp +++| LDM 1,T1 02590 M00S02088.dsp +++| LMD FN+1 02591 M00S02089.dsp +++| NJN CFNX IF NO COMPARE 02592 M00S02090.dsp +++| LDM 2,T1 02593 M00S02091.dsp +++| LMD FN+2 02594 M00S02092.dsp +++| NJN CFNX IF NO COMPARE 02595 M00S02093.dsp +++| LDM 3,T1 02596 M00S02094.dsp +++| LMD FN+3 02597 M00S02095.dsp +++| SCN 77 02598 M00S02096.dsp +++| UJN CFNX RETURN 02599 M00S02097.dsp +++| DDC SPACE 4,25 02600 M00S02098.dsp +++|** DDC - DETERMINE DISPOSTION CODE. 02601 M00S02099.dsp +++|* 02602 M00S02100.dsp +++|* ENTRY (FB - FB+1) = FLAG BITS. 02603 M00S02101.dsp +++|* (FN - FN+4) = FNT ENTRY. 02604 M00S02102.dsp +++|* (ST) = STATUS WORD. 02605 M00S02103.dsp +++|* 02606 M00S02104.dsp +++|* EXIT (A) = 0, IF *DC=SC*. 02607 M00S02105.dsp +++|* (ST) = SET, IF DISPOSITION CODE SPECIFIED. 02608 M00S02106.dsp +++|* 02609 M00S02107.dsp +++|* ERROR TO *ERR*, IF ONE OF THE FOLLOWING OCCURS,
| Line S02108 Modification History | |
|---|---|
M01 (Removed by) | dsp15 |
Seq # *Modification Id* Act ----------------------------+ 02610 M01S02108.dsp15 ---|* INVALID FILE TYPE.
| Line S02109 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02611 M01S02109.v23l617 ---|* INVALID DISPOSITION CODE.
| Line S00050 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02612 M01S00050.v23l617 +++|* INCORRECT DISPOSITION CODE. 02613 M00S02110.dsp +++|* *DC=SO* OR *DC=SS* AND CALLER NOT *SYOT* OR *SSJ=*. 02614 M00S02111.dsp +++|* 02615 M00S02112.dsp +++|* USES ST, T1, CM+2. 02616 M00S02113.dsp +++|* 02617 M00S02114.dsp +++|* CALLS CFN. 02618 M00S02115.dsp +++|* 02619 M00S02116.dsp +++|* MACROS ERROR. 02620 M00S02117.dsp +++| 02621 M00S02118.dsp +++|
| Line S02119 Modification History | |
|---|---|
M01 (Removed by) | dsp15 |
Seq # *Modification Id* Act ----------------------------+ 02622 M01S02119.dsp15 ---| INFT DECMIC INFT 02623 M01S02120.dsp15 ---| QFFT DECMIC QFFT 02624 M01S02121.dsp15 ---| LOFT DECMIC LOFT 02625 M01S02122.dsp15 ---| 02626 M01S02123.dsp15 ---| QMSK EQU 1S"INFT"+1S"QFFT"+1S"LOFT" 02627 M01S02124.dsp15 ---| 02628 M01S02125.dsp15 ---| 02629 M00S02126.dsp +++| DDC SUBR ENTRY/EXIT
| Line S02127 Modification History | |
|---|---|
M01 (Removed by) | dsp15 |
Seq # *Modification Id* Act ----------------------------+ 02630 M01S02127.dsp15 ---| LDD FN+4 SET CURRENT FILE TYPE 02631 M01S02128.dsp15 ---| SHN -6 02632 M01S02129.dsp15 ---| STD T1 02633 M01S02130.dsp15 ---| LDC SHNI+21 02634 M01S02131.dsp15 ---| SBD T1 02635 M01S02132.dsp15 ---| STM DDCA 02636 M01S02133.dsp15 ---| LDC QMSK 02637 M01S02134.dsp15 ---| SHN 21-0 02638 M01S02135.dsp15 ---| DDCA EQU *-1 (MODIFIED *SHN* INSTRUCTION) 02639 M01S02136.dsp15 ---| MJN DDC1 IF VALID FILE TYPE 02640 M01S02137.dsp15 ---| ERROR /ERR/EC03 * DSP - INVALID FILE TYPE.* 02641 M01S02138.dsp15 ---| 02642 M00S02139.dsp +++| DDC1 LDC * SET DISPOSITION CODE 02643 M00S02140.dsp +++| DDCB EQU *-1 (DISPOSITION CODE SET BY PRESET) 02644 M00S02141.dsp +++| STD CM+2 02645 M00S02142.dsp +++| LDD FB+1 02646 M00S02143.dsp +++| SHN 21-4 02647 M00S02144.dsp +++| MJN DDC2 IF DISPOSITION CODE SPECIFIED
| Line S02145 Modification History | |
|---|---|
M01 (Removed by) | dsp15 |
Seq # *Modification Id* Act ----------------------------+ 02648 M01S02145.dsp15 ---| LDD T1 LOAD FILE TYPE
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | dsp15 |
Seq # *Modification Id* Act ----------------------------+ 02649 M01S00001.dsp15 +++| LDD FN+4 GET FILE TYPE 02650 M01S00002.dsp15 +++| SHN -6 02651 M00S02146.dsp +++| LMN LOFT 02652 M00S02147.dsp +++| ZJN DDC4 IF NOT QUEUED FILE 02653 M00S02148.dsp +++| UJN DDCX RETURN 02654 M00S02149.dsp +++| 02655 M00S02150.dsp +++|* IF *DC=SO* OR *DC=SS*, VALIDATE CALLER. 02656 M00S02151.dsp +++| 02657 M00S02152.dsp +++| DDC2 LDD CM+2 02658 M00S02153.dsp +++| LMC 2RSO 02659 M00S02154.dsp +++| ZJN DDC3 IF *DC=SO* 02660 M00S02155.dsp +++| LMC 2RSO&2RSS 02661 M00S02156.dsp +++| NJN DDC7 IF NOT *DC=SS* 02662 M00S02157.dsp +++| DDC3 LDD ST VALIDATE CALLER 02663 M00S02158.dsp +++| LPC SJFL+SYFL 02664 M00S02159.dsp +++| NJN DDC7 IF *SYOT* OR *SSJ=* 02665 M00S02160.dsp +++| ERROR /ERR/EC12 * DSP - INCORRECT REQUEST.* 02666 M00S02161.dsp +++| 02667 M00S02162.dsp +++|* SET DEFAULT DISPOSITION CODE. 02668 M00S02163.dsp +++| 02669 M00S02164.dsp +++| DDC4 LDC TSFN-TSFNL PRESET TABLE INDEX 02670 M00S02165.dsp +++| STD T1 02671 M00S02166.dsp +++| DDC5 LDN TSFNL ADVANCE INDEX 02672 M00S02167.dsp +++| RAD T1 02673 M00S02168.dsp +++| RJM CFN COMPARE FILE NAMES 02674 M00S02169.dsp +++| ZJN DDC6 IF FILE FOUND 02675 M00S02170.dsp +++| PJN DDC5 IF NO FILE NAME MATCH
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | dsp17 |
Seq # *Modification Id* Act ----------------------------+ 02676 M01S00001.dsp17 +++| ERROR /ERR/EC07 * DSP - INCORRECT DISPOSITION CODE.* 02677 M01S00002.dsp17 +++| 02678 M00S02171.dsp +++| DDC6 LDM 4,T1 SET DEFAULT DISPOSITION 02679 M00S02172.dsp +++| STD CM+2 02680 M00S02173.dsp +++| 02681 M00S02174.dsp +++|* VALIDATE DISPOSITION CODE. 02682 M00S02175.dsp +++| 02683 M00S02176.dsp +++| DDC7 LDC TODC-TODCL SET TABLE INDEX 02684 M00S02177.dsp +++| STD T1 02685 M00S02178.dsp +++| DDC8 LDN TODCL ADVANCE INDEX 02686 M00S02179.dsp +++| RAD T1 02687 M00S02180.dsp +++| LDI T1 02688 M00S02181.dsp +++| NJN DDC9 IF NOT END OF TABLE 02689 M00S02182.dsp +++| LDD CM+2 02690 M00S02183.dsp +++| LMC 2RSC
| Line S02184 Modification History | |
|---|---|
M01 (Removed by) | ns2493 |
Seq # *Modification Id* Act ----------------------------+ 02691 M01S02184.ns2493 ---| ZJN DDC11 IF *DC=SC*
| Line S00024 Modification History | |
|---|---|
M01 (Added by) | ns2493 |
Seq # *Modification Id* Act ----------------------------+ 02692 M01S00024.ns2493 +++| ZJP DDCX IF *DC=SC*
| Line S02185 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02693 M01S02185.v23l617 ---| ERROR /ERR/EC07 * DSP - INVALID DISPOSITION CODE.*
| Line S00051 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02694 M01S00051.v23l617 +++| ERROR /ERR/EC07 * DSP - INCORRECT DISPOSITION CODE.* 02695 M00S02186.dsp +++| 02696 M00S02187.dsp +++| DDC9 LMD CM+2 02697 M00S02188.dsp +++| NJN DDC8 IF NO MATCH 02698 M00S02189.dsp +++| AOD T1 SET NEW QUEUE TYPE 02699 M00S02190.dsp +++| LDI T1 SAVE TABLE ENTRY FOR ROUTINE *SDC* 02700 M00S02191.dsp +++| STM SDCA
| Line S02192 Modification History | |
|---|---|
M01 (Removed by) | ns2493 |
Seq # *Modification Id* Act ----------------------------+ 02701 M01S02192.ns2493 ---| SHN -6 02702 M01S02193.ns2493 ---| NJN DDC10 IF NOT INPUT FILE 02703 M01S02194.ns2493 ---| LDM FSOT CHECK FOR FORCED ORIGIN TYPE
| Line S00025 Modification History | |
|---|---|
M01 (Added by) | ns2493 |
Seq # *Modification Id* Act ----------------------------+ 02704 M01S00025.ns2493 +++| SHN -11 02705 M01S00026.ns2493 +++| LMK INQT 02706 M01S00027.ns2493 +++| NJP DDC17 IF NOT INPUT FILE 02707 M01S00028.ns2493 +++| 02708 M01S00029.ns2493 +++|* VALIDATE FORCED JSN, IF ANY. 02709 M01S00030.ns2493 +++| 02710 M01S00031.ns2493 +++| LDD FB+1 02711 M01S00032.ns2493 +++| LPN FRFJ 02712 M01S00033.ns2493 +++| ZJP DDC15 IF FORCED JSN FLAG NOT SPECIFIED 02713 M01S00034.ns2493 +++| STM FSJS SET FORCED JSN 02714 M01S00035.ns2493 +++| LMD FB+1 FORCE IMMEDIATE ROUTE FOR INPUT FILE 02715 M01S00036.ns2493 +++| ERRNZ FRFJ-FRDR (CODE ASSUMES FRFJ AND FRDR ARE SAME FLAG) 02716 M01S00037.ns2493 +++| STD FB+1 02717 M01S00038.ns2493 +++| LDD OT 02718 M01S00039.ns2493 +++| LMK SYOT 02719 M01S00040.ns2493 +++| NJP DDC16 IF NOT SYSTEM ORIGIN 02720 M01S00041.ns2493 +++| LDK EJTP READ EJT POINTER WORD 02721 M01S00042.ns2493 +++| CRD CM 02722 M01S00043.ns2493 +++| LDN 0 START SEARCH AT ORDINAL 0 02723 M01S00044.ns2493 +++| STD CM 02724 M01S00045.ns2493 +++| DDC10 LDD CM 02725 M01S00046.ns2493 +++| SBD CM+2 02726 M01S00047.ns2493 +++| PJN DDC12 IF END OF EJT 02727 M01S00048.ns2493 +++| SFA EJT,CM GET EJT ENTRY 02728 M01S00049.ns2493 +++| ADK JSNE 02729 M01S00050.ns2493 +++| CRD CN 02730 M01S00051.ns2493 +++| AOD CM INCREMENT EJT ORDINAL 02731 M01S00052.ns2493 +++| LDD CN 02732 M01S00053.ns2493 +++| ZJN DDC10 IF BLANK ENTRY
| Line S00054 Modification History | |
|---|---|
M01 (Added by) | ns2493 |
M02 (Removed by) | ns2556 |
Seq # *Modification Id* Act ----------------------------+ 02733 M02S00054.ns2556 ---| LMM SBSN
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | ns2556 |
Seq # *Modification Id* Act ----------------------------+ 02734 M01S00018.ns2556 +++| LMM FJSN
| Line S00055 Modification History | |
|---|---|
M01 (Added by) | ns2493 |
Seq # *Modification Id* Act ----------------------------+ 02735 M01S00055.ns2493 +++| NJN DDC10 IF NO MATCH ON FIRST 2 CHARACTERS 02736 M01S00056.ns2493 +++| LDD CN+1 COMPARE REMAINDER OF JSN
| Line S00057 Modification History | |
|---|---|
M01 (Added by) | ns2493 |
M02 (Removed by) | ns2556 |
Seq # *Modification Id* Act ----------------------------+ 02737 M02S00057.ns2556 ---| LMM SBSN+1
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | ns2556 |
Seq # *Modification Id* Act ----------------------------+ 02738 M01S00019.ns2556 +++| LMM FJSN+1
| Line S00058 Modification History | |
|---|---|
M01 (Added by) | ns2493 |
Seq # *Modification Id* Act ----------------------------+ 02739 M01S00058.ns2493 +++| NJN DDC10 IF NOT SAME JSN 02740 M01S00059.ns2493 +++| DDC11 ERROR /ERR/EC50 * DSP - JSN ALREADY IN SYSTEM.* 02741 M01S00060.ns2493 +++| 02742 M01S00061.ns2493 +++| DDC12 LDC TSSN CHECK IF JSN MATCHES A SUBSYSTEM NAME 02743 M01S00062.ns2493 +++| STD T1 02744 M01S00063.ns2493 +++| DDC13 LDI T1 SEARCH TABLE FOR SUBSYSTEM
| Line S00064 Modification History | |
|---|---|
M01 (Added by) | ns2493 |
M02 (Removed by) | ns2556 |
Seq # *Modification Id* Act ----------------------------+ 02745 M02S00064.ns2556 ---| LMM SBSN
| Line S00020 Modification History | |
|---|---|
M01 (Added by) | ns2556 |
Seq # *Modification Id* Act ----------------------------+ 02746 M01S00020.ns2556 +++| LMM FJSN
| Line S00065 Modification History | |
|---|---|
M01 (Added by) | ns2493 |
Seq # *Modification Id* Act ----------------------------+ 02747 M01S00065.ns2493 +++| NJN DDC14 IF NO MATCH 02748 M01S00066.ns2493 +++| LDM 1,T1
| Line S00067 Modification History | |
|---|---|
M01 (Added by) | ns2493 |
M02 (Removed by) | ns2556 |
Seq # *Modification Id* Act ----------------------------+ 02749 M02S00067.ns2556 ---| LMM SBSN+1
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | ns2556 |
Seq # *Modification Id* Act ----------------------------+ 02750 M01S00021.ns2556 +++| LMM FJSN+1
| Line S00068 Modification History | |
|---|---|
M01 (Added by) | ns2493 |
Seq # *Modification Id* Act ----------------------------+ 02751 M01S00068.ns2493 +++| ZJN DDC11 IF MATCH 02752 M01S00069.ns2493 +++| DDC14 LDN TSSNE GET NEXT TABLE ENTRY 02753 M01S00070.ns2493 +++| RAD T1 02754 M01S00071.ns2493 +++| LMC TSSNL 02755 M01S00072.ns2493 +++| NJN DDC13 IF NOT END OF TABLE
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | ns2556 |
Seq # *Modification Id* Act ----------------------------+ 02756 M01S00022.ns2556 +++| RJM VJS VALIDATE JSN SPECIFICATION
| Line S00073 Modification History | |
|---|---|
M01 (Added by) | ns2493 |
Seq # *Modification Id* Act ----------------------------+ 02757 M01S00073.ns2493 +++| DDC15 LDM FSOT CHECK FOR FORCED ORIGIN TYPE 02758 M00S02195.dsp +++| LMK IAOT 02759 M00S02196.dsp +++| LPN 17
| Line S02197 Modification History | |
|---|---|
M01 (Removed by) | ns2493 |
Seq # *Modification Id* Act ----------------------------+ 02760 M01S02197.ns2493 ---| NJN DDC10 IF NOT INTERACTIVE ORIGIN TYPE
| Line S02198 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
M02 (Removed by) | ns2493 |
Seq # *Modification Id* Act ----------------------------+ 02761 M02S02198.ns2493 ---| ERROR /ERR/EC40 * DSP - INVALID ORIGIN TYPE.*
| Line S00052 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | ns2493 |
Seq # *Modification Id* Act ----------------------------+ 02762 M02S00052.ns2493 ---| ERROR /ERR/EC40 * DSP - INCORRECT ORIGIN TYPE.*
| Line S00074 Modification History | |
|---|---|
M01 (Added by) | ns2493 |
Seq # *Modification Id* Act ----------------------------+ 02763 M01S00074.ns2493 +++| NJN DDC17 IF NOT INTERACTIVE ORIGIN TYPE 02764 M01S00075.ns2493 +++| DDC16 ERROR /ERR/EC40 * DSP - INCORRECT ORIGIN TYPE.* 02765 M00S02199.dsp +++|
| Line S02200 Modification History | |
|---|---|
M01 (Removed by) | ns2493 |
Seq # *Modification Id* Act ----------------------------+ 02766 M01S02200.ns2493 ---| DDC10 LDC DCFL SET DISPOSITION CODE SPECIFIED FLAG
| Line S00076 Modification History | |
|---|---|
M01 (Added by) | ns2493 |
Seq # *Modification Id* Act ----------------------------+ 02767 M01S00076.ns2493 +++| DDC17 LDC DCFL SET DISPOSITION CODE SPECIFIED FLAG 02768 M00S02201.dsp +++| RAD ST 02769 M00S02202.dsp +++| LDD CM+2 SAVE FOR ACCOUNTING MESSAGE 02770 M00S02203.dsp +++| STM SDCB
| Line S02204 Modification History | |
|---|---|
M01 (Removed by) | ns2493 |
Seq # *Modification Id* Act ----------------------------+ 02771 M01S02204.ns2493 ---| DDC11 LJM DDCX RETURN
| Line S00077 Modification History | |
|---|---|
M01 (Added by) | ns2493 |
Seq # *Modification Id* Act ----------------------------+ 02772 M01S00077.ns2493 +++| LJM DDCX RETURN 02773 M00S02205.dsp +++| TODC SPACE 4,10 02774 M00S02206.dsp +++|** TODC - TABLE OF DEFAULT ROUTING INFORMATION. 02775 M00S02207.dsp +++|* 02776 M00S02208.dsp +++|*T 12/ DC, 6/ QT, 3/ EC, 3/ IC.
Figure
02777 M00S02209.dsp +++|* 02778 M00S02210.dsp +++|* DC = DISPOSITION CODE. (DISPLAY CODE) 02779 M00S02211.dsp +++|* EC = EXTERNAL CHARACTERISTICS FOR QFT. 02780 M00S02212.dsp +++|* IC = INTERNAL CHARACTERISTICS FOR QFT. 02781 M00S02213.dsp +++|* QT = QUEUE TYPE FOR SPECIFIED DISPOSITION CODE. 02782 M00S02214.dsp +++| 02783 M00S02215.dsp +++| 02784 M00S02216.dsp +++| IN$ EQU 1 ALLOW *DC=IN* 02785 M00S02217.dsp +++| NO$ EQU 1 ALLOW *DC=NO* 02786 M00S02218.dsp +++| TO$ EQU 1 ALLOW *DC=TO* 02787 M00S02219.dsp +++| TT$ EQU 1 ALLOW *DC=TT* 02788 M00S02220.dsp +++| SO$ EQU 1 ALLOW *DC=SO* 02789 M00S02221.dsp +++| SS$ EQU 1 ALLOW *DC=SS* 02790 M00S02222.dsp +++| 02791 M00S02223.dsp +++| TODC BSS 0 02792 M00S02224.dsp +++| DRIN PR,DFEX,DCIC,LPQF ANY PRINTER 02793 M00S02225.dsp +++| TODCL EQU *-TODC LENGTH OF TABLE ENTRY 02794 M00S02226.dsp +++| DRIN LP,DFEX,DCIC,LPQF ANY PRINTER 02795 M00S02227.dsp +++| DRIN P1,DFEX,DCIC,0 505 PRINTER 02796 M00S02228.dsp +++| DRIN P2,DFEX,DCIC,P2QF 512 PRINTER 02797 M00S02229.dsp +++| DRIN LQ,DFEX,DCIC,0 512 PRINTER 02798 M00S02230.dsp +++| DRIN LR,DFEX,DCIC,LRQF 580-12 PRINTER 02799 M00S02231.dsp +++| DRIN LS,DFEX,DCIC,LSQF 580-16 PRINTER 02800 M00S02232.dsp +++| DRIN LT,DFEX,DCIC,LTQF 580-20 PRINTER
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 02801 M01S00010.241l630 +++| DRIN LX,DFEX,DCIC,LXQF 5870 NIP 02802 M01S00011.241l630 +++| DRIN LY,DFEX,DCIC,LYQF 5970 NIP 02803 M00S02233.dsp +++| DRIN SB,PBFR,BNIC,PUQF PUNCH BINARY 02804 M00S02234.dsp +++| DRIN P8,P8FR,BNIC,PUQF PUNCH 80 COLUMN 02805 M00S02235.dsp +++| DRIN PB,PBFR,BNIC,PUQF PUNCH BINARY 02806 M00S02236.dsp +++| DRIN TT,DFEX,DFEX,TQQF TERMINAL OUTPUT 02807 M00S02237.dsp +++| DRIN SS,DFEX,DFEX,SQQF STATION OUTPUT 02808 M00S02238.dsp +++| DRIN WT,DFEX,DFEX,TQQF WAIT QUEUE 02809 M00S02239.dsp +++| TODCA EQU * 02810 M00S02240.dsp +++| DRIN PU,PHFR,DCIC,PUQF PUNCH CODED 02811 M00S02241.dsp +++| TODCB EQU * 02812 M00S02242.dsp +++| DRIN PH,PHFR,DCIC,PUQF PUNCH CODED 02813 M00S02243.dsp +++| DRIN FR,T6EX,0,FRQF MICROFILM PRINT 02814 M00S02244.dsp +++| DRIN FL,T6EX,0,FLQF MICROFILM PLOT 02815 M00S02245.dsp +++| DRIN PL,T6EX,0,PLQF PLOTTER 02816 M00S02246.dsp +++| DRIN HR,T6EX,0,HRQF HARD COPY PRINT 02817 M00S02247.dsp +++| DRIN HL,T6EX,0,HLQF HARD COPY PLOT 02818 M00S02248.dsp +++| DRIN IN,0,0,INQF INPUT 02819 M00S02249.dsp +++| DRIN NO,0,0,NOQF INPUT NO OUTPUT 02820 M00S02250.dsp +++|* DRIN SC,0,0,LOFT SCRATCH 02821 M00S02251.dsp +++| DRIN TO,0,0,TOQF INPUT, TERMINAL OUTPUT 02822 M00S02252.dsp +++| DRIN SO,0,0,SOQF INPUT, STATION OUTPUT 02823 M00S02253.dsp +++| CON 0 END OF TABLE 02824 M00S02254.dsp +++| TSFN SPACE 4,10 02825 M00S02255.dsp +++|** TSFN - TABLE OF SPECIAL FILE NAMES AND DISPOSITION CODES. 02826 M00S02256.dsp +++|* 02827 M00S02257.dsp +++|*T 48/ FILE NAME ,12/ DC
Figure
02828 M00S02258.dsp +++|* 02829 M00S02259.dsp +++|* DC = DISPOSITION CODE. 02830 M00S02260.dsp +++| 02831 M00S02261.dsp +++| 02832 M00S02262.dsp +++| TSFN BSS 0 02833 M00S02263.dsp +++| VFD 48/0LOUTPUT,12/2LLP 02834 M00S02264.dsp +++| TSFNL EQU *-TSFN LENGTH OF ENTRY 02835 M00S02265.dsp +++| SPACE 4,10 02836 M00S02266.dsp +++| VFD 48/0LPUNCH,12/2LPU 02837 M00S02267.dsp +++| VFD 48/0LPUNCHB,12/2LSB 02838 M00S02268.dsp +++| VFD 48/0LP8,12/2LP8 02839 M00S02269.dsp +++| VFD 48/0,12/2LSC
| Line S00078 Modification History | |
|---|---|
M01 (Added by) | ns2493 |
Seq # *Modification Id* Act ----------------------------+ 02840 M01S00078.ns2493 +++| TSSN SPACE 4,10 02841 M01S00079.ns2493 +++|** TABLE OF SUBSYSTEM NAMES. 02842 M01S00080.ns2493 +++|* 02843 M01S00081.ns2493 +++|* ENTRY FORMAT. 02844 M01S00082.ns2493 +++|* 02845 M01S00083.ns2493 +++|*T 24/ NAME
Figure
02846 M01S00084.ns2493 +++|* 02847 M01S00085.ns2493 +++|* NAME = 3-CHARACTER SUBSYSTEM NAME + BLANK. 02848 M01S00086.ns2493 +++| 02849 M01S00087.ns2493 +++| 02850 M01S00088.ns2493 +++| TSSN BSS 0 02851 M01S00089.ns2493 +++| LIST G 02852 M01S00090.ns2493 +++| .SSN HERE 02853 M01S00091.ns2493 +++| LIST * 02854 M01S00092.ns2493 +++| TSSNL BSS 0 END OF TABLE 02855 M00S02270.dsp +++| FFQ SPACE 4,20 02856 M00S02271.dsp +++|** FFQ - FIND FILE TO QUEUE. 02857 M00S02272.dsp +++|* 02858 M00S02273.dsp +++|* ENTRY (FB - FB+1) = FLAG BITS. 02859 M00S02274.dsp +++|* (FN - FN+4) = (UN - UN+4) = FILE NAME. 02860 M00S02275.dsp +++|* (ST) = STATUS WORD. 02861 M00S02276.dsp +++|* 02862 M00S02277.dsp +++|* EXIT (FN - FN+4) = FNT ENTRY. 02863 M00S02278.dsp +++|* (FS - FS+4) = FST ENTRY. 02864 M00S02279.dsp +++|* (FA) = NFL FNT ENTRY OFFSET. 02865 M00S02280.dsp +++|* (ST) = SET, IF FILE CREATION NEEDED. 02866 M00S02281.dsp +++|* (LFAL) = LOCAL FILE ACCESS LEVEL. 02867 M00S02282.dsp +++|* 02868 M00S02283.dsp +++|* ERROR TO *ERR*, IF ONE OF THE FOLLOWING OCCURS, 02869 M00S02284.dsp +++|* FILE NAME ERROR. 02870 M00S02285.dsp +++|* IMMEDIATE ROUTE - NO FILE. 02871 M00S02286.dsp +++|* CANNOT ROUTE JOB INPUT FILE. 02872 M00S02287.dsp +++|* I/O SEQUENCE ERROR.
| Line S02288 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02873 M01S02288.v23l617 ---|* INVALID FILE MODE.
| Line S00053 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02874 M01S00053.v23l617 +++|* INCORRECT FILE MODE.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | dsp15 |
Seq # *Modification Id* Act ----------------------------+ 02875 M01S00003.dsp15 +++|* INVALID FILE TYPE. 02876 M00S02289.dsp +++|*
| Line S02290 Modification History | |
|---|---|
M01 (Removed by) | dsp15 |
Seq # *Modification Id* Act ----------------------------+ 02877 M01S02290.dsp15 ---|* USES ST, CM - CM+4, FN - FN+4.
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | dsp15 |
Seq # *Modification Id* Act ----------------------------+ 02878 M01S00004.dsp15 +++|* USES ST, T1, CM - CM+4, FN - FN+4. 02879 M00S02291.dsp +++|* 02880 M00S02292.dsp +++|* CALLS SAF, SFB, VFN, VMS. 02881 M00S02293.dsp +++|* 02882 M00S02294.dsp +++|* MACROS ERROR, NFA. 02883 M00S02295.dsp +++| 02884 M00S02296.dsp +++| 02885 M00S02297.dsp +++| FFQ SUBR ENTRY/EXIT 02886 M00S02298.dsp +++| LDC ** FNT ADDRESS 02887 M00S02299.dsp +++| FFQA EQU *-1 (SET BY PRESET) 02888 M00S02300.dsp +++| RJM SAF SEARCH FOR ASSIGNED FILE 02889 M00S02301.dsp +++| NJN FFQ3 IF FILE FOUND 02890 M00S02302.dsp +++| RJM VFN VERIFY FILE NAME 02891 M00S02303.dsp +++| NJN FFQ1 IF VALID FILE NAME 02892 M00S02304.dsp +++| ERROR /ERR/EC01 * DSP - FILE NAME ERROR.* 02893 M00S02305.dsp +++|
| Line S02306 Modification History | |
|---|---|
M01 (Removed by) | dsp9 |
Seq # *Modification Id* Act ----------------------------+ 02894 M01S02306.dsp9 ---| FFQ1 LDD FB+1 02895 M01S02307.dsp9 ---| SHN 21-0 02896 M01S02308.dsp9 ---| MJN FFQ2 IF DEFERRED ROUTE 02897 M01S02309.dsp9 ---| ERROR /ERR/EC06 * DSP - IMMEDIATE ROUTING - NO FILE.* 02898 M01S02310.dsp9 ---| 02899 M01S02311.dsp9 ---| FFQ2 LDC LOFT*100 SET LOCAL FILE FOR *DDC*
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | dsp9 |
Seq # *Modification Id* Act ----------------------------+ 02900 M01S00002.dsp9 +++| FFQ1 LDC LOFT*100 SET LOCAL FILE FOR *DDC*
Proceed to Part 2
cdc/nos2.source/opl.opl871/deck/dsp.001.txt · Last modified: by 127.0.0.1