User Tools

Site Tools


cdc:nos2.source:opl.opl871:deck:1aj.009

Deck 1AJ Part 009

214 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
Line S00493 Modification History
M01 (Added by) ns21000
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11647  M02S00493.v23l617 ---| INTC     RJM    UPS         UNPACK STATEMENT
Line S00694 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11648  M01S00694.v23l617 +++| INTC     RJM    UPS         UNPACK COMMAND
Line S00494 Modification History
M01 (Added by) ns21000
M02 (Removed by) 1aj92
Seq #  *Modification Id* Act 
----------------------------+
11649  M02S00494.1aj92   ---|*         UJN    INT26       (*SHELL* CONTROL IN FORCE)
Line S00030 Modification History
M01 (Added by) 1aj92
Seq #  *Modification Id* Act 
----------------------------+
11650  M01S00030.1aj92   +++|*         LJM    INT26       (*SHELL* CONTROL IN FORCE)
Line S07382 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11651  M01S07382.v23l617 ---|          ZJN    INT24       IF NOT POSSIBLE CONTINUATION CARD
Line S00695 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11652  M01S00695.v23l617 +++|          ZJN    INT24       IF NOT POSSIBLE CONTINUATION COMMAND
Line S00002 Modification History
M01 (Added by) 1aj99
Seq #  *Modification Id* Act 
----------------------------+
11653  M01S00002.1aj99   +++|          LDM    CHAR
11654  M01S00003.1aj99   +++|          ZJP    INT22.2     IF NULL LINE
Line S00031 Modification History
M01 (Added by) 1aj92
Seq #  *Modification Id* Act 
----------------------------+
11655  M01S00031.1aj92   +++|          LDN    0           FLAG POSSIBLE CONTINUATION COMMAND
11656  M01S00032.1aj92   +++|          STM    SCLC
11657  M01S00033.1aj92   +++|          AOM    CSEA        FLAG POSSIBLE CONTINUATION COMMAND
11658  M01S00034.1aj92   +++|          RJM    AKW         ASSEMBLE KEYWORD
11659  M01S00035.1aj92   +++| INT23.2  ZJP    TCS6        IF NO KEYWORD
11660  M01S00036.1aj92   +++|          MJN    INT24.1     IF COMMENT COMMAND
11661  M01S00037.1aj92   +++|          ISTORE SCLB,(ZJN SCLX)  TERMINATE IF NOT *ARG=*
11662  M01S00038.1aj92   +++|          RJM    IPL         INITIALIZE PROGRAM LOAD
11663  M00S07383.1aj     +++|          LJM    TCS1        CONTINUE PROCESSING
11664  M00S07384.1aj     +++|
Line S07385 Modification History
M01 (Removed by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
11665  M01S07385.ns21000 ---| INT24    LJM    TCS3        PROCESS POSSIBLE CONTINUATION CARD
Line S00495 Modification History
M01 (Added by) ns21000
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11666  M02S00495.v23l617 ---| INT24    LJM    TCS3        PROCESS CONTROL CARD
Line S00696 Modification History
M01 (Added by) v23l617
M02 (Removed by) 1aj92
Seq #  *Modification Id* Act 
----------------------------+
11667  M02S00696.1aj92   ---| INT24    LJM    TCS3        PROCESS COMMAND
Line S00039 Modification History
M01 (Added by) 1aj92
Seq #  *Modification Id* Act 
----------------------------+
11668  M01S00039.1aj92   +++| INT24    RJM    AKW         ASSEMBLE KEYWORD
11669  M01S00040.1aj92   +++|          ZJN    INT23.2     IF NO KEYWORD
11670  M01S00041.1aj92   +++|          MJN    INT24.1     IF COMMENT COMMAND
11671  M01S00042.1aj92   +++|          RJM    SSF         SEARCH FOR SPECIAL FORMAT
11672  M01S00043.1aj92   +++|          RJM    IPL         INTIALIZE PROGRAM LOAD
11673  M01S00044.1aj92   +++|          LJM    TCS3        LOAD PROGRAM
11674  M01S00045.1aj92   +++|
11675  M01S00046.1aj92   +++| INT24.1  LDM    TCSA
11676  M01S00047.1aj92   +++|          ZJP    IST6        IF NO CHARGE REQUIRED
11677  M01S00048.1aj92   +++|          LDC    /ERR/EM06   * CHARGE COMMAND REQUIRED.*
11678  M01S00049.1aj92   +++|          LJM    ERR1        PROCESS ERROR
Line S00496 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
11679  M01S00496.ns21000 +++|
11680  M01S00497.ns21000 +++| INT25    LDC    LDNI+MS2W-MS1W  ENABLE *MS1W* COPY
11681  M01S00498.ns21000 +++|          STM    BCPK
11682  M01S00499.ns21000 +++| INT26    NFA    SHCN        SET *SHELL* CONTROLS
11683  M01S00500.ns21000 +++|          CRD    AB
Line S00001 Modification History
M01 (Added by) 1aj93a
Seq #  *Modification Id* Act 
----------------------------+
11684  M01S00001.1aj93a  +++|          ISTORE SSCC,(UJN SSC2)
Line S00501 Modification History
M01 (Added by) ns21000
M02 (Removed by) ns2114
Seq #  *Modification Id* Act 
----------------------------+
11685  M02S00501.ns2114  ---|          LDC    200         SET *SHELL* EXECUTING
Line S00007 Modification History
M01 (Added by) ns2114
M02 (Removed by) 1aj94
Seq #  *Modification Id* Act 
----------------------------+
11686  M02S00007.1aj94   ---|          LDC    4000
Line S00502 Modification History
M01 (Added by) ns21000
M02 (Removed by) 1aj94
Seq #  *Modification Id* Act 
----------------------------+
11687  M02S00502.1aj94   ---|          RAD    AB+4
Line S00001 Modification History
M01 (Added by) 1aj94
Seq #  *Modification Id* Act 
----------------------------+
11688  M01S00001.1aj94   +++|          LDD    AB+4        SET *SHELL* PROGRAM ACTIVE
11689  M01S00002.1aj94   +++|          LPC    3777
11690  M01S00003.1aj94   +++|          LMC    4000
11691  M01S00004.1aj94   +++|          STD    AB+4
Line S00503 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
11692  M01S00503.ns21000 +++|          NFA    SHCN
11693  M01S00504.ns21000 +++|          CWD    AB
11694  M01S00505.ns21000 +++|          LDD    AB+4
11695  M01S00506.ns21000 +++|          SHN    21-5
11696  M01S00507.ns21000 +++|          MJN    INT27       IF LOCAL FILE LOAD ALLOWED
11697  M01S00508.ns21000 +++|          LDC    UJNI+2      DISABLE LOCAL FILE LOAD
11698  M01S00509.ns21000 +++|          STM    TCSB
11699  M01S00510.ns21000 +++| INT27    LDD    AB+4
11700  M01S00511.ns21000 +++|          SHN    21-4
11701  M01S00512.ns21000 +++|          MJN    INT28       IF GLOBAL FILE LOAD ALLOWED
11702  M01S00513.ns21000 +++|          LDC    UJNI+2      DISABLE GLOBAL FILE LOAD
11703  M01S00514.ns21000 +++|          STM    TCSC
11704  M01S00515.ns21000 +++| INT28    LDD    AB+4
11705  M01S00516.ns21000 +++|          SHN    21-3
11706  M01S00517.ns21000 +++|          MJN    INT29       IF SYSTEM FILE LOAD ALLOWED
11707  M01S00518.ns21000 +++|          LDC    UJNI+77+SCLX-SCLE  DISABLE SYSTEM FILE LOAD
11708  M01S00519.ns21000 +++|          STM    SCLE
11709  M01S00520.ns21000 +++| INT29    LDC    UJNI+77-ARGC+ARG6  DISABLE ARGUMENT PROCESSING
11710  M01S00521.ns21000 +++|          STM    ARGC
Line S00522 Modification History
M01 (Added by) ns21000
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11711  M02S00522.v23l617 ---|          LDC    UJNI+IST1-IST  DISABLE CONTROL STATEMENT MESSAGE
Line S00697 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11712  M01S00697.v23l617 +++|          LDC    UJNI+IST1-IST  DISABLE COMMAND MESSAGE
Line S00523 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
11713  M01S00523.ns21000 +++|          STM    IST
11714  M01S00524.ns21000 +++|          LDC    MJNI+BCP9.1-BCPL  DISABLE SEQUENCE NUMBER SKIP
11715  M01S00525.ns21000 +++|          STM    BCPL
Line S00526 Modification History
M01 (Added by) ns21000
M02 (Removed by) 1aj50
Seq #  *Modification Id* Act 
----------------------------+
11716  M02S00526.1aj50   ---|          LDN    0
11717  M02S00527.1aj50   ---|          STD    AB+4
Line S00022 Modification History
M01 (Added by) 1aj28
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11718  M02S00022.242l642 ---|          STM    SFPA        ENABLE *SHELL* LOCAL FILE CODE
11719  M02S00023.242l642 ---|          STM    SFPA+1
Line S00405 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11720  M01S00405.242l642 +++|          LDN    0
11721  M01S00406.242l642 +++|          STM    SPFA
11722  M01S00407.242l642 +++|          STM    SPFA+1
Line S00528 Modification History
M01 (Added by) ns21000
M02 (Removed by) 1aj50
Seq #  *Modification Id* Act 
----------------------------+
11723  M02S00528.1aj50   ---|          LJM    TCS6.1      PROCESS *SHELL* CONTROL
Line S00001 Modification History
M01 (Added by) 1aj50
Seq #  *Modification Id* Act 
----------------------------+
11724  M01S00001.1aj50   +++|          LDC    /ERR/EM25   SET *SHELL* ERROR TERMINATION MESSAGE
Line S00002 Modification History
M01 (Added by) 1aj50
M02 (Removed by) 1aj92
Seq #  *Modification Id* Act 
----------------------------+
11725  M02S00002.1aj92   ---|          STM    TCSE
Line S00050 Modification History
M01 (Added by) 1aj92
Seq #  *Modification Id* Act 
----------------------------+
11726  M01S00050.1aj92   +++|          STM    TCSG
Line S00003 Modification History
M01 (Added by) 1aj50
Seq #  *Modification Id* Act 
----------------------------+
11727  M01S00003.1aj50   +++|          LDD    AB+4        SET *SHELL* ABORT OPTION
11728  M01S00004.1aj50   +++|          SHN    21-7
11729  M01S00005.1aj50   +++|          PJN    INT31       IF ABORT OPTION NOT SELECTED
11730  M01S00006.1aj50   +++|          LDC    CWDI+CM
Line S00007 Modification History
M01 (Added by) 1aj50
M02 (Removed by) 1aj92
Seq #  *Modification Id* Act 
----------------------------+
11731  M02S00007.1aj92   ---|          STM    TCSD
Line S00051 Modification History
M01 (Added by) 1aj92
Seq #  *Modification Id* Act 
----------------------------+
11732  M01S00051.1aj92   +++|          STM    TCSF
Line S00008 Modification History
M01 (Added by) 1aj50
Seq #  *Modification Id* Act 
----------------------------+
11733  M01S00008.1aj50   +++| INT30    LDN    0           ZERO FILL PROGRAM NAME
11734  M01S00009.1aj50   +++|          STD    AB+4
Line S00010 Modification History
M01 (Added by) 1aj50
M02 (Removed by) 1aj92
Seq #  *Modification Id* Act 
----------------------------+
11735  M02S00010.1aj92   ---|          LJM    TCS6.1      PROCESS *SHELL* CONTROL
Line S00052 Modification History
M01 (Added by) 1aj92
Seq #  *Modification Id* Act 
----------------------------+
11736  M01S00052.1aj92   +++|          RJM    IPL         INITIALIZE PROGRAM LOAD
11737  M01S00053.1aj92   +++|          LJM    TCS3        PROCESS *SHELL* CONTROL
Line S00011 Modification History
M01 (Added by) 1aj50
Seq #  *Modification Id* Act 
----------------------------+
11738  M01S00011.1aj50   +++|
11739  M01S00012.1aj50   +++| INT31    LDC    LDNI+SYET   ABORT JOB IF *SHELL* LOAD ERROR
11740  M01S00013.1aj50   +++|          STM    ISTB
11741  M01S00014.1aj50   +++|          UJN    INT30       PROCESS *SHELL* CONTROL
Line S07386 Modification History
M01 (Removed by) 1aj119
Seq #  *Modification Id* Act 
----------------------------+
11742  M01S07386.1aj119  ---|
11743  M01S07387.1aj119  ---|
Line S07388 Modification History
M01 (Removed by) v23l617
M02 (Removed by) 1aj119
Seq #  *Modification Id* Act 
----------------------------+
11744  M02S07388.1aj119  ---| INTA     DATA   C* TCS ILLEGAL REQUEST.*
Line S00698 Modification History
M01 (Added by) v23l617
M02 (Removed by) 1aj119
Seq #  *Modification Id* Act 
----------------------------+
11745  M02S00698.1aj119  ---| INTA     DATA   C* TCS INCORRECT REQUEST.*
Line S07389 Modification History
M01 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
11746  M01S07389.273l780 ---|
11747  M01S07390.273l780 ---|          ERRNG  37+IST3-ISTC IF JUMP OUT OF RANGE
11748  M00S07391.1aj     +++|          TITLE  OVERLAID SUBROUTINES.
11749  M00S07392.1aj     +++|          SPACE  4,10
Line S07393 Modification History
M01 (Removed by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
11750  M01S07393.ns21000 ---|**        ASSEMBLY VARIBBLES FOR COMMON DECKS.
11751  M01S07394.ns21000 ---|
11752  M01S07395.ns21000 ---|
11753  M01S07396.ns21000 ---| EJT$     EQU    1           ASSEMBLE EJT ADDRESSING (COMPGFP)
11754  M01S07397.ns21000 ---|          SPACE  4,10
11755  M01S07398.ns21000 ---|**        OVERLAID COMMON DECKS.
11756  M01S07399.ns21000 ---|
11757  M01S07400.ns21000 ---|
11758  M01S07401.ns21000 ---|*CALL     COMPGFP
11759  M01S07402.ns21000 ---|*CALL     COMPRNS
11760  M01S07403.ns21000 ---|*CALL     COMPUPS
11761  M00S07404.1aj     +++|          SPACE  4,10
11762  M00S07405.1aj     +++|**        DEFINE ORIGIN OF OVERLAY *3AF*.
11763  M00S07406.1aj     +++|
11764  M00S07407.1aj     +++|
11765  M00S07408.1aj     +++| O3AF     EQU    *
11766  M00S07409.1aj     +++|          SPACE  4,10
11767  M00S07410.1aj     +++|**        DEFINE ORIGIN OF ROUTINES.
11768  M00S07411.1aj     +++|
11769  M00S07412.1aj     +++|
11770  M00S07413.1aj     +++|          ERRPL  OVL-*       OVERLAY CONFLICT
11771  M00S07414.1aj     +++| ATX      SPACE  4,15
Line S07415 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11772  M01S07415.v23l617 ---|**        ATX - ADVANCE TO EXIT STATEMENT IF EXIT FLAG SET AND
Line S00699 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11773  M01S00699.v23l617 +++|**        ATX - ADVANCE TO EXIT COMMAND IF EXIT FLAG SET AND
11774  M00S07416.1aj     +++|*         CLEAR FLAG.  IF EXIT FOUND DAYFILE MESSAGE IS ISSUED.
11775  M00S07417.1aj     +++|*
Line S07418 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11776  M01S07418.v23l617 ---|*         ENTRY  (SP - SP+4) = CONTROL STATEMENT POINTER.
Line S00700 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11777  M01S00700.v23l617 +++|*         ENTRY  (SP - SP+4) = COMMAND POINTER.
11778  M00S07419.1aj     +++|*
11779  M00S07420.1aj     +++|*         EXIT   (SP - SP+4) = UPDATED.
11780  M00S07421.1aj     +++|*                TO *IST* IF EXIT FOUND.
Line S00408 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11781  M01S00408.242l642 +++|*                TO *IST5* IF NON-RECOVERABLE MASS STORAGE ERROR.
11782  M00S07422.1aj     +++|*
11783  M00S07423.1aj     +++|*         USES   CM - CM+4.
11784  M00S07424.1aj     +++|*
Line S07425 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11785  M01S07425.242l642 ---|*         CALLS  AKW, RCS, UPS.
Line S00409 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11786  M01S00409.242l642 +++|*         CALLS  AKW, MSR, RCS, UPS.
11787  M00S07426.1aj     +++|
11788  M00S07427.1aj     +++|
11789  M00S07428.1aj     +++| ATX2     LDD    SP+3
11790  M00S07429.1aj     +++|          LMD    SP+4
11791  M00S07430.1aj     +++|          NJN    ATX1        IF BUFFER NOT EMPTY
11792  M00S07431.1aj     +++|          LDD    SP+1
11793  M00S07432.1aj     +++|          SHN    21-13
Line S07433 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11794  M01S07433.v23l617 ---|          PJN    ATX1        IF NOT EOR ON CONTROL STATEMENT FILE
Line S00701 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11795  M01S00701.v23l617 +++|          PJN    ATX1        IF NOT EOR ON COMMAND FILE
Line S00005 Modification History
M01 (Added by) 1aj93
Seq #  *Modification Id* Act 
----------------------------+
11796  M01S00005.1aj93   +++|          LDC    ERR         RESET ERROR EXIT FROM *ASN*
11797  M01S00006.1aj93   +++|          STM    ASNA
11798  M00S07434.1aj     +++|
11799  M00S07435.1aj     +++| ATX      SUBR               ENTRY/EXIT
11800  M00S07436.1aj     +++|          LDD    CP          CHECK EXIT FLAG
11801  M00S07437.1aj     +++|          ADN    CSSW
11802  M00S07438.1aj     +++|          CRD    CM
11803  M00S07439.1aj     +++|          LDD    CM
11804  M00S07440.1aj     +++|          SHN    21-12
11805  M00S07441.1aj     +++|          PJN    ATXX        IF EXIT FLAG NOT SET
11806  M00S07442.1aj     +++|          LDC    -2000       CLEAR SKIP TO EXIT FLAG
11807  M00S07443.1aj     +++|          RAD    CM
11808  M00S07444.1aj     +++|          LDD    CP
11809  M00S07445.1aj     +++|          ADN    CSSW
11810  M00S07446.1aj     +++|          CWD    CM
11811  M00S07447.1aj     +++|          LDC    ATX1        RESET ERROR EXIT FROM ASN
11812  M00S07448.1aj     +++|          STM    ASNA
Line S07449 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11813  M01S07449.v23l617 ---| ATX1     RJM    RCS         READ CONTROL STATEMENT
Line S00702 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11814  M01S00702.v23l617 +++| ATX1     RJM    RCS         READ COMMAND
Line S07450 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11815  M01S07450.242l642 ---|          LDM    STMT
Line S07451 Modification History
M01 (Removed by) v23l617
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11816  M02S07451.242l642 ---|          ZJN    ATX2        IF POSSIBLE END OF CONTROL STATEMENTS
11817  M02S07452.242l642 ---|          RJM    UPS         UNPACK STATEMENT
Line S00703 Modification History
M01 (Added by) v23l617
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11818  M02S00703.242l642 ---|          ZJN    ATX2        IF POSSIBLE END OF COMMANDS
Line S00410 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11819  M01S00410.242l642 +++|          PJN    ATX1.1      IF NO MASS STORAGE ERROR
11820  M01S00411.242l642 +++|          RJM    MSR         PROCESS MASS STORAGE ERROR
11821  M01S00412.242l642 +++|          LJM    IST5        EXIT
11822  M01S00413.242l642 +++|
11823  M01S00414.242l642 +++| ATX1.1   LDM    STMT
11824  M01S00415.242l642 +++|          ZJP    ATX2        IF POSSIBLE END OF COMMANDS
Line S00704 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11825  M01S00704.v23l617 +++|          RJM    UPS         UNPACK COMMAND
11826  M00S07453.1aj     +++|          NJN    ATX1        IF NO TERMINATOR
11827  M00S07454.1aj     +++|          RJM    AKW         ASSEMBLE KEYWORD
11828  M00S07455.1aj     +++|          LDD    AB
11829  M00S07456.1aj     +++|          LMC    2REX
11830  M00S07457.1aj     +++|          NJN    ATX1        IF NOT *EX*
11831  M00S07458.1aj     +++|          LDD    AB+1
11832  M00S07459.1aj     +++|          LMC    2RIT
11833  M00S07460.1aj     +++|          NJN    ATX1        IF NOT *IT*
11834  M00S07461.1aj     +++|          LDD    AB+2
11835  M00S07462.1aj     +++|          NJN    ATX1        IF NOT SEPARATOR
11836  M00S07463.1aj     +++|          LDC    ERR         RESET EXIT ADDRESS
11837  M00S07464.1aj     +++|          STM    ASNA
Line S07465 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11838  M01S07465.v23l617 ---|          LJM    IST         ISSUE STATEMENT
Line S00705 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11839  M01S00705.v23l617 +++|          LJM    IST         ISSUE COMMAND
Line S00003 Modification History
M01 (Added by) 1aj10
Seq #  *Modification Id* Act 
----------------------------+
11840  M01S00003.1aj10   +++| CCF      SPACE  4,10
11841  M01S00004.1aj10   +++|**        CCF - CLEAR CONTROL FIELDS.
11842  M01S00005.1aj10   +++|*
11843  M01S00006.1aj10   +++|*         EXIT   REPRIVE, ERROR EXIT, PP DUMP AND K-DISPLAY CONTROL
11844  M01S00007.1aj10   +++|*                FIELDS CLEARED.
11845  M01S00008.1aj10   +++|*
11846  M01S00009.1aj10   +++|*         USES   CN - CN+4, FS - FS+4.
11847  M01S00010.1aj10   +++|
11848  M01S00011.1aj10   +++|
11849  M01S00012.1aj10   +++| CCF      SUBR               ENTRY/EXIT
11850  M01S00013.1aj10   +++|          LDD    CP          CLEAR ERROR EXIT CONTROL WORD
11851  M01S00014.1aj10   +++|          ADN    EECW
11852  M01S00015.1aj10   +++|          CRD    FS
11853  M01S00016.1aj10   +++|          ADN    PPDW-EECW   CLEAR PP DUMP WORD
11854  M01S00017.1aj10   +++|          CRD    CN
11855  M01S00018.1aj10   +++|          LDD    FS+3
11856  M01S00019.1aj10   +++|          SCN    77
11857  M01S00020.1aj10   +++|          STD    FS+3
11858  M01S00021.1aj10   +++|          LDN    0
11859  M01S00022.1aj10   +++|          STD    FS+4
11860  M01S00023.1aj10   +++|          STD    FS+1        CLEAR REPRIEVE OPTIONS
11861  M01S00024.1aj10   +++|          STD    CN+3
11862  M01S00025.1aj10   +++|          STD    CN+4
11863  M01S00026.1aj10   +++|          LDD    FS          CLEAR EXTENDED REPRIEVE FLAGS
11864  M01S00027.1aj10   +++|          LPC    4777
11865  M01S00028.1aj10   +++|          STD    FS
11866  M01S00029.1aj10   +++|          LDD    CP          WRITE UPDATED EECW
11867  M01S00030.1aj10   +++|          ADN    EECW
11868  M01S00031.1aj10   +++|          CWD    FS
11869  M01S00032.1aj10   +++|          ADN    PPDW-EECW
11870  M01S00033.1aj10   +++|          CWD    CN
11871  M01S00034.1aj10   +++|          LDN    ZERL
11872  M01S00035.1aj10   +++|          CRD    CN
11873  M01S00036.1aj10   +++|          LDD    CP          READ K-DISPLAY WORD
11874  M01S00037.1aj10   +++|          ADC    DBAW
11875  M01S00038.1aj10   +++|          CRD    FS
11876  M01S00039.1aj10   +++|          LDD    FS          PRESERVE MEMORY FLAGS
11877  M01S00040.1aj10   +++|          SCN    77
11878  M01S00041.1aj10   +++|          STD    CN
11879  M01S00042.1aj10   +++|          LDD    CP          CLEAR K-DISPLAY INFORMATION
11880  M01S00043.1aj10   +++|          ADC    DBAW
11881  M01S00044.1aj10   +++|          CWD    CN
11882  M01S00045.1aj10   +++|          LJM    CCFX        RETURN
11883  M00S07466.1aj     +++| CES      SPACE  4,10
Line S07467 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11884  M01S07467.v23l617 ---|**        CES - CHECK FOR *TCS* EXECUTE CONTROL STATEMENT.
Line S00706 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11885  M01S00706.v23l617 +++|**        CES - CHECK FOR *TCS* EXECUTE COMMAND.
11886  M00S07468.1aj     +++|*
Line S07469 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11887  M01S07469.v23l617 ---|*         EXIT   (A) = ADDRESS OF STATEMENT IF ONE EXISTS.
Line S00707 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11888  M01S00707.v23l617 +++|*         EXIT   (A) = ADDRESS OF COMMAND IF ONE EXISTS.
11889  M00S07470.1aj     +++|*
11890  M00S07471.1aj     +++|*         USES   CM - CM+4.
11891  M00S07472.1aj     +++|
11892  M00S07473.1aj     +++|
11893  M00S07474.1aj     +++| CES      SUBR               ENTRY/EXIT
11894  M00S07475.1aj     +++|          LDD    CP
11895  M00S07476.1aj     +++|          ADN    RFCW
11896  M00S07477.1aj     +++|          CRD    CM
Line S07478 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11897  M01S07478.v23l617 ---|          LDD    CM+3        FORM ADDRESS OF STATEMENT
Line S00708 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11898  M01S00708.v23l617 +++|          LDD    CM+3        FORM ADDRESS OF COMMAND
11899  M00S07479.1aj     +++|          SCN    77
11900  M00S07480.1aj     +++|          SHN    6
11901  M00S07481.1aj     +++|          LMD    CM+2
11902  M00S07482.1aj     +++|          SHN    6
11903  M00S07483.1aj     +++|          UJN    CESX        RETURN
11904  M00S07484.1aj     +++| CIJ      SPACE  4,20
11905  M00S07485.1aj     +++|**        CIJ - CHECK FOR INTERACTIVE JOB.
11906  M00S07486.1aj     +++|*
11907  M00S07487.1aj     +++|*         ENTRY  (JO) = EJT ORDINAL.
11908  M00S07488.1aj     +++|*
11909  M00S07489.1aj     +++|*         EXIT   (BCPJ - BCPJ+1) = JOB SEQUENCE NUMBER.
11910  M00S07490.1aj     +++|*                (BCPJ+4) = SERVICE CLASS.
11911  M00S07491.1aj     +++|*                (TSTN) = TERMINAL NUMBER IF ORIGIN TYPE = *TXOT*,
11912  M00S07492.1aj     +++|*                         CONNECTION STATUS = *OLCS* AND *IAF* IS
11913  M00S07493.1aj     +++|*                         ACCESSIBLE.
11914  M00S07494.1aj     +++|*                       = 0 OTHERWISE.
11915  M00S07495.1aj     +++|*
Line S07496 Modification History
M01 (Removed by) ns2748
Seq #  *Modification Id* Act 
----------------------------+
11916  M01S07496.ns2748  ---|*         USES   T1 - T5, CM - CM+4, TA, TN.
Line S00037 Modification History
M01 (Added by) ns2748
Seq #  *Modification Id* Act 
----------------------------+
11917  M01S00037.ns2748  +++|*         USES   TN, CM - CM+4, T1 - T5.
11918  M00S07497.1aj     +++|*
Line S07498 Modification History
M01 (Removed by) ns2748
Seq #  *Modification Id* Act 
----------------------------+
11919  M01S07498.ns2748  ---|*         CALLS  AST, STA.
Line S00038 Modification History
M01 (Added by) ns2748
Seq #  *Modification Id* Act 
----------------------------+
11920  M01S00038.ns2748  +++|*         CALLS  AST, PIR, RRR, SRR, STA.
11921  M00S07499.1aj     +++|*
11922  M00S07500.1aj     +++|*         MACROS SFA.
11923  M00S07501.1aj     +++|
11924  M00S07502.1aj     +++|
11925  M00S07503.1aj     +++| CIJ      SUBR               ENTRY/EXIT
11926  M00S07504.1aj     +++|          SFA    EJT,JO      READ JSN WORD OF EJT ENTRY
11927  M00S07505.1aj     +++|          ADK    JSNE
11928  M00S07506.1aj     +++|          CRD    CM
11929  M00S07507.1aj     +++|          CRM    BCPJ,ON     SAVE JSN
11930  M00S07508.1aj     +++|          ADN    //SCLE-JSNE-1     READ SERVICE CLASS/ORIGIN TYPE
11931  M00S07509.1aj     +++|          CRD    T1
11932  M00S07510.1aj     +++|          LDD    T1          SET SERVICE CLASS
11933  M00S07511.1aj     +++|          SCN    77
11934  M00S07512.1aj     +++|          STM    BCPJ+4
11935  M00S07513.1aj     +++|          LDD    T1
11936  M00S07514.1aj     +++|          LPN    17
Line S07515 Modification History
M01 (Removed by) ns2205
Seq #  *Modification Id* Act 
----------------------------+
11937  M01S07515.ns2205  ---|          LMK    TXOT
Line S00018 Modification History
M01 (Added by) ns2205
Seq #  *Modification Id* Act 
----------------------------+
11938  M01S00018.ns2205  +++|          LMK    IAOT
11939  M00S07516.1aj     +++|          NJN    CIJX        IF NOT INTERACTIVE JOB
11940  M00S07517.1aj     +++|          LDD    CM+4        CHECK CONNECTION STATUS
11941  M00S07518.1aj     +++|          SHN    -7
11942  M00S07519.1aj     +++|          LPN    17
Line S00019 Modification History
M01 (Added by) ns2205
Seq #  *Modification Id* Act 
----------------------------+
11943  M01S00019.ns2205  +++|          STM    IPLD
11944  M00S07520.1aj     +++|          LMK    OLCS
11945  M00S07521.1aj     +++|          NJN    CIJX        IF NOT ON-LINE
11946  M00S07522.1aj     +++|          LDC    FECF*10000+IFSI   CHECK *IAF* ACCESSIBILITY
11947  M00S07523.1aj     +++|          RJM    AST
11948  M00S07524.1aj     +++|          SHN    21-13
11949  M00S07525.1aj     +++| CIJ1     PJN    CIJX        IF *IAF* NOT ACCESSIBLE
Line S00039 Modification History
M01 (Added by) ns2748
Seq #  *Modification Id* Act 
----------------------------+
11950  M01S00039.ns2748  +++|          RJM    PIR         PRESET WITH IAF R-REGISTER
11951  M00S07526.1aj     +++|          LDD    CP          SET TERMINAL NUMBER
11952  M00S07527.1aj     +++|          ADK    TTNW
11953  M00S07528.1aj     +++|          CRD    CM
11954  M00S07529.1aj     +++|          LDD    CM+1
11955  M00S07530.1aj     +++|          STM    IPLB+4
11956  M00S07531.1aj     +++|          STD    TN          SAVE TERMINAL NUMBER FOR *STA*
Line S07532 Modification History
M01 (Removed by) ns2748
Seq #  *Modification Id* Act 
----------------------------+
11957  M01S07532.ns2748  ---|          LDK    /REM/VCPT*200+FLSW  GET *IAF* RA FOR *STA*
11958  M01S07533.ns2748  ---|          CRD    CM
11959  M01S07534.ns2748  ---|          LDD    CM+3
11960  M01S07535.ns2748  ---|          STD    TA
Line S00040 Modification History
M01 (Added by) ns2748
Seq #  *Modification Id* Act 
----------------------------+
11961  M01S00040.ns2748  +++|          RJM    SRR         SET R-REGISTER TO IAF RA
11962  M00S07536.1aj     +++|          RJM    STA         COMPUTE TERMINAL TABLE ADDRESS
11963  M00S07537.1aj     +++|          STM    IPLA        SAVE TERMINAL TABLE ADDRESS
11964  M00S07538.1aj     +++|          SHN    -14
11965  M00S07539.1aj     +++|          RAM    IPLA-1
Line S00041 Modification History
M01 (Added by) ns2748
Seq #  *Modification Id* Act 
----------------------------+
11966  M01S00041.ns2748  +++|          LDN    1           SET INTERACTIVE INDICATOR
11967  M01S00042.ns2748  +++|          RAM    IPLE
11968  M01S00043.ns2748  +++|          RJM    RRR         RESTORE R-REGISTER
11969  M00S07540.1aj     +++|          UJN    CIJ1        RETURN
Line S00044 Modification History
M01 (Added by) ns2748
Seq #  *Modification Id* Act 
----------------------------+
11970  M01S00044.ns2748  +++|
11971  M01S00045.ns2748  +++| PRR      HERE               FORCE ASSEMBLY OF *PRR* HERE
11972  M00S07541.1aj     +++| CKA      SPACE  4,15
11973  M00S07542.1aj     +++|**        CKA - CHECK ADDRESS.
11974  M00S07543.1aj     +++|*
11975  M00S07544.1aj     +++|*         ENTRY  (A) = ADDRESS TO VALIDATE.
11976  M00S07545.1aj     +++|*                (T1) = WORD COUNT.
11977  M00S07546.1aj     +++|*
11978  M00S07547.1aj     +++|*         EXIT   (A) = ABSOLUTE ADDRESS.
11979  M00S07548.1aj     +++|*
11980  M00S07549.1aj     +++|*         ERROR  TO *IST2* IF ADDRESS ERROR.
11981  M00S07550.1aj     +++|*
11982  M00S07551.1aj     +++|*         USES   CM+3, CM+4.
11983  M00S07552.1aj     +++|*
11984  M00S07553.1aj     +++|*         CALLS  CAT.
11985  M00S07554.1aj     +++|
11986  M00S07555.1aj     +++|
11987  M00S07556.1aj     +++| CKA2     LDA    CM+3,M      LOAD ABSOLUTE ADDRESS
11988  M00S07557.1aj     +++|
11989  M00S07558.1aj     +++| CKA      SUBR               ENTRY/EXIT
11990  M00S07559.1aj     +++|          MJN    CKA1        IF .GT. 131K
11991  M00S07560.1aj     +++|          STD    CM+4        SAVE ADDRESS
11992  M00S07561.1aj     +++|          SHN    -14
11993  M00S07562.1aj     +++|          STD    CM+3
11994  M00S07563.1aj     +++|          SHN    14          VALIDATE ADDRESS
11995  M00S07564.1aj     +++|          LMD    CM+4
11996  M00S07565.1aj     +++|          ADD    T1
11997  M00S07566.1aj     +++|          SHN    -6
11998  M00S07567.1aj     +++|          SBD    FL
11999  M00S07568.1aj     +++|          MJN    CKA2        IF ADDRESS .LT. FL - WORD COUNT
12000  M00S07569.1aj     +++| CKA1     LDC    CKAA        SET MESSAGE ADDRESS
12001  M00S07570.1aj     +++|          STD    EF
Line S07571 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12002  M01S07571.v23l617 ---|          RJM    CAT         CLEAR ADDRESS FOR *TCS* EXECUTE STATEMENT
Line S00709 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12003  M01S00709.v23l617 +++|          RJM    CAT         CLEAR ADDRESS FOR *TCS* EXECUTE COMMAND
12004  M00S07572.1aj     +++|          LJM    IST2        ISSUE DAYFILE MESSAGE
12005  M00S07573.1aj     +++|
12006  M00S07574.1aj     +++|
12007  M00S07575.1aj     +++| CKAA     DATA   C* BUFFER ARG. ERROR.*
12008  M00S07576.1aj     +++| CSL      SPACE  4,20
Line S07577 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12009  M01S07577.v23l617 ---|**        CSL - CHECK CONTROL STATEMENT LIMIT. DECREMENT THE CONTROL
12010  M01S07578.v23l617 ---|*         CARD STATEMENT LIMIT FIELD IN THE CONTROL POINT AREA.
Line S00710 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12011  M01S00710.v23l617 +++|**        CSL - CHECK COMMAND LIMIT. DECREMENT THE
12012  M01S00711.v23l617 +++|*         COMMAND LIMIT FIELD IN THE CONTROL POINT AREA.
12013  M00S07579.1aj     +++|*
Line S07580 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12014  M01S07580.v23l617 ---|*         ENTRY  (SP - SP+4) = CONTROL STATEMENT POINTER.
Line S00712 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12015  M01S00712.v23l617 +++|*         ENTRY  (SP - SP+4) = COMMAND POINTER.
12016  M00S07581.1aj     +++|*
Line S07582 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12017  M01S07582.v23l617 ---|*         EXIT   RETURN TO CALLING ROUTINE, IF CONTROL STATEMENT
Line S00713 Modification History
M01 (Added by) v23l617
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12018  M02S00713.ns2388  ---|*         EXIT   RETURN TO CALLING ROUTINE, IF COMMAND
Line S07583 Modification History
M01 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12019  M01S07583.ns2388  ---|*                LIMIT NOT EXCEEDED.
12020  M01S07584.ns2388  ---|*
Line S07585 Modification History
M01 (Removed by) 1aj14
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12021  M02S07585.ns2388  ---|*         ERROR  TO *ERR1* IF CONTROL STATEMENT LIMIT EXCEEDED.
Line S00009 Modification History
M01 (Added by) 1aj14
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12022  M02S00009.ns2388  ---|*         ERROR  (BCPM) SET TO ERROR MESSAGE.
Line S00077 Modification History
M01 (Added by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12023  M01S00077.ns2388  +++|*         EXIT   TO *PPR*, IF COMMAND LIMIT EXCEEDED.
12024  M00S07586.1aj     +++|*
12025  M00S07587.1aj     +++|*         USES   CM - CM+4.
12026  M00S07588.1aj     +++|*
12027  M00S07589.1aj     +++|*         MACROS MONITOR.
12028  M00S07590.1aj     +++|
12029  M00S07591.1aj     +++|
Line S00001 Modification History
M01 (Added by) ns2025
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12030  M02S00001.ns2388  ---| CSL3     SOD    SP
Line S00078 Modification History
M01 (Added by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12031  M01S00078.ns2388  +++| CSL1     SOD    SP
Line S00002 Modification History
M01 (Added by) ns2025
Seq #  *Modification Id* Act 
----------------------------+
12032  M01S00002.ns2025  +++|
12033  M00S07592.1aj     +++| CSL      SUBR               ENTRY/EXIT
Line S07593 Modification History
M01 (Removed by) ns2025
Seq #  *Modification Id* Act 
----------------------------+
12034  M01S07593.ns2025  ---|          LDN    2           DECREMENT CONTROL STATEMENT LIMIT
Line S00003 Modification History
M01 (Added by) ns2025
Seq #  *Modification Id* Act 
----------------------------+
12035  M01S00003.ns2025  +++|          LDD    SP
12036  M01S00004.ns2025  +++|          LPN    1
Line S00005 Modification History
M01 (Added by) ns2025
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12037  M02S00005.ns2388  ---|          NJN    CSL3        IF INHIBIT DECREMENT FLAG SET
Line S00079 Modification History
M01 (Added by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12038  M01S00079.ns2388  +++|          NJN    CSL1        IF INHIBIT DECREMENT FLAG SET
Line S00006 Modification History
M01 (Added by) ns2025
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12039  M02S00006.v23l617 ---|          LDN    3           DECREMENT CONTROL STATEMENT LIMIT
Line S00714 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12040  M01S00714.v23l617 +++|          LDN    3           DECREMENT COMMAND LIMIT
12041  M00S07594.1aj     +++|          STD    CM+1        SPECIFY MESSAGE BUFFER LENGTH
12042  M00S07595.1aj     +++|          LDN    1
12043  M00S07596.1aj     +++|          STD    CM+2        SPECIFY NO DROPPING OF PP
12044  M00S07597.1aj     +++|          LDD    MA
12045  M00S07598.1aj     +++|          CWM    CSLA,CM+1
12046  M00S07599.1aj     +++|          MONITOR  UADM
12047  M00S07600.1aj     +++|          LDD    CM+1        STATUS RETURNED FROM UADM FUNCTION
12048  M00S07601.1aj     +++|          LPN    1
Line S07602 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12049  M01S07602.v23l617 ---|          ZJN    CSLX        IF CONTROL STATEMENT LIMIT NOT EXCEEDED
Line S00715 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12050  M01S00715.v23l617 +++|          ZJN    CSLX        IF COMMAND LIMIT NOT EXCEEDED
Line S07603 Modification History
M01 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12051  M01S07603.ns2388  ---|
Line S07604 Modification History
M01 (Removed by) v23l617
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12052  M02S07604.ns2388  ---|*         ALLOW *DFIN* MORE CONTROL STATEMENTS AFTER LIMIT REACHED.
Line S00716 Modification History
M01 (Added by) v23l617
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12053  M02S00716.ns2388  ---|*         ALLOW *DFIN* MORE COMMANDS AFTER LIMIT REACHED.
Line S07605 Modification History
M01 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12054  M01S07605.ns2388  ---|
Line S07606 Modification History
M01 (Removed by) v23l617
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12055  M02S07606.ns2388  ---|          LDD    CP          CHECK CONTROL STATEMENT LIMIT FLAG
Line S00717 Modification History
M01 (Added by) v23l617
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12056  M02S00717.ns2388  ---|          LDD    CP          CHECK COMMAND LIMIT FLAG
Line S07607 Modification History
M01 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12057  M01S07607.ns2388  ---|          ADN    ACTW
12058  M01S07608.ns2388  ---|          CRD    CM
12059  M01S07609.ns2388  ---|          LDD    CM
12060  M01S07610.ns2388  ---|          SHN    21-7
Line S07611 Modification History
M01 (Removed by) v23l617
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12061  M02S07611.ns2388  ---|          MJN    CSL2        IF STATEMENT LIMIT PREVIOUSLY OCCURRED
12062  M02S07612.ns2388  ---|          LDN    2           SET STATEMENT LIMIT FLAG AND INCREMENT
Line S00718 Modification History
M01 (Added by) v23l617
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12063  M02S00718.ns2388  ---|          MJN    CSL2        IF COMMAND LIMIT PREVIOUSLY OCCURRED
12064  M02S00719.ns2388  ---|          LDN    2           SET COMMAND LIMIT FLAG AND INCREMENT
Line S00080 Modification History
M01 (Added by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12065  M01S00080.ns2388  +++|          LDN    CLET        SET COMMAND LIMIT ERROR
12066  M00S07613.1aj     +++|          STD    CM+1
Line S07614 Modification History
M01 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12067  M01S07614.ns2388  ---|          LDN    1
12068  M01S07615.ns2388  ---|          STD    CM+2
12069  M01S07616.ns2388  ---|          LDD    MA
12070  M01S07617.ns2388  ---|          CWM    CSLB,CM+1
12071  M01S07618.ns2388  ---|          MONITOR  UADM
Line S07619 Modification History
M01 (Removed by) ns2031
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12072  M02S07619.ns2388  ---|          LDC    CSLC        * INITIAL CONTROL STATEMENT LIMIT.*
Line S00267 Modification History
M01 (Added by) ns2031
M02 (Removed by) v23l617
M03 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12073  M03S00267.ns2388  ---|          LDC    /ERR/EM07   * INITIAL CONTROL STATEMENT LIMIT.*
Line S00720 Modification History
M01 (Added by) v23l617
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12074  M02S00720.ns2388  ---|          LDC    /ERR/EM07   * INITIAL COMMAND LIMIT.*
Line S07620 Modification History
M01 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12075  M01S07620.ns2388  ---| CSL1     STM    RCAB        SET ADDRESS FOR DAYFILE MESSAGE
Line S07621 Modification History
M01 (Removed by) 1aj14
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12076  M02S07621.ns2388  ---|          LJM    ERR1        PROCESS ERROR
Line S00010 Modification History
M01 (Added by) 1aj14
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12077  M02S00010.ns2388  ---|          STM    BCPM
12078  M02S00011.ns2388  ---|          LJM    CSLX        RETURN
Line S07622 Modification History
M01 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12079  M01S07622.ns2388  ---|
Line S07623 Modification History
M01 (Removed by) v23l617
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12080  M02S07623.ns2388  ---|*         SET EOR FOR CONTROL STATEMENT FILE, UPDATE CONTROL STATEMENT
Line S00721 Modification History
M01 (Added by) v23l617
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12081  M02S00721.ns2388  ---|*         SET EOR FOR COMMAND FILE, UPDATE COMMAND
Line S07624 Modification History
M01 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12082  M01S07624.ns2388  ---|*         POINTER AND EXIT TO *ERR1* WITH (A) = ERROR MESSAGE ADDRESS.
12083  M01S07625.ns2388  ---|
12084  M01S07626.ns2388  ---| CSL2     LDC    4000        SET EOR
12085  M01S07627.ns2388  ---|          STD    SP+1
Line S07628 Modification History
M01 (Removed by) v23l617
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12086  M02S07628.ns2388  ---|          LDD    SP+4        SET NEXT STATEMENT INDEX = TO LIMIT INDEX
Line S00722 Modification History
M01 (Added by) v23l617
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12087  M02S00722.ns2388  ---|          LDD    SP+4        SET NEXT COMMAND INDEX = TO LIMIT INDEX
Line S07629 Modification History
M01 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12088  M01S07629.ns2388  ---|          STD    SP+3
Line S00223 Modification History
M01 (Added by) ns22000
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12089  M02S00223.ns2388  ---|          LDD    SP          CLEAR EPILOGUE REQUIRED
12090  M02S00224.ns2388  ---|          SCN    10
12091  M02S00225.ns2388  ---|          STD    SP
Line S07630 Modification History
M01 (Removed by) v23l617
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12092  M02S07630.ns2388  ---|          LDD    CP          UPDATE CONTROL STATEMENT POINTER
Line S00723 Modification History
M01 (Added by) v23l617
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12093  M02S00723.ns2388  ---|          LDD    CP          UPDATE COMMAND POINTER
Line S07631 Modification History
M01 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12094  M01S07631.ns2388  ---|          ADN    CSPW
12095  M01S07632.ns2388  ---|          CWD    SP
Line S00002 Modification History
M01 (Added by) 1aj62
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12096  M02S00002.ns2388  ---|          LDC    LDNI+SYET
12097  M02S00003.ns2388  ---|          STM    ISTB
Line S07633 Modification History
M01 (Removed by) ns2031
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12098  M02S07633.ns2388  ---|          LDC    CSLD        * CONTROL STATEMENT LIMIT.*
Line S00268 Modification History
M01 (Added by) ns2031
M02 (Removed by) v23l617
M03 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12099  M03S00268.ns2388  ---|          LDC    /ERR/EM08   * CONTROL STATEMENT LIMIT.*
Line S00724 Modification History
M01 (Added by) v23l617
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12100  M02S00724.ns2388  ---|          LDC    /ERR/EM08   * COMMAND LIMIT.*
Line S07634 Modification History
M01 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12101  M01S07634.ns2388  ---|          UJN    CSL1        PROCESS ERROR
Line S00081 Modification History
M01 (Added by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12102  M01S00081.ns2388  +++|          MONITOR  CEFM
12103  M01S00082.ns2388  +++|          LJM    PPR         EXIT TO PROCESS ERROR
12104  M00S07635.1aj     +++|
12105  M00S07636.1aj     +++|
12106  M00S07637.1aj     +++|*         MESSAGE BUFFER STRUCTURE FOR UADM FUNCTION.
12107  M00S07638.1aj     +++|
12108  M00S07639.1aj     +++| CSLA     CON    CDOS        DECREMENT CP AREA LIMIT FIELD BY ONE
12109  M00S07640.1aj     +++|          CON    ACLW        RELATIVE CP AREA ADDRESS OF LIMIT FIELD
12110  M00S07641.1aj     +++|          CON    24D*100+12D POSITION AND WIDTH OF LIMIT FIELD
12111  M00S07642.1aj     +++|          CON    0,0
12112  M00S07643.1aj     +++|
12113  M00S07644.1aj     +++|          CON    AISS        INCREMENT ACCOUNTING REGISTER, I/O SRU
12114  M00S07645.1aj     +++|          CON    IOAW        CP AREA WORD TO UPDATE
12115  M00S07646.1aj     +++|          CON    40D*100+20D MS ACCUMULATOR FIELD
12116  M00S07647.1aj     +++|          VFD    6/,18/IMCS  INCREMENT VALUE
Line S00007 Modification History
M01 (Added by) ns2025
Seq #  *Modification Id* Act 
----------------------------+
12117  M01S00007.ns2025  +++|
12118  M01S00008.ns2025  +++|          CON    CIOS        INCREMENT INHIBIT LIMIT CHECK
12119  M01S00009.ns2025  +++|          CON    CSPW        CP AREA WORD ADDRESS
12120  M01S00010.ns2025  +++|          CON    48D*100+1   POSITION AND FIELD WIDTH
12121  M01S00011.ns2025  +++|          CON    0,0
12122  M00S07648.1aj     +++|
Line S07649 Modification History
M01 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12123  M01S07649.ns2388  ---| CSLB     CON    CICS        INCREMENT CP AREA LIMIT FIELD
12124  M01S07650.ns2388  ---|          CON    ACLW        RELATIVE CP AREA ADDRESS OF LIMIT FIELD
12125  M01S07651.ns2388  ---|          CON    24D*100+12D POSITION AND WIDTH OF LIMIT FIELD
12126  M01S07652.ns2388  ---|          CON    0,DCLI      INCREMENT VALUE
12127  M01S07653.ns2388  ---|
12128  M01S07654.ns2388  ---|          CON    CIOS        INCREMENT CP AREA LIMIT FIELD BY ONE
12129  M01S07655.ns2388  ---|          CON    ACTW        RELATIVE CP AREA ADDRESS OF LIMIT FIELD
12130  M01S07656.ns2388  ---|          CON    55D*100+1   POSTION AND WIDTH OF LIMIT FIELD
12131  M01S07657.ns2388  ---|          CON    0,0
12132  M01S07658.ns2388  ---|
Line S07659 Modification History
M01 (Removed by) ns2031
Seq #  *Modification Id* Act 
----------------------------+
12133  M01S07659.ns2031  ---| CSLC     DATA   H* INITIAL*
12134  M01S07660.ns2031  ---| CSLD     DATA   C* CONTROL STATEMENT LIMIT.*
Line S07661 Modification History
M01 (Removed by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
12135  M01S07661.ns21000 ---|          SPACE  4,15
12136  M01S07662.ns21000 ---|***       IAA - ISSUE APPLICATION ACCOUNTING MESSAGE.
12137  M01S07663.ns21000 ---|*
12138  M01S07664.ns21000 ---|*         ENTRY  (T3 - T3+4) = (CP) + *FPFW*.
12139  M01S07665.ns21000 ---|*                (A) = APPLICATION ACCOUNTING BITS.
12140  M01S07666.ns21000 ---|*
12141  M01S07667.ns21000 ---|*         EXIT   APPLICATION ACCOUNTING BITS CLEARED.
12142  M01S07668.ns21000 ---|*                APPLICATION ACCOUNTING MESSAGE ISSUED.
12143  M01S07669.ns21000 ---|*
12144  M01S07670.ns21000 ---|*         USES   FS, CM - CM+4, T3 - T3+4.
12145  M01S07671.ns21000 ---|*
12146  M01S07672.ns21000 ---|*         CALLS  DFM.
12147  M01S07673.ns21000 ---|*
12148  M01S07674.ns21000 ---|*         MACROS MONITOR.
12149  M01S07675.ns21000 ---|
12150  M01S07676.ns21000 ---|
12151  M01S07677.ns21000 ---| IAA      SUBR               ENTRY/EXIT
12152  M01S07678.ns21000 ---|          STD    FS          TEMPORARY SAVE
12153  M01S07679.ns21000 ---|          LDD    T3          CLEAR APPLICATION ACCOUNTING BITS
12154  M01S07680.ns21000 ---|          LPC    6377
12155  M01S07681.ns21000 ---|          STD    T3
12156  M01S07682.ns21000 ---|          LDD    CP          REWRITE ACCOUNTING CONTROL WORD
12157  M01S07683.ns21000 ---|          ADN    FPFW
12158  M01S07684.ns21000 ---|          CWD    T3
12159  M01S07685.ns21000 ---|          SBN    FPFW-CPTW   READ CP ACCUMULATOR WORD
12160  M01S07686.ns21000 ---|          CRD    T3
12161  M01S07687.ns21000 ---|          ADN    CPJW-CPTW   READ CP TIME JOB STEP WORD
12162  M01S07688.ns21000 ---|          CRD    CM
12163  M01S07689.ns21000 ---|          LDD    FS          CHECK FOR ACCOUNTING IN PROCESS
12164  M01S07690.ns21000 ---|          SHN    21-11
12165  M01S07691.ns21000 ---|          PJN    IAAX        IF APPLICATION ACCOUNTING NOT IN PROCESS
12166  M01S07692.ns21000 ---|          LDD    MA          WRITE WORDS TO MESSAGE BUFFER
12167  M01S07693.ns21000 ---|          CWD    T3
12168  M01S07694.ns21000 ---|          ADN    1
12169  M01S07695.ns21000 ---|          CWD    CM
12170  M01S07696.ns21000 ---|          LDN    ABUS
12171  M01S07697.ns21000 ---|          STD    CM+1        SET *ACTM* SUB-FUNCTION (ABUS)
12172  M01S07698.ns21000 ---|          MONITOR  ACTM      CALCULATE CP TIME USED FOR JOB STEP
12173  M01S07699.ns21000 ---|          LDD    MA          READ CONVERSION INTO MESSAGE AREA
12174  M01S07700.ns21000 ---|          CRM    IAAA+3,ON
12175  M01S07701.ns21000 ---|          LDC    ACFN+IAAA
12176  M01S07702.ns21000 ---|          RJM    DFM         DISPLAY IN ACCOUNT DAYFILE
12177  M01S07703.ns21000 ---|          LJM    IAAX        EXIT
12178  M01S07704.ns21000 ---|
12179  M01S07705.ns21000 ---|
12180  M01S07706.ns21000 ---|*         DAYFILE MESSAGE.
12181  M01S07707.ns21000 ---|
12182  M01S07708.ns21000 ---| IAAA     DATA   C*UEAU, 000000.000UNTS.*
12183  M00S07709.1aj     +++| RCA      SPACE  4,15
Line S07710 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12184  M01S07710.v23l617 ---|**        RCA - READ CONTROL STATEMENT TO ADDRESS.
Line S00725 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12185  M01S00725.v23l617 +++|**        RCA - READ COMMAND TO ADDRESS.
12186  M00S07711.1aj     +++|*
12187  M00S07712.1aj     +++|*         ENTRY  (IR+3) = SUBFUNCTION CODE IN BITS 11 - 6.
12188  M00S07713.1aj     +++|*                         BIT 11 = SCOPE CRACKING FLAG.
Line S07714 Modification History
M01 (Removed by) ns2053
Seq #  *Modification Id* Act 
----------------------------+
12189  M01S07714.ns2053  ---|*                         BIT 7 = LOCAL FILE CALL FLAG.
Line S00001 Modification History
M01 (Added by) ns2053
Seq #  *Modification Id* Act 
----------------------------+
12190  M01S00001.ns2053  +++|*                         BIT 7 = LOCAL/GLOBAL FILE CALL FLAG.
Line S07715 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12191  M01S07715.v23l617 ---|*                         BIT 6 = NO CONTROL STATEMENT ADVANCE FLAG.
Line S00726 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12192  M01S00726.v23l617 +++|*                         BIT 6 = NO COMMAND ADVANCE FLAG.
Line S00001 Modification History
M01 (Added by) 1aj6
Seq #  *Modification Id* Act 
----------------------------+
12193  M01S00001.1aj6    +++|*                (CW - CW+4) = *SEPW* WORD.
12194  M00S07716.1aj     +++|*
12195  M00S07717.1aj     +++|*         EXIT   IS MADE TO *DPP*.
12196  M00S07718.1aj     +++|*
12197  M00S07719.1aj     +++|*         USES   T1, AB - AB+4.
12198  M00S07720.1aj     +++|*
Line S07721 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
12199  M01S07721.242l642 ---|*         CALLS  AKW, ARG, CKA, CRS, CSL, DFM, ISD, RCS, SAF,
12200  M01S07722.242l642 ---|*                STK, UPS.
Line S00416 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
12201  M01S00416.242l642 +++|*         CALLS  AKW, ARG, CKA, CRS, CSL, DFM, ISD, MSR, RCS,
12202  M01S00417.242l642 +++|*                SAF, STK, UPS.
12203  M00S07723.1aj     +++|*
12204  M00S07724.1aj     +++|*         MACROS MONITOR.
12205  M00S07725.1aj     +++|
12206  M00S07726.1aj     +++|
Line S07727 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12207  M01S07727.v23l617 ---| RCA      RJM    RCS         READ CONTROL STATEMENT
12208  M01S07728.v23l617 ---|          STM    ISDA        SET STATEMENT ADDRESS
Line S00727 Modification History
M01 (Added by) v23l617
M02 (Removed by) 1aj78
Seq #  *Modification Id* Act 
----------------------------+
12209  M02S00727.1aj78   ---| RCA      RJM    RCS         READ COMMAND
Line S00001 Modification History
M01 (Added by) 1aj78
Seq #  *Modification Id* Act 
----------------------------+
12210  M01S00001.1aj78   +++| RCA      BSS    0           ENTRY
12211  M01S00002.1aj78   +++|          NFA    SHCN        FETCH *SHELL* CONTROL WORD
12212  M01S00003.1aj78   +++|          CRD    CM
12213  M01S00004.1aj78   +++|          LDD    CM
12214  M01S00005.1aj78   +++|          ZJN    RCA0        IF NO *SHELL* CONTROLS
12215  M01S00006.1aj78   +++|          LDD    CW
12216  M01S00007.1aj78   +++|          SHN    21-2
12217  M01S00008.1aj78   +++|          MJN    RCA0        IF *SSJ=*
12218  M01S00009.1aj78   +++|          LJM    RCA8        RETURN EOR STATUS ON COMMAND READ
12219  M01S00010.1aj78   +++|
12220  M01S00011.1aj78   +++| RCA0     RJM    RCS         READ COMMAND
Line S00728 Modification History
M01 (Added by) v23l617
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
12221  M02S00728.242l642 ---|          STM    ISDA        SET COMMAND ADDRESS
Line S00418 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
12222  M01S00418.242l642 +++|          PJN    RCA0.1      IF NO MASS STORAGE ERROR
12223  M01S00419.242l642 +++|          RJM    MSR         PROCESS MASS STORAGE ERROR
Line S00420 Modification History
M01 (Added by) 242l642
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12224  M02S00420.ns2388  ---|          ERRPL  RCA13-RCAE-40  RANGE ERROR
12225  M02S00421.ns2388  ---|          ERRNG  RCA13-RCA12.2  RANGE ERROR
12226  M02S00422.ns2388  ---|          LDN    RCA13-RCA12.2
12227  M02S00423.ns2388  ---|          RAM    RCAE
Line S00424 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
12228  M01S00424.242l642 +++|          LJM    RCA8        CLEAR COMMAND BUFFER
12229  M01S00425.242l642 +++|
12230  M01S00426.242l642 +++| RCA0.1   STM    ISDA        SET COMMAND ADDRESS
12231  M00S07729.1aj     +++|          LDD    CP          READ SPECIAL ENTRY POINT WORD
12232  M00S07730.1aj     +++|          ADC    SEPW
12233  M00S07731.1aj     +++|          CRM    CSEB,ON
12234  M00S07732.1aj     +++|          LDM    CSEB        SAVE *ARG=* ENTRY POINT INDICATORS
12235  M00S07733.1aj     +++|          LPN    40
12236  M00S07734.1aj     +++|          STD    EP
12237  M00S07735.1aj     +++|          LDD    IR+3        CHECK ADVANCE
12238  M00S07736.1aj     +++|          SHN    -6
12239  M00S07737.1aj     +++|          NJN    RCA1        IF NOT ADVANCE
Line S00002 Modification History
M01 (Added by) 1aj6
Seq #  *Modification Id* Act 
----------------------------+
12240  M01S00002.1aj6    +++|          LDD    CW
12241  M01S00003.1aj6    +++|          SHN    21-2
12242  M01S00004.1aj6    +++|          MJN    RCA1        IF *SSJ=* PRESENT
Line S07738 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12243  M01S07738.v23l617 ---|          RJM    CSL         CHECK STATEMENT LIMIT
Line S00729 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12244  M01S00729.v23l617 +++|          RJM    CSL         CHECK COMMAND LIMIT
12245  M00S07739.1aj     +++| RCA1     LDD    EP          CHECK FOR *ARG=*
12246  M00S07740.1aj     +++|          ZJN    RCA2        IF NOT *ARG=*
12247  M00S07741.1aj     +++|          LDC    RCA10       SET EXIT ADDRESS IF ERROR
12248  M00S07742.1aj     +++|          STM    ASNA
Line S07743 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12249  M01S07743.v23l617 ---| RCA2     RJM    UPS         UNPACK STATEMENT
12250  M01S07744.v23l617 ---|          ZJN    RCA3        IF NO ERRORS IN CONTROL STATEMENT
Line S00730 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12251  M01S00730.v23l617 +++| RCA2     RJM    UPS         UNPACK COMMAND
12252  M01S00731.v23l617 +++|          ZJN    RCA3        IF NO ERRORS IN COMMAND
12253  M00S07745.1aj     +++|          LDM    CSEB        CHECK FOR *ARG=* JOB STEP
12254  M00S07746.1aj     +++|          SHN    21-5
12255  M00S07747.1aj     +++|          MJN    RCA3        IF *ARG=* JOB STEP
12256  M00S07748.1aj     +++|          LJM    RCA8        NOT AN *ARG=* JOB STEP
12257  M00S07749.1aj     +++|
12258  M00S07750.1aj     +++| RCA3     RJM    AKW         ASSEMBLE KEYWORD
Line S07751 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12259  M01S07751.v23l617 ---|          PJN    RCA4        IF NOT (*) COMMENT CARD
Line S00732 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12260  M01S00732.v23l617 +++|          PJN    RCA4        IF NOT (*) COMMENT COMMAND
12261  M00S07752.1aj     +++|          LDC    1R**100
12262  M00S07753.1aj     +++|          STD    AB
12263  M00S07754.1aj     +++|          LJM    RCA12       PROCESS COMMENT LINE
12264  M00S07755.1aj     +++|
12265  M00S07756.1aj     +++| RCA4     LDD    IR+3
12266  M00S07757.1aj     +++|          SHN    -6
12267  M00S07758.1aj     +++|          NJN    RCA5        IF NOT ADVANCE
12268  M00S07759.1aj     +++|          LJM    RCA11       ADVANCE
12269  M00S07760.1aj     +++|
12270  M00S07761.1aj     +++| RCA5     LDD    FA
12271  M00S07762.1aj     +++|          NJN    RCA6        IF NOT PROGRAM FILE FLAG
12272  M00S07763.1aj     +++|          RJM    SAF         SEARCH FOR ASSIGNED FILE
12273  M00S07764.1aj     +++|          ZJN    RCA7        IF NO LOCAL FILE THAT MATCHES KEYWORD
12274  M00S07765.1aj     +++|          LDN    40          SET LOCAL FILE FLAG
12275  M00S07766.1aj     +++|          RAD    AB+3
12276  M00S07767.1aj     +++|          LDD    IR+3
12277  M00S07768.1aj     +++|          SHN    -6
12278  M00S07769.1aj     +++|          LMN    2
Line S07770 Modification History
M01 (Removed by) ns2053
Seq #  *Modification Id* Act 
----------------------------+
12279  M01S07770.ns2053  ---|          ZJN    RCA11       IF RETURN STATEMENT CALLING FOR LOCAL FILE
Line S00002 Modification History
M01 (Added by) ns2053
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12280  M02S00002.v23l617 ---|          ZJN    RCA6        IF RETURN STATEMENT CALLING FOR LOCAL FILE
Line S00733 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12281  M01S00733.v23l617 +++|          ZJN    RCA6        IF RETURN COMMAND CALLING FOR LOCAL FILE
12282  M00S07771.1aj     +++|          LDD    EP
12283  M00S07772.1aj     +++|          ZJN    RCA8        IF NO *ARG=* IS PRESENT
Line S07773 Modification History
M01 (Removed by) ns2053
Seq #  *Modification Id* Act 
----------------------------+
12284  M01S07773.ns2053  ---| RCA6     UJN    RCA11       RETURN LOCAL FILE
Line S00003 Modification History
M01 (Added by) ns2053
Seq #  *Modification Id* Act 
----------------------------+
12285  M01S00003.ns2053  +++| RCA6     LJM    RCA11       RETURN LOCAL FILE
12286  M00S07774.1aj     +++|
12287  M00S07775.1aj     +++|*         CHECK FOR PRESENCE OF A GLOBAL LIBRARY SET.
12288  M00S07776.1aj     +++|
12289  M00S07777.1aj     +++| RCA7     LDD    CP          CHECK FOR A GLOBAL LIBRARY SET
12290  M00S07778.1aj     +++|          ADC    LB1W
12291  M00S07779.1aj     +++|          CRD    CN
12292  M00S07780.1aj     +++|          LDD    CN          CHECK GLOBAL LIBRARY SET BIT
12293  M00S07781.1aj     +++|          SHN    21-12
12294  M00S07782.1aj     +++|          PJN    RCA11       IF GLOBAL LIBRARY NOT FOUND
Line S00004 Modification History
M01 (Added by) ns2053
Seq #  *Modification Id* Act 
----------------------------+
12295  M01S00004.ns2053  +++|          LDD    IR+3
12296  M01S00005.ns2053  +++|          SHN    21-7
12297  M01S00006.ns2053  +++|          MJN    RCA11       IF LOCAL/GLOBAL FILE CALL
12298  M00S07783.1aj     +++|
12299  M00S07784.1aj     +++|
Line S07785 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12300  M01S07785.v23l617 ---|*         CLEAR STATEMENT BUFFER.
Line S00734 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12301  M01S00734.v23l617 +++|*         CLEAR COMMAND BUFFER.
12302  M00S07786.1aj     +++|
Line S07787 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12303  M01S07787.v23l617 ---| RCA8     LDC    STMT        CLEAR STATEMENT BUFFER
Line S00735 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12304  M01S00735.v23l617 +++| RCA8     LDC    STMT        CLEAR COMMAND BUFFER
12305  M00S07788.1aj     +++|          STD    T1
12306  M00S07789.1aj     +++| RCA9     LDN    0
12307  M00S07790.1aj     +++|          STI    T1
12308  M00S07791.1aj     +++|          AOD    T1
12309  M00S07792.1aj     +++|          LMC    STMT+55
12310  M00S07793.1aj     +++|          NJN    RCA9        IF NOT END OF BUFFER
12311  M00S07794.1aj     +++|          LDN    ZERL
12312  M00S07795.1aj     +++|          CRD    AB          CLEAR PROGRAM NAME
12313  M00S07796.1aj     +++|          UJN    RCA12       SET UP RA
12314  M00S07797.1aj     +++|
12315  M00S07798.1aj     +++|*         REENTER HERE IF *ARG=* AND ERROR IN *ASN*.
12316  M00S07799.1aj     +++|
12317  M00S07800.1aj     +++| RCA10    LDD    AB+3        CLEAR 8TH CHARACTER
12318  M00S07801.1aj     +++|          SCN    77
12319  M00S07802.1aj     +++|          STD    AB+3
12320  M00S07803.1aj     +++|          LDN    0           CLEAR ARGUMENT COUNT
12321  M00S07804.1aj     +++|          STD    T2
12322  M00S07805.1aj     +++|          UJN    RCA12       SET UP RA
12323  M00S07806.1aj     +++|
12324  M00S07807.1aj     +++| RCA11    LDD    MA          SAVE NAME
12325  M00S07808.1aj     +++|          CWD    AB
12326  M00S07809.1aj     +++|          RJM    ARG         ENTER ARGUMENTS
12327  M00S07810.1aj     +++|          LDD    MA
12328  M00S07811.1aj     +++|          CRD    AB
12329  M00S07812.1aj     +++|          LDD    T2          SET ARGUMENT COUNT
12330  M00S07813.1aj     +++|          STD    AB+4
12331  M00S07814.1aj     +++|          RJM    STK         SKIP TO KEYWORD
12332  M00S07815.1aj     +++|          RAM    RCAA
12333  M00S07816.1aj     +++| RCA12    LDD    RA          ENTER PROGRAM NAME
12334  M00S07817.1aj     +++|          SHN    6
12335  M00S07818.1aj     +++|          ADN    ACTR
12336  M00S07819.1aj     +++|          CWD    AB
Line S07820 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12337  M01S07820.v23l617 ---|          LDN    10          STORE STATEMENT
Line S00736 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12338  M01S00736.v23l617 +++|          LDN    10          STORE COMMAND
12339  M00S07821.1aj     +++|          STD    T1
12340  M00S07822.1aj     +++|          LDD    IR+3        SET ADDRESS TO VALIDATE
12341  M00S07823.1aj     +++|          LPN    37
12342  M00S07824.1aj     +++|          SHN    14
12343  M00S07825.1aj     +++|          LMD    IR+4
12344  M00S07826.1aj     +++|          RJM    CKA         CHECK ADDRESS
12345  M00S07827.1aj     +++|          CWM    STMT,T1
12346  M00S07828.1aj     +++| RCAA     EQU    *-1
12347  M00S07829.1aj     +++|          LDD    IR+3
12348  M00S07830.1aj     +++|          SHN    -6
Line S07831 Modification History
M01 (Removed by) 1aj49
Seq #  *Modification Id* Act 
----------------------------+
12349  M01S07831.1aj49   ---|          NJN    RCA14       IF NO ADVANCE
Line S00001 Modification History
M01 (Added by) 1aj49
Seq #  *Modification Id* Act 
----------------------------+
12350  M01S00001.1aj49   +++|          NJP    RCA14       IF NO ADVANCE
Line S07832 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12351  M01S07832.v23l617 ---|          LDD    CP          UPDATE STATEMENT POINTER
Line S00737 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12352  M01S00737.v23l617 +++|          LDD    CP          UPDATE COMMAND POINTER
12353  M00S07833.1aj     +++|          ADN    CSPW
12354  M00S07834.1aj     +++|          CWD    SP
12355  M00S07835.1aj     +++|          LDM    CSEB
12356  M00S07836.1aj     +++|          SHN    21-3
12357  M00S07837.1aj     +++|          MJN    RCA14       IF SDM= PRESENT
Line S07838 Modification History
M01 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12358  M01S07838.ns2388  ---|          LDC    0
Line S07839 Modification History
M01 (Removed by) 1aj49
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12359  M02S07839.ns2388  ---|*         LDC    DMFA        (CONTROL STATEMENT LIMIT)
Line S00002 Modification History
M01 (Added by) 1aj49
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12360  M02S00002.ns2388  ---|*         LDC    /ERR/EM07   (INITIAL CONTROL STATEMENT LIMIT)
12361  M02S00003.ns2388  ---|*         LDC    /ERR/EM08   (CONTROL STATEMENT LIMIT)
Line S07840 Modification History
M01 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12362  M01S07840.ns2388  ---| RCAB     EQU    *-1
12363  M01S07841.ns2388  ---|          ZJN    RCA13       IF NO ERROR MESSAGE
Line S07842 Modification History
M01 (Removed by) 1aj49
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12364  M02S07842.ns2388  ---|          RJM    DFM
Line S00004 Modification History
M01 (Added by) 1aj49
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12365  M02S00004.ns2388  ---|          LMC    /ERR/EM07
12366  M02S00005.ns2388  ---|          ZJN    RCA12.1     IF INITIAL CONTROL STATEMENT LIMIT
12367  M02S00006.ns2388  ---|          LDC    RCAD
12368  M02S00007.ns2388  ---|          UJN    RCA12.2     ISSUE DAYFILE MESSAGE
Line S00427 Modification History
M01 (Added by) 242l642
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12369  M02S00427.ns2388  ---|*         UJN    RCA13       (MASS STORAGE ERROR)
12370  M02S00428.ns2388  ---| RCAE     EQU    *-1
Line S00008 Modification History
M01 (Added by) 1aj49
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12371  M02S00008.ns2388  ---|
12372  M02S00009.ns2388  ---| RCA12.1  LDC    RCAC
12373  M02S00010.ns2388  ---| RCA12.2  RJM    DFM
Line S07843 Modification History
M01 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12374  M01S07843.ns2388  ---|          UJN    RCA14       DROP PP
12375  M01S07844.ns2388  ---|
Line S07845 Modification History
M01 (Removed by) v23l617
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12376  M02S07845.ns2388  ---| RCA13    LDC    STMT        ISSUE STATEMENT TO DAYFILE
Line S00738 Modification History
M01 (Added by) v23l617
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12377  M02S00738.ns2388  ---| RCA13    LDC    STMT        ISSUE COMMAND TO DAYFILE
Line S00083 Modification History
M01 (Added by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12378  M01S00083.ns2388  +++|          LDC    STMT        ISSUE COMMAND TO DAYFILE
12379  M00S07846.1aj     +++|          RJM    ISD
Line S07847 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12380  M01S07847.v23l617 ---|          ZJN    RCA14       IF STATEMENT ISSUED VIA *DFM* CALL
Line S00739 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12381  M01S00739.v23l617 +++|          ZJN    RCA14       IF COMMAND ISSUED VIA *DFM* CALL
12382  M00S07848.1aj     +++|          RJM    CRS         CHECK RECALL STATUS
12383  M00S07849.1aj     +++|          ZJN    RCA14       IF AUTO RECALL NOT SET
12384  M00S07850.1aj     +++|          LCN    40          CLEAR AUTO RECALL IN *IR*
12385  M00S07851.1aj     +++|          RAD    CM+1
12386  M00S07852.1aj     +++|          LDD    IA
12387  M00S07853.1aj     +++|          CWD    CM
12388  M00S07854.1aj     +++|          MONITOR  RCPM      REMOVE *I* STATUS
12389  M00S07855.1aj     +++| RCA14    LJM    DPP         DROP PPU
Line S00011 Modification History
M01 (Added by) 1aj49
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12390  M02S00011.ns2388  ---|
12391  M02S00012.ns2388  ---|
12392  M02S00013.ns2388  ---| RCAC     DATA   H* INITIAL*
12393  M02S00014.ns2388  ---| RCAD     DATA   C* CONTROL STATEMENT LIMIT.*
12394  M00S07856.1aj     +++| RNC      SPACE  4,15
Line S07857 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12395  M01S07857.v23l617 ---|**        RNC - READ NEXT CONTROL STATEMENT.
Line S00740 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12396  M01S00740.v23l617 +++|**        RNC - READ NEXT COMMAND.
12397  M00S07858.1aj     +++|*
Line S07859 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12398  M01S07859.v23l617 ---|*         ENTRY  (SP - SP+4) = CONTROL STATEMENT POINTER.
Line S00741 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12399  M01S00741.v23l617 +++|*         ENTRY  (SP - SP+4) = COMMAND POINTER.
12400  M00S07860.1aj     +++|*
Line S07861 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12401  M01S07861.v23l617 ---|*         EXIT   STATEMENT STORED BEGINNING AT *STMT* AND
Line S00742 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12402  M01S00742.v23l617 +++|*         EXIT   COMMAND STORED BEGINNING AT *STMT* AND
12403  M00S07862.1aj     +++|*                CONTINUING TO A 0000 BYTE.
12404  M00S07863.1aj     +++|*
12405  M00S07864.1aj     +++|*         USES   T1, CM - CM+4.
12406  M00S07865.1aj     +++|*
Line S07866 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
12407  M01S07866.242l642 ---|*         CALLS  ATX, CES, CKA, RCS.
Line S00429 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
12408  M01S00429.242l642 +++|*         CALLS  ATX, CES, CKA, MSR, RCS.
12409  M00S07867.1aj     +++|*
12410  M00S07868.1aj     +++|*         MACROS MONITOR.
12411  M00S07869.1aj     +++|
12412  M00S07870.1aj     +++|
12413  M00S07871.1aj     +++| RNC5     RJM    ATX         CHECK EXIT FLAG
Line S07872 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12414  M01S07872.v23l617 ---|          RJM    RCS         READ CONTROL STATEMENT
12415  M01S07873.v23l617 ---|          STM    ISDA        SET STATEMENT ADDRESS
Line S00743 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12416  M01S00743.v23l617 +++|          RJM    RCS         READ COMMAND
Line S00744 Modification History
M01 (Added by) v23l617
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
12417  M02S00744.242l642 ---|          STM    ISDA        SET COMMAND ADDRESS
Line S00430 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
12418  M01S00430.242l642 +++|          PJN    RNC6        IF NO MASS STORAGE ERROR
12419  M01S00431.242l642 +++|          RJM    MSR         PROCESS MASS STORAGE ERROR
12420  M01S00432.242l642 +++| RNC6     STM    ISDA        SET COMMAND ADDRESS
12421  M00S07874.1aj     +++|
12422  M00S07875.1aj     +++| RNC      SUBR               ENTRY/EXIT
12423  M00S07876.1aj     +++|          LDN    10
12424  M00S07877.1aj     +++|          STD    T1
Line S07878 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12425  M01S07878.v23l617 ---|          RJM    CES         CHECK FOR *TCS* EXECUTE STATEMENT
12426  M01S07879.v23l617 ---|          ZJN    RNC1        IF NOT EXECUTE CONTROL STATEMENT FROM CM
12427  M01S07880.v23l617 ---|          LDC    LDNI+CCDR   ISSUE CONTROL STATEMENT FROM *CCDR*
Line S00745 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12428  M01S00745.v23l617 +++|          RJM    CES         CHECK FOR *TCS* EXECUTE COMMAND
12429  M01S00746.v23l617 +++|          ZJN    RNC1        IF NOT EXECUTE COMMAND FROM CM
12430  M01S00747.v23l617 +++|          LDC    LDNI+CCDR   ISSUE COMMAND FROM *CCDR*
12431  M00S07881.1aj     +++|          STM    BCPF
Line S07882 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12432  M01S07882.v23l617 ---|          RJM    CES         RESET ADDRESS OF EXECUTE STATEMENT
Line S00748 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12433  M01S00748.v23l617 +++|          RJM    CES         RESET ADDRESS OF EXECUTE COMMAND
12434  M00S07883.1aj     +++|          RJM    CKA         CHECK ADDRESS
Line S07884 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12435  M01S07884.v23l617 ---|          UJN    RNC2        READ CONTROL STATEMENT
Line S00749 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12436  M01S00749.v23l617 +++|          UJN    RNC2        READ COMMAND
12437  M00S07885.1aj     +++|
12438  M00S07886.1aj     +++| RNC1     LDD    IR+2        CHECK FOR *DIS* CALL
12439  M00S07887.1aj     +++|          LMN    2
12440  M00S07888.1aj     +++|          NJN    RNC5        IF NOT *DIS* CALL
Line S07889 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12441  M01S07889.v23l617 ---|          LDD    IR+4        CHECK FOR CONTROL CARD IN MESSAGE BUFFER
Line S00750 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12442  M01S00750.v23l617 +++|          LDD    IR+4        CHECK FOR COMMAND IN MESSAGE BUFFER
12443  M00S07890.1aj     +++|          SHN    21-2
Line S07891 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12444  M01S07891.v23l617 ---|          PJN    RNC5        IF STATEMENT NOT IN MESSAGE BUFFER
12445  M01S07892.v23l617 ---|          LDN    MS1W        SET STATEMENT ADDRESS
Line S00751 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12446  M01S00751.v23l617 +++|          PJN    RNC5        IF COMMAND NOT IN MESSAGE BUFFER
12447  M01S00752.v23l617 +++|          LDN    MS1W        SET COMMAND ADDRESS
12448  M00S07893.1aj     +++|          STM    ISDA
12449  M00S07894.1aj     +++|          ADD    CP
Line S07895 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12450  M01S07895.v23l617 ---| RNC2     CRM    STMT,T1     READ CONTROL STATEMENT
Line S00753 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12451  M01S00753.v23l617 +++| RNC2     CRM    STMT,T1     READ COMMAND
12452  M00S07896.1aj     +++|          MONITOR  DCPM      DROP CPU
12453  M00S07897.1aj     +++|          LDN    0           INSURE TERMINATOR
Line S07898 Modification History
M01 (Removed by) 1aj63
Seq #  *Modification Id* Act 
----------------------------+
12454  M01S07898.1aj63   ---|          STM    STMT+10*5-1
Line S00001 Modification History
M01 (Added by) 1aj63
Seq #  *Modification Id* Act 
----------------------------+
12455  M01S00001.1aj63   +++|          STM    STMT+10*5
Line S07899 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12456  M01S07899.v23l617 ---|          LDC    STMT-1      FIND END OF STATEMENT
Line S00754 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12457  M01S00754.v23l617 +++|          LDC    STMT-1      FIND END OF COMMAND
12458  M00S07900.1aj     +++|          STD    T1
12459  M00S07901.1aj     +++| RNC3     AOD    T1
12460  M00S07902.1aj     +++|          LDI    T1
Line S07903 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12461  M01S07903.v23l617 ---|          NJN    RNC3        IF NOT END OF STATEMENT
Line S00755 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12462  M01S00755.v23l617 +++|          NJN    RNC3        IF NOT END OF COMMAND
12463  M00S07904.1aj     +++| RNC4     LDN    0           CLEAR REMAINDER OF BUFFER
12464  M00S07905.1aj     +++|          STI    T1
12465  M00S07906.1aj     +++|          AOD    T1
12466  M00S07907.1aj     +++|          LMC    STMT+55
12467  M00S07908.1aj     +++|          NJN    RNC4        IF NOT END OF BUFFER
12468  M00S07909.1aj     +++|          LJM    RNCX        RETURN
12469  M00S07910.1aj     +++| SSF      SPACE  4,20
12470  M00S07911.1aj     +++|**        SSF - SEARCH FOR SPECIAL FORMAT.
Line S07912 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12471  M01S07912.v23l617 ---|*         PROCESS SPECIAL CONTROL CARDS - *CTIME*, *HTIME*, *RTIME*,
Line S00756 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12472  M01S00756.v23l617 +++|*         PROCESS SPECIAL COMMANDS - *CTIME*, *HTIME*, *RTIME*,
12473  M00S07913.1aj     +++|*         AND *STIME*.
12474  M00S07914.1aj     +++|*
12475  M00S07915.1aj     +++|*         ENTRY  (AB - AB+4) = PROGRAM NAME.
Line S07916 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12476  M01S07916.v23l617 ---|*                (TCSA) .NE. 0, IF VALIDATION REQUIRED.
Line S00757 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12477  M01S00757.v23l617 +++|*                (TCSA) .NE. 0, IF CHARGE REQUIRED.
12478  M00S07917.1aj     +++|*
Line S07918 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12479  M01S07918.v23l617 ---|*         EXIT   TO *IST1*, IF SPECIAL CONTROL CARD.
Line S00758 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12480  M01S00758.v23l617 +++|*         EXIT   TO *IST1*, IF SPECIAL COMMAND.
Line S00012 Modification History
M01 (Added by) 1aj14
Seq #  *Modification Id* Act 
----------------------------+
12481  M01S00012.1aj14   +++|*                TO *ERR1* IF PREVIOUS ERROR CONDITION.
12482  M00S07919.1aj     +++|*
12483  M00S07920.1aj     +++|*         USES   T1, CM - CM+4, CN - CN+4.
12484  M00S07921.1aj     +++|*
12485  M00S07922.1aj     +++|*         CALLS  CAT, DFM.
12486  M00S07923.1aj     +++|*
12487  M00S07924.1aj     +++|*         MACROS MONITOR.
12488  M00S07925.1aj     +++|
12489  M00S07926.1aj     +++|
12490  M00S07927.1aj     +++| SSF      SUBR               ENTRY/EXIT
12491  M00S07928.1aj     +++|          LDM    TCSA
Line S07929 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12492  M01S07929.v23l617 ---|          NJN    SSFX        IF VALIDATION REQUIRED
Line S00759 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12493  M01S00759.v23l617 +++|          NJN    SSFX        IF CHARGE REQUIRED
12494  M00S07930.1aj     +++|          LDD    AB+2        CHECK FOR *E*
12495  M00S07931.1aj     +++|          LMC    1RE*100
12496  M00S07932.1aj     +++|          NJN    SSFX        IF NO MATCH
12497  M00S07933.1aj     +++|          LDD    AB+1        CHECK FOR *IM*
12498  M00S07934.1aj     +++|          LMC    2RIM
12499  M00S07935.1aj     +++|          NJN    SSFX        IF NO MATCH
12500  M00S07936.1aj     +++|          LCN    0
12501  M00S07937.1aj     +++|          STD    T1
12502  M00S07938.1aj     +++| SSF1     AOD    T1
12503  M00S07939.1aj     +++|          LDM    SOPT,T1
12504  M00S07940.1aj     +++|          STM    SSFB        STORE FIRST TWO CHARACTERS OF MESSAGE
Line S07941 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12505  M01S07941.v23l617 ---|          ZJN    SSFX        IF NOT SPECIAL FORMAT CONTROL CARD
Line S00760 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12506  M01S00760.v23l617 +++|          ZJN    SSFX        IF NOT SPECIAL FORMAT COMMAND
12507  M00S07942.1aj     +++|          LMD    AB
12508  M00S07943.1aj     +++|          NJN    SSF1        IF NO MATCH
Line S07944 Modification History
M01 (Removed by) 1aj14
Seq #  *Modification Id* Act 
----------------------------+
12509  M01S07944.1aj14   ---|          LDM    SFCT,T1
Line S00013 Modification History
M01 (Added by) 1aj14
M02 (Removed by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12510  M02S00013.ns2388  ---|          LDM    BCPM        CHECK PREVIOUS ERROR CONDITION
12511  M02S00014.ns2388  ---|          ZJN    SSF1.1      IF NO ERROR SET
12512  M02S00015.ns2388  ---|          LJM    ERR1        PROCESS ERROR
12513  M02S00016.ns2388  ---|
12514  M02S00017.ns2388  ---| SSF1.1   LDM    SFCT,T1
Line S00084 Modification History
M01 (Added by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12515  M01S00084.ns2388  +++|          LDM    SFCT,T1
12516  M00S07945.1aj     +++|          STD    T1
12517  M00S07946.1aj     +++|          LJM    0,T1        JUMP TO SPECIAL FORMAT PROCESSOR
12518  M00S07947.1aj     +++|
12519  M00S07948.1aj     +++| CTIME    LDN    1           CPU TIME
12520  M00S07949.1aj     +++|          STD    CM+1
12521  M00S07950.1aj     +++|          LDD    HN
12522  M00S07951.1aj     +++|          UJN    HTI1        COMPLETE PROCESSING
12523  M00S07952.1aj     +++|
Line S07953 Modification History
M01 (Removed by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
12524  M01S07953.ns21000 ---| HTIME    LDN    CPUL        CPU CLOCK CYCLES
Line S00529 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
12525  M01S00529.ns21000 +++| HTIME    LDK    MABL        CPU CLOCK CYCLES
12526  M00S07954.1aj     +++|          CRD    CM
Line S07955 Modification History
M01 (Removed by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
12527  M01S07955.ns21000 ---|          LDD    CM+3
12528  M01S07956.ns21000 ---|          LPC    300
12529  M01S07957.ns21000 ---|          ZJN    HTI2        IF NOT CYBER 176
Line S00530 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
12530  M01S00530.ns21000 +++|          LDD    CM+1
12531  M01S00531.ns21000 +++|          SHN    -11
12532  M01S00532.ns21000 +++|          LMN    7
12533  M01S00533.ns21000 +++|          NJN    HTI2        IF NOT CYBER 176
12534  M00S07958.1aj     +++|          AOM    SSFA
12535  M00S07959.1aj     +++|          LDN    7           SET *HTIME* SUBFUNCTION
12536  M00S07960.1aj     +++|          STD    CM+1
12537  M00S07961.1aj     +++| HTI1     STD    CM+2
12538  M00S07962.1aj     +++|          LDN    CPTW        READ CP ACCUMULATOR
12539  M00S07963.1aj     +++|          LJM    SSF2        COMPLETE PROCESSING
12540  M00S07964.1aj     +++|
12541  M00S07965.1aj     +++| HTI2     RJM    CAT         CLEAR *TCS* ADDRESS
12542  M00S07966.1aj     +++|          LDC    =C* HTIME NOT AVAILABLE.*
12543  M00S07967.1aj     +++| HTI3     RJM    DFM
12544  M00S07968.1aj     +++|          LDD    FL
12545  M00S07969.1aj     +++|          ZJN    HTI4        IF NO FL ASSIGNED
12546  M00S07970.1aj     +++|          LDN    ZERL        CLEAR RA+2
12547  M00S07971.1aj     +++|          CRD    CM
12548  M00S07972.1aj     +++|          LDD    RA
12549  M00S07973.1aj     +++|          SHN    6
12550  M00S07974.1aj     +++|          ADN    ARGR
12551  M00S07975.1aj     +++|          CWD    CM
12552  M00S07976.1aj     +++| HTI4     LJM    IST1        CHECK STARTING JOB STEP
12553  M00S07977.1aj     +++|
12554  M00S07978.1aj     +++| RTIME    LDN    0           REAL TIME
12555  M00S07979.1aj     +++|          STD    CM+1
12556  M00S07980.1aj     +++|          STD    CM+2
12557  M00S07981.1aj     +++|          LDC    RTCL        READ REAL TIME ACCUMULATOR
12558  M00S07982.1aj     +++|          UJN    SSF3        COMPLETE PROCESSING
12559  M00S07983.1aj     +++|
12560  M00S07984.1aj     +++| STIME    AOD    T2          SYSTEM RESOURCE TIME
12561  M00S07985.1aj     +++|          LDC    2R U
12562  M00S07986.1aj     +++|          STM    SSFD
12563  M00S07987.1aj     +++|          LDC    2RNT
12564  M00S07988.1aj     +++|          STM    SSFD+1
12565  M00S07989.1aj     +++|          LDN    1
12566  M00S07990.1aj     +++|          STD    CM+1
12567  M00S07991.1aj     +++|          STD    CM+2
12568  M00S07992.1aj     +++|          LDN    SRUW
12569  M00S07993.1aj     +++|
Line S07994 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12570  M01S07994.v23l617 ---|*         COMPLETE SPECIAL FORMAT CONTROL CARD PROCESSING.
Line S00761 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12571  M01S00761.v23l617 +++|*         COMPLETE SPECIAL FORMAT COMMAND PROCESSING.
12572  M00S07995.1aj     +++|
12573  M00S07996.1aj     +++| SSF2     ADD    CP
12574  M00S07997.1aj     +++| SSF3     CRD    CN
12575  M00S07998.1aj     +++|          LDD    MA          REQUEST CONVERSION
12576  M00S07999.1aj     +++|          CWD    CN
12577  M00S08000.1aj     +++|          MONITOR  RDCM
12578  M00S08001.1aj     +++| SSFA     LDN    1           SET NUMBER OF WORDS
12579  M00S08002.1aj     +++|*         LDN    2           (IF *HTIME* REQUEST)
12580  M00S08003.1aj     +++|          STD    T1
12581  M00S08004.1aj     +++|          LDD    MA          READ CONVERSION TO MESSAGE
12582  M00S08005.1aj     +++|          CRD    CM
12583  M00S08006.1aj     +++|          LDD    CM
12584  M00S08007.1aj     +++|          NJN    SSF4        IF CONVERSION COMPLETED
12585  M00S08008.1aj     +++|          LDD    T1          PROCESS MESSAGE FOR NO CONVERSION
12586  M00S08009.1aj     +++|          LMN    2
12587  M00S08010.1aj     +++|          NJN    SSF5        IF NOT *HTIME* REQUEST
12588  M00S08011.1aj     +++|          LDD    MA
12589  M00S08012.1aj     +++|          CWM    SSFC,ON
12590  M00S08013.1aj     +++|          SBN    1
12591  M00S08014.1aj     +++|          CRM    SSFC+5,ON
12592  M00S08015.1aj     +++|          LDC    2R00
12593  M00S08016.1aj     +++|          STM    SSFC+3
12594  M00S08017.1aj     +++|          UJN    SSF5        DISPLAY MESSAGE
12595  M00S08018.1aj     +++|
12596  M00S08019.1aj     +++| SSF4     LDD    MA
12597  M00S08020.1aj     +++|          CRM    SSFC,T1
12598  M00S08021.1aj     +++| SSF5     RJM    CAT         CLEAR *TCS* ADDRESS
12599  M00S08022.1aj     +++|          LDC    SSFB        DISPLAY MESSAGE
12600  M00S08023.1aj     +++|          LJM    HTI3        ISSUE DAYFILE MESSAGE
12601  M00S08024.1aj     +++|
12602  M00S08025.1aj     +++|
12603  M00S08026.1aj     +++| SSFB     DATA   H*  IME*    *CTIME*, *HTIME*, *RTIME*, OR *STIME*
12604  M00S08027.1aj     +++| SSFC     DATA   H*000000.000*
12605  M00S08028.1aj     +++| SSFD     DATA   C* SECS.*
12606  M00S08029.1aj     +++|          DATA   C*   KCYCLES.*
12607  M00S08030.1aj     +++|
Line S08031 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12608  M01S08031.v23l617 ---| SOPT     BSS    0           PREFIX FOR TIME CONTROL CARDS
Line S00762 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12609  M01S00762.v23l617 +++| SOPT     BSS    0           PREFIX FOR TIME COMMANDS
12610  M00S08032.1aj     +++|          CON    2RCT
12611  M00S08033.1aj     +++|          CON    2RHT
12612  M00S08034.1aj     +++|          CON    2RRT
12613  M00S08035.1aj     +++|          CON    2RST
12614  M00S08036.1aj     +++|          CON    0
12615  M00S08037.1aj     +++|
12616  M00S08038.1aj     +++| SFCT     BSS    0           JUMP ADDRESS FOR PROCESSORS
12617  M00S08039.1aj     +++|          CON    CTIME
12618  M00S08040.1aj     +++|          CON    HTIME
12619  M00S08041.1aj     +++|          CON    RTIME
12620  M00S08042.1aj     +++|          CON    STIME
12621  M00S08043.1aj     +++|          SPACE  4,10
12622  M00S08044.1aj     +++|**        COMMON DECKS.
12623  M00S08045.1aj     +++|
12624  M00S08046.1aj     +++|
12625  M00S08047.1aj     +++|*CALL     COMPCRS
Line S00534 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
12626  M01S00534.ns21000 +++| EJT$     EQU    1           ASSEMBLE EJT ADDRESSING (COMPGFP)
12627  M01S00535.ns21000 +++|*CALL     COMPGFP
12628  M00S08048.1aj     +++|*CALL     COMPRCS
Line S00536 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
12629  M01S00536.ns21000 +++|*CALL     COMPRNS
Line S00010 Modification History
M01 (Added by) ns2578
Seq #  *Modification Id* Act 
----------------------------+
12630  M01S00010.ns2578  +++|*CALL     COMPSAF
Line S00537 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
12631  M01S00537.ns21000 +++|*CALL     COMPUPS
12632  M00S08049.1aj     +++|          SPACE  4,10
12633  M00S08050.1aj     +++|**        COMMON DECKS AND CODE WHICH MAY BE OVERLAID BY
12634  M00S08051.1aj     +++|*         THE MASS STORAGE BUFFER, *BFMS*.
12635  M00S08052.1aj     +++|
12636  M00S08053.1aj     +++|
12637  M00S08054.1aj     +++|          ERRNG  BFMS-2-*    CODE OVERLAYS *BFMS*
Line S00538 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
12638  M01S00538.ns21000 +++| CSC      SPACE  4,10
12639  M01S00539.ns21000 +++|***       CSC - CHECK *SHELL* CONTROLS.
12640  M01S00540.ns21000 +++|*
12641  M01S00541.ns21000 +++|*         EXIT   IF *SHELL* CONTROL SET IN NFL WORD *SHCN*, *TCS*
12642  M01S00542.ns21000 +++|*                WILL BE PRESET TO PROCESS THE *SHELL* PROGRAM.
12643  M01S00543.ns21000 +++|*
12644  M01S00544.ns21000 +++|*         USES   CM - CM+4, CN - CN+4.
12645  M01S00545.ns21000 +++|
12646  M01S00546.ns21000 +++|
12647  M01S00547.ns21000 +++| CSC      SUBR               ENTRY/EXIT
Line S00001 Modification History
M01 (Added by) 1aj79
Seq #  *Modification Id* Act 
----------------------------+
12648  M01S00001.1aj79   +++|          LDM    TCSA
12649  M01S00002.1aj79   +++|          NJN    CSCX        IF CHARGE REQUIRED SET
Line S00001 Modification History
M01 (Added by) 1aj45
Seq #  *Modification Id* Act 
----------------------------+
12650  M01S00001.1aj45   +++|          NFA    SHCN        FETCH *SHELL* CONTROL WORD
12651  M01S00002.1aj45   +++|          CRD    CN
Line S00548 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
12652  M01S00548.ns21000 +++|          LDM    RQSG
12653  M01S00549.ns21000 +++|          LPN    1
Line S00550 Modification History
M01 (Added by) ns21000
M02 (Removed by) 1aj45
Seq #  *Modification Id* Act 
----------------------------+
12654  M02S00550.1aj45   ---|          NJN    CSCX        IF *TCS* CALL
12655  M02S00551.1aj45   ---|          NFA    SHCN        CHECK *SHELL* CONTROL
12656  M02S00552.1aj45   ---|          CRD    CN
12657  M02S00553.1aj45   ---|          LDD    CN
Line S00003 Modification History
M01 (Added by) 1aj45
Seq #  *Modification Id* Act 
----------------------------+
12658  M01S00003.1aj45   +++|          ZJN    CSC0        IF NOT A *TCS* CALL
12659  M01S00004.1aj45   +++|          LDD    CN+4
12660  M01S00005.1aj45   +++|          SHN    21-13
12661  M01S00006.1aj45   +++|          PJN    CSC0        IF CALL NOT MADE FROM A *SHELL* PROGRAM
12662  M01S00007.1aj45   +++|          LDD    CN+4        CLEAR *SHELL* EXECUTING FLAG
12663  M01S00008.1aj45   +++|          LPC    3777
12664  M01S00009.1aj45   +++|          STD    CN+4
12665  M01S00010.1aj45   +++|          NFA    SHCN
12666  M01S00011.1aj45   +++|          CWD    CN
Line S00085 Modification History
M01 (Added by) ns2388
Seq #  *Modification Id* Act 
----------------------------+
12667  M01S00085.ns2388  +++|          LDD    SP          INHIBIT COMMAND LIMIT DECREMENT
12668  M01S00086.ns2388  +++|          SCN    1
12669  M01S00087.ns2388  +++|          LMN    1
12670  M01S00088.ns2388  +++|          STD    SP
Line S00012 Modification History
M01 (Added by) 1aj45
Seq #  *Modification Id* Act 
----------------------------+
12671  M01S00012.1aj45   +++|          UJN    CSCX        RETURN
12672  M01S00013.1aj45   +++|
12673  M01S00014.1aj45   +++| CSC0     LDD    CN          CHECK *SHELL* CONTROLS
Line S00554 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
12674  M01S00554.ns21000 +++|          ZJN    CSCX        IF *SHELL* CONTROL NOT SET
Line S00007 Modification History
M01 (Added by) 1aj93
M02 (Removed by) 1aj93a
Seq #  *Modification Id* Act 
----------------------------+
12675  M02S00007.1aj93a  ---|          ISTORE SSCC,(UJN SSC2)
Line S00555 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
12676  M01S00555.ns21000 +++|          LDD    CN+4
12677  M01S00556.ns21000 +++|          SHN    21-2
Line S00557 Modification History
M01 (Added by) ns21000
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12678  M02S00557.v23l617 ---|          PJN    CSC1        IF TERMINAL STATEMENTS NOT MONITORED
Line S00763 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12679  M01S00763.v23l617 +++|          PJN    CSC1        IF TERMINAL COMMANDS NOT MONITORED
Line S00558 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
12680  M01S00558.ns21000 +++|          LDM    IPLB+4
12681  M01S00559.ns21000 +++|          ZJN    CSC1        IF NOT INTERACTIVE
Line S00560 Modification History
M01 (Added by) ns21000
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12682  M02S00560.v23l617 ---|          LDC    LJMI        ENABLE TERMINAL STATEMENT MONITORING
Line S00764 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12683  M01S00764.v23l617 +++|          LDC    LJMI        ENABLE TERMINAL COMMAND MONITORING
Line S00561 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
12684  M01S00561.ns21000 +++|          STM    INTB
12685  M01S00562.ns21000 +++|          LDC    INT25
12686  M01S00563.ns21000 +++|          STM    INTB+1
12687  M01S00564.ns21000 +++| CSC1     LDD    CP          GET CCL CONTROL
12688  M01S00565.ns21000 +++|          ADC    JCDW
12689  M01S00566.ns21000 +++|          CRD    CM
12690  M01S00567.ns21000 +++|          LDD    CN+4
12691  M01S00568.ns21000 +++|          SHN    21-1
Line S00569 Modification History
M01 (Added by) ns21000
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12692  M02S00569.v23l617 ---|          PJN    CSC2        IF BATCH STATEMENTS NOT MONITORED
Line S00765 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12693  M01S00765.v23l617 +++|          PJN    CSC2        IF BATCH COMMANDS NOT MONITORED
Line S00570 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
12694  M01S00570.ns21000 +++|          LDD    CM+2
Line S00571 Modification History
M01 (Added by) ns21000
M02 (Removed by) 1aj92
Seq #  *Modification Id* Act 
----------------------------+
12695  M02S00571.1aj92   ---|          NJN    CSC2        IF IN CCL PROCEDURE
Line S00572 Modification History
M01 (Added by) ns21000
M02 (Removed by) v23l617
M03 (Removed by) 1aj92
Seq #  *Modification Id* Act 
----------------------------+
12696  M03S00572.1aj92   ---|          LDC    UJNI+INT26-INTC  ENABLE BATCH STATEMENT MONITORING
Line S00766 Modification History
M01 (Added by) v23l617
M02 (Removed by) 1aj92
Seq #  *Modification Id* Act 
----------------------------+
12697  M02S00766.1aj92   ---|          LDC    UJNI+INT26-INTC  ENABLE BATCH COMMAND MONITORING
Line S00573 Modification History
M01 (Added by) ns21000
M02 (Removed by) 1aj92
Seq #  *Modification Id* Act 
----------------------------+
12698  M02S00573.1aj92   ---|          STM    INTC
12699  M02S00574.1aj92   ---|          UJN    CSC3        RETURN
12700  M02S00575.1aj92   ---|
Line S00054 Modification History
M01 (Added by) 1aj92
Seq #  *Modification Id* Act 
----------------------------+
12701  M01S00054.1aj92   +++|          ZJN    CSC2.1      IF NOT IN CCL PROCEDURE
Line S00576 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
12702  M01S00576.ns21000 +++| CSC2     LDD    CN+4
12703  M01S00577.ns21000 +++|          SHN    21-0
Line S00578 Modification History
M01 (Added by) ns21000
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12704  M02S00578.v23l617 ---|          PJN    CSC3        IF CCL STATEMENTS NOT MONITORED
Line S00767 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12705  M01S00767.v23l617 +++|          PJN    CSC3        IF CCL COMMANDS NOT MONITORED
Line S00579 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
12706  M01S00579.ns21000 +++|          LDD    CM+2
12707  M01S00580.ns21000 +++|          ZJN    CSC3        IF NOT IN CCL PROCEDURE
Line S00581 Modification History
M01 (Added by) ns21000
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
12708  M02S00581.v23l617 ---|          LDC    UJNI+INT26-INTC  ENABLE CCL STATEMENT MONITORING
Line S00768 Modification History
M01 (Added by) v23l617
M02 (Removed by) 1aj92
Seq #  *Modification Id* Act 
----------------------------+
12709  M02S00768.1aj92   ---|          LDC    UJNI+INT26-INTC  ENABLE CCL COMMAND MONITORING
Line S00055 Modification History
M01 (Added by) 1aj92
Seq #  *Modification Id* Act 
----------------------------+
12710  M01S00055.1aj92   +++| CSC2.1   LDC    INT26       ENABLE CCL COMMAND MONITORING
12711  M01S00056.1aj92   +++|          STM    INTC+1
12712  M01S00057.1aj92   +++|          LDC    LJMI
Line S00582 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
12713  M01S00582.ns21000 +++|          STM    INTC
Line S00583 Modification History
M01 (Added by) ns21000
M02 (Removed by) 1aj50
Seq #  *Modification Id* Act 
----------------------------+
12714  M02S00583.1aj50   ---| CSC3     LDC    /ERR/EM25   SET *SHELL* EXIT MESSAGE
12715  M02S00584.1aj50   ---|          STM    TCSE
12716  M02S00585.1aj50   ---|          LDD    CN+4
Line S00586 Modification History
M01 (Added by) ns21000
M02 (Removed by) ns2114
M03 (Removed by) 1aj50
Seq #  *Modification Id* Act 
----------------------------+
12717  M03S00586.1aj50   ---|          SHN    21-6
12718  M03S00587.1aj50   ---|          PJN    CSC4        IF ABORT OPTION NOT SELECTED
Line S00008 Modification History
M01 (Added by) ns2114
M02 (Removed by) 1aj50
Seq #  *Modification Id* Act 
----------------------------+
12719  M02S00008.1aj50   ---|          SHN    21-7
Proceed to Part 10
cdc/nos2.source/opl.opl871/deck/1aj.009.txt ยท Last modified: by 127.0.0.1