Deck 1SJ Part 002

101 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
Line S00004 Modification History
M01 (Added by) 1sj8
M02 (Removed by) 1sj14
Seq #  *Modification Id* Act 
----------------------------+
02270  M02S00004.1sj14   ---|          AOM    SCJC        SET RECYCLE FLAG
Line S00003 Modification History
M01 (Added by) 1sj14
Seq #  *Modification Id* Act 
----------------------------+
02271  M01S00003.1sj14   +++|          SHN    21-13
02272  M01S00004.1sj14   +++|          MJN    SFJX        IF NO SECOND JOB
02273  M01S00005.1sj14   +++|          SHN    13-21
02274  M01S00006.1sj14   +++|          SBN    3
02275  M01S00007.1sj14   +++|          MJN    SFJ34       IF NOT TOO MUCH ACTIVITY
02276  M01S00008.1sj14   +++|          LDN    PPAL
02277  M01S00009.1sj14   +++|          CRD    CM
02278  M01S00010.1sj14   +++|          LDD    CM+4
02279  M01S00011.1sj14   +++|          ZJN    SFJX        IF NO PP-S AVAILABLE
Line S00012 Modification History
M01 (Added by) 1sj14
M02 (Removed by) ns2210
Seq #  *Modification Id* Act 
----------------------------+
02280  M02S00012.ns2210  ---|          CRD    CM
02281  M02S00013.ns2210  ---|          LDD    CM+4
Line S00001 Modification History
M01 (Added by) ns2210
Seq #  *Modification Id* Act 
----------------------------+
02282  M01S00001.ns2210  +++|          SBN    1
Line S00014 Modification History
M01 (Added by) 1sj14
Seq #  *Modification Id* Act 
----------------------------+
02283  M01S00014.1sj14   +++|          ZJN    SFJX        IF ONLY 1 PP AVAILABLE
02284  M01S00015.1sj14   +++| SFJ34    AOM    SCJC        SET RECYCLE FLAG
02285  M00S01460.1sj     +++|
02286  M00S01461.1sj     +++| SFJ      SUBR               ENTRY/EXIT
Line S00062 Modification History
M01 (Added by) ns22000
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02287  M02S00062.v23l617 ---|          AOM    SPST+JS0S*5+4  INCREMENT EJT SCANS
Line S00015 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02288  M01S00015.v23l617 +++|          AOM    SPST+JS0S*5+1  INCREMENT EJT SCANS
Line S00063 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02289  M01S00063.ns22000 +++|          SHN    -14
Line S00064 Modification History
M01 (Added by) ns22000
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02290  M02S00064.v23l617 ---|          RAM    SPST+JS0S*5+3
Line S00016 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02291  M01S00016.v23l617 +++|          RAM    SPST+JS0S*5
Line S01462 Modification History
M01 (Removed by) ns2153
Seq #  *Modification Id* Act 
----------------------------+
02292  M01S01462.ns2153  ---| SFJ1     LDC    **          PRESET EJT ORDINAL FOR BACKWARD SCAN
02293  M01S01463.ns2153  ---| SFJA     EQU    *-1         (LARGEST EJT ORDINAL + 1)
02294  M01S01464.ns2153  ---|          STD    EO
Line S00008 Modification History
M01 (Added by) ns2153
Seq #  *Modification Id* Act 
----------------------------+
02295  M01S00008.ns2153  +++|          LDM    SFJA        START SCAN WITH CURRENT ORDINAL
02296  M01S00009.ns2153  +++|          STD    EO
02297  M01S00010.ns2153  +++|          LJM    SFJ3        ENTER LOOP
02298  M00S01465.1sj     +++|
02299  M00S01466.1sj     +++|*         SCAN EJT LOOKING FOR HIGHEST PRIORITY SCHEDULABLE JOB.
02300  M00S01467.1sj     +++|
Line S01468 Modification History
M01 (Removed by) ns2153
Seq #  *Modification Id* Act 
----------------------------+
02301  M01S01468.ns2153  ---| SFJ2     SOD    EO          DECREMENT EJT ORDINAL
Line S00011 Modification History
M01 (Added by) ns2153
Seq #  *Modification Id* Act 
----------------------------+
02302  M01S00011.ns2153  +++| SFJ2     SOM    SFJA        DECREMENT EJT ORDINAL
02303  M00S01469.1sj     +++|*         UJN    SFJX        (SCHEDULABLE JOB WITH ERROR FLAG SET)
Line S01470 Modification History
M01 (Removed by) ns2153
Seq #  *Modification Id* Act 
----------------------------+
02304  M01S01470.ns2153  ---| SFJR     EQU    *-1
Line S00012 Modification History
M01 (Added by) ns2153
Seq #  *Modification Id* Act 
----------------------------+
02305  M01S00012.ns2153  +++| SFJR     EQU    *-2
02306  M01S00013.ns2153  +++|          STD    EO
02307  M01S00014.ns2153  +++|          PJN    SFJ2.1      IF NOT WRAP OF THE EJT
02308  M01S00015.ns2153  +++|          LDC    **
02309  M01S00016.ns2153  +++| SFJS     EQU    *-1         (HIGHEST EJT ORDINAL)
02310  M01S00017.ns2153  +++|          STM    SFJA
02311  M01S00018.ns2153  +++|          STD    EO
02312  M01S00019.ns2153  +++| SFJ2.1   LMC    **
02313  M01S00020.ns2153  +++| SFJT     EQU    *-1         (STARTING EJT ORDINAL)
02314  M00S01471.1sj     +++|          NJN    SFJ3        IF EJT SCAN NOT COMPLETE
02315  M00S01472.1sj     +++|          LDD    EP
Line S01473 Modification History
M01 (Removed by) ns2153
Seq #  *Modification Id* Act 
----------------------------+
02316  M01S01473.ns2153  ---|*         UJN    SFJ33       (POST-REJECT SCAN COMPLETE)
Line S00021 Modification History
M01 (Added by) ns2153
Seq #  *Modification Id* Act 
----------------------------+
02317  M01S00021.ns2153  +++|*         UJN    SFJ2.2      (POST-REJECT SCAN COMPLETE)
02318  M00S01474.1sj     +++| SFJB     EQU    *-1
Line S01475 Modification History
M01 (Removed by) ns2153
Seq #  *Modification Id* Act 
----------------------------+
02319  M01S01475.ns2153  ---|          UJN    SFJ33       EXIT
Line S01476 Modification History
M01 (Removed by) 1sj8
M02 (Removed by) ns2153
Seq #  *Modification Id* Act 
----------------------------+
02320  M02S01476.ns2153  ---|
Line S01477 Modification History
M01 (Removed by) ns2153
Seq #  *Modification Id* Act 
----------------------------+
02321  M01S01477.ns2153  ---|*         NJN    SFJ33       (JOB WAS REJECTED)
Line S00022 Modification History
M01 (Added by) ns2153
Seq #  *Modification Id* Act 
----------------------------+
02322  M01S00022.ns2153  +++|          UJN    SFJ2.2      EXIT
02323  M01S00023.ns2153  +++|*         NJN    SFJ2.2      (JOB WAS REJECTED)
02324  M00S01478.1sj     +++| SFJC     EQU    *-1
02325  M00S01479.1sj     +++|
02326  M00S01480.1sj     +++|*         NO JOB WAS SELECTED FOR SCHEDULING BUT AT LEAST ONE JOB WAS
02327  M00S01481.1sj     +++|*         REJECTED DUE TO VIOLATION OF SERVICE CLASS RESOURCE
02328  M00S01482.1sj     +++|*         CONSTRAINTS.  REMOVE SERVICE CLASS RESOURCE CONSTRAINTS AND
02329  M00S01483.1sj     +++|*         RE-SCAN THE EJT TO SELECT THE HIGHEST PRIORITY JOB OF THOSE
02330  M00S01484.1sj     +++|*         PREVIOUSLY REJECTED.  THE SELECTED JOB WILL BE SCHEDULED ONLY
02331  M00S01485.1sj     +++|*         IF SUFFICIENT CM AND ECS IS AVAILABLE WITHOUT ROLLING OUT
Line S01486 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02332  M01S01486.271l716 ---|*         OTHER JOBS.
Line S00383 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02333  M01S00383.271l716 +++|*         OTHER JOBS.  IF FLEXIBLE MEMORY PARTITIONING IS DISABLED, NO
02334  M01S00384.271l716 +++|*         RE-SCAN WILL BE PERFORMED.
02335  M00S01487.1sj     +++|
02336  M00S01488.1sj     +++|          LDM    SCPA
Line S00385 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02337  M01S00385.271l716 +++|*         UJN    SFJX        (FLEXIBLE MEMORY PARTITIONING DISABLED)
02338  M01S00386.271l716 +++| SFJW     EQU    *-2
02339  M00S01489.1sj     +++|          ZJN    SFJX        IF NO AVAILABLE CONTROL POINTS
Line S00065 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02340  M01S00065.ns22000 +++|          LDN    0           REINITIALIZE EJT SCAN
02341  M01S00066.ns22000 +++|          STM    USDA
02342  M01S00067.ns22000 +++|          STM    USDB
02343  M01S00068.ns22000 +++|          STM    USDC
02344  M00S01490.1sj     +++|          LDM    SFJN
02345  M00S01491.1sj     +++|          STM    SFJB
Line S01492 Modification History
M01 (Removed by) 1sj7
Seq #  *Modification Id* Act 
----------------------------+
02346  M01S01492.1sj7    ---|          LDC    TEPB+1*MXJC CAUSE *ASJ* TO USE LOWER BOUND PRIORITY
02347  M01S01493.1sj7    ---|          STM    ASJA
02348  M00S01494.1sj     +++|          LDC    SFJ2
02349  M00S01495.1sj     +++|          STM    SFJH
02350  M00S01496.1sj     +++|          LDM    SFJO
02351  M00S01497.1sj     +++|          STM    SFJI
Line S01498 Modification History
M01 (Removed by) ns2153
Seq #  *Modification Id* Act 
----------------------------+
02352  M01S01498.ns2153  ---|          UJN    SFJ1        PERFORM POST-REJECT SCHEDULING
02353  M01S01499.ns2153  ---|
02354  M01S01500.ns2153  ---| SFJ3     CFI    EJT,,EO     GET EJT ENTRY OFFSET
Line S00024 Modification History
M01 (Added by) ns2153
Seq #  *Modification Id* Act 
----------------------------+
02355  M01S00024.ns2153  +++|          LJM    SFJ2        PERFORM POST-REJECT SCHEDULING
02356  M01S00025.ns2153  +++|
02357  M01S00026.ns2153  +++| SFJ2.2   LJM    SFJ33       CONTINUE
02358  M01S00027.ns2153  +++|
02359  M01S00028.ns2153  +++| SFJ3     CFI    EJT,EO      GET EJT ENTRY OFFSET
02360  M00S01501.1sj     +++|          ADC    **          ADD EJT FWA (SET BY *PRS*)
02361  M00S01502.1sj     +++| SFJD     EQU    *-1         (EJT FWA)
02362  M00S01503.1sj     +++|          ADK    JSNE        READ EJT ENTRY
02363  M00S01504.1sj     +++|          CRD    EJ
02364  M00S01505.1sj     +++|          STD    AA+1        SAVE EJT ADDRESS
02365  M00S01506.1sj     +++|          SHN    -14
02366  M00S01507.1sj     +++|          STD    AA
02367  M00S01508.1sj     +++|          LDD    EJ
02368  M00S01509.1sj     +++|          ZJN    SFJ4        IF EMPTY ENTRY
02369  M00S01510.1sj     +++|          LDD    EJ+4
02370  M00S01511.1sj     +++|          SHN    21-6
02371  M00S01512.1sj     +++|          PJN    SFJ5        IF JOB ADVANCE IS CLEAR
02372  M00S01513.1sj     +++| SFJ4     LJM    SFJ2        CONTINUE EJT SCAN
02373  M00S01514.1sj     +++|
02374  M00S01515.1sj     +++| SFJ5     SHN    6-0
02375  M00S01516.1sj     +++|          MJN    SFJ4        IF JOB ADVANCE INHIBITED
02376  M00S01517.1sj     +++|          LPN    37          GET JOB STATUS
02377  M00S01518.1sj     +++|          STD    T2
Line S00003 Modification History
M01 (Added by) ns2395
Seq #  *Modification Id* Act 
----------------------------+
02378  M01S00003.ns2395  +++|          STM    SFJU+4
02379  M00S01519.1sj     +++|          LDD    AA          READ REMAINDER OF EJT ENTRY
02380  M00S01520.1sj     +++|          SHN    14
02381  M00S01521.1sj     +++|          LMD    AA+1
02382  M00S01522.1sj     +++|          ADN    SCHE-JSNE
02383  M00S01523.1sj     +++|          CRD    AA
02384  M00S01524.1sj     +++|          ADN    PRFE-SCHE
02385  M00S01525.1sj     +++|          CRD    CM
02386  M00S01526.1sj     +++|          ADN    SCLE-PRFE
02387  M00S01527.1sj     +++|          CRD    BB
02388  M00S01528.1sj     +++|          LDD    BB          GET SERVICE CLASS
02389  M00S01529.1sj     +++|          SHN    -6
02390  M00S01530.1sj     +++|          STD    SC
02391  M00S01531.1sj     +++|          ERRPL  7677-MXPR   ENSURE *LCN* MAY BE USED
02392  M00S01532.1sj     +++|          LCN    7777-MXPR   PRESET SCHEDULING PRIORITY
02393  M00S01533.1sj     +++|          STD    BB+1
02394  M00S01534.1sj     +++|          LDD    AA          GET EST ORDINAL
02395  M00S01535.1sj     +++|          STD    BB+2
02396  M00S01536.1sj     +++|          LDD    CM+1
Line S01537 Modification History
M01 (Removed by) 1sj33
Seq #  *Modification Id* Act 
----------------------------+
02397  M01S01537.1sj33   ---|          ZJN    SFJ7        IF NO ERROR FLAG SET IN EJT ENTRY
Line S00001 Modification History
M01 (Added by) 1sj33
Seq #  *Modification Id* Act 
----------------------------+
02398  M01S00001.1sj33   +++|          ZJP    SFJ7        IF NO ERROR FLAG SET IN EJT ENTRY
02399  M00S01538.1sj     +++|          LDM    TJST,T2
02400  M00S01539.1sj     +++|          SHN    21-12
02401  M00S01540.1sj     +++|          PJN    SFJ6        IF JOB MAY NOT BE SCHEDULED
02402  M00S01541.1sj     +++|          LDD    T2
02403  M00S01542.1sj     +++|          LMN    SUJS
02404  M00S01543.1sj     +++|          NJN    SFJ5.1      IF NOT SUSPENDED JOB
02405  M00S01544.1sj     +++|          LDD    EJ+4
02406  M00S01545.1sj     +++|          SHN    0-7
02407  M00S01546.1sj     +++|          LPN    17
02408  M00S01547.1sj     +++|          LMN    OLCS
02409  M00S01548.1sj     +++|          ZJN    SFJ6        IF ON-LINE INTERACTIVE JOB
Line S00002 Modification History
M01 (Added by) 1sj33
Seq #  *Modification Id* Act 
----------------------------+
02410  M01S00002.1sj33   +++|          LMN    DTCS&OLCS
02411  M01S00003.1sj33   +++|          NJN    SFJ5.1      IF NOT DETACHED
02412  M01S00004.1sj33   +++|          LDD    CM+1
02413  M01S00005.1sj33   +++|          SBK    ODET
02414  M01S00006.1sj33   +++|          PJN    SFJ5.1      IF ERROR FLAG .GE. *ODET*
02415  M01S00007.1sj33   +++|          LDD    BB
02416  M01S00008.1sj33   +++|          SHN    21-4
02417  M01S00009.1sj33   +++|          PJN    SFJ6        IF NOT FORCED ROLLIN
Line S01549 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02418  M01S01549.241l630 ---| SFJ5.1   LDM    TEFP,CM+1   GET TRANSFER ADDRESS FROM *TEFP* TABLE
Line S00013 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02419  M01S00013.241l630 +++| SFJ5.1   LDD    CM+1
Line S00014 Modification History
M01 (Added by) 241l630
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02420  M02S00014.271l716 ---|          SBK    TEFPL
Line S00387 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02421  M01S00387.271l716 +++|          SBK    MXET
Line S00015 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02422  M01S00015.241l630 +++|          PJN    SFJ6        IF ERROR FLAG NOT VALID
02423  M01S00016.241l630 +++|          LDM    TEFP,CM+1   GET TRANSFER ADDRESS FROM *TEFP* TABLE
Line S01550 Modification History
M01 (Removed by) 1sj40
Seq #  *Modification Id* Act 
----------------------------+
02424  M01S01550.1sj40   ---|          ZJN    SFJ6        IF NO PROCESSOR DEFINED FOR ERROR FLAG
Line S00001 Modification History
M01 (Added by) 1sj40
Seq #  *Modification Id* Act 
----------------------------+
02425  M01S00001.1sj40   +++| SFJV     ZJN    SFJ6        IF NO PROCESSOR DEFINED FOR ERROR FLAG
02426  M01S00002.1sj40   +++|*         UJN    SFJ6        (IF DEADSTART SEQUENCING JOB HAS NOT RUN)
02427  M00S01551.1sj     +++|          STD    T1
Line S01552 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
02428  M01S01552.242l642 ---|          LDN    0           SET PROCESSOR ENTRY CONDITION
02429  M00S01553.1sj     +++|          LJM    0,T1
02430  M00S01554.1sj     +++|
02431  M00S01555.1sj     +++| SFJ6     LJM    SFJ2        CONTINUE EJT SCAN
02432  M00S01556.1sj     +++|
02433  M00S01557.1sj     +++|*         CHECK FOR FORCED ROLLIN/ROLLOUT.
02434  M00S01558.1sj     +++|
02435  M00S01559.1sj     +++| SFJ7     LDD    BB
02436  M00S01560.1sj     +++|          SHN    21-5
02437  M00S01561.1sj     +++|          MJN    SFJ6        IF FORCED ROLLOUT
02438  M00S01562.1sj     +++|          SHN    5-4
02439  M00S01563.1sj     +++|          PJN    SFJ10       IF NOT FORCED ROLLIN
02440  M00S01564.1sj     +++|          LDM    TJST,T2
02441  M00S01565.1sj     +++|          SHN    21-11
02442  M00S01566.1sj     +++|          PJN    SFJ10       IF JOB MAY NOT BE FORCED ROLLED IN
Line S01567 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
02443  M01S01567.242l642 ---| SFJ8     LDD    T2
02444  M01S01568.242l642 ---|          LMK    PRJS
Line S01569 Modification History
M01 (Removed by) 1sj30a
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
02445  M02S01569.242l642 ---|          NJN    SFJ11       IF NOT PRE-INITIAL JOB STATE
Line S00014 Modification History
M01 (Added by) 1sj30a
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
02446  M02S00014.242l642 ---|          NJN    SFJ10.1     IF NOT PRE-INITIAL JOB STATE
Line S01570 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
02447  M01S01570.242l642 ---|          LDK    MNFL&DNFL   SET DEFAULT NFL AS REQUIRED CM FL
Line S00041 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
02448  M01S00041.242l642 +++| SFJ8     LJM    SFJ12       SCHEDULE JOB WITH FL
02449  M00S01571.1sj     +++|
02450  M00S01572.1sj     +++|*         IF ENTERING AT THIS LOCATION DUE TO AN ERROR FLAG REQUIRING
02451  M00S01573.1sj     +++|*         ROLLIN WITH ONLY NFL, SET THE MAXIMUM NFL AS THE REQUIRED CM
02452  M00S01574.1sj     +++|*         FL.  ROUTINE *ASJ* WILL REQUEST THIS MUCH CM STORAGE TO
02453  M00S01575.1sj     +++|*         ENSURE *1RI* WILL HAVE SUFFICIENT SPACE FOR NFL ROLLIN.
02454  M00S01576.1sj     +++|
Line S01577 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
02455  M01S01577.242l642 ---| SFJ9     LMN    MNFL
Line S00042 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
02456  M01S00042.242l642 +++| SFJ9     LDK    MNFL
02457  M00S01578.1sj     +++|          STD    BB+4
02458  M00S01579.1sj     +++|          LDN    0           CLEAR ECS REQUIREMENT
02459  M00S01580.1sj     +++|          STD    BB+3
02460  M00S01581.1sj     +++|
02461  M00S01582.1sj     +++|*         SAVE THE JOB-S EJT ORDINAL AS A FLAG FOR ROUTINE *ASJ*
02462  M00S01583.1sj     +++|*         INDICATING THE CM FL FIELD IN THE EJT ENTRY MUST BE CLEARED
02463  M00S01584.1sj     +++|*         TO TELL *1RI* ONLY NFL SHOULD BE ROLLED IN.  IF THE JOB
02464  M00S01585.1sj     +++|*         STATE IS *PRJS*, CLEARING THE CM FL FIELD WILL HAVE NO
02465  M00S01586.1sj     +++|*         EFFECT.
02466  M00S01587.1sj     +++|
02467  M00S01588.1sj     +++|          LDD    EO
02468  M00S01589.1sj     +++|          STM    ASJB
02469  M00S01590.1sj     +++|          LDC    UJNI+77-SFJR+SFJX  TERMINATE JOB SEARCH
02470  M00S01591.1sj     +++|          ERRPL  SFJR-SFJX-40  RANGE ERROR
02471  M00S01592.1sj     +++|          STM    SFJR
Line S01593 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02472  M01S01593.271l716 ---|          LJM    SFJ13       GO CHECK PRIORITY
Line S00388 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02473  M01S00388.271l716 +++|          LJM    SFJ12.5     CHECK PRIORITY
02474  M00S01594.1sj     +++|
02475  M00S01595.1sj     +++|*         DETERMINE WHETHER OR NOT THE JOB IS IN A SCHEDULABLE STATE.
02476  M00S01596.1sj     +++|
02477  M00S01597.1sj     +++| SFJ10    LDD    CM+1
Line S01598 Modification History
M01 (Removed by) 1sj30a
Seq #  *Modification Id* Act 
----------------------------+
02478  M01S01598.1sj30a  ---|          NJN    SFJ11       IF ERROR FLAG SET
Line S00015 Modification History
M01 (Added by) 1sj30a
Seq #  *Modification Id* Act 
----------------------------+
02479  M01S00015.1sj30a  +++| SFJ10.1  NJN    SFJ11       IF ERROR FLAG SET
02480  M00S01599.1sj     +++|          LDM    TJST,T2
02481  M00S01600.1sj     +++|          SHN    21-13
Line S01601 Modification History
M01 (Removed by) 1sj30a
Seq #  *Modification Id* Act 
----------------------------+
02482  M01S01601.1sj30a  ---|          MJN    SFJ10.1     IF SCHEDULABLE JOB
02483  M01S01602.1sj30a  ---|          LJM    SFJ2        CONTINUE SEARCH
Line S00016 Modification History
M01 (Added by) 1sj30a
Seq #  *Modification Id* Act 
----------------------------+
02484  M01S00016.1sj30a  +++|          MJN    SFJ10.3     IF SCHEDULABLE JOB
02485  M01S00017.1sj30a  +++| SFJ10.2  LJM    SFJ2        CONTINUE SEARCH
02486  M00S01603.1sj     +++|
Line S01604 Modification History
M01 (Removed by) 1sj30a
Seq #  *Modification Id* Act 
----------------------------+
02487  M01S01604.1sj30a  ---| SFJ10.1  LDD    SC
02488  M01S01605.1sj30a  ---|          SBN    MXJC
Line S00018 Modification History
M01 (Added by) 1sj30a
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02489  M02S00018.271l716 ---| SFJ10.3  LDD    SC          CHECK FOR REJECTED SUBSYSTEM
02490  M02S00019.271l716 ---|          SBK    SSSC
02491  M02S00020.271l716 ---|          NJN    SFJ10.5     IF NOT SUBSYSTEM
02492  M02S00021.271l716 ---|          LDM    SCJE        GET THE RECYCLE COUNT
02493  M02S00022.271l716 ---|          STD    T1
02494  M02S00023.271l716 ---| SFJ10.4  SOD    T1
02495  M02S00024.271l716 ---|          MJN    SFJ11       IF END OF TABLE
02496  M02S00025.271l716 ---|          LDM    TPRS,T1
02497  M02S00026.271l716 ---|          LMD    EO
02498  M02S00027.271l716 ---|          ZJN    SFJ10.2     IF SUBSYSTEM ALREADY REJECTED
02499  M02S00028.271l716 ---|          UJN    SFJ10.4     CHECK NEXT ENTRY
02500  M02S00029.271l716 ---|
02501  M02S00030.271l716 ---| SFJ10.5  SBK    MXJC-SSSC
Line S00389 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02502  M01S00389.271l716 +++| SFJ10.3  LDD    SC
02503  M01S00390.271l716 +++| SFJ10.5  SBK    MXJC
02504  M00S01606.1sj     +++| SFJ11    PJN    SFJ12       IF NO JCB FOR SERVICE CLASS
Line S00001 Modification History
M01 (Added by) 1sj5
Seq #  *Modification Id* Act 
----------------------------+
02505  M01S00001.1sj5    +++|          LDD    T2
02506  M01S00002.1sj5    +++|          LMK    SIJS
02507  M01S00003.1sj5    +++|          ZJN    SFJ12       IF SCP ROLLIN JOB STATUS
02508  M00S01607.1sj     +++|
02509  M00S01608.1sj     +++|*         CALCULATE SCHEDULING PRIORITY.  THE CALCULATION IS PERFORMED
02510  M00S01609.1sj     +++|*         IN-LINE TO AVOID THE OVERHEAD OF SUBROUTINE USAGE.
02511  M00S01610.1sj     +++|
Line S01611 Modification History
M01 (Removed by) 1sj12
Seq #  *Modification Id* Act 
----------------------------+
02512  M01S01611.1sj12   ---|          LDM    TEPB+3*MXJC,SC  USE WEIGHTING FACTOR AS SHIFT COUNT
02513  M01S01612.1sj12   ---|          ADC    SHNI
Line S00001 Modification History
M01 (Added by) 1sj12
M02 (Removed by) 1sj18
Seq #  *Modification Id* Act 
----------------------------+
02514  M02S00001.1sj18   ---|          LDN    77
Line S00001 Modification History
M01 (Added by) 1sj18
Seq #  *Modification Id* Act 
----------------------------+
02515  M01S00001.1sj18   +++|          LDC    SHNI+77     CALCULATE THE WEIGHTING FACTOR SHIFT
Line S00002 Modification History
M01 (Added by) 1sj12
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02516  M02S00002.271l716 ---|          SBM    TEPB+3*MXJC,SC
Line S00391 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02517  M01S00391.271l716 +++|          SBM    TEPB+2*MXJC,SC
Line S00003 Modification History
M01 (Added by) 1sj12
M02 (Removed by) 1sj18
Seq #  *Modification Id* Act 
----------------------------+
02518  M02S00003.1sj18   ---|          LMC    SHNI
02519  M00S01613.1sj     +++|          STM    SFJE
02520  M00S01614.1sj     +++|          LDD    TM
02521  M00S01615.1sj     +++|          SBD    AA+3
02522  M00S01616.1sj     +++|          SHN    14
02523  M00S01617.1sj     +++|          ADD    TM+1
02524  M00S01618.1sj     +++|          SBD    AA+4
02525  M00S01619.1sj     +++| SFJE     SHN    **
Line S01620 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02526  M01S01620.271l716 ---|          ADM    TEPB+1*MXJC,SC
Line S01621 Modification History
M01 (Removed by) 1sj18
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02527  M02S01621.271l716 ---|          STD    BB+1        SAVE CALCULATED SCHEDULING PRIORITY
Line S01622 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02528  M01S01622.271l716 ---|          SBM    TEPB+2*MXJC,SC
Line S00392 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02529  M01S00392.271l716 +++|          ADM    TEPB,SC
02530  M01S00393.271l716 +++|          SBM    TEPB+1*MXJC,SC
Line S01623 Modification History
M01 (Removed by) 1sj18
Seq #  *Modification Id* Act 
----------------------------+
02531  M01S01623.1sj18   ---|          MJN    SFJ12       IF SCHEDULING PRIORITY .LT. UPPER BOUND
02532  M01S01624.1sj18   ---|          LDD    T2
02533  M01S01625.1sj18   ---|          LMK    PRJS
02534  M01S01626.1sj18   ---|          ZJN    SFJ12       IF PRE-INITIAL JOB STATE
02535  M01S01627.1sj18   ---|          LDM    TEPB+2*MXJC,SC  SET PRIORITY AT UPPER BOUND
Line S00002 Modification History
M01 (Added by) 1sj18
Seq #  *Modification Id* Act 
----------------------------+
02536  M01S00002.1sj18   +++|          MJN    SFJ11.1     IF SCHEDULING PRIORITY .LT. UPPER BOUND
02537  M01S00003.1sj18   +++|          LDN    0           SET PRIORITY TO UPPER BOUND
Line S00004 Modification History
M01 (Added by) 1sj18
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02538  M02S00004.271l716 ---| SFJ11.1  ADM    TEPB+2*MXJC,SC
Line S00394 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02539  M01S00394.271l716 +++| SFJ11.1  ADM    TEPB+1*MXJC,SC
02540  M00S01628.1sj     +++|          STD    BB+1        SAVE SCHEDULING PRIORITY
02541  M00S01629.1sj     +++| SFJ12    LDD    CM+1
Line S01630 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02542  M01S01630.ns22000 ---|*         UJN    SFJ13       (USER ECS ENABLED)
Line S00069 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02543  M01S00069.ns22000 +++|*         UJN    SFJ12.2     (USER EM ENABLED)
02544  M00S01631.1sj     +++| SFJF     EQU    *-1
Line S01632 Modification History
M01 (Removed by) ns2143
Seq #  *Modification Id* Act 
----------------------------+
02545  M01S01632.ns2143  ---|          SBN    SPET
02546  M01S01633.ns2143  ---|          MJN    SFJ12.1     IF NO ERROR OR ERROR FLAG .LT. *SPET*
Line S00001 Modification History
M01 (Added by) ns2143
Seq #  *Modification Id* Act 
----------------------------+
02547  M01S00001.ns2143  +++|          LMN    ORET
02548  M01S00002.ns2143  +++|          NJN    SFJ12.1     IF NOT OPERATOR OVERRIDE
Line S01634 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02549  M01S01634.271l716 ---|          LDN    0           CLEAR ECS REQUIREMENT
02550  M00S01635.1sj     +++|          STD    BB+3
02551  M00S01636.1sj     +++| SFJ12.1  LDD    BB+3
Line S01637 Modification History
M01 (Removed by) 1sj8
Seq #  *Modification Id* Act 
----------------------------+
02552  M01S01637.1sj8    ---|          NJN    SFJ14       IF JOB WANTS ECS
02553  M01S01638.1sj8    ---| SFJ13    AOM    SFJK        INCREMENT SCHEDULABLE JOB COUNT
02554  M01S01639.1sj8    ---|          LDD    BB+1
Line S00005 Modification History
M01 (Added by) 1sj8
M02 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02555  M02S00005.ns22000 ---|          NJN    SFJ13.3     IF JOB WANTS ECS
Line S00070 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02556  M01S00070.ns22000 +++|          ZJN    SFJ12.2     IF EM NOT REQUIRED
02557  M01S00071.ns22000 +++|          LJM    SFJ2        CHECK NEXT JOB
02558  M01S00072.ns22000 +++|
02559  M01S00073.ns22000 +++| SFJ12.2  AOM    USDC        INCREMENT SCHEDULABLE JOB COUNT
Line S00074 Modification History
M01 (Added by) ns22000
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02560  M02S00074.271l716 ---|          LDD    AM
Line S00395 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02561  M01S00395.271l716 +++|          LDD    T2
02562  M01S00396.271l716 +++|          LMK    PCJS
02563  M01S00397.271l716 +++|          NJN    SFJ12.3     IF NOT PCP JOB
02564  M01S00398.271l716 +++|          LDN    0
02565  M01S00399.271l716 +++|*         LDN    1           (PCP JOB SCHEDULING INHIBITED)
02566  M01S00400.271l716 +++| SFJY     EQU    *-1
02567  M01S00401.271l716 +++|          NJP    SFJ2        IF PCP JOB SCHEDULING INHIBITED
02568  M01S00402.271l716 +++|          STD    BB+3        CLEAR EM REQUIREMENT
02569  M01S00403.271l716 +++|          STD    BB+4        CLEAR CM REQUIREMENT
02570  M01S00404.271l716 +++|          LDN    1           SET EST ORDINAL FOR ZERO ACTIVITY
02571  M01S00405.271l716 +++|          STD    BB+2
02572  M01S00406.271l716 +++| SFJ12.3  LDD    AM
Line S00075 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02573  M01S00075.ns22000 +++|          SHN    14
02574  M01S00076.ns22000 +++|          LMD    AM+1
02575  M01S00077.ns22000 +++|          SBD    BB+4
02576  M01S00078.ns22000 +++|          SHN    -21
02577  M01S00079.ns22000 +++|          STD    T1
Line S00080 Modification History
M01 (Added by) ns22000
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02578  M02S00080.271l716 ---|          ZJN    SFJ12.3     IF SUFFICIENT CM
Line S00407 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02579  M01S00407.271l716 +++|          ZJN    SFJ12.4     IF SUFFICIENT CM
Line S00081 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02580  M01S00081.ns22000 +++|          STM    USDA        SET INSUFFICIENT CM
Line S00082 Modification History
M01 (Added by) ns22000
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02581  M02S00082.271l716 ---| SFJ12.3  LDD    AE
Line S00408 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02582  M01S00408.271l716 +++| SFJ12.4  LDD    AE
Line S00083 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02583  M01S00083.ns22000 +++|          SBD    BB+3
Line S00084 Modification History
M01 (Added by) ns22000
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02584  M02S00084.271l716 ---|          PJN    SFJ13       IF SUFFICIENT EM
Line S00409 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02585  M01S00409.271l716 +++|          PJN    SFJ12.5     IF SUFFICIENT EM
Line S00085 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02586  M01S00085.ns22000 +++|          LDN    1           SET INSUFFICIENT EM
02587  M01S00086.ns22000 +++|          STM    USDB
02588  M01S00087.ns22000 +++|          STD    T1          SET CP SEARCH REQUIRED
Line S00006 Modification History
M01 (Added by) 1sj8
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02589  M02S00006.271l716 ---| SFJ13    LDD    BB+1
Line S00410 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02590  M01S00410.271l716 +++| SFJ12.5  LDD    BB+1
02591  M00S01640.1sj     +++|          SBD    JP
Line S01641 Modification History
M01 (Removed by) 1sj8
Seq #  *Modification Id* Act 
----------------------------+
02592  M01S01641.1sj8    ---|          MJN    SFJ14       IF PRIORITY .LT. CURRENT BEST
02593  M01S01642.1sj8    ---|          NJN    SFJ15       IF PRIORITY .GT. CURRENT BEST
Line S00007 Modification History
M01 (Added by) 1sj8
Seq #  *Modification Id* Act 
----------------------------+
02594  M01S00007.1sj8    +++|          MJN    SFJ13.2     IF PRIORITY .LT. CURRENT BEST
02595  M01S00008.1sj8    +++|          NJN    SFJ13.1     IF PRIORITY .GT. CURRENT BEST
Line S00011 Modification History
M01 (Added by) ns2181
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02596  M02S00011.271l716 ---|          LDD    SC
Line S00411 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02597  M01S00411.271l716 +++|          LDD    T2
02598  M01S00412.271l716 +++|          LMK    PCJS
02599  M01S00413.271l716 +++|          NJN    SFJ12.6     IF NOT PCP JOB
02600  M01S00414.271l716 +++|          LDM    SCPA        CHECK IF CP AVAILABLE FOR PSEUDO-ROLLIN
02601  M01S00415.271l716 +++|          RJM    CCP
02602  M01S00416.271l716 +++|          NJN    SFJ13.1     IF FREE CP NEITHER FIRST NOR LAST
02603  M01S00417.271l716 +++|          LJM    SFJ2        CONTINUE EJT SCAN
02604  M01S00418.271l716 +++|
02605  M01S00419.271l716 +++| SFJ12.6  LDD    SC
Line S00012 Modification History
M01 (Added by) ns2181
Seq #  *Modification Id* Act 
----------------------------+
02606  M01S00012.ns2181  +++|          LMN    DSSC
Line S00013 Modification History
M01 (Added by) ns2181
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02607  M02S00013.271l716 ---|          ZJP    SFJ15       IF DEADSTART SEQUENCING JOB, SELECT IT
Line S01643 Modification History
M01 (Removed by) 1sj14
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02608  M02S01643.271l716 ---|          LDC    **
Line S00016 Modification History
M01 (Added by) 1sj14
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02609  M02S00016.271l716 ---|          LDC    7777
Line S00420 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02610  M01S00420.271l716 +++|          NJN    SFJ13.0     IF NOT DEADSTART SEQUENCING JOB
02611  M01S00421.271l716 +++| SFJ13    LJM    SFJ15.1     SELECT THIS JOB AS CURRENT BEST CANDIDATE
02612  M01S00422.271l716 +++|
02613  M01S00423.271l716 +++| SFJ13.0  LDC    7777
02614  M00S01644.1sj     +++| SFJG     EQU    *-1         (ACTIVITY COUNT OF CURRENT BEST JOB)
02615  M00S01645.1sj     +++|          SBM    TDAC,BB+2
Line S01646 Modification History
M01 (Removed by) 1sj8
Seq #  *Modification Id* Act 
----------------------------+
02616  M01S01646.1sj8    ---|          MJN    SFJ14       IF CURRENT BEST HAS LESS DEVICE ACTIVITY
02617  M01S01647.1sj8    ---|          NJN    SFJ15       IF CURRENT BEST HAS MORE DEVICE ACTIVITY
Line S00009 Modification History
M01 (Added by) 1sj8
Seq #  *Modification Id* Act 
----------------------------+
02618  M01S00009.1sj8    +++|          MJN    SFJ13.2     IF CURRENT BEST HAS LESS DEVICE ACTIVITY
02619  M01S00010.1sj8    +++| SFJ13.1  NJN    SFJ15       IF CURRENT BEST HAS MORE DEVICE ACTIVITY
Line S01648 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02620  M01S01648.271l716 ---|          LDD    JM
02621  M01S01649.271l716 ---|          SBD    BB+4
02622  M01S01650.271l716 ---|          MJN    SFJ15       IF NEW JOB WANTS MORE CM THAN OLD JOB
Line S00011 Modification History
M01 (Added by) 1sj8
Seq #  *Modification Id* Act 
----------------------------+
02623  M01S00011.1sj8    +++| SFJ13.2  LDC    **
02624  M01S00012.1sj8    +++| SFJK     EQU    *-1         (PRIORITY OF SECOND BEST JOB)
02625  M01S00013.1sj8    +++|          SBD    BB+1
02626  M01S00014.1sj8    +++|          MJN    SFJ13.4     IF PRIORITY .GT. 2ND BEST
02627  M01S00015.1sj8    +++| SFJ13.3  NJN    SFJ14       IF PRIORITY .LT. 2ND BEST
02628  M01S00016.1sj8    +++|          LDM    TDAC,BB+2
02629  M01S00017.1sj8    +++|          SBM    SFJM
02630  M01S00018.1sj8    +++|          MJN    SFJ13.4     IF ACTIVITY .LT. 2ND BEST
02631  M01S00019.1sj8    +++|          NJN    SFJ14       IF ACTIVITY .GT. 2ND BEST
02632  M01S00020.1sj8    +++|          LDC    **
02633  M01S00021.1sj8    +++| SFJL     EQU    *-1         (CM FL OF 2ND BEST JOB)
02634  M01S00022.1sj8    +++|          SBD    BB+4
02635  M01S00023.1sj8    +++|          PJN    SFJ14       IF REQUIRED CM .LE. 2ND BEST
02636  M01S00024.1sj8    +++| SFJ13.4  LDD    BB+1        SET 2ND BEST = CURRENT JOB
02637  M01S00025.1sj8    +++|          STM    SFJK
02638  M01S00026.1sj8    +++|          LDM    TDAC,BB+2
02639  M01S00027.1sj8    +++|          STM    SFJM
02640  M01S00028.1sj8    +++|          LDD    BB+4
02641  M01S00029.1sj8    +++|          STM    SFJL
02642  M00S01651.1sj     +++| SFJ14    LJM    SFJ2        CONTINUE EJT SCAN
02643  M00S01652.1sj     +++|
02644  M00S01653.1sj     +++|*         DETERMINE IF ENOUGH CM AND ECS ARE AVAILABLE WITHOUT ROLLING
02645  M00S01654.1sj     +++|*         JOBS OUT.  ALSO, CHECK FOR VIOLATION OF SERVICE CLASS
02646  M00S01655.1sj     +++|*         RESOURCE CONSTRAINTS.
02647  M00S01656.1sj     +++|
02648  M00S01657.1sj     +++| SFJ15    LDN    0           INITIALIZE CM/ECS ACCUMULATORS
Line S01658 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02649  M01S01658.271l716 ---|          STD    T5
Line S00424 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02650  M01S00424.271l716 +++| SFJ15.1  STD    T5
02651  M00S01659.1sj     +++|          STD    T6
02652  M00S01660.1sj     +++|          STD    T7
Line S01661 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02653  M01S01661.ns22000 ---|          LDD    AM
02654  M01S01662.ns22000 ---|          SHN    14
02655  M01S01663.ns22000 ---|          LMD    AM+1
02656  M01S01664.ns22000 ---|          SBD    BB+4
02657  M01S01665.ns22000 ---|          PJN    SFJ17       IF ENOUGH CM WITHOUT ROLLING JOBS OUT
Line S00088 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02658  M01S00088.ns22000 +++|          LDD    T1
Line S00089 Modification History
M01 (Added by) ns22000
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02659  M02S00089.271l716 ---|          ZJN    SFJ18       IF LOWER PRIORITY JOB SEARCH REQUIRED
Line S00425 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02660  M01S00425.271l716 +++|          ZJN    SFJ18       IF LOWER PRIORITY JOB SEARCH NOT REQUIRED
02661  M00S01666.1sj     +++| SFJ16    LJM    SFJ29       GO PERFORM SCAN FOR LOWER PRIORITY JOBS
Line S01667 Modification History
M01 (Removed by) 1sj8
Seq #  *Modification Id* Act 
----------------------------+
02662  M01S01667.1sj8    ---|
02663  M00S01668.1sj     +++|*         LJM    SFJ2        (IF POST-REJECT SCHEDULING)
02664  M00S01669.1sj     +++| SFJH     EQU    *-1
Line S01670 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02665  M01S01670.ns22000 ---|
02666  M01S01671.ns22000 ---| SFJ17    LDD    AE
02667  M01S01672.ns22000 ---|          SBD    BB+3
02668  M01S01673.ns22000 ---|          MJN    SFJ16       IF INSUFFICIENT ECS UNLESS JOBS ARE ROLLED
02669  M00S01674.1sj     +++|
02670  M00S01675.1sj     +++|*         CHECK FOR VIOLATION OF SERVICE CLASS CONSTRAINTS.
02671  M00S01676.1sj     +++|
02672  M00S01677.1sj     +++| SFJ18    LCN    0           INITIALIZE EXCESS CM/ECS ACCUMULATORS
02673  M00S01678.1sj     +++|          STD    AA+1
02674  M00S01679.1sj     +++|          STD    AA+2
02675  M00S01680.1sj     +++|          LDN    37
02676  M00S01681.1sj     +++|          STD    AA
02677  M00S01682.1sj     +++|          LDD    SC
02678  M00S01683.1sj     +++|*         UJN    SFJ19       (IF POST-REJECT SCHEDULING)
02679  M00S01684.1sj     +++| SFJI     EQU    *-1
02680  M00S01685.1sj     +++|          SBN    MXJC
02681  M00S01686.1sj     +++|          MJN    SFJ20       IF JCB EXISTS FOR JOB-S SERVICE CLASS
02682  M00S01687.1sj     +++| SFJ19    LJM    SFJ26       GO MAKE THIS JOB CURRENT BEST CANDIDATE
02683  M00S01688.1sj     +++|
Line S01689 Modification History
M01 (Removed by) ns2395
Seq #  *Modification Id* Act 
----------------------------+
02684  M01S01689.ns2395  ---| SFJ20    LDM    TJAM+1*MXJC,SC
Line S00004 Modification History
M01 (Added by) ns2395
Seq #  *Modification Id* Act 
----------------------------+
02685  M01S00004.ns2395  +++| SFJ20    LDD    CM+1
02686  M01S00005.ns2395  +++|          NJN    SFJ19       IF ERROR FLAG SET
02687  M01S00006.ns2395  +++|          LDM    TJAM+1*MXJC,SC
Line S00001 Modification History
M01 (Added by) 1sj44
Seq #  *Modification Id* Act 
----------------------------+
02688  M01S00001.1sj44   +++|          ADN    MNFL
02689  M00S01690.1sj     +++|          SBD    BB+4
02690  M00S01691.1sj     +++|          MJN    SFJ21       IF REQUIRED CM .GT. MAXIMUM FOR ONE JOB
02691  M00S01692.1sj     +++|          LDM    TJAM+4*MXJC,SC
02692  M00S01693.1sj     +++|          SBD    BB+3
Line S01694 Modification History
M01 (Removed by) ns2152
Seq #  *Modification Id* Act 
----------------------------+
02693  M01S01694.ns2152  ---| SFJ21    MJN    SFJ24       IF REQUIRED ECS .GT. MAXIMUM FOR ONE JOB
Line S00001 Modification History
M01 (Added by) ns2152
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02694  M02S00001.271l716 ---| SFJ21    PJN    SFJ21.2     IF REQUIRED ECS .LE. MAXIMUM FOR ONE JOB
Line S00001 Modification History
M01 (Added by) ns2395a
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02695  M02S00001.271l716 ---|          LDM    TJST,T2
Line S00426 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02696  M01S00426.271l716 +++|          PJN    SFJ21.2     IF REQUIRED EM .LE. MAXIMUM FOR ONE JOB
02697  M01S00427.271l716 +++| SFJ21    LDM    TJST,T2
Line S00002 Modification History
M01 (Added by) ns2395a
Seq #  *Modification Id* Act 
----------------------------+
02698  M01S00002.ns2395a +++|          SHN    21-7
02699  M01S00003.ns2395a +++|          MJP    SFJ14       IF INITIAL JOB STATE
Line S00002 Modification History
M01 (Added by) ns2152
M02 (Removed by) ns2395
Seq #  *Modification Id* Act 
----------------------------+
02700  M02S00002.ns2395  ---|          LDD    EJ+4
02701  M02S00003.ns2395  ---|          SHN    0-7
02702  M02S00004.ns2395  ---|          LPN    17
02703  M02S00005.ns2395  ---|          LMN    OLCS
02704  M02S00006.ns2395  ---|          NJN    SFJ21.1     IF NOT ON-LINE INTERACTIVE JOB
02705  M02S00007.ns2395  ---|          LDC    SLET+4000   SET THE SERVICE LIMIT ERROR FLAG
02706  M02S00008.ns2395  ---|          STD    CM+1
02707  M02S00009.ns2395  ---|          LDD    EO
02708  M02S00010.ns2395  ---|          STD    CM+2
02709  M02S00011.ns2395  ---|          LDD    EJ
02710  M02S00012.ns2395  ---|          STD    CM+3
02711  M02S00013.ns2395  ---|          LDD    EJ+1
02712  M02S00014.ns2395  ---|          STD    CM+4
02713  M02S00015.ns2395  ---|          MONITOR  CEFM
02714  M02S00016.ns2395  ---|          LDD    CM+1
02715  M02S00017.ns2395  ---|          ZJN    SFJ21.2     IF ERROR FLAG SET
02716  M02S00018.ns2395  ---| SFJ21.1  LJM    SFJ24       REJECT JOB
Line S00007 Modification History
M01 (Added by) ns2395
Seq #  *Modification Id* Act 
----------------------------+
02717  M01S00007.ns2395  +++|          LDC    SFJU+2*10000  SET SERVICE WAIT JOB STATUS
02718  M01S00008.ns2395  +++|          RJM    IUT         ISSUE *UTEM* REQUEST
02719  M01S00009.ns2395  +++|          LJM    SFJ24       REJECT JOB
02720  M00S01695.1sj     +++|
02721  M00S01696.1sj     +++|*         DETERMINE IF THE TOTAL CM/ECS ASSIGNED TO JOBS OF THIS
02722  M00S01697.1sj     +++|*         CANDIDATE-S SERVICE CLASS WILL EXCEED THE MAXIMUM ALLOWABLE
02723  M00S01698.1sj     +++|*         IF THE CANDIDATE JOB IS SELECTED FOR SCHEDULING. THE INITIAL
02724  M00S01699.1sj     +++|*         CHECK DOES NOT CONSIDER THE AMOUNT OF CM/ECS ASSIGNED TO
02725  M00S01700.1sj     +++|*         LOWER PRIORITY JOBS OF THE CANDIDATE-S SERVICE CLASS.
02726  M00S01701.1sj     +++|*         HOWEVER, IF THE FIRST CHECK SHOWS THE CM/ECS MAXIMUM WOULD BE
02727  M00S01702.1sj     +++|*         EXCEEDED, A SECOND CHECK IS PERFORMED THAT INCLUDES THE
02728  M00S01703.1sj     +++|*         CM/ECS ASSIGNED TO LOWER PRIORITY JOBS OF THE CANDIDATE-S
02729  M00S01704.1sj     +++|*         SERVICE CLASS.
02730  M00S01705.1sj     +++|
Line S01706 Modification History
M01 (Removed by) ns2152
Seq #  *Modification Id* Act 
----------------------------+
02731  M01S01706.ns2152  ---|          LDM    TJAM+2*MXJC,SC
Line S00019 Modification History
M01 (Added by) ns2152
Seq #  *Modification Id* Act 
----------------------------+
02732  M01S00019.ns2152  +++| SFJ21.2  LDM    TJAM+2*MXJC,SC
02733  M00S01707.1sj     +++|          SBM    TTCU,SC
02734  M00S01708.1sj     +++|          SHN    14
02735  M00S01709.1sj     +++|          ADM    TJAM+3*MXJC,SC
02736  M00S01710.1sj     +++|          SBM    TTCU+1*MXJC,SC
02737  M00S01711.1sj     +++|          SBD    BB+4
02738  M00S01712.1sj     +++|          PJN    SFJ22       IF TOTAL CM .LE. ALLOWABLE MAXIMUM
02739  M00S01713.1sj     +++|          SHN    6
Line S01714 Modification History
M01 (Removed by) 1sj10
Seq #  *Modification Id* Act 
----------------------------+
02740  M01S01714.1sj10   ---|          ADD    T6
Line S00001 Modification History
M01 (Added by) 1sj10
Seq #  *Modification Id* Act 
----------------------------+
02741  M01S00001.1sj10   +++|          ADD    T5
02742  M00S01715.1sj     +++|          SHN    14
Line S01716 Modification History
M01 (Removed by) 1sj10
Seq #  *Modification Id* Act 
----------------------------+
02743  M01S01716.1sj10   ---|          ADD    T7
Line S00002 Modification History
M01 (Added by) 1sj10
Seq #  *Modification Id* Act 
----------------------------+
02744  M01S00002.1sj10   +++|          ADD    T6
02745  M00S01717.1sj     +++|          MJN    SFJ23       IF TOTAL CM .GT. ALLOWABLE MAXIMUM
02746  M00S01718.1sj     +++|
02747  M00S01719.1sj     +++|*         CALCULATE THE AMOUNT OF CM ASSIGNED TO JOBS OF THE
02748  M00S01720.1sj     +++|*         CANDIDATE-S SERVICE CLASS THAT MAY REMAIN ASSIGNED IF THE
02749  M00S01721.1sj     +++|*         CANDIDATE IS SELECTED FOR SCHEDULING.
02750  M00S01722.1sj     +++|
02751  M00S01723.1sj     +++|          STD    AA+1
02752  M00S01724.1sj     +++|          SHN    -14
02753  M00S01725.1sj     +++|          STD    AA
02754  M00S01726.1sj     +++|
02755  M00S01727.1sj     +++|*         PERFORM ECS RESOURCE CONSTRAINT CHECK AS WAS JUST DONE FOR
02756  M00S01728.1sj     +++|*         CM.
02757  M00S01729.1sj     +++|
Line S01730 Modification History
M01 (Removed by) 1sj38
Seq #  *Modification Id* Act 
----------------------------+
02758  M01S01730.1sj38   ---| SFJ22    LDM    TJAM+4*MXJC,SC
Line S00010 Modification History
M01 (Added by) 1sj38
Seq #  *Modification Id* Act 
----------------------------+
02759  M01S00010.1sj38   +++| SFJ22    LDM    TJAM+5*MXJC,SC
Line S01731 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
02760  M01S01731.284l847 ---|          SBM    TTEU,SC
Line S00008 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
02761  M01S00008.284l847 +++|          SBM    TTUE,SC
02762  M00S01732.1sj     +++|          SBD    BB+3
02763  M00S01733.1sj     +++|          PJN    SFJ26       IF TOTAL ECS .LE. ALLOWABLE MAXIMUM
02764  M00S01734.1sj     +++|          ADD    T7
02765  M00S01735.1sj     +++|          PJN    SFJ25       IF TOTAL ECS .LE. ALLOWABLE MAXIMUM
02766  M00S01736.1sj     +++| SFJ23    LJM    SFJ29       GO CALCULATE ECS OF LOWER PRIORITY JOBS
Line S01737 Modification History
M01 (Removed by) 1sj8
Seq #  *Modification Id* Act 
----------------------------+
02767  M01S01737.1sj8    ---|
02768  M00S01738.1sj     +++|*         LJM    SFJ24       (IF LOWER PRIORITY SCAN ALREADY PERFORMED)
02769  M00S01739.1sj     +++| SFJJ     EQU    *-1
02770  M00S01740.1sj     +++|
02771  M00S01741.1sj     +++|*         THIS JOB WILL BE SELECTED FOR SCHEDULING ONLY IF NO OTHER
02772  M00S01742.1sj     +++|*         CANDIDATES ARE FOUND THAT WOULD NOT VIOLATE SERVICE CLASS
Line S01743 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02773  M01S01743.271l716 ---|*         RESOURCE CONSTRAINTS.  ADDITIONALLY, IT WILL ONLY BE
02774  M01S01744.271l716 ---|*         SCHEDULED IF NO ROLLOUTS ARE REQUIRED AND WILL BE ASSIGNED
02775  M01S01745.271l716 ---|*         THE LOWER BOUND SCHEDULING PRIORITY OF ITS SERVICE CLASS.
Line S00428 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02776  M01S00428.271l716 +++|*         RESOURCE CONSTRAINTS AND FLEXIBLE MEMORY PARTITIONING IS
02777  M01S00429.271l716 +++|*         ENABLED.  ADDITIONALLY, IT WILL BE SCHEDULED ONLY IF NO
02778  M01S00430.271l716 +++|*         ROLLOUTS ARE REQUIRED AND WILL BE ASSIGNED THE LOWER BOUND
02779  M01S00431.271l716 +++|*         SCHEDULING PRIORITY OF ITS SERVICE CLASS.
02780  M00S01746.1sj     +++|
02781  M00S01747.1sj     +++| SFJ24    LDM    SFJP        SET REJECT FLAG
02782  M00S01748.1sj     +++|          STM    SFJC
Line S01749 Modification History
M01 (Removed by) 1sj11
Seq #  *Modification Id* Act 
----------------------------+
02783  M01S01749.1sj11   ---|          UJN    SFJ27       CONTINUE EJT SCAN
Line S00014 Modification History
M01 (Added by) 1sj11
Seq #  *Modification Id* Act 
----------------------------+
02784  M01S00014.1sj11   +++|          LJM    SFJ27       CONTINUE EJT SCAN
02785  M00S01750.1sj     +++|
02786  M00S01751.1sj     +++|*         MAKE THIS JOB THE CURRENT BEST SCHEDULING CANDIDATE.
02787  M00S01752.1sj     +++|
02788  M00S01753.1sj     +++| SFJ25    STD    AA+2
02789  M00S01754.1sj     +++| SFJ26    LDD    AA          SAVE EXCESS CM AMOUNT
02790  M00S01755.1sj     +++|          STD    CS
02791  M00S01756.1sj     +++|          LDD    AA+1
02792  M00S01757.1sj     +++|          STD    CS+1
02793  M00S01758.1sj     +++|          LDD    AA+2        SAVE EXCESS ECS AMOUNT
02794  M00S01759.1sj     +++|          STD    ES
Line S01760 Modification History
M01 (Removed by) 1sj8
Seq #  *Modification Id* Act 
----------------------------+
02795  M01S01760.1sj8    ---|          LDD    EP          SAVE EJT ORDINAL OF 2ND BEST JOB (IF ANY)
02796  M01S01761.1sj8    ---|          STM    SFJL
02797  M01S01762.1sj8    ---|          LDM    SFJG        SAVE DISK ACTIVITY OF 2ND BEST JOB
02798  M01S01763.1sj8    ---|          STM    SFJM
Line S00030 Modification History
M01 (Added by) 1sj8
Seq #  *Modification Id* Act 
----------------------------+
02799  M01S00030.1sj8    +++|          LDD    JP          SAVE PRIORITY
02800  M01S00031.1sj8    +++|          STD    T2
02801  M00S01764.1sj     +++|          LDD    BB+1        SAVE SCHEDULING PRIORITY
02802  M00S01765.1sj     +++|          STD    JP
Line S00032 Modification History
M01 (Added by) 1sj8
Seq #  *Modification Id* Act 
----------------------------+
02803  M01S00032.1sj8    +++|          LDD    T2          SAVE PREVIOUS BEST PRIORITY
02804  M01S00033.1sj8    +++|          STD    BB+1
02805  M01S00034.1sj8    +++|          LDD    JM          SAVE CM AMOUNT
02806  M01S00035.1sj8    +++|          STD    T2
02807  M00S01766.1sj     +++|          LDD    BB+4        SAVE REQUIRED CM
02808  M00S01767.1sj     +++|          STD    JM
Line S00036 Modification History
M01 (Added by) 1sj8
Seq #  *Modification Id* Act 
----------------------------+
02809  M01S00036.1sj8    +++|          LDD    T2
02810  M01S00037.1sj8    +++|          STD    BB+4
02811  M00S01768.1sj     +++|          LDD    BB+3        SAVE REQUIRED ECS
02812  M00S01769.1sj     +++|          STD    JE
Line S00038 Modification History
M01 (Added by) 1sj8
Seq #  *Modification Id* Act 
----------------------------+
02813  M01S00038.1sj8    +++|          LDM    SFJG        SAVE ACTIVITY IN FIRST *TDAC* ENTRY
02814  M01S00039.1sj8    +++|          STM    TDAC
02815  M00S01770.1sj     +++|          LDM    TDAC,BB+2   SAVE MASS STORAGE ACTIVITY COUNT
02816  M00S01771.1sj     +++|          STM    SFJG
Line S00040 Modification History
M01 (Added by) 1sj8
Seq #  *Modification Id* Act 
----------------------------+
02817  M01S00040.1sj8    +++|          LDN    0           CAUSE FIRST *TDAC* ENTRY TO BE USED
02818  M01S00041.1sj8    +++|          STD    BB+2
02819  M00S01772.1sj     +++|          LDD    EO          SAVE EJT ORDINAL
02820  M00S01773.1sj     +++|          STD    EP
02821  M00S01774.1sj     +++|          LDD    SC          SAVE SERVICE CLASS
02822  M00S01775.1sj     +++|          STD    SP
Line S00015 Modification History
M01 (Added by) 1sj11
Seq #  *Modification Id* Act 
----------------------------+
02823  M01S00015.1sj11   +++|          LDD    EJ+4        SAVE JOB STATUS
Line S00016 Modification History
M01 (Added by) 1sj11
M02 (Removed by) 1sj41
Seq #  *Modification Id* Act 
----------------------------+
02824  M02S00016.1sj41   ---|          SHN    -1
02825  M02S00017.1sj41   ---|          LPN    37
Line S00018 Modification History
M01 (Added by) 1sj11
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02826  M02S00018.271l716 ---|          STM    ASJC+4
Line S00432 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02827  M01S00432.271l716 +++|          STM    ASJA
02828  M00S01776.1sj     +++| SFJ27    LDC    SFJ29       RESTORE INSTRUCTION
02829  M00S01777.1sj     +++|          STM    SFJJ
Line S00014 Modification History
M01 (Added by) ns2181
Seq #  *Modification Id* Act 
----------------------------+
02830  M01S00014.ns2181  +++|          LDD    SP
02831  M01S00015.ns2181  +++|          LMN    DSSC
02832  M01S00016.ns2181  +++|          ZJP    SFJX        IF DEADSTART SEQUENCING JOB SELECTED
Line S01778 Modification History
M01 (Removed by) 1sj8
Seq #  *Modification Id* Act 
----------------------------+
02833  M01S01778.1sj8    ---| SFJ28    LJM    SFJ2        CONTINUE EJT SCAN
Line S00042 Modification History
M01 (Added by) 1sj8
Seq #  *Modification Id* Act 
----------------------------+
02834  M01S00042.1sj8    +++|          LJM    SFJ13.2     CHECK FOR NEW 2ND BEST JOB
02835  M00S01779.1sj     +++|
02836  M00S01780.1sj     +++|*         CALCULATE AMOUNTS OF CM AND ECS OCCUPIED BY LOWER PRIORITY
02837  M00S01781.1sj     +++|*         JOBS.
02838  M00S01782.1sj     +++|
02839  M00S01783.1sj     +++| SFJ29    LDC    SFJ24
02840  M00S01784.1sj     +++|          STM    SFJJ
02841  M00S01785.1sj     +++|          LDD    AM+1        INITIALIZE CM ACCUMULATOR
02842  M00S01786.1sj     +++|          STD    T3
02843  M00S01787.1sj     +++|          LDD    AM
02844  M00S01788.1sj     +++|          STD    T2
02845  M00S01789.1sj     +++|          LDD    AE          INITIALIZE ECS ACCUMULATOR
02846  M00S01790.1sj     +++|          STD    T4
02847  M00S01791.1sj     +++|          LDD    TE          SET *TACP* TABLE POINTER
02848  M00S01792.1sj     +++|          STD    TP
02849  M00S01793.1sj     +++| SFJ30    SOD    TP          DECREMENT *TACP* POINTER
02850  M00S01794.1sj     +++|          LDI    TP
02851  M00S01795.1sj     +++|          NJN    SFJ31       IF *TACP* SCAN NOT COMPLETE
02852  M00S01796.1sj     +++|          LDD    T2
02853  M00S01797.1sj     +++|          SHN    14
02854  M00S01798.1sj     +++|          LMD    T3
02855  M00S01799.1sj     +++|          SBD    BB+4
Line S01800 Modification History
M01 (Removed by) 1sj8
Seq #  *Modification Id* Act 
----------------------------+
02856  M01S01800.1sj8    ---|          MJN    SFJ28       IF INSUFFICIENT CM TO SCHEDULE THIS JOB
Line S00043 Modification History
M01 (Added by) 1sj8
Seq #  *Modification Id* Act 
----------------------------+
02857  M01S00043.1sj8    +++|          MJN    SFJ30.1     IF INSUFFICIENT CM TO SCHEDULE THIS JOB
02858  M00S01801.1sj     +++|          LDD    T4
02859  M00S01802.1sj     +++|          SBD    BB+3
Line S01803 Modification History
M01 (Removed by) 1sj8
Seq #  *Modification Id* Act 
----------------------------+
02860  M01S01803.1sj8    ---|          MJN    SFJ28       IF INSUFFICIENT ECS TO SCHEDULE THIS JOB
Line S00044 Modification History
M01 (Added by) 1sj8
Seq #  *Modification Id* Act 
----------------------------+
02861  M01S00044.1sj8    +++|          MJN    SFJ30.1     IF INSUFFICIENT ECS TO SCHEDULE THIS JOB
02862  M00S01804.1sj     +++|          LJM    SFJ18       GO CHECK RESOURCE CONSTRAINTS
Line S00045 Modification History
M01 (Added by) 1sj8
Seq #  *Modification Id* Act 
----------------------------+
02863  M01S00045.1sj8    +++|
02864  M01S00046.1sj8    +++| SFJ30.1  LJM    SFJ2        CONTINUE EJT SCAN
02865  M00S01805.1sj     +++|
Line S01806 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02866  M01S01806.271l716 ---| SFJ31    STD    T1          SAVE CONTROL POINT NUMBER
Line S00433 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02867  M01S00433.271l716 +++| SFJ31    STD    T1          SAVE CP/PCP NUMBER
02868  M00S01807.1sj     +++|          LDM    TJPR-1,T1
02869  M00S01808.1sj     +++|          SBD    BB+1
02870  M00S01809.1sj     +++|          PJN    SFJ30       IF *TACP* PRIORITY .GE. CANDIDATE-S
02871  M00S01810.1sj     +++|          LDM    TJSC-1,T1
02872  M00S01811.1sj     +++|          LMD    SC
02873  M00S01812.1sj     +++|          NJN    SFJ32       IF *TACP* SERVICE CLASS .NE. CANDIDATE-S
02874  M00S01813.1sj     +++|
02875  M00S01814.1sj     +++|*         ACCUMULATE CM AND ECS OF LOWER PRIORITY JOB HAVING THE SAME
02876  M00S01815.1sj     +++|*         SERVICE CLASS AS THAT OF THE CANDIDATE JOB.
02877  M00S01816.1sj     +++|
02878  M00S01817.1sj     +++|          LDM    TJCM-1,T1
02879  M00S01818.1sj     +++|          RAD    T6
02880  M00S01819.1sj     +++|          SHN    -14
02881  M00S01820.1sj     +++|          RAD    T5
02882  M00S01821.1sj     +++|          LDM    TJEC-1,T1
02883  M00S01822.1sj     +++|          RAD    T7
02884  M00S01823.1sj     +++|
02885  M00S01824.1sj     +++|*         ACCUMULATE CM AND ECS OF LOWER PRIORITY JOB REGARDLESS OF
02886  M00S01825.1sj     +++|*         SERVICE CLASS.
02887  M00S01826.1sj     +++|
02888  M00S01827.1sj     +++| SFJ32    LDM    TJCM-1,T1
02889  M00S01828.1sj     +++|          RAD    T3
02890  M00S01829.1sj     +++|          SHN    -14
02891  M00S01830.1sj     +++|          RAD    T2
02892  M00S01831.1sj     +++|          LDM    TJEC-1,T1
02893  M00S01832.1sj     +++|          RAD    T4
02894  M00S01833.1sj     +++|          LJM    SFJ30       CONTINUE *TACP* SCAN
02895  M00S01834.1sj     +++|
Line S00029 Modification History
M01 (Added by) ns2153
Seq #  *Modification Id* Act 
----------------------------+
02896  M01S00029.ns2153  +++| SFJA     BSS    1           LAST EJT ORDINAL SCHEDULED
02897  M01S00030.ns2153  +++|
02898  M00S01835.1sj     +++| SFJN     BSS    0
02899  M00S01836.1sj     +++|          LOC    SFJB
Line S01837 Modification History
M01 (Removed by) ns2153
Seq #  *Modification Id* Act 
----------------------------+
02900  M01S01837.ns2153  ---|          UJN    SFJ33       POST-REJECT SCAN COMPLETE
Line S00031 Modification History
M01 (Added by) ns2153
Seq #  *Modification Id* Act 
----------------------------+
02901  M01S00031.ns2153  +++|          UJN    SFJ2.2      POST-REJECT SCAN COMPLETE
02902  M00S01838.1sj     +++|          LOC    *O
02903  M00S01839.1sj     +++|
02904  M00S01840.1sj     +++| SFJO     BSS    0
02905  M00S01841.1sj     +++|          LOC    SFJI
02906  M00S01842.1sj     +++|          UJN    SFJ19       POST-REJECT SCHEDULING, SELECT JOB
02907  M00S01843.1sj     +++|          LOC    *O
02908  M00S01844.1sj     +++|
02909  M00S01845.1sj     +++| SFJP     BSS    0
02910  M00S01846.1sj     +++|          LOC    SFJC
Line S01847 Modification History
M01 (Removed by) ns2153
Seq #  *Modification Id* Act 
----------------------------+
02911  M01S01847.ns2153  ---|          NJN    SFJ33       IF SELECTION MADE AND REJECT FOUND
Line S00032 Modification History
M01 (Added by) ns2153
Seq #  *Modification Id* Act 
----------------------------+
02912  M01S00032.ns2153  +++|          NJN    SFJ2.2      IF SELECTION MADE AND REJECT FOUND
02913  M00S01848.1sj     +++|          LOC    *O
02914  M00S01849.1sj     +++|
02915  M00S01850.1sj     +++| SFJQ     BSS    0
02916  M00S01851.1sj     +++|          LOC    SFJC
Line S01852 Modification History
M01 (Removed by) ns2153
Seq #  *Modification Id* Act 
----------------------------+
02917  M01S01852.ns2153  ---|          UJN    SFJ33       EXIT
Line S00033 Modification History
M01 (Added by) ns2153
Seq #  *Modification Id* Act 
----------------------------+
02918  M01S00033.ns2153  +++|          UJN    SFJ2.2      EXIT
02919  M00S01853.1sj     +++|          LOC    *O
Line S00010 Modification History
M01 (Added by) ns2395
Seq #  *Modification Id* Act 
----------------------------+
02920  M01S00010.ns2395  +++|
02921  M01S00011.ns2395  +++|*         *UTEM* PARAMETERS FOR SETTING JOB STATUS.
02922  M01S00012.ns2395  +++|
02923  M01S00013.ns2395  +++| SFJU     VFD    1/1,5/JSNE,6/5  VERIFY THAT JOB STATUS HAS NOT CHANGED
02924  M01S00014.ns2395  +++|          VFD    6/1,6/0
02925  M01S00015.ns2395  +++|          CON    0,0
02926  M01S00016.ns2395  +++|          CON    0           JOB STATUS WHEN JOB WAS SELECTED
02927  M01S00017.ns2395  +++|
02928  M01S00018.ns2395  +++|          VFD    1/0,5/JSNE,6/5  SET JOB STATUS
02929  M01S00019.ns2395  +++|          VFD    6/1,6/0
02930  M01S00020.ns2395  +++|          CON    0
02931  M01S00021.ns2395  +++|          CON    0
02932  M01S00022.ns2395  +++|          CON    SWJS
02933  M00S01854.1sj     +++| TEFP     SPACE  4,10
02934  M00S01855.1sj     +++|**        TEFP - TABLE OF ERROR FLAG PROCESSORS.
02935  M00S01856.1sj     +++|*
02936  M00S01857.1sj     +++|*         EACH ENTRY CONTAINS THE ADDRESS OF THE PROCESSOR ASSOCIATED
02937  M00S01858.1sj     +++|*         WITH THE ERROR FLAG.
02938  M00S01859.1sj     +++|
Line S01860 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02939  M01S01860.271l716 ---| TEFPL    MAX    MXET
02940  M01S01861.271l716 ---|
02941  M00S01862.1sj     +++| TEFP     INDEX
02942  M00S01863.1sj     +++|          INDEX  ARET,SFJ8   ARITHMETIC ERROR, ROLLIN FL
02943  M00S01864.1sj     +++|          INDEX  ITET,SFJ8   SCP INVALID TRANSFER ADDRESS, ROLLIN FL
02944  M00S01865.1sj     +++|          INDEX  PSET,SFJ8   PROGRAM STOP, ROLLIN FL
02945  M00S01866.1sj     +++|          INDEX  PPET,SFJ8   PPU ABORT, ROLLIN FL
02946  M00S01867.1sj     +++|          INDEX  CPET,SFJ8   CPU ABORT, ROLLIN FL
02947  M00S01868.1sj     +++|          INDEX  PCET,SFJ8   PP CALL ERROR, ROLLIN FL
02948  M00S01869.1sj     +++|          INDEX  MLET,SFJ8   MESSAGE LIMIT, ROLLIN FL
02949  M00S01870.1sj     +++|          INDEX  TLET,SFJ8   TIME LIMIT, ROLLIN FL
02950  M00S01871.1sj     +++|          INDEX  FLET,SFJ8   FILE LIMIT, ROLLIN FL
02951  M00S01872.1sj     +++|          INDEX  TKET,SFJ8   TRACK LIMIT, ROLLIN FL
02952  M00S01873.1sj     +++|          INDEX  SRET,SFJ8   SRU LIMIT, ROLLIN FL
Line S00020 Modification History
M01 (Added by) ns2152
M02 (Removed by) ns2395
Seq #  *Modification Id* Act 
----------------------------+
02953  M02S00020.ns2395  ---|          INDEX  SLET,SFJ8   SERVICE LIMIT, ROLLIN FL
Line S01874 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
02954  M01S01874.242l642 ---|          INDEX  FSET,SFJ8   FORCED ERROR, ROLLIN FL
Line S00043 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
02955  M01S00043.242l642 +++|          INDEX  FSET,SFJ8   FORCED ERROR, ROLLIN FL
02956  M00S01875.1sj     +++|          INDEX  ODET,SFJ8   OPERATOR DROP, ROLLIN FL
02957  M00S01876.1sj     +++|          INDEX  IDET,SFJ8   SUBSYSTEM IDLEDOWN, ROLLIN FL
02958  M00S01877.1sj     +++|          INDEX  RRET,SFJ8   OPERATOR RERUN, ROLLIN FL
02959  M00S01878.1sj     +++|          INDEX  DRET,SFJ9   DEADSTART RERUN, ROLLIN NFL
Line S01879 Modification History
M01 (Removed by) ns2100
Seq #  *Modification Id* Act 
----------------------------+
02960  M01S01879.ns2100  ---|          INDEX  STET,SFJ9   SUSPENSION TIMEOUT, ROLLIN NFL
Line S00001 Modification History
M01 (Added by) ns2100
Seq #  *Modification Id* Act 
----------------------------+
02961  M01S00001.ns2100  +++|          INDEX  STET,SFJ8   SUSPENSION TIMEOUT, ROLLIN FL
02962  M00S01880.1sj     +++|          INDEX  OKET,SFJ8   OPERATOR KILL, ROLLIN FL
02963  M00S01881.1sj     +++|          INDEX  TIET,SFJ7   USER BREAK ONE, ROLLIN FL
02964  M00S01882.1sj     +++|          INDEX  TAET,SFJ7   USER BREAK TWO, ROLLIN FL
Line S01883 Modification History
M01 (Removed by) ns2197
Seq #  *Modification Id* Act 
----------------------------+
02965  M01S01883.ns2197  ---|          INDEX  TJET,SFJ9   TERMINATE INTERACTIVE JOB, ROLLIN NFL
02966  M00S01884.1sj     +++|          INDEX  SVET,SFJ9   SECURITY VIOLATION, ROLLIN NFL
02967  M00S01885.1sj     +++|          INDEX  SSET,SFJ8   SUBSYSTEM ABORT, ROLLIN FL
02968  M00S01886.1sj     +++|          INDEX  ECET,SFJ8   ECS PARITY ERROR, ROLLIN FL
02969  M00S01887.1sj     +++|          INDEX  PEET,SFJ8   CPU PARITY ERROR, ROLLIN FL
Line S00044 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
02970  M01S00044.242l642 +++|          INDEX  JSET,SFJ9   JOB STEP ABORT, ROLLIN NFL
02971  M00S01888.1sj     +++|          INDEX  SYET,SFJ9   SYSTEM ABORT, ROLLIN NFL
02972  M00S01889.1sj     +++|          INDEX  RAET,SFJ9   RECOVERY ABORT, ROLLIN NFL
Line S00017 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02973  M01S00017.241l630 +++|          INDEX  SWET,SFJ9   SYSTEM SOFTWARE ERROR, ROLLIN NFL
02974  M00S01890.1sj     +++|          INDEX  ORET,SFJ9   OVERRIDE CONDITION, ROLLIN NFL
Line S01891 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02975  M01S01891.271l716 ---|          INDEX  TEFPL
Line S00434 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02976  M01S00434.271l716 +++|          INDEX  MXET
02977  M00S01892.1sj     +++| TABLES   SPACE  4,10
Line S01893 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
02978  M01S01893.242l642 ---|**        TJST - TABLE OF SCHEDULABLE JOB STATES.
Line S00045 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
02979  M01S00045.242l642 +++|**        TJST - TABLE OF JOB STATE ATTRIBUTES.
02980  M00S01894.1sj     +++|*         ENTRY = 1 WORD.
02981  M00S01895.1sj     +++|*         INDEXED BY JOB STATUS.
02982  M00S01896.1sj     +++|*
Line S01897 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
02983  M01S01897.242l642 ---|*T        1/  A,1/  B,1/  C,9/  0
Figure

0891011 0 C B A

02984  M01S01898.242l642 ---|*         A      SET IF JOB STATE IS SCHEDULABLE.
02985  M01S01899.242l642 ---|*         B      SET IF JOB STATE IS SCHEDULABLE WHEN ERROR FLAG IS
02986  M01S01900.242l642 ---|*                SET.
02987  M01S01901.242l642 ---|*         C      SET IF JOB MAY BE FORCED ROLLED IN BY THE OPERATOR.
Line S00046 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
02988  M01S00046.242l642 +++|*T        1/ SS, 1/ ES, 1/ FR, 1/ TE, 1/ PI
Figure

01234 PI TE FR ES SS

02989  M01S00047.242l642 +++|*         SS     SET IF SCHEDULABLE JOB STATE.
02990  M01S00048.242l642 +++|*         ES     SET IF SCHEDULABLE JOB STATE WHEN ERROR FLAG IS SET.
02991  M01S00049.242l642 +++|*         FR     SET IF JOB IN THIS STATE MAY BE FORCED ROLLED IN.
02992  M01S00050.242l642 +++|*         TE     SET IF TIMED/EVENT TYPE JOB STATE.
02993  M01S00051.242l642 +++|*         PI     SET IF PRE-INITIAL TYPE JOB STATE.
Line S00435 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02994  M01S00435.271l716 +++|*
02995  M01S00436.271l716 +++|*         NOTE - ANY CHANGE TO THIS TABLE MUST BE COUPLED WITH A
02996  M01S00437.271l716 +++|*                CORRESPONDING CHANGE TO THE *TJST* TABLE IN *1PP*.
02997  M00S01902.1sj     +++|
02998  M00S01903.1sj     +++| TJST     JOBSTAT
Line S01904 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
02999  M01S01904.242l642 ---|          JOBSTAT PRJS,S,S,S
Line S00052 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03000  M01S00052.242l642 +++|          JOBSTAT PRJS,SS,ES,FR,,PI
03001  M00S01905.1sj     +++|          JOBSTAT EXJS
Line S01906 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03002  M01S01906.242l642 ---|          JOBSTAT ROJS,S,S,S
03003  M01S01907.242l642 ---|          JOBSTAT SIJS,S,S,S
03004  M01S01908.242l642 ---|          JOBSTAT SOJS,,S,S
03005  M01S01909.242l642 ---|          JOBSTAT TOJS,,S,
Line S00053 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03006  M01S00053.242l642 +++|          JOBSTAT ROJS,SS,ES,FR
03007  M01S00054.242l642 +++|          JOBSTAT SIJS,SS,ES,FR
03008  M01S00055.242l642 +++|          JOBSTAT SOJS,,ES,FR
03009  M01S00056.242l642 +++|          JOBSTAT TOJS,,ES,,TE
03010  M00S01910.1sj     +++|          JOBSTAT IOJS
03011  M00S01911.1sj     +++|          JOBSTAT DOJS
Line S01912 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03012  M01S01912.242l642 ---|          JOBSTAT SUJS,,S,
03013  M01S01913.242l642 ---|          JOBSTAT ERJS
Line S00057 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03014  M01S00057.242l642 +++|          JOBSTAT SUJS,,ES
Line S00438 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03015  M01S00438.271l716 +++|          JOBSTAT PCJS,SS,ES,FR
Line S00058 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03016  M01S00058.242l642 +++|          JOBSTAT ERJS,,,FR,TE
Line S00006 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
03017  M01S00006.ns21000 +++|          JOBSTAT NVJS
Line S00059 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03018  M01S00059.242l642 +++|          JOBSTAT PWJS,,,,TE,PI
Line S00023 Modification History
M01 (Added by) ns2395
Seq #  *Modification Id* Act 
----------------------------+
03019  M01S00023.ns2395  +++|          JOBSTAT SWJS,,ES
03020  M00S01914.1sj     +++|
Line S01915 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03021  M01S01915.271l716 ---|          LOC    *O
Line S00439 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03022  M01S00439.271l716 +++|          INDEX   MXJS       TERMINATE TABLE
Line S00090 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03023  M01S00090.ns22000 +++| SSA      SPACE  4,10
03024  M01S00091.ns22000 +++|**        SSA - SET SCHEDULER STATISTICAL AREA ADDRESS.
03025  M01S00092.ns22000 +++|*
Line S00093 Modification History
M01 (Added by) ns22000
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03026  M02S00093.v23l617 ---|*         EXIT   (A) = FWA SCHEDULER STATISTICS.
03027  M02S00094.v23l617 ---|*                (T1) = WORD COUNT.
Line S00017 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03028  M01S00017.v23l617 +++|*         EXIT   (A) = FWA SCHEDULER STATISTICS WORD 0.
03029  M01S00018.v23l617 +++|*                (T1) = WORD COUNT FOR EJT SCHEDULING DATA.
Line S00095 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03030  M01S00095.ns22000 +++|*
03031  M01S00096.ns22000 +++|*         USES   CM - CM+4, T1.
03032  M01S00097.ns22000 +++|
03033  M01S00098.ns22000 +++|
03034  M01S00099.ns22000 +++| SSA      SUBR               ENTRY/EXIT
03035  M01S00100.ns22000 +++|          LDN    JS3S-JS0S+1 SET WORD COUNT
03036  M01S00101.ns22000 +++|          STD    T1
Line S00102 Modification History
M01 (Added by) ns22000
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03037  M02S00102.v23l617 ---|          LDC    SDXP        SET SCHEDULER STATISTICS ADDRESS
Line S00019 Modification History
M01 (Added by) v23l617
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03038  M02S00019.271l716 ---|          LDC    SDAP        SET SCHEDULER STATISTICS ADDRESS
Line S00440 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03039  M01S00440.271l716 +++|          ADK    SDAP-JS3S+JS0S-1   SET SCHEDULER STATISTICS ADDRESS
Line S00103 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03040  M01S00103.ns22000 +++|          CRD    CM
03041  M01S00104.ns22000 +++|          LDD    CM
03042  M01S00105.ns22000 +++|          SHN    14
03043  M01S00106.ns22000 +++|          LMD    CM+1
Line S00107 Modification History
M01 (Added by) ns22000
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03044  M02S00107.271l716 ---|          ADN    JS0S
Line S00441 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03045  M01S00441.271l716 +++|          ADK    JS0S
Line S00108 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03046  M01S00108.ns22000 +++|          UJN    SSAX        EXIT
03047  M01S00109.ns22000 +++| USD      SPACE  4,10
03048  M01S00110.ns22000 +++|**        USD - UPDATE STATISTICAL DATA.
03049  M01S00111.ns22000 +++|*
03050  M01S00112.ns22000 +++|*         ENTRY  (A) = 0 IF JOB SCHEDULED.
03051  M01S00113.ns22000 +++|*
03052  M01S00114.ns22000 +++|*         EXIT   SCHEDULING STATISTICAL DATA UPDATED.
03053  M01S00115.ns22000 +++|*
03054  M01S00116.ns22000 +++|*         CALLS  SSA.
03055  M01S00117.ns22000 +++|
03056  M01S00118.ns22000 +++|
03057  M01S00119.ns22000 +++| USD      SUBR               ENTRY/EXIT
03058  M01S00120.ns22000 +++|          NJN    USD1        IF JOB NOT ASSIGNED
03059  M01S00121.ns22000 +++|          AOM    SPST+JS1S*5+4  INCREMENT JOBS SCHEDULED
03060  M01S00122.ns22000 +++|          SHN    -14
03061  M01S00123.ns22000 +++|          RAM    SPST+JS1S*5+3
03062  M01S00124.ns22000 +++|          LDM    SFJB
03063  M01S00125.ns22000 +++|          LMM    SFJN
03064  M01S00126.ns22000 +++|          NJN    USD2        IF NOT SCHEDULED ON RESCAN
03065  M01S00127.ns22000 +++|          AOM    SPST+JS2S*5+2  INCREMENT JOBS SCHEDULED ON RESCAN
03066  M01S00128.ns22000 +++|          SHN    -14
03067  M01S00129.ns22000 +++|          RAM    SPST+JS2S*5+1
03068  M01S00130.ns22000 +++|          UJN    USD2        UPDATE STATISTICS
03069  M01S00131.ns22000 +++|
03070  M01S00132.ns22000 +++| USD1     LDC    0           UPDATE INSUFFICIENT CM COUNT
03071  M01S00133.ns22000 +++|*         LDC    1           (INSUFFICIENT CM FOR JOB)
03072  M01S00134.ns22000 +++| USDA     EQU    *-1
03073  M01S00135.ns22000 +++|          RAM    SPST+JS2S*5+4
03074  M01S00136.ns22000 +++|          SHN    -14
03075  M01S00137.ns22000 +++|          RAM    SPST+JS2S*5+3
03076  M01S00138.ns22000 +++|          LDC    0           UPDATE INSUFFICIENT EM COUNT
03077  M01S00139.ns22000 +++|*         LDC    1           (INSUFFICIENT EM FOR JOB)
03078  M01S00140.ns22000 +++| USDB     EQU    *-1
03079  M01S00141.ns22000 +++|          RAM    SPST+JS3S*5+2
03080  M01S00142.ns22000 +++|          SHN    -14
03081  M01S00143.ns22000 +++|          RAM    SPST+JS3S*5+1
03082  M01S00144.ns22000 +++|          LDM    SCPA
03083  M01S00145.ns22000 +++|          NJN    USD2        IF CONTROL POINT AVAILABLE
03084  M01S00146.ns22000 +++|          AOM    SPST+JS3S*5+4  SET NO CONTROL POINT AVAILABLE
03085  M01S00147.ns22000 +++|          SHN    -14
03086  M01S00148.ns22000 +++|          RAM    SPST+JS3S*5+3
03087  M01S00149.ns22000 +++| USD2     LDC    0           UPDATE SCHEDULABLE JOB COUNT
03088  M01S00150.ns22000 +++| USDC     EQU    *-1         (SCHEDULABLE JOB COUNT)
Line S00151 Modification History
M01 (Added by) ns22000
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03089  M02S00151.v23l617 ---|          RAM    SPST+JS0S*5+2
Line S00020 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03090  M01S00020.v23l617 +++|          RAM    SPST+JS0S*5+4
Line S00152 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03091  M01S00152.ns22000 +++|          SHN    -14
Line S00153 Modification History
M01 (Added by) ns22000
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03092  M02S00153.v23l617 ---|          RAM    SPST+JS0S*5+1
Line S00021 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03093  M01S00021.v23l617 +++|          RAM    SPST+JS0S*5+3
Line S00154 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03094  M01S00154.ns22000 +++|          SHN    -14
Line S00155 Modification History
M01 (Added by) ns22000
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03095  M02S00155.v23l617 ---|          RAM    SPST+JS0S*5
Line S00022 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03096  M01S00022.v23l617 +++|          RAM    SPST+JS0S*5+2
Line S00156 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03097  M01S00156.ns22000 +++|          RJM    SSA         SET STATISTICAL AREA ADDRESS
03098  M01S00157.ns22000 +++|          CWM    SPST+JS0S*5,T1  WRITE STATISTICAL DATA
03099  M01S00158.ns22000 +++|          LJM    USDX        EXIT
03100  M01S00159.ns22000 +++| SPST     SPACE  4,10
03101  M01S00160.ns22000 +++| SPST     EQU    *-JS0S*5    SCHEDULER PERFORMANCE STATISTICS
03102  M01S00161.ns22000 +++|          BSS    JS3S*5+5-JS0S*5
03103  M00S01916.1sj     +++|          TTL    1SJ - JOB SCHEDULER.
03104  M00S01917.1sj     +++|          SPACE  4,10
03105  M00S01918.1sj     +++|*         COMMON DECKS.
03106  M00S01919.1sj     +++|
03107  M00S01920.1sj     +++|
03108  M00S01921.1sj     +++|          LIST   X
Line S00442 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03109  M01S00442.271l716 +++| CPR$     SET    1           ASSEMBLE ROUTINE *CPR* OF *COMPCPE*
03110  M01S00443.271l716 +++|*CALL     COMPCPE
03111  M01S00444.271l716 +++|          LIST   *
03112  M00S01922.1sj     +++|*CALL     COMPRJC
Line S00445 Modification History
M01 (Added by) 271l716
M02 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
03113  M02S00445.273l780 ---|*CALL     COMPPCP
Line S01923 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03114  M01S01923.271l716 ---|          LIST   *
03115  M00S01924.1sj     +++|          SPACE  4,10
03116  M00S01925.1sj     +++|          USE    OVERLAY
03117  M00S01926.1sj     +++|          SPACE  4,10
03118  M00S01927.1sj     +++|**        OVERLAY ORIGINS.
03119  M00S01928.1sj     +++|
03120  M00S01929.1sj     +++|
03121  M00S01930.1sj     +++| O3SA     EQU    *+5         *3SA* ORIGIN
Line S01931 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03122  M01S01931.271l716 ---| O3SB     EQU    *+5         *3SB* ORIGIN
03123  M01S01932.271l716 ---| O3SC     EQU    *+5         *3SC* ORIGIN
Line S00446 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03124  M01S00446.271l716 +++| O3SB     EQU    *+5         *3SB* ORIGIN
03125  M00S01933.1sj     +++|          SPACE  4,10
03126  M00S01934.1sj     +++|**        OVERFLOW CHECKS.
03127  M00S01935.1sj     +++|
03128  M00S01936.1sj     +++|
Line S01937 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
03129  M01S01937.284l847 ---|          ERRNG  TJSC-TTEU-MXJC-1  CHECK *1SJ* TABLES OVERFLOW
Line S00009 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
03130  M01S00009.284l847 +++|          ERRNG  TJSC-TTUE-MXJC-1  CHECK *1SJ* TABLES OVERFLOW
03131  M00S01938.1sj     +++|          TITLE  INITIALIZATION.
03132  M00S01939.1sj     +++| PRS      SPACE  4,10
03133  M00S01940.1sj     +++|**        PRS - PRESET.
03134  M00S01941.1sj     +++|*
03135  M00S01942.1sj     +++|*         USES   T1, CM - CM+4, AA - AA+4, BB - BB+4, EJ - EJ+4,
03136  M00S01943.1sj     +++|*                TM - TM+4, NC.
03137  M00S01944.1sj     +++|*
03138  M00S01945.1sj     +++|*         CALLS  RJC.
Line S00447 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03139  M01S00447.271l716 +++|*
Line S00448 Modification History
M01 (Added by) 271l716
M02 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
03140  M02S00448.273l780 ---|*         MACROS IPCP, ISTORE.
Line S00043 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
03141  M01S00043.273l780 +++|*         MACROS ISTORE.
03142  M00S01946.1sj     +++|
03143  M00S01947.1sj     +++|
03144  M00S01948.1sj     +++| PRS      SUBR               ENTRY/EXIT
Line S00449 Modification History
M01 (Added by) 271l716
M02 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
03145  M02S00449.273l780 ---|          IPCP               INITIALIZE *COMPPCP*
Line S00044 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
03146  M01S00044.273l780 +++|          LDK    PCPP        SET FWA OF PCPA-S
03147  M01S00045.273l780 +++|          CRD    CM
03148  M01S00046.273l780 +++|          LDD    CM+3
03149  M01S00047.273l780 +++|          SHN    14
03150  M01S00048.273l780 +++|          LMD    CM+4
03151  M01S00049.273l780 +++|          SBK    200B
03152  M01S00050.273l780 +++|          STM    CCAA+1
03153  M01S00051.273l780 +++|          SHN    -14
03154  M01S00052.273l780 +++|          LMC    ADCI
03155  M01S00053.273l780 +++|          STM    CCAA
Line S00450 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03156  M01S00450.271l716 +++|          LDD    CM+2        SET NUMBER OF MCT ENTRIES
03157  M01S00451.271l716 +++|          ERRNZ  MCTP-PCPP   CODE DEPENDS ON VALUE
03158  M01S00452.271l716 +++|          STM    BSTB
03159  M00S01949.1sj     +++|          LDN    EJTP        PRESET EJT FWA
03160  M00S01950.1sj     +++|          CRD    CM
03161  M00S01951.1sj     +++|          LDD    CM+1
03162  M00S01952.1sj     +++|          STM    EJAA
03163  M00S01953.1sj     +++|          STM    SFJD
03164  M00S01954.1sj     +++|          LDD    CM
03165  M00S01955.1sj     +++|          RAM    EJAA-1
03166  M00S01956.1sj     +++|          LPN    77
03167  M00S01957.1sj     +++|          RAM    SFJD-1
Line S01958 Modification History
M01 (Removed by) ns2153
Seq #  *Modification Id* Act 
----------------------------+
03168  M01S01958.ns2153  ---|          LDD    CM+2        SET START OF EJT SCANS
Line S00034 Modification History
M01 (Added by) ns2153
Seq #  *Modification Id* Act 
----------------------------+
03169  M01S00034.ns2153  +++|          SOD    CM+2        SET THE LAST EJT ORDINAL
03170  M01S00035.ns2153  +++|          STM    SFJS
03171  M01S00036.ns2153  +++|          LDK    LOSL        SET START OF THE EJT SCAN
03172  M01S00037.ns2153  +++|          CRD    CM
03173  M01S00038.ns2153  +++|          LDD    CM+4
03174  M00S01959.1sj     +++|          STM    SFJA
Line S00039 Modification History
M01 (Added by) ns2153
Seq #  *Modification Id* Act 
----------------------------+
03175  M01S00039.ns2153  +++|          STM    SFJT
03176  M00S01960.1sj     +++|          LDC    RTCL        READ REAL TIME CLOCK
03177  M00S01961.1sj     +++|          CRD    TM
03178  M00S01962.1sj     +++|          LDD    IR+2        SAVE FLAGS BYTE FROM CALL
Line S01963 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03179  M01S01963.271l716 ---|          STM    SCJA
Line S00453 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03180  M01S00453.271l716 +++|          RAM    SCJA
03181  M00S01964.1sj     +++|          LDD    CP          SET NUMBER OF CONTROL POINTS
03182  M00S01965.1sj     +++|          SHN    -7
03183  M00S01966.1sj     +++|          STD    NC
03184  M00S01967.1sj     +++|          LDC    INWL
03185  M00S01968.1sj     +++|          CRD    CM
03186  M00S01969.1sj     +++|          LDD    CM+3        SAVE SCHEDULER CONTROL FLAGS
Line S01970 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03187  M01S01970.271l716 ---|          STM    SCJB
Line S00454 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03188  M01S00454.271l716 +++|          LPN    77
03189  M01S00455.271l716 +++|          RAM    SCJB
Line S01971 Modification History
M01 (Removed by) 1sj40
Seq #  *Modification Id* Act 
----------------------------+
03190  M01S01971.1sj40   ---|          LDN    SSTL
Line S00003 Modification History
M01 (Added by) 1sj40
Seq #  *Modification Id* Act 
----------------------------+
03191  M01S00003.1sj40   +++|          LPN    10
03192  M01S00004.1sj40   +++|          ZJN    PRS0        IF DEADSTART SEQUENCING JOB HAS RUN
03193  M01S00005.1sj40   +++|          LDM    PRSB
03194  M01S00006.1sj40   +++|          STM    SFJV
03195  M01S00007.1sj40   +++| PRS0     LDN    SSTL
03196  M00S01972.1sj     +++|          CRD    CM
03197  M00S01973.1sj     +++|          LDD    CM
03198  M00S01974.1sj     +++|          SHN    21-5
Line S01975 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03199  M01S01975.271l716 ---|          MJN    PRS1        IF USER ECS IS DISABLED
Line S00456 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03200  M01S00456.271l716 +++|          MJN    PRS0.1      IF USER ECS DISABLED
03201  M00S01976.1sj     +++|          LDM    PRSA
03202  M00S01977.1sj     +++|          STM    SFJF
Line S00457 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03203  M01S00457.271l716 +++| PRS0.1   LDD    CM+3
03204  M01S00458.271l716 +++|          SHN    21-12
03205  M01S00459.271l716 +++|          PJN    PRS1        IF FLEXIBLE PARTITIONING ENABLED
03206  M01S00460.271l716 +++|          ISTORE SFJW,(UJN SFJX)  DISABLE POST-REJECT SCHEDULING
03207  M00S01978.1sj     +++|
03208  M00S01979.1sj     +++|*         BUILD *TEPB*, *TJAM* TABLES.
03209  M00S01980.1sj     +++|
03210  M00S01981.1sj     +++| PRS1     LDN    MXJC-1      INITIALIZE INDEX
03211  M00S01982.1sj     +++|          STD    T1
03212  M00S01983.1sj     +++| PRS2     RJM    RJC         CALCULATE JCB ADDRESS
03213  M00S01984.1sj     +++|          ADN    EXQT        READ *EXQT* WORD OF JCB
03214  M00S01985.1sj     +++|          CRD    AA
03215  M00S01986.1sj     +++|          ADN    SVJT-EXQT   READ *SVJT* WORD OF JCB
03216  M00S01987.1sj     +++|          CRD    CM
03217  M00S01988.1sj     +++|          ADN    MCMT-SVJT   READ *MCMT* WORD OF JCB
03218  M00S01989.1sj     +++|          CRD    BB
03219  M00S01990.1sj     +++|          ADN    MECT-MCMT   READ *MECT* WORD OF JCB
03220  M00S01991.1sj     +++|          CRD    EJ
Line S01992 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03221  M01S01992.271l716 ---|          LDD    AA
03222  M01S01993.271l716 ---|          STM    TEPB,T1
03223  M00S01994.1sj     +++|          LDD    AA+1
Line S01995 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03224  M01S01995.271l716 ---|          STM    TEPB+1*MXJC,T1
Line S00461 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03225  M01S00461.271l716 +++|          STM    TEPB,T1
03226  M00S01996.1sj     +++|          LDD    AA+2
Line S01997 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03227  M01S01997.271l716 ---|          STM    TEPB+2*MXJC,T1
Line S00462 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03228  M01S00462.271l716 +++|          STM    TEPB+1*MXJC,T1
03229  M00S01998.1sj     +++|          LDD    AA+3
Line S01999 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03230  M01S01999.271l716 ---|          STM    TEPB+3*MXJC,T1
Line S00463 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03231  M01S00463.271l716 +++|          STM    TEPB+2*MXJC,T1
03232  M00S02000.1sj     +++|          LDD    AA+4
Line S02001 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03233  M01S02001.271l716 ---|          STM    TEPB+4*MXJC,T1
Line S00464 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03234  M01S00464.271l716 +++|          STM    TEPB+3*MXJC,T1
03235  M00S02002.1sj     +++|          LDD    CM+3
03236  M00S02003.1sj     +++|          STM    TJAM,T1
03237  M00S02004.1sj     +++|          LDD    BB+2
03238  M00S02005.1sj     +++|          STM    TJAM+1*MXJC,T1
03239  M00S02006.1sj     +++|          LDD    BB+3
03240  M00S02007.1sj     +++|          STM    TJAM+2*MXJC,T1
03241  M00S02008.1sj     +++|          LDD    BB+4
03242  M00S02009.1sj     +++|          STM    TJAM+3*MXJC,T1
03243  M00S02010.1sj     +++|          LDD    EJ+2
03244  M00S02011.1sj     +++|          STM    TJAM+4*MXJC,T1
03245  M00S02012.1sj     +++|          LDD    EJ+4
03246  M00S02013.1sj     +++|          STM    TJAM+5*MXJC,T1
03247  M00S02014.1sj     +++|          SOD    T1          DECREMENT JCB INDEX
03248  M00S02015.1sj     +++|          MJN    PRS3        IF ALL JCB-S HAVE BEEN PROCESSED
03249  M00S02016.1sj     +++|          LJM    PRS2        GO PROCESS NEXT JCB
03250  M00S02017.1sj     +++|
Line S02018 Modification History
M01 (Removed by) 1sj30a
Seq #  *Modification Id* Act 
----------------------------+
03251  M01S02018.1sj30a  ---| PRS3     LJM    PRSX        RETURN
Line S00031 Modification History
M01 (Added by) 1sj30a
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03252  M02S00031.271l716 ---|*         CLEAR *TPRS*.
03253  M02S00032.271l716 ---|
03254  M02S00033.271l716 ---| PRS3     LDK    MRCC-1
03255  M02S00034.271l716 ---|          STD    T1
03256  M02S00035.271l716 ---| PRS4     LDN    0
03257  M02S00036.271l716 ---|          STM    TPRS,T1
03258  M02S00037.271l716 ---|          SOD    T1
03259  M02S00038.271l716 ---|          PJN    PRS4        IF NOT END OF TABLE
03260  M02S00039.271l716 ---|          LJM    PRSX        RETURN
Line S00465 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03261  M01S00465.271l716 +++| PRS3     LJM    PRSX        RETURN
03262  M00S02019.1sj     +++|
03263  M00S02020.1sj     +++| PRSA     BSS    0
03264  M00S02021.1sj     +++|          LOC    SFJF
Line S02022 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03265  M01S02022.ns22000 ---|          UJN    SFJ13       USER ECS IS ENABLED
Line S00162 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03266  M01S00162.ns22000 +++|          UJN    SFJ12.2     (USER ECS ENABLED)
03267  M00S02023.1sj     +++|          LOC    *O
Line S00008 Modification History
M01 (Added by) 1sj40
Seq #  *Modification Id* Act 
----------------------------+
03268  M01S00008.1sj40   +++|
03269  M01S00009.1sj40   +++| PRSB     BSS    0
03270  M01S00010.1sj40   +++|          LOC    SFJV
03271  M01S00011.1sj40   +++|          UJN    SFJ6        (DEADSTART SEQUENCING JOB NOT RUN)
03272  M01S00012.1sj40   +++|          LOC    *O
03273  M00S02024.1sj     +++|          SPACE  4,10
03274  M00S02025.1sj     +++|*         OVERFLOW CHECKS.
03275  M00S02026.1sj     +++|
03276  M00S02027.1sj     +++|          ERRNG  TJAM-*      CHECK FOR *TJAM*/*TEPB* OVERFLOWING *PRS*
03277  M00S02028.1sj     +++|          SPACE  4,10
03278  M00S02029.1sj     +++|          USE    OVERFLOW
03279  M00S02030.1sj     +++|          OVERFLOW
03280  M00S02031.1sj     +++|          TTL    1SJ/3SA - SCHEDULE SUBSYSTEM.
03281  M00S02032.1sj     +++|          TITLE
03282  M00S02033.1sj     +++|          IDENT  3SA,O3SA   SCHEDULE SUBSYSTEM.
03283  M00S02034.1sj     +++|          BASE   M
Line S02035 Modification History
M01 (Removed by) ns2437
Seq #  *Modification Id* Act 
----------------------------+
03284  M01S02035.ns2437  ---|          LIST   F,X
03285  M00S02036.1sj     +++|          SST
03286  M00S02037.1sj     +++|*COMMENT  1SJ - SCHEDULE SUBSYSTEM.
Line S02038 Modification History
M01 (Removed by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
03287  M01S02038.281l803 ---|          COMMENT COPYRIGHT CONTROL DATA CORPORATION. 1981.
Line S00002 Modification History
M01 (Added by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
03288  M01S00002.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
03289  M00S02039.1sj     +++|          ORG    O3SA
03290  M00S02040.1sj     +++|          QUAL   3SA
03291  M00S02041.1sj     +++| QUAL$    SET    1
03292  M00S02042.1sj     +++| 3SA      SPACE  4,10
03293  M00S02043.1sj     +++|**        SSS - SCHEDULE SUBSYSTEM.
03294  M00S02044.1sj     +++|*
03295  M00S02045.1sj     +++|*         READ THE SYSTEM SECTOR OF THE INPUT FILE OR THE ROLLOUT
03296  M00S02046.1sj     +++|*         FILE, DEPENDING ON WHETHER JOB STATUS IS *PRJS* OR *ROJS*,
03297  M00S02047.1sj     +++|*         RESPECTIVELY.  OBTAIN THE SUBSYSTEM IDENTIFICATION NUMBER
03298  M00S02048.1sj     +++|*         FROM THE SYSTEM SECTOR AND USE IT TO CHECK THE *SSCT* TABLE
03299  M00S02049.1sj     +++|*         FOR A SPECIFIED CONTROL POINT TO WHICH THE SUBSYSTEM SHOULD
Line S02050 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03300  M01S02050.271l716 ---|*         BE SCHEDULED.  IF NO CONTROL POINT IS SPECIFIED, CALL
03301  M01S02051.271l716 ---|*         ROUTINE *SCP* TO SELECT A CONTROL POINT.  IF INSUFFICIENT
Line S00466 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03302  M01S00466.271l716 +++|*         BE SCHEDULED.  IF NO CONTROL POINT IS SPECIFIED, USE THE
03303  M01S00467.271l716 +++|*         ONE INDICATED BY CELL *JC*.  IF INSUFFICIENT
03304  M00S02052.1sj     +++|*         MEMORY FOR THE SUBSYSTEM, CALL ROUTINE *CFL* TO INITIATE
03305  M00S02053.1sj     +++|*         ROLLOUT OF LOWER PRIORITY JOBS.  IF THE CONTROL POINT AND
03306  M00S02054.1sj     +++|*         MEMORY ARE AVAILABLE, CALL ROUTINE *ASJ* TO ASSIGN THE
03307  M00S02055.1sj     +++|*         SUBSYSTEM TO THE CONTROL POINT AND CALL *1RI* OR *1AJ*.
03308  M00S02056.1sj     +++|*
03309  M00S02057.1sj     +++|*         ENTRY  (EO) = (EP) = EJT ORDINAL OF SUBSYSTEM.
03310  M00S02058.1sj     +++|*                (SP) = SERVICE CLASS (*SSSC*).
03311  M00S02059.1sj     +++|*                (AM - AM+1) = AVAILABLE + ROLLING CM.
03312  M00S02060.1sj     +++|*                (AE) = AVAILABLE + ROLLING ECS.
03313  M00S02061.1sj     +++|*                (RM - RM+1) = ROLLING CM.
Line S02062 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03314  M01S02062.271l716 ---|*                (JC) = 0.
Line S00468 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03315  M01S00468.271l716 +++|*                (JC) = NUMBER OF AVAILABLE CONTROL POINT.  ZERO IF
03316  M01S00469.271l716 +++|*                       NONE AVAILABLE.
03317  M00S02063.1sj     +++|*                (JM) = REQUIRED CM FL.
03318  M00S02064.1sj     +++|*                (JE) = REQUIRED ECS.
03319  M00S02065.1sj     +++|*                (JP) = SCHEDULING PRIORITY.
03320  M00S02066.1sj     +++|*                (TE) = LWA OF *TACP* TABLE.
03321  M00S02067.1sj     +++|*                (TM - TM+1) = SECONDS PORTION OF REAL TIME CLOCK.
03322  M00S02068.1sj     +++|*                (NC) = SYSTEM CONTROL POINT NUMBER.
03323  M00S02069.1sj     +++|*
03324  M00S02070.1sj     +++|*         EXIT   (A) = 0 IF THE SUBSYSTEM WAS SCHEDULED.
Line S02071 Modification History
M01 (Removed by) 1sj30a
Seq #  *Modification Id* Act 
----------------------------+
03325  M01S02071.1sj30a  ---|*                    .NE. IF THE SUBSYSTEM WAS NOT SCHEDULED.
Line S00040 Modification History
M01 (Added by) 1sj30a
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03326  M02S00040.271l716 ---|*                    .LT. 0 IF THE ASSIGNED CONTROL POINT OCCUPIED.
03327  M02S00041.271l716 ---|*                    .GT. 0 IF SUBSYSTEM WAS OTHERWISE NOT SCHEDULED.
Line S00470 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03328  M01S00470.271l716 +++|*                    .NE. 0 IF SUBSYSTEM WAS NOT SCHEDULED.
03329  M00S02072.1sj     +++|*
Line S02073 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03330  M01S02073.271l716 ---|*         USES   T1 -T7, CM - CM+4, AA - AA+4, BB - BB+4, SP, JF, JE,
03331  M01S02074.271l716 ---|*                JC, SI, EO, EJ - EJ+4.
Line S00471 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03332  M01S00471.271l716 +++|*         USES   EO, JC, JE, JF, SI, SP, TP, AA - AA+4, BB - BB+4,
03333  M01S00472.271l716 +++|*                CM - CM+4, EJ - EJ+4, T1 - T7.
03334  M00S02075.1sj     +++|*
Line S02076 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03335  M01S02076.271l716 ---|*         CALLS  ASJ, AST, CFL, EJA, IRR, RSS, SCP.
Line S00473 Modification History
M01 (Added by) 271l716
M02 (Removed by) ns2707
Seq #  *Modification Id* Act 
----------------------------+
03336  M02S00473.ns2707  ---|*         CALLS  ASJ, AST, CFL, EJA, IRR, IUT, RSS, SCP.
Line S00001 Modification History
M01 (Added by) ns2707
Seq #  *Modification Id* Act 
----------------------------+
03337  M01S00001.ns2707  +++|*         CALLS  ASJ, AST, CFL, EJA, IRR, IUT, RSS, SCI, SCP.
03338  M00S02077.1sj     +++|*
03339  M00S02078.1sj     +++|*         MACROS ENDMS, MONITOR, SETMS.
03340  M00S02079.1sj     +++|
03341  M00S02080.1sj     +++|
03342  M00S02081.1sj     +++| SSS      SUBR               ENTRY/EXIT
Line S00002 Modification History
M01 (Added by) ns2707
Seq #  *Modification Id* Act 
----------------------------+
03343  M01S00002.ns2707  +++|          LDK    /CPS/SFIN   SET EJT INTERLOCK
03344  M01S00003.ns2707  +++|          RJM    SCI
03345  M01S00004.ns2707  +++|          NJN    SSSX        IF TIMEOUT OR ENTRY NOT IN USE
Line S00005 Modification History
M01 (Added by) 1sj16
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03346  M02S00005.271l716 ---|          LDD    NC          SAVE NUMBER OF CONTROL POINTS
03347  M02S00006.271l716 ---|          STM    SSSB
03348  M00S02082.1sj     +++|          RJM    EJA         CALCULATE EJT ENTRY ADDRESS
03349  M00S02083.1sj     +++|          ADK    JSNE
03350  M00S02084.1sj     +++|          CRD    EJ
03351  M00S02085.1sj     +++|          ADN    SCHE-JSNE   READ *SCHE* SO THAT (T6) = LOGICAL TRACK
03352  M00S02086.1sj     +++|          CRD    T5
Line S00001 Modification History
M01 (Added by) 1sj42
Seq #  *Modification Id* Act 
----------------------------+
03353  M01S00001.1sj42   +++|          ADN    PRFE-SCHE
03354  M01S00002.1sj42   +++|          CRD    BB
Line S00001 Modification History
M01 (Added by) 1sj30
Seq #  *Modification Id* Act 
----------------------------+
03355  M01S00001.1sj30   +++|          LDD    EJ+4        SAVE JOB STATUS
03356  M01S00002.1sj30   +++|          LPN    76
03357  M01S00003.1sj30   +++|          LMK    PRJS*2
Line S00004 Modification History
M01 (Added by) 1sj30
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03358  M02S00004.271l716 ---|          STM    SSSD
Line S00474 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03359  M01S00474.271l716 +++|          STM    SSSA
03360  M00S02087.1sj     +++|
03361  M00S02088.1sj     +++|*         READ SYSTEM SECTOR OF INPUT FILE OR ROLLOUT FILE.
03362  M00S02089.1sj     +++|
Line S02090 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03363  M01S02090.242l642 ---|          SETMS  READ
Line S00060 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03364  M01S00060.242l642 +++|          SETMS  IO
03365  M00S02091.1sj     +++|          LDN    0
Line S00475 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03366  M01S00475.271l716 +++|          STD    TP
03367  M00S02092.1sj     +++|          RJM    RSS         READ SYSTEM SECTOR
Line S02093 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03368  M01S02093.271l716 ---|          NJN    SSS1        IF I/O ERROR
Line S00476 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03369  M01S00476.271l716 +++|          NJN    SSS2        IF I/O ERROR
Proceed to Part 3