Seq # *Modification Id* Act
----------------------------+
05354 M03S03022.271l716 ---| ORG *-1
05355 M03S03023.271l716 ---| LOC CMSE
05356 M03S03024.271l716 ---| PJN CMS10 IF NOT TIME FOR CHECKPOINT PROCESSING
05357 M03S03025.271l716 ---| LOC *O
05358 M03S03026.271l716 ---| STM CMSE
05359 M03S03027.271l716 ---| LDC **
05360 M03S03028.271l716 ---| ORG *-1
05361 M03S03029.271l716 ---| LOC CMSF
05362 M03S03030.271l716 ---| ZJN CMS2 IF CHECKPOINT NOT REQUESTED ON DEVICE
05363 M03S03031.271l716 ---| LOC *O
05364 M03S03032.271l716 ---| STM CMSF
| Line S00045 Modification History |
M01 (Added by) | ns2153 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05365 M02S00045.271l716 ---| STM PPFA
| Line S03033 Modification History |
M01 (Removed by) | ns22000 |
M02 (Removed by) | ns2134 |
M03 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05366 M03S03033.271l716 ---| PTE2 LDD EJ+4
05367 M03S03034.271l716 ---| LPN 77
05368 M03S03035.271l716 ---| LMN TOJS*2
05369 M03S03036.271l716 ---| NJN PTE1 IF JOB ROLLING IN OR JOB STATUS NOT *TOJS*
05370 M03S03037.271l716 ---| LDD CM GET SERVICE CLASS
05371 M03S03038.271l716 ---| LPN 60 MASK FORCED ROLLOUT/ROLLIN BITS
05372 M03S03039.271l716 ---| LMN 20
05373 M03S03040.271l716 ---| STM PTED SET/CLEAR *EATM* REISSUE FLAG
05374 M03S03041.271l716 ---| NJN PTE4 IF NOT FORCED ROLLIN
05375 M03S03042.271l716 ---| PTE3 LJM PTE12 GO CHANGE JOB STATUS AND SET PRIORITY
05376 M03S03043.271l716 ---|
05377 M03S03044.271l716 ---| PTE4 LDD AA+3
05378 M03S03045.271l716 ---| LPC 777
05379 M03S03046.271l716 ---| LMN EXTM/10000
05380 M03S03047.271l716 ---| STM PTEC SET/CLEAR EXTENDED TIMED ROLLOUT FLAG
05381 M03S03048.271l716 ---| NJN PTE6 IF NOT EXTENDED TIMED ROLLOUT
05382 M03S03049.271l716 ---| SOD AA+4 DECREMENT ROLLOUT TIME (2ND BYTE)
05383 M03S03050.271l716 ---| STM PTEF+4
05384 M03S03051.271l716 ---| ZJN PTE5 IF 2ND BYTE OF ROLLOUT TIME EXHAUSTED
05385 M03S03052.271l716 ---| LDC PTEF+10000*1
05386 M03S03053.271l716 ---| UJN PTE9 GO ISSUE *UTEM* TO UPDATE EJT ENTRY
05387 M03S03054.271l716 ---|
05388 M03S03055.271l716 ---| PTE5 LCN 0 RESET 2ND BYTE OF ROLLOUT TIME
05389 M03S03056.271l716 ---| STM PTEF+4
05390 M03S03057.271l716 ---| PTE6 LDD AA+2
05391 M03S03058.271l716 ---| LPN 77
05392 M03S03059.271l716 ---| SHN 14
05393 M03S03060.271l716 ---| LMD AA+3
05394 M03S03061.271l716 ---| SHN 10-21
05395 M03S03062.271l716 ---| STM PTED SET/CLEAR EVENT FLAG
05396 M03S03063.271l716 ---| ZJN PTE3 IF ROLLOUT TIME EXPIRED
05397 M03S03064.271l716 ---| SBN 1 DECREMENT COUNTER
05398 M03S03065.271l716 ---| STM PTEE+4
05399 M03S03066.271l716 ---| LDC **
05400 M03S03067.271l716 ---| PTEC EQU *-1 (EXTENDED TIMED/ROLLOUT FLAG)
05401 M03S03068.271l716 ---| NJN PTE7 IF NOT EXTENDED TIMED ROLLOUT
05402 M03S03069.271l716 ---| LDC PTEE+10000*2
05403 M03S03070.271l716 ---| UJN PTE9 GO ISSUE *UTEM* TO UPDATE EJT ENTRY
05404 M03S03071.271l716 ---|
05405 M03S03072.271l716 ---| PTE7 LDD AA+3 CHECK FOR EVENT
05406 M03S03073.271l716 ---| LPC 777
05407 M03S03074.271l716 ---| STD AA+3
05408 M03S03075.271l716 ---| ADD AA+4
05409 M03S03076.271l716 ---| NJN PTE10 IF EVENT EXISTS
05410 M03S03077.271l716 ---|
05411 M03S03078.271l716 ---|* EVENT EXISTS BUT HAS NOT BEEN POSTED YET AND ROLLOUT TIME HAS
05412 M03S03079.271l716 ---|* NOT EXPIRED OR NO EVENT EXISTS AND ROLLOUT TIME HAS NOT
05413 M03S03080.271l716 ---|* EXPIRED. DECREMENT ROLLOUT TIME VIA *UTEM*.
05414 M03S03081.271l716 ---|
05415 M03S03082.271l716 ---| PTE8 LDC PTEE+10000*1
05416 M03S03083.271l716 ---| PTE9 RJM IUT ISSUE *UTEM* MONITOR FUNCTION
05417 M03S03084.271l716 ---| LJM PTE1 CONTINUE EJT SCAN
05418 M03S03085.271l716 ---|
05419 M03S03086.271l716 ---|* SCAN *TEVT* TABLE TO SEE IF THIS JOB-S EVENT HAS BEEN POSTED.
05420 M03S03087.271l716 ---|
05421 M03S03088.271l716 ---| PTE10 LDD T7 INITIALIZE INDEX
05422 M03S03089.271l716 ---| SHN 1
05423 M03S03090.271l716 ---| STD T2
05424 M03S03091.271l716 ---| PTE11 LCN 2 DECREMENT INDEX
05425 M03S03092.271l716 ---| RAD T2
05426 M03S03093.271l716 ---| MJN PTE8 IF *TEVT* SCAN COMPLETE, EVENT NOT FOUND
05427 M03S03094.271l716 ---| LDM TEVT,T2
05428 M03S03095.271l716 ---| LMD AA+3
05429 M03S03096.271l716 ---| NJN PTE11 IF NO MATCH
05430 M03S03097.271l716 ---| LDM TEVT+1,T2
05431 M03S03098.271l716 ---| LMD AA+4
05432 M03S03099.271l716 ---| NJN PTE11 IF NO MATCH
05433 M03S03100.271l716 ---|
05434 M03S03101.271l716 ---|* EVENT WAS FOUND IN *TEVT* OR ROLLOUT TIME HAS EXPIRED.
05435 M03S03102.271l716 ---|* CHANGE JOB STATUS TO *ROJS* AND SET PRIORITY TO UPPER BOUND
05436 M03S03103.271l716 ---|* OF SERVICE CLASS.
05437 M03S03104.271l716 ---|
05438 M03S03105.271l716 ---| PTE12 LDM TEPB+2*MXJC,SC SET UP *CET* PARAMETERS
05439 M03S03106.271l716 ---| STD T1
05440 M03S03107.271l716 ---| LDD SC
05441 M03S03108.271l716 ---| SHN 14
05442 M03S03109.271l716 ---| LMN EXQT
05443 M03S03110.271l716 ---| RJM CET CALCULATE ENTRY TIME
05444 M03S03111.271l716 ---| LDD T1 PLACE ENTRY TIME IN *UTEM* PARAMETER BLOCK
| Line S03112 Modification History |
M01 (Removed by) | 1sj4 |
M02 (Removed by) | ns22000 |
M03 (Removed by) | ns2134 |
M04 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05445 M04S03112.271l716 ---| STM PTEG+1*5+3
| Line S00001 Modification History |
M01 (Added by) | 1sj4 |
M02 (Removed by) | ns22000 |
M03 (Removed by) | ns2134 |
M04 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05446 M04S00001.271l716 ---| STM PTEG+2*5+3
| Line S03113 Modification History |
M01 (Removed by) | ns22000 |
M02 (Removed by) | ns2134 |
M03 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05447 M03S03113.271l716 ---| LDD T2
| Line S03114 Modification History |
M01 (Removed by) | 1sj4 |
M02 (Removed by) | ns22000 |
M03 (Removed by) | ns2134 |
M04 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05448 M04S03114.271l716 ---| STM PTEG+1*5+4
05449 M04S03115.271l716 ---| LDC PTEG+2*10000
| Line S00002 Modification History |
M01 (Added by) | 1sj4 |
M02 (Removed by) | ns22000 |
M03 (Removed by) | ns2134 |
M04 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05450 M04S00002.271l716 ---| STM PTEG+2*5+4
05451 M04S00003.271l716 ---| LDC PTEG+PTEGL*10000
| Line S03116 Modification History |
M01 (Removed by) | ns22000 |
M02 (Removed by) | ns2134 |
M03 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05452 M03S03116.271l716 ---| RJM IUT ISSUE *UTEM*
05453 M03S03117.271l716 ---| ZJN PTE13 IF FUNCTION ACCEPTED
05454 M03S03118.271l716 ---| LDC **
05455 M03S03119.271l716 ---| PTED EQU *-1 (*EATM* REISSUE FLAG)
05456 M03S03120.271l716 ---| ZJN PTE13 IF ROLLOUT TIME EXPIRED OR FORCED ROLLIN
05457 M03S03121.271l716 ---| LDN 0 SET *EATM* SUBFUNCTION
05458 M03S03122.271l716 ---| STD CM+1
05459 M03S03123.271l716 ---| LDD AA+3 STORE EVENT IN *EATM* CALL
05460 M03S03124.271l716 ---| STD CM+3
05461 M03S03125.271l716 ---| LDD AA+4
05462 M03S03126.271l716 ---| STD CM+4
05463 M03S03127.271l716 ---| MONITOR EATM REISSUE EVENT TO *MTR*
05464 M03S03128.271l716 ---| PTE13 LJM PTE1 CONTINUE EJT SCAN
05465 M03S03129.271l716 ---|
05466 M03S03130.271l716 ---|* *UTEM* PARAMETERS FOR DECREMENTING ROLLOUT TIME.
05467 M03S03131.271l716 ---|
05468 M03S03132.271l716 ---| PTEE VFD 1/0,5/SCHE,6/9D
05469 M03S03133.271l716 ---| VFD 6/21D,6/0
05470 M03S03134.271l716 ---| CON 0
05471 M03S03135.271l716 ---| CON 0
05472 M03S03136.271l716 ---| CON 0
05473 M03S03137.271l716 ---|
05474 M03S03138.271l716 ---| PTEF VFD 1/0,5/SCHE,6/12D
05475 M03S03139.271l716 ---| VFD 6/0,6/0
05476 M03S03140.271l716 ---| CON 0
05477 M03S03141.271l716 ---| CON 0
05478 M03S03142.271l716 ---| CON 0
05479 M03S03143.271l716 ---|
05480 M03S03144.271l716 ---|* *UTEM* PARAMETERS FOR CHANGING JOB STATUS AND SETTING
05481 M03S03145.271l716 ---|* SCHEDULING PRIORITY TO UPPER BOUND
05482 M03S03146.271l716 ---|
| Line S03147 Modification History |
M01 (Removed by) | 1sj4 |
M02 (Removed by) | ns22000 |
M03 (Removed by) | ns2134 |
M04 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05483 M04S03147.271l716 ---| PTEG VFD 1/0,5/JSNE,6/5 SET JOB STATUS
| Line S00004 Modification History |
M01 (Added by) | 1sj4 |
M02 (Removed by) | ns22000 |
M03 (Removed by) | ns2134 |
M04 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05484 M04S00004.271l716 ---|PTEG VFD 1/1,5/JSNE,6/1 VALIDATE CLEAR INTERLOCK
05485 M04S00005.271l716 ---| VFD 6/0,6/0
05486 M04S00006.271l716 ---| CON 0,0,0
05487 M04S00007.271l716 ---| VFD 1/0,5/JSNE,6/5 SET JOB STATUS
| Line S03148 Modification History |
M01 (Removed by) | ns22000 |
M02 (Removed by) | ns2134 |
M03 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05488 M03S03148.271l716 ---| VFD 6/1,6/0
05489 M03S03149.271l716 ---| CON 0
05490 M03S03150.271l716 ---| CON 0
05491 M03S03151.271l716 ---| CON ROJS
05492 M03S03152.271l716 ---|
05493 M03S03153.271l716 ---| VFD 1/0,5/SCHE,6/30D SET SCHEDULING PRIORITY
05494 M03S03154.271l716 ---| VFD 6/0,6/0
05495 M03S03155.271l716 ---| CON 0
05496 M03S03156.271l716 ---| CON 0
05497 M03S03157.271l716 ---| CON 0
| Line S00008 Modification History |
M01 (Added by) | 1sj4 |
M02 (Removed by) | ns22000 |
M03 (Removed by) | ns2134 |
M04 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05498 M04S00008.271l716 ---|
05499 M04S00009.271l716 ---| PTEGL EQU */5-PTEG/5 BLOCK LENGTH
| Line S00484 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2134 |
M03 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05500 M03S00484.271l716 ---| SEJ2 LDM SCJB
05501 M03S00485.271l716 ---| LPN 4
| Line S00023 Modification History |
M01 (Added by) | ns2134 |
M02 (Removed by) | ns2153 |
M03 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05502 M03S00023.271l716 ---| ISTORE CMSE,(PJN CMS10) DISABLE *CMS* CALL
05503 M03S00024.271l716 ---| ISTORE CMSF,(ZJN CMS2)
| Line S00025 Modification History |
M01 (Added by) | ns2134 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05504 M02S00025.271l716 ---| SEJ2 LDC **
05505 M02S00026.271l716 ---| SEJC EQU *-1 (SYSTEM LIMITS CHANGED FLAG)
| Line S00486 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05506 M02S00486.271l716 ---| ZJN SEJ3 IF SYSTEM LIMITS HAVE NOT CHANGED
05507 M02S00487.271l716 ---| RJM CAL CHECK ACCESS LEVEL LIMITS
05508 M02S00488.271l716 ---| NJN SEJ4 IF JOB ABORTED OR IN TERMINATION
05509 M02S00489.271l716 ---| SEJ3 RJM PTE PROCESS TIMED/EVENT ROLLOUT JOBS
| Line S00059 Modification History |
M01 (Added by) | ns2395 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05510 M02S00059.271l716 ---| RJM PSL PROCESS SERVICE LIMITS
| Line S00490 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05511 M02S00490.271l716 ---| SEJ4 LJM SEJ1 PROCESS NEXT EJT ENTRY
05512 M02S00491.271l716 ---|
05513 M02S00492.271l716 ---|
| Line S00493 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2134 |
M03 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05514 M03S00493.271l716 ---| SEJC CON /CPS/LDOS DECREMENT BY ONE
| Line S00027 Modification History |
M01 (Added by) | ns2134 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05515 M02S00027.271l716 ---|* *UADM* PARAMETERS TO CLEAR SYSTEM LIMITS CHANGED FLAG.
05516 M02S00028.271l716 ---|
05517 M02S00029.271l716 ---| SEJD CON /CPS/LDOS DECREMENT BY ONE
| Line S00494 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05518 M02S00494.271l716 ---| CON INWL
05519 M02S00495.271l716 ---| CON 14D*100+1 BIT ADDRESS AND FIELD WIDTH
| Line S00060 Modification History |
M01 (Added by) | ns2395 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05520 M02S00060.271l716 ---| SRS SPACE 4,10
05521 M02S00061.271l716 ---|** SRS - SET ROLLOUT STATUS.
05522 M02S00062.271l716 ---|*
| Line S00003 Modification History |
M01 (Added by) | 1sj39 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05523 M02S00003.271l716 ---|* ENTRY (SRSA+4) = JOB STATUS OF SELECTED ENTRY.
05524 M02S00004.271l716 ---|*
| Line S00063 Modification History |
M01 (Added by) | ns2395 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05525 M02S00063.271l716 ---|* EXIT (A) = 0, IF *UTEM* CALL COMPLETED.
05526 M02S00064.271l716 ---|* .NE. 0, IF *UTEM* ABORTED.
05527 M02S00065.271l716 ---|* USES T1.
05528 M02S00066.271l716 ---|*
05529 M02S00067.271l716 ---|* CALLS IUT.
05530 M02S00068.271l716 ---|
05531 M02S00069.271l716 ---|
05532 M02S00070.271l716 ---| SRS SUBR ENTRY/EXIT
05533 M02S00071.271l716 ---| LDM TEPB+2*MXJC,SC SET UP *CET* PARAMETERS
05534 M02S00072.271l716 ---| STD T1
05535 M02S00073.271l716 ---| LDD SC
05536 M02S00074.271l716 ---| SHN 14
05537 M02S00075.271l716 ---| LMN EXQT
05538 M02S00076.271l716 ---| RJM CET CALCULATE ENTRY TIME
05539 M02S00077.271l716 ---| LDD T1 PLACE ENTRY TIME IN *UTEM* PARAMETER BLOCK
05540 M02S00078.271l716 ---| STM SRSA+2*5+3
05541 M02S00079.271l716 ---| LDD T2
05542 M02S00080.271l716 ---| STM SRSA+2*5+4
05543 M02S00081.271l716 ---| LDD EJ+4 CHECK FOR *PWJS* STATUS
05544 M02S00082.271l716 ---| LPN 76
05545 M02S00083.271l716 ---| LMK PWJS*2
05546 M02S00084.271l716 ---| ZJN SRS1 IF SHOULD CHANGE *PWJS* TO *PRJS*
05547 M02S00085.271l716 ---| LDK ROJS&PRJS SET *ROJS* STATUS FOR *ERJS* OR *TOJS*
05548 M02S00086.271l716 ---| SRS1 LMK PRJS
05549 M02S00087.271l716 ---| STM SRSA+1*5+4
05550 M02S00088.271l716 ---| LDC SRSA+SRSAL*10000
05551 M02S00089.271l716 ---| RJM IUT ISSUE *UTEM*
05552 M02S00090.271l716 ---| LJM SRSX RETURN
05553 M02S00091.271l716 ---|
05554 M02S00092.271l716 ---|* *UTEM* PARAMETERS FOR CHANGING JOB STATUS AND SETTING
05555 M02S00093.271l716 ---|* SCHEDULING PRIORITY TO UPPER BOUND.
05556 M02S00094.271l716 ---|
| Line S00095 Modification History |
M01 (Added by) | ns2395 |
M02 (Removed by) | 1sj39 |
M03 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05557 M03S00095.271l716 ---|SRSA VFD 1/1,5/JSNE,6/1 VALIDATE CLEAR INTERLOCK
| Line S00005 Modification History |
M01 (Added by) | 1sj39 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05558 M02S00005.271l716 ---| SRSA VFD 1/1,5/JSNE,6/6 VALIDATE JOB STATUS UNCHANGED
| Line S00096 Modification History |
M01 (Added by) | ns2395 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05559 M02S00096.271l716 ---| VFD 6/0,6/0
05560 M02S00097.271l716 ---| CON 0
05561 M02S00098.271l716 ---| CON 0
05562 M02S00099.271l716 ---| CON 0
05563 M02S00100.271l716 ---|
05564 M02S00101.271l716 ---| VFD 1/0,5/JSNE,6/5 SET JOB STATUS
05565 M02S00102.271l716 ---| VFD 6/1,6/0
05566 M02S00103.271l716 ---| CON 0
05567 M02S00104.271l716 ---| CON 0
05568 M02S00105.271l716 ---| CON ROJS
05569 M02S00106.271l716 ---|
05570 M02S00107.271l716 ---| VFD 1/0,5/SCHE,6/30D SET SCHEDULING PRIORITY
05571 M02S00108.271l716 ---| VFD 6/0,6/0
05572 M02S00109.271l716 ---| CON 0
05573 M02S00110.271l716 ---| CON 0
05574 M02S00111.271l716 ---| CON 0
05575 M02S00112.271l716 ---|
05576 M02S00113.271l716 ---| SRSAL EQU */5-SRSA/5 BLOCK LENGTH
05577 M02S00114.271l716 ---|
| Line S03158 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05578 M01S03158.271l716 ---| SPACE 4,10
05579 M01S03159.271l716 ---|* COMMON DECKS.
05580 M01S03160.271l716 ---|
05581 M01S03161.271l716 ---|
05582 M01S03162.271l716 ---| CET$ SET 1 ASSEMBLE ROUTINE *CET* OF *COMPCPE*
05583 M01S03163.271l716 ---| LIST X
| Line S03164 Modification History |
M01 (Removed by) | ns2153 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05584 M02S03164.271l716 ---|*CALL COMPAST
| Line S03165 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05585 M01S03165.271l716 ---|*CALL COMPCPE
05586 M01S03166.271l716 ---|*CALL COMPSEI
05587 M01S03167.271l716 ---| LIST *
05588 M01S03168.271l716 ---| USE TABLES
05589 M01S03169.271l716 ---| TABLES BSS 0 *3SB* TABLES ORIGIN
05590 M01S03170.271l716 ---| PRS SPACE 4,10
05591 M01S03171.271l716 ---|** PRS - PRESET *3SB*.
05592 M01S03172.271l716 ---|*
05593 M01S03173.271l716 ---|* USES CM - CM+4, AA - AA+4.
| Line S00030 Modification History |
M01 (Added by) | ns2134 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05594 M02S00030.271l716 ---|*
05595 M02S00031.271l716 ---|* MACROS ISTORE.
| Line S03174 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05596 M01S03174.271l716 ---|
05597 M01S03175.271l716 ---|
05598 M01S03176.271l716 ---| PRS SUBR ENTRY/EXIT
05599 M01S03177.271l716 ---| LDN SSTL
05600 M01S03178.271l716 ---| CRD CM
05601 M01S03179.271l716 ---| ADN EJTP-SSTL
05602 M01S03180.271l716 ---| CRD AA
05603 M01S03181.271l716 ---| LDD CM
05604 M01S03182.271l716 ---| SHN 21-5
05605 M01S03183.271l716 ---| MJN PRS1 IF USER ECS IS DISABLED
| Line S03184 Modification History |
M01 (Removed by) | ns2134 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05606 M02S03184.271l716 ---| LDC ** DISABLE USER ECS CHECK
05607 M02S03185.271l716 ---| ORG *-1
05608 M02S03186.271l716 ---| LOC PCAA
05609 M02S03187.271l716 ---| UJN PCA9 AVOID USER ECS CHECK
05610 M02S03188.271l716 ---| LOC *O
05611 M02S03189.271l716 ---| STM PCAA
| Line S00032 Modification History |
M01 (Added by) | ns2134 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05612 M02S00032.271l716 ---| ISTORE PCAA,(UJN PCA9) DISABLE USER ECS CHECK
| Line S03190 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05613 M01S03190.271l716 ---| PRS1 LDD AA PRESET EJT FWA
| Line S03191 Modification History |
M01 (Removed by) | ns22000 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05614 M02S03191.271l716 ---| RAM PTEB-1
| Line S00496 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05615 M02S00496.271l716 ---| RAM SEJB-1
| Line S03192 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05616 M01S03192.271l716 ---| LDD AA+1
| Line S03193 Modification History |
M01 (Removed by) | ns22000 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05617 M02S03193.271l716 ---| STM PTEB
| Line S00497 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05618 M02S00497.271l716 ---| STM SEJB
| Line S03194 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05619 M01S03194.271l716 ---| LDD AA+2 SET START OF EJT SCAN
| Line S03195 Modification History |
M01 (Removed by) | ns22000 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05620 M02S03195.271l716 ---| STM PTEA
| Line S00498 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05621 M02S00498.271l716 ---| STM SEJA
| Line S03196 Modification History |
M01 (Removed by) | ns2153 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05622 M02S03196.271l716 ---| LDM SCJB
05623 M02S03197.271l716 ---| LPN 2
05624 M02S03198.271l716 ---| ZJN PRSX IF *AUTO* HAS BEEN ENTERED
| Line S03199 Modification History |
M01 (Removed by) | ns2134 |
M02 (Removed by) | ns2153 |
M03 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05625 M03S03199.271l716 ---| LDC ** DISABLE *CMS* CALL
05626 M03S03200.271l716 ---| ORG *-1
05627 M03S03201.271l716 ---| LOC CMSE
05628 M03S03202.271l716 ---| PJN CMS10 IF NOT TIME FOR CHECKPOINT PROCESSING
05629 M03S03203.271l716 ---| LOC *O
05630 M03S03204.271l716 ---| STM CMSE
05631 M03S03205.271l716 ---| LDC **
05632 M03S03206.271l716 ---| ORG *-1
05633 M03S03207.271l716 ---| LOC CMSF
05634 M03S03208.271l716 ---| ZJN CMS2 IF CHECKPOINT NOT REQUESTED NO DEVICE
05635 M03S03209.271l716 ---| LOC *O
05636 M03S03210.271l716 ---| STM CMSF
| Line S00033 Modification History |
M01 (Added by) | ns2134 |
M02 (Removed by) | ns2153 |
M03 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05637 M03S00033.271l716 ---| ISTORE CMSE,(PJN CMS10) DISABLE *CMS* CALL
05638 M03S00034.271l716 ---| ISTORE CMSF,(ZJN CMS2)
| Line S03211 Modification History |
M01 (Removed by) | ns2153 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05639 M02S03211.271l716 ---| LJM PRSX RETURN
| Line S00046 Modification History |
M01 (Added by) | ns2153 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05640 M02S00046.271l716 ---| UJN PRSX RETURN
| Line S03212 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05641 M01S03212.271l716 ---| SPACE 4,10
05642 M01S03213.271l716 ---|* *3SB* TABLE DEFINITIONS.
05643 M01S03214.271l716 ---|
05644 M01S03215.271l716 ---|
05645 M01S03216.271l716 ---|** TEVT - POSTED EVENTS.
05646 M01S03217.271l716 ---|* ENTRY = 2 WORDS.
05647 M01S03218.271l716 ---|*
05648 M01S03219.271l716 ---|*T 24/ EV
| Line S03220 Modification History |
M01 (Removed by) | v23l617 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05649 M02S03220.271l716 ---|* EV POSTED EVENT OBTAINED FROM *MTR* VIA *EATM* MONITOR
05650 M02S03221.271l716 ---|* FUNCTION.
| Line S00096 Modification History |
M01 (Added by) | v23l617 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05651 M02S00096.271l716 ---|* EV POSTED EVENT OBTAINED FROM EVT TABLE.
| Line S03222 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05652 M01S03222.271l716 ---|
05653 M01S03223.271l716 ---|
05654 M01S03224.271l716 ---| TEVT EQU TABLES
05655 M01S03225.271l716 ---| SPACE 4,10
05656 M01S03226.271l716 ---|** TOVF - ACCUMULATOR OVERFLOW FLAGS.
05657 M01S03227.271l716 ---|* ENTRY = 1 WORD.
05658 M01S03228.271l716 ---|* INDEXED BY CONTROL POINT NUMBER.
05659 M01S03229.271l716 ---|*
05660 M01S03230.271l716 ---|*T 12/ OF
05661 M01S03231.271l716 ---|* OF OVERFLOW FLAGS FROM *SRUW*.
05662 M01S03232.271l716 ---|
05663 M01S03233.271l716 ---|
| Line S03234 Modification History |
M01 (Removed by) | v23l617 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05664 M02S03234.271l716 ---| TOVF EQU TEVT+30D
| Line S00097 Modification History |
M01 (Added by) | v23l617 |
M02 (Removed by) | 1sj51 |
M03 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05665 M03S00097.271l716 ---| TOVF EQU TEVT+2*MEVC+1
| Line S00001 Modification History |
M01 (Added by) | 1sj51 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05666 M02S00001.271l716 ---| TOVF EQU TJAM-40
05667 M02S00002.271l716 ---|
05668 M02S00003.271l716 ---| ERRPL TEVT+2*MEVC+1-TOVF *TEVT* OVERFLOWS INTO *TOVF*
| Line S03235 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05669 M01S03235.271l716 ---| SPACE 4,10
05670 M01S03236.271l716 ---|* OVERFLOW CHECKS.
05671 M01S03237.271l716 ---|
05672 M01S03238.271l716 ---|
05673 M01S03239.271l716 ---| OVERFLOW O3SB,TJAM
| Line S03240 Modification History |
M01 (Removed by) | ns2153 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05674 M02S03240.271l716 ---| ERRNG TJAM-OVL0-ZAUL ENSURE *0AU* LWA .LT. FWA *TJAM*
| Line S03241 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05675 M01S03241.271l716 ---| SPACE 4,10
05676 M01S03242.271l716 ---| QUAL
05677 M01S03243.271l716 ---| TTL 1SJ/3SC - SCHEDULE INPUT FILES TO EJT.
| Line S00533 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05678 M01S00533.271l716 +++| TTL 1SJ/3SB - SCHEDULE INPUT FILES TO EJT.
05679 M00S03244.1sj +++| TITLE
| Line S03245 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05680 M01S03245.271l716 ---| IDENT 3SC,O3SC SCHEDULE INPUT FILES TO EJT.
| Line S00534 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05681 M01S00534.271l716 +++| IDENT 3SB,O3SB SCHEDULE INPUT FILES TO EJT.
05682 M00S03246.1sj +++| BASE M
| Line S03247 Modification History |
M01 (Removed by) | ns2437 |
Seq # *Modification Id* Act
----------------------------+
05683 M01S03247.ns2437 ---| LIST F,X
05684 M00S03248.1sj +++| SST
05685 M00S03249.1sj +++|*COMMENT 1SJ - SCHEDULE INPUT FILES TO EJT.
| Line S03250 Modification History |
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act
----------------------------+
05686 M01S03250.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORPORATION. 1982.
| Line S00003 Modification History |
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act
----------------------------+
05687 M01S00003.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992.
| Line S03251 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05688 M01S03251.271l716 ---| ORG O3SC
05689 M01S03252.271l716 ---| QUAL 3SC
| Line S00535 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05690 M01S00535.271l716 +++| ORG O3SB
05691 M01S00536.271l716 +++| QUAL 3SB
05692 M00S03253.1sj +++| QUAL$ SET 1
| Line S03254 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05693 M01S03254.271l716 ---| 3SC SPACE 4,15
| Line S00537 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05694 M01S00537.271l716 +++| 3SB SPACE 4,15
05695 M00S03255.1sj +++|** SIE - SCHEDULE INPUT FILES TO EJT.
05696 M00S03256.1sj +++|*
05697 M00S03257.1sj +++|* SCHEDULE AS MANY INPUT FILES TO THE EJT AS POSSIBLE, UP TO A
05698 M00S03258.1sj +++|* LIMIT OF *TIOOL*. AN INPUT FILE QFT ENTRY IS CONSIDERED
05699 M00S03259.1sj +++|* ELIGIBLE FOR SCHEDULING ONLY IF THE FOLLOWING CONDITIONS ARE
05700 M00S03260.1sj +++|* MET -
05701 M00S03261.1sj +++|* 1. THE FILE TYPE IS INPUT.
05702 M00S03262.1sj +++|* 2. THE QFT ENTRY IS NOT ASSIGNED TO AN EJT ENTRY.
05703 M00S03263.1sj +++|* 3. SCHEDULING THE INPUT FILE TO THE EJT WOULD NOT
05704 M00S03264.1sj +++|* INCREASE THE SERVICE CLASS JOB COUNT ABOVE THE
05705 M00S03265.1sj +++|* ALLOWABLE MAXIMUM.
05706 M00S03266.1sj +++|* 4. THE QFT ENTRY TIME FIELD IS NON-ZERO.
05707 M00S03267.1sj +++|
05708 M00S03268.1sj +++|
05709 M00S03269.1sj +++| SIE SUBR ENTRY/EXIT
| Line S03270 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05710 M01S03270.271l716 ---| RJM PRS PRESET *3SC*
| Line S00538 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05711 M01S00538.271l716 +++| RJM PRS PRESET *3SB*
| Line S03271 Modification History |
M01 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
05712 M01S03271.1sj50 ---| LDN MXJC-1 INITIALIZE *TJCT* TABLE
05713 M01S03272.1sj50 ---| STD T1
05714 M01S03273.1sj50 ---| SIE1 LDN 0
05715 M01S03274.1sj50 ---| STM TJCT,T1
05716 M01S03275.1sj50 ---| SOD T1 DECREMENT TABLE INDEX
05717 M01S03276.1sj50 ---| PJN SIE1 IF NOT DONE
05718 M01S03277.1sj50 ---| RJM SEJ SCAN EJT
05719 M00S03278.1sj +++| ZJN SIE2 IF QFT SCHEDULING SHOULD NOT BE PERFORMED
05720 M00S03279.1sj +++| RJM SIQ SCAN QFT
05721 M00S03280.1sj +++| LDD T7
05722 M00S03281.1sj +++| LMN TIOOL
05723 M00S03282.1sj +++| ZJN SIE2 IF *TIOO* TABLE IS EMPTY
| Line S03283 Modification History |
M01 (Removed by) | ns2181 |
Seq # *Modification Id* Act
----------------------------+
05724 M01S03283.ns2181 ---| RJM CEE CREATE EJT ENTRIES
| Line S00017 Modification History |
M01 (Added by) | ns2181 |
M02 (Removed by) | ns2181b |
Seq # *Modification Id* Act
----------------------------+
05725 M02S00017.ns2181b ---| LDD SC
05726 M02S00018.ns2181b ---| LMN DSSC
05727 M02S00019.ns2181b ---| NJN SIE1.1 IF NOT DEADSTART SEQUENCING JOB
05728 M02S00020.ns2181b ---| LDM SCJB ENABLE EJT SCHEDULING FOR THIS JOB ONLY
05729 M02S00021.ns2181b ---| SCN 12
05730 M02S00022.ns2181b ---| STM SCJB
05731 M02S00023.ns2181b ---| SIE1.1 RJM CEE CREATE EJT ENTRIES
| Line S00017 Modification History |
M01 (Added by) | ns2181b |
Seq # *Modification Id* Act
----------------------------+
05732 M01S00017.ns2181b +++| RJM CEE CREATE EJT ENTRIES
05733 M00S03284.1sj +++|
05734 M00S03285.1sj +++|* UPDATE THE JOB COUNTS IN THE JOB CONTROL AREA.
05735 M00S03286.1sj +++|
05736 M00S03287.1sj +++| SIE2 LDN MXJC INITIALIZE JCB INDEX
05737 M00S03288.1sj +++| STD T1
05738 M00S03289.1sj +++| SEI3 SOD T1 DECREMENT JCB INDEX
| Line S03290 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05739 M01S03290.ns22000 ---| MJN SIEX IF ALL JCB-S WERE UPDATED
| Line S00499 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05740 M01S00499.ns22000 +++| ZJP SIE5 IF ALL JCB-S WERE UPDATED
05741 M00S03291.1sj +++| RJM RJC CALCULATE JCB ADDRESS
| Line S03292 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05742 M01S03292.ns22000 ---| ADN JCTT
| Line S00500 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05743 M01S00500.ns22000 +++| ADN SVJT
05744 M01S00501.ns22000 +++| CRD BB
05745 M01S00502.ns22000 +++| ADN JCTT-SVJT
05746 M00S03293.1sj +++| CRD AA
| Line S03294 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05747 M01S03294.ns22000 ---| LDM TJCT,T1
| Line S00503 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05748 M01S00503.ns22000 +++| LDD AA
05749 M01S00504.ns22000 +++| SBD BB+3
05750 M01S00505.ns22000 +++| MJN SIE4 IF JOB COUNT WAS LESS THAN JOB LIMIT
05751 M01S00506.ns22000 +++| LDM TJCT,T1
05752 M01S00507.ns22000 +++| SBD BB+3
05753 M01S00508.ns22000 +++| PJN SIE4 IF NEW JOB COUNT NOT BELOW JOB LIMIT
05754 M01S00509.ns22000 +++| AOM SIEA INDICATE TO ISSUE EVENT
05755 M01S00510.ns22000 +++| SIE4 LDM TJCT,T1
05756 M00S03295.1sj +++| STD AA
| Line S03296 Modification History |
M01 (Removed by) | ns2285 |
Seq # *Modification Id* Act
----------------------------+
05757 M01S03296.ns2285 ---| LDD T1
| Line S00001 Modification History |
M01 (Added by) | ns2285 |
Seq # *Modification Id* Act
----------------------------+
05758 M01S00001.ns2285 +++| LDD AA+1
05759 M01S00002.ns2285 +++| ZJN SIE4.1 IF NO JOBS WAITING
05760 M01S00003.ns2285 +++| SOD AA+1 DECREMENT QFT TIME-OUT
05761 M01S00004.ns2285 +++| SIE4.1 LDD T1
05762 M00S03297.1sj +++| RJM RJC CALCULATE JCB ADDRESS
05763 M00S03298.1sj +++| ADN JCTT
05764 M00S03299.1sj +++| CWD AA UPDATE JOB COUNT
05765 M00S03300.1sj +++| UJN SEI3 CONTINUE UPDATING JOB COUNTS
| Line S00511 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05766 M01S00511.ns22000 +++| SIE5 LDC 0
05767 M01S00512.ns22000 +++| SIEA EQU *-1 (NONZERO IF TO ISSUE EVENT)
05768 M01S00513.ns22000 +++| ZJN SIE6 IF TO NOT ISSUE EVENT
05769 M01S00514.ns22000 +++| LDN ZERL ISSUE JOB COUNT BELOW SERVICE LIMIT EVENT
05770 M01S00515.ns22000 +++| CRD CM
05771 M01S00516.ns22000 +++| LDN SCFE
05772 M01S00517.ns22000 +++| STD CM+4
05773 M01S00518.ns22000 +++| MONITOR EATM
05774 M01S00519.ns22000 +++| SIE6 LJM SIEX RETURN
05775 M01S00520.ns22000 +++|
05776 M00S03301.1sj +++| CEE SPACE 4,15
05777 M00S03302.1sj +++|** CEE - CREATE EJT ENTRIES.
05778 M00S03303.1sj +++|*
05779 M00S03304.1sj +++|* BUILD AN EJT ENTRY FOR EACH ENTRY IN THE *TIOO* TABLE.
05780 M00S03305.1sj +++|*
05781 M00S03306.1sj +++|* ENTRY (T7) = INDEX OF FIRST *TIOO* ENTRY.
05782 M00S03307.1sj +++|*
05783 M00S03308.1sj +++|* USES T1, T7, CM - CM+4, AA - AA+4, BB - BB+4, EJ - EJ+4,
05784 M00S03309.1sj +++|* EO, IO, SC.
05785 M00S03310.1sj +++|*
05786 M00S03311.1sj +++|* CALLS CET, EJA, IOA, IUT.
05787 M00S03312.1sj +++|*
05788 M00S03313.1sj +++|* MACROS MONITOR.
05789 M00S03314.1sj +++|
05790 M00S03315.1sj +++|
05791 M00S03316.1sj +++| CEE SUBR ENTRY/EXIT
05792 M00S03317.1sj +++|
05793 M00S03318.1sj +++|* GET THE ORDINAL OF THE NEXT AVAILABLE EJT SLOT.
05794 M00S03319.1sj +++|
05795 M00S03320.1sj +++| CEE1 LDN 0 GET EJT ENTRY
05796 M00S03321.1sj +++| STD CM+1
| Line S00001 Modification History |
M01 (Added by) | 1sj17 |
Seq # *Modification Id* Act
----------------------------+
05797 M01S00001.1sj17 +++| STD EO
05798 M01S00002.1sj17 +++| LDD MA SET INITIAL EJT DATA
05799 M01S00003.1sj17 +++| CWM CEEA,ON
05800 M00S03322.1sj +++| LDN /CPS/PEJT
05801 M00S03323.1sj +++| STD CM+2
| Line S03324 Modification History |
M01 (Removed by) | 1sj36 |
Seq # *Modification Id* Act
----------------------------+
05802 M01S03324.1sj36 ---| LDM TIOO+2*TIOOL,T7 SAVE SERVICE CLASS
05803 M01S03325.1sj36 ---| STD SC
| Line S00001 Modification History |
M01 (Added by) | 1sj36 |
Seq # *Modification Id* Act
----------------------------+
05804 M01S00001.1sj36 +++| LDM TIOO+2*TIOOL,T7 CHECK SERVICE CLASS
05805 M00S03326.1sj +++| LMN SYSC
05806 M00S03327.1sj +++| ZJN CEE1.1 IF SYSTEM JOB
05807 M00S03328.1sj +++| LMN SYSC&DSSC
05808 M00S03329.1sj +++| ZJN CEE1.1 IF DEADSTART SEQUENCING JOB
05809 M00S03330.1sj +++| LMN DSSC&SSSC
05810 M00S03331.1sj +++| NJN CEE1.2 IF NOT SUBSYSTEM
05811 M00S03332.1sj +++| CEE1.1 LDC 4000 SET SYSTEM ORIGIN FLAG
05812 M00S03333.1sj +++| RAD CM+2
05813 M00S03334.1sj +++| CEE1.2 MONITOR MTRM
05814 M00S03335.1sj +++| LDD CM+1
05815 M00S03336.1sj +++| ZJN CEE4 IF NO EJT ENTRY AVAILABLE
05816 M00S03337.1sj +++|
05817 M00S03338.1sj +++|* USE THE *UTEM* MONITOR FUNCTION TO SET THE QFT ENTRY
05818 M00S03339.1sj +++|* INTERLOCK AND VERIFY THE ENTRY IS STILL ACCEPTABLE FOR
05819 M00S03340.1sj +++|* SCHEDULING.
05820 M00S03341.1sj +++|
05821 M00S03342.1sj +++| CEE2 STD EO SAVE EJT ORDINAL
| Line S03343 Modification History |
M01 (Removed by) | 1sj17 |
Seq # *Modification Id* Act
----------------------------+
05822 M01S03343.1sj17 ---| LDM TIOO,T7 GET QFT ORDINAL FROM *TIOO* TABLE
| Line S00004 Modification History |
M01 (Added by) | 1sj17 |
Seq # *Modification Id* Act
----------------------------+
05823 M01S00004.1sj17 +++| CEE2.1 LDM TIOO,T7 GET QFT ORDINAL FROM *TIOO* TABLE
05824 M00S03344.1sj +++| STD IO
| Line S00002 Modification History |
M01 (Added by) | 1sj36 |
Seq # *Modification Id* Act
----------------------------+
05825 M01S00002.1sj36 +++| LDM TIOO+2*TIOOL,T7 SAVE SERVICE CLASS
05826 M01S00003.1sj36 +++| STD SC
05827 M00S03345.1sj +++| LDC 0*10000+1S17D
05828 M00S03346.1sj +++| RJM IUT ISSUE *UTEM* MONITOR FUNCTION
05829 M00S03347.1sj +++| ZJN CEE5 IF INTERLOCK GOTTEN
05830 M00S03348.1sj +++| CEE3 SOM TJCT,SC DECREMENT JOB COUNT
05831 M00S03349.1sj +++| CEE4 AOD T7
05832 M00S03350.1sj +++| LMN TIOOL
| Line S03351 Modification History |
M01 (Removed by) | 1sj17 |
Seq # *Modification Id* Act
----------------------------+
05833 M01S03351.1sj17 ---| NJP CEE1 IF *TIOO* SCAN NOT COMPLETE
05834 M01S03352.1sj17 ---| LJM CEEX RETURN
| Line S00005 Modification History |
M01 (Added by) | 1sj17 |
Seq # *Modification Id* Act
----------------------------+
05835 M01S00005.1sj17 +++| ZJN CEE4.1 IF *TIOO* SCAN COMPLETE
05836 M01S00006.1sj17 +++| LDD EO
05837 M01S00007.1sj17 +++| NJN CEE2.1 IF UNUSED EJT ENTRY PRESENT
05838 M01S00008.1sj17 +++| LJM CEE1 GET ANOTHER EJT ENTRY
05839 M01S00009.1sj17 +++|
05840 M01S00010.1sj17 +++| CEE4.1 LDD EO
05841 M01S00011.1sj17 +++| ZJN CEE4.2 IF NO EJT ENTRY TO RETURN
05842 M01S00012.1sj17 +++| STD CM+1 RETURN EJT ENTRY
05843 M01S00013.1sj17 +++| LDN /CPS/PEJT
05844 M01S00014.1sj17 +++| STD CM+2
05845 M01S00015.1sj17 +++| MONITOR MTRM
05846 M01S00016.1sj17 +++| CEE4.2 LJM CEEX RETURN
05847 M00S03353.1sj +++|
05848 M00S03354.1sj +++| CEE5 RJM IOA CALCULATE QFT ENTRY ADDRESS
05849 M00S03355.1sj +++| ADK JSNQ
05850 M00S03356.1sj +++| CRD EJ
05851 M00S03357.1sj +++| ADN ENTQ-JSNQ
05852 M00S03358.1sj +++| CRD AA
| Line S03359 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05853 M01S03359.ns22000 ---| ADN SCLQ-ENTQ
| Line S00521 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05854 M01S00521.ns22000 +++| ADN INSQ-ENTQ
05855 M01S00522.ns22000 +++| CRD CM
05856 M01S00523.ns22000 +++| ADN SCLQ-INSQ
05857 M00S03360.1sj +++| CRD BB
| Line S00524 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05858 M01S00524.ns22000 +++| LDD CM+3 SAVE ACCESS LEVEL LIMITS
| Line S00525 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2202 |
Seq # *Modification Id* Act
----------------------------+
05859 M02S00525.ns2202 ---| LPN 77
| Line S00001 Modification History |
M01 (Added by) | ns2202 |
Seq # *Modification Id* Act
----------------------------+
05860 M01S00001.ns2202 +++| LPC 777
| Line S00526 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05861 M01S00526.ns22000 +++| STM CEEB
05862 M00S03361.1sj +++|
05863 M00S03362.1sj +++|* VERIFY ENTRY.
05864 M00S03363.1sj +++|
05865 M00S03364.1sj +++| LDD BB
05866 M00S03365.1sj +++| SHN -6
05867 M00S03366.1sj +++| LMD SC
05868 M00S03367.1sj +++| NJN CEE6 IF SERVICE CLASS CHANGED
05869 M00S03368.1sj +++| LDD EJ+4
05870 M00S03369.1sj +++| ERRNZ INQF CODE ASSUMES *INQF* = 0
05871 M00S03370.1sj +++| LPC 7002
05872 M00S03371.1sj +++| ZJN CEE7 IF *TYPE* AND *STAT* FIELDS ARE OK
05873 M00S03372.1sj +++| CEE6 LDC 0*10000+1S17D+1S16D CLEAR INTERLOCK
05874 M00S03373.1sj +++| RJM IUT ISSUE *UTEM* MONITOR FUNCTION
| Line S03374 Modification History |
M01 (Removed by) | 1sj17 |
Seq # *Modification Id* Act
----------------------------+
05875 M01S03374.1sj17 ---| LDD EO RETURN
05876 M01S03375.1sj17 ---| STD CM+1
05877 M01S03376.1sj17 ---| LDN /CPS/PEJT
05878 M01S03377.1sj17 ---| STD CM+2
05879 M01S03378.1sj17 ---| MONITOR MTRM
05880 M00S03379.1sj +++| LJM CEE3 CONTINUE PROCESSING *TIOO* TABLE
05881 M00S03380.1sj +++|
05882 M00S03381.1sj +++|* CREATE EJT ENTRY.
05883 M00S03382.1sj +++|
05884 M00S03383.1sj +++| CEE7 LDD BB
05885 M00S03384.1sj +++| LPN 17
| Line S03385 Modification History |
M01 (Removed by) | ns2134 |
Seq # *Modification Id* Act
----------------------------+
05886 M01S03385.ns2134 ---| LMN TXOT
| Line S00035 Modification History |
M01 (Added by) | ns2134 |
Seq # *Modification Id* Act
----------------------------+
05887 M01S00035.ns2134 +++| LMK IAOT
| Line S00001 Modification History |
M01 (Added by) | ns2117 |
Seq # *Modification Id* Act
----------------------------+
05888 M01S00001.ns2117 +++| STD T1
05889 M00S03386.1sj +++| ZJN CEE8 IF INTERACTIVE JOB
05890 M00S03387.1sj +++| LDN NICS&OLCS
05891 M00S03388.1sj +++| CEE8 LMN OLCS SET CONNECTION STATUS
05892 M00S03389.1sj +++| SHN 7
05893 M00S03390.1sj +++| LMK PRJS*2 SET JOB STATUS
05894 M00S03391.1sj +++| STD EJ+4
05895 M00S03392.1sj +++| LDN 0
05896 M00S03393.1sj +++| STD AA+2
05897 M00S03394.1sj +++| STD BB+3
| Line S00002 Modification History |
M01 (Added by) | ns2117 |
Seq # *Modification Id* Act
----------------------------+
05898 M01S00002.ns2117 +++| LDD T1
05899 M01S00003.ns2117 +++| ZJN CEE8.1 IF INTERACTIVE SERVICE CLASS
05900 M00S03395.1sj +++| LDD SC
05901 M00S03396.1sj +++| LMN SSSC
05902 M00S03397.1sj +++| NJN CEE9 IF NOT A SUBSYSTEM
| Line S03398 Modification History |
M01 (Removed by) | ns2117 |
Seq # *Modification Id* Act
----------------------------+
05903 M01S03398.ns2117 ---| LDC 4000 SET NO-RERUN FLAG
| Line S00004 Modification History |
M01 (Added by) | ns2117 |
Seq # *Modification Id* Act
----------------------------+
05904 M01S00004.ns2117 +++| CEE8.1 LDC 4000 SET NO-RERUN FLAG
05905 M00S03399.1sj +++| RAD AA+2
05906 M00S03400.1sj +++|
05907 M00S03401.1sj +++|* CALCULATE INITIAL SCHEDULING PRIORITY.
05908 M00S03402.1sj +++|
| Line S03403 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05909 M01S03403.271l716 ---| CEE9 LDM TEPB+4*MXJC,SC SAVE INITIAL PRIORITY FOR *CET*
| Line S00539 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
05910 M01S00539.271l716 +++| CEE9 LDM TEPB+3*MXJC,SC SAVE INITIAL PRIORITY FOR *CET*
05911 M00S03404.1sj +++| STD T1
05912 M00S03405.1sj +++| LDD SC
05913 M00S03406.1sj +++| SHN 14
05914 M00S03407.1sj +++| LMN EXQT
05915 M00S03408.1sj +++| RJM CET CALCULATE ENTRY TIME
05916 M00S03409.1sj +++| LDD T1 SAVE CALCULATED ENTRY TIME IN *SCHE* IMAGE
05917 M00S03410.1sj +++| STD AA+3
05918 M00S03411.1sj +++| LDD T2
05919 M00S03412.1sj +++| STD AA+4
05920 M00S03413.1sj +++| LDN AFFL+DNFL SET INITIAL CM FL
05921 M00S03414.1sj +++| STD BB+4
| Line S03415 Modification History |
M01 (Removed by) | ns2134 |
Seq # *Modification Id* Act
----------------------------+
05922 M01S03415.ns2134 ---| LDN ZERL
05923 M01S03416.ns2134 ---| CRD CM
| Line S00527 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2134 |
Seq # *Modification Id* Act
----------------------------+
05924 M02S00527.ns2134 ---| LDC * COPY ACCESS LEVEL LIMITS FROM QFT
05925 M02S00528.ns2134 ---| CEEB EQU *-1 (ACCESS LEVEL LIMITS)
05926 M02S00529.ns2134 ---| STD CM+2
| Line S00036 Modification History |
M01 (Added by) | ns2134 |
Seq # *Modification Id* Act
----------------------------+
05927 M01S00036.ns2134 +++| CEEC LDN ** (SYSTEM SECURITY MODE)
05928 M01S00037.ns2134 +++| STD T1
05929 M01S00038.ns2134 +++| ZJN CEE10 IF UNSECURED SYSTEM
05930 M01S00039.ns2134 +++| LDM CEEB CHECK ACCESS LEVEL LIMITS
| Line S00040 Modification History |
M01 (Added by) | ns2134 |
M02 (Removed by) | ns2202 |
Seq # *Modification Id* Act
----------------------------+
05931 M02S00040.ns2202 ---| SHN -3+22
| Line S00002 Modification History |
M01 (Added by) | ns2202 |
Seq # *Modification Id* Act
----------------------------+
05932 M01S00002.ns2202 +++| SHN -6+22
| Line S00041 Modification History |
M01 (Added by) | ns2134 |
Seq # *Modification Id* Act
----------------------------+
05933 M01S00041.ns2134 +++| STD CM+4 LOWER ACCESS LEVEL LIMIT
| Line S00042 Modification History |
M01 (Added by) | ns2134 |
M02 (Removed by) | ns2202 |
Seq # *Modification Id* Act
----------------------------+
05934 M02S00042.ns2202 ---| SHN -22+3
| Line S00003 Modification History |
M01 (Added by) | ns2202 |
Seq # *Modification Id* Act
----------------------------+
05935 M01S00003.ns2202 +++| SHN -22+6
05936 M01S00004.ns2202 +++| LPN 7
| Line S00043 Modification History |
M01 (Added by) | ns2134 |
Seq # *Modification Id* Act
----------------------------+
05937 M01S00043.ns2134 +++| STD CM+3 UPPER ACCESS LEVEL LIMIT
05938 M01S00044.ns2134 +++| LDD BB SET ORIGIN TYPE
05939 M01S00045.ns2134 +++| LPN 17
05940 M01S00046.ns2134 +++| STD CM+2
05941 M01S00047.ns2134 +++| LDN /CPS/VJLS VALIDATE JOB LIMITS
05942 M01S00048.ns2134 +++| STD CM+1
05943 M01S00049.ns2134 +++| MONITOR VSAM
05944 M01S00050.ns2134 +++| LDD CM+1
05945 M01S00051.ns2134 +++| STD T1 SAVE RETURN STATUS
05946 M01S00052.ns2134 +++| CEE10 LDK ZERL
05947 M01S00053.ns2134 +++| CRD CM
05948 M01S00054.ns2134 +++| LDM CEEB SET ACCESS LEVEL LIMITS
| Line S00055 Modification History |
M01 (Added by) | ns2134 |
M02 (Removed by) | ns2202 |
Seq # *Modification Id* Act
----------------------------+
05949 M02S00055.ns2202 ---| STD CM+2
| Line S00005 Modification History |
M01 (Added by) | ns2202 |
Seq # *Modification Id* Act
----------------------------+
05950 M01S00005.ns2202 +++| LPN 7
05951 M01S00006.ns2202 +++| STD CM+2
05952 M01S00007.ns2202 +++| LDM CEEB
05953 M01S00008.ns2202 +++| SCN 77
05954 M01S00009.ns2202 +++| SHN -3
05955 M01S00010.ns2202 +++| RAD CM+2
| Line S00056 Modification History |
M01 (Added by) | ns2134 |
Seq # *Modification Id* Act
----------------------------+
05956 M01S00056.ns2134 +++| LDD T1
05957 M01S00057.ns2134 +++| ZJN CEE11 IF LIMITS ARE VALID
05958 M01S00058.ns2134 +++| LDK SYET SET ERROR FLAG
05959 M01S00059.ns2134 +++| STD CM+1
05960 M00S03417.1sj +++|
05961 M00S03418.1sj +++|* WRITE EJT ENTRY TO CM.
05962 M00S03419.1sj +++|
| Line S03420 Modification History |
M01 (Removed by) | ns2134 |
Seq # *Modification Id* Act
----------------------------+
05963 M01S03420.ns2134 ---| RJM EJA CALCULATE EJT ENTRY ADDRESS
| Line S00060 Modification History |
M01 (Added by) | ns2134 |
Seq # *Modification Id* Act
----------------------------+
05964 M01S00060.ns2134 +++| CEE11 RJM EJA CALCULATE EJT ENTRY ADDRESS
05965 M00S03421.1sj +++| ADN SCHE
05966 M00S03422.1sj +++| CWD AA
05967 M00S03423.1sj +++| ADN PRFE-SCHE
05968 M00S03424.1sj +++| CWD CM
05969 M00S03425.1sj +++| ADN SCLE-PRFE
05970 M00S03426.1sj +++| CWD BB
05971 M00S03427.1sj +++| SBN SCLE-JSNE
05972 M00S03428.1sj +++| CWD EJ
05973 M00S03429.1sj +++|
05974 M00S03430.1sj +++|* RETURN QFT ENTRY.
05975 M00S03431.1sj +++|
05976 M00S03432.1sj +++| LDD IO
05977 M00S03433.1sj +++| STD CM+1
05978 M00S03434.1sj +++| LDN /CPS/PQFT
05979 M00S03435.1sj +++| STD CM+2
05980 M00S03436.1sj +++| MONITOR MTRM
| Line S00017 Modification History |
M01 (Added by) | 1sj17 |
Seq # *Modification Id* Act
----------------------------+
05981 M01S00017.1sj17 +++| STD EO CLEAR EJT ORDINAL
05982 M00S03437.1sj +++| LJM CEE4 CONTINUE PROCESSING *TIOO* TABLE
| Line S00018 Modification History |
M01 (Added by) | 1sj17 |
Seq # *Modification Id* Act
----------------------------+
05983 M01S00018.1sj17 +++|
05984 M01S00019.1sj17 +++|
| Line S00020 Modification History |
M01 (Added by) | 1sj17 |
M02 (Removed by) | 1sj20 |
Seq # *Modification Id* Act
----------------------------+
05985 M02S00020.1sj20 ---| CEEA VFD 24/4L9999,36/0 INITIAL EJT DATA
| Line S00001 Modification History |
M01 (Added by) | 1sj20 |
Seq # *Modification Id* Act
----------------------------+
05986 M01S00001.1sj20 +++| CEEA VFD 24/4L****,36/1 INITIAL EJT DATA
| Line S00061 Modification History |
M01 (Added by) | ns2134 |
Seq # *Modification Id* Act
----------------------------+
05987 M01S00061.ns2134 +++| CEEB CON 0 ACCESS LEVEL LIMITS
05988 M00S03438.1sj +++| FLP SPACE 4,25
05989 M00S03439.1sj +++|** FLP - FIND LOWEST PRIORITY JOB.
05990 M00S03440.1sj +++|*
05991 M00S03441.1sj +++|* SCAN THE *TIOO* TABLE TO FIND THE LOWEST PRIORITY JOB.
05992 M00S03442.1sj +++|*
05993 M00S03443.1sj +++|* ENTRY (A) = 0 IF THE LOWEST PRIORITY JOB OF THE ENTIRE
05994 M00S03444.1sj +++|* *TIOO* TABLE IS TO BE FOUND.
05995 M00S03445.1sj +++|* (A) .NE. 0 IF THE LOWEST PRIORITY JOB OF SERVICE CLASS
05996 M00S03446.1sj +++|* *SC* IS TO BE FOUND.
05997 M00S03447.1sj +++|* (SC) = SERVICE CLASS IF (A) .NE. 0.
05998 M00S03448.1sj +++|* (T7) = CURRENT *TIOO* INDEX.
05999 M00S03449.1sj +++|*
06000 M00S03450.1sj +++|* EXIT (A) = *TIOO* INDEX OF LOWEST PRIORITY JOB.
06001 M00S03451.1sj +++|* (A) = 7777 IF CALLER REQUESTED LOWEST PRIORITY JOB OF
06002 M00S03452.1sj +++|* A SERVICE CLASS BUT *TIOO* TABLE CONTAINS NO
06003 M00S03453.1sj +++|* ENTRIES FOR JOBS OF THE SPECIFIED SERVICE
06004 M00S03454.1sj +++|* CLASS; OR THE *TIOO* TABLE IS EMPTY.
06005 M00S03455.1sj +++|* (T4) = PRIORITY.
06006 M00S03456.1sj +++|* (T5) = *TIOO* INDEX.
06007 M00S03457.1sj +++|*
06008 M00S03458.1sj +++|* USES T3 - T5.
06009 M00S03459.1sj +++|
06010 M00S03460.1sj +++|
06011 M00S03461.1sj +++| FLP4 LDD T5
06012 M00S03462.1sj +++|
06013 M00S03463.1sj +++| FLP SUBR ENTRY/EXIT
06014 M00S03464.1sj +++| STM FLPA SET/CLEAR SERVICE CLASS FLAG
06015 M00S03465.1sj +++| LCN 0 INITIALIZE LOWEST PRIORITY
06016 M00S03466.1sj +++| STD T4
06017 M00S03467.1sj +++| STD T5 PRESET EXIT CONDITION
06018 M00S03468.1sj +++| LDD T7 INITIALIZE *TIOO* INDEX
06019 M00S03469.1sj +++| STD T3
06020 M00S03470.1sj +++| FLP1 LMN TIOOL
06021 M00S03471.1sj +++| ZJN FLP4 IF *TIOO* SCAN IS COMPLETE
06022 M00S03472.1sj +++| LDC **
06023 M00S03473.1sj +++| FLPA EQU *-1 (SERVICE CLASS FLAG)
06024 M00S03474.1sj +++| ZJN FLP2 IF ALL SERVICE CLASSES WILL BE CONSIDERED
06025 M00S03475.1sj +++| LDM TIOO+2*TIOOL,T3
06026 M00S03476.1sj +++| LMD SC
06027 M00S03477.1sj +++| NJN FLP3 IF WRONG SERVICE CLASS
06028 M00S03478.1sj +++| FLP2 LDM TIOO+1*TIOOL,T3
06029 M00S03479.1sj +++| SBD T4
06030 M00S03480.1sj +++| PJN FLP3 IF PRIORITY .GE. CURRENT LOWEST
06031 M00S03481.1sj +++| RAD T4 SET NEW LOWEST PRIORITY
06032 M00S03482.1sj +++| LDD T3 SAVE *TIOO* INDEX
06033 M00S03483.1sj +++| STD T5
06034 M00S03484.1sj +++| FLP3 AOD T3 INCREMENT *TIOO* INDEX
06035 M00S03485.1sj +++| UJN FLP1 CONTINUE SCAN
06036 M00S03486.1sj +++| IOA SPACE 4,10
06037 M00S03487.1sj +++|** IOA - CALCULATE QFT ENTRY ADDRESS.
06038 M00S03488.1sj +++|*
06039 M00S03489.1sj +++|* ENTRY (IO) = QFT ORDINAL.
06040 M00S03490.1sj +++|*
06041 M00S03491.1sj +++|* EXIT (A) = QFT ADDRESS.
06042 M00S03492.1sj +++|*
06043 M00S03493.1sj +++|* MACROS CFI.
06044 M00S03494.1sj +++|
06045 M00S03495.1sj +++|
06046 M00S03496.1sj +++| IOA SUBR ENTRY/EXIT
06047 M00S03497.1sj +++| CFI QFT,IO CALCULATE ENTRY OFFSET
06048 M00S03498.1sj +++| ADC **
06049 M00S03499.1sj +++| IOAA EQU *-1 (IOQT FWA)
06050 M00S03500.1sj +++| UJN IOAX RETURN
| Line S03501 Modification History |
M01 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06051 M01S03501.1sj50 ---| SEJ SPACE 4,25
06052 M01S03502.1sj50 ---|** SEJ - SCAN EJT.
06053 M01S03503.1sj50 ---|*
06054 M01S03504.1sj50 ---|* SCAN THE EJT TO PERFORM THE FOLLOWING FUNCTIONS -
06055 M01S03505.1sj50 ---|*
06056 M01S03506.1sj50 ---|* 1. COUNT THE NUMBER OF EXECUTING JOBS IN EACH SERVICE
| Line S03507 Modification History |
M01 (Removed by) | 1sj31 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06057 M02S03507.1sj50 ---|* CLASS.
| Line S00001 Modification History |
M01 (Added by) | 1sj31 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06058 M02S00001.1sj50 ---|* CLASS. JOBS IN TIMED/EVENT ROLLOUT WAITING TO
06059 M02S00002.1sj50 ---|* CHANGE INTO ANOTHER SERVICE CLASS ARE NOT COUNTED.
| Line S03508 Modification History |
M01 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06060 M01S03508.1sj50 ---|* 2. DETERMINE IF THERE ARE ANY AVAILABLE EJT ENTRIES.
06061 M01S03509.1sj50 ---|* 3. PERFORM SUSPENSION TIME-OUT PROCESSING AS REQUIRED.
06062 M01S03510.1sj50 ---|* 4. CHECK FOR THE EXISTENCE OF THE DEADSTART SEQUENCING
06063 M01S03511.1sj50 ---|* JOB.
06064 M01S03512.1sj50 ---|*
| Line S03513 Modification History |
M01 (Removed by) | ns2153 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06065 M02S03513.1sj50 ---|* ENTRY (EO) = LARGEST EJT ORDINAL.
| Line S00047 Modification History |
M01 (Added by) | ns2153 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06066 M02S00047.1sj50 ---|* ENTRY (SFJS) = LARGEST EJT ORDINAL.
| Line S03514 Modification History |
M01 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06067 M01S03514.1sj50 ---|*
06068 M01S03515.1sj50 ---|* (TM - TM+1) = SECONDS PORTION OF REAL-TIME CLOCK.
06069 M01S03516.1sj50 ---|*
| Line S03517 Modification History |
M01 (Removed by) | 1sj15 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06070 M02S03517.1sj50 ---|* EXIT (A) = 0 IF INPUT FILE SCHEDULING SHOULD NOT BE
06071 M02S03518.1sj50 ---|* PERFORMED.
| Line S00001 Modification History |
M01 (Added by) | 1sj15 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06072 M02S00001.1sj50 ---|* EXIT (A) .LT. 0, IF TO SCHEDULE ONLY SYSTEM JOBS.
06073 M02S00002.1sj50 ---|* (A) = 0, IF DEADSTART SEQUENCING JOB.
06074 M02S00003.1sj50 ---|* (A) .GT. 0, SCHEDULE ANY JOB.
| Line S03519 Modification History |
M01 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06075 M01S03519.1sj50 ---|* (TP) = NUMBER OF AVAILABLE EJT ENTRIES.
06076 M01S03520.1sj50 ---|*
| Line S03521 Modification History |
M01 (Removed by) | 1sj33 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06077 M02S03521.1sj50 ---|* USES CM - CM+4, AA - AA+4, EJ - EJ+4, EO, SC, TP.
| Line S00010 Modification History |
M01 (Added by) | 1sj33 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06078 M02S00010.1sj50 ---|* USES CM - CM+4, AA - AA+4, BB - BB+4, EJ - EJ+4, EO, SC,
06079 M02S00011.1sj50 ---|* TP.
| Line S03522 Modification History |
M01 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06080 M01S03522.1sj50 ---|*
06081 M01S03523.1sj50 ---|* CALLS EJA.
06082 M01S03524.1sj50 ---|*
06083 M01S03525.1sj50 ---|* MACROS CFI, MONITOR.
06084 M01S03526.1sj50 ---|
06085 M01S03527.1sj50 ---|
| Line S00004 Modification History |
M01 (Added by) | 1sj15 |
M02 (Removed by) | 1sj33 |
M03 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06086 M03S00004.1sj50 ---| SEJ8 LDN 1 ALLOW SCHEDULING
| Line S00012 Modification History |
M01 (Added by) | 1sj33 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06087 M02S00012.1sj50 ---| SEJ9 LDN 1 ALLOW SCHEDULING
| Line S00005 Modification History |
M01 (Added by) | 1sj15 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06088 M02S00005.1sj50 ---|
| Line S03528 Modification History |
M01 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06089 M01S03528.1sj50 ---| SEJ SUBR ENTRY/EXIT
06090 M01S03529.1sj50 ---| LDN 0 INITIALIZE EMPTY EJT ENTRY COUNT
06091 M01S03530.1sj50 ---| STD TP
06092 M01S03531.1sj50 ---| LDM EJAA-1 PRESET EJT FWA
06093 M01S03532.1sj50 ---| STM SEJA-1
| Line S00013 Modification History |
M01 (Added by) | 1sj33 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06094 M02S00013.1sj50 ---| STM SEJC-1
| Line S03533 Modification History |
M01 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06095 M01S03533.1sj50 ---| LDM EJAA
06096 M01S03534.1sj50 ---| STM SEJA
| Line S00014 Modification History |
M01 (Added by) | 1sj33 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06097 M02S00014.1sj50 ---| STM SEJC
| Line S03535 Modification History |
M01 (Removed by) | ns2153 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06098 M02S03535.1sj50 ---| LDM SFJA PRESET EJT ORDINAL FOR BACKWARD SCAN
06099 M02S03536.1sj50 ---| SBN 1
| Line S00048 Modification History |
M01 (Added by) | ns2153 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06100 M02S00048.1sj50 ---| LDM SFJS PRESET EJT ORDINAL FOR BACKWARD SCAN
| Line S03537 Modification History |
M01 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06101 M01S03537.1sj50 ---| STD EO
06102 M01S03538.1sj50 ---| SEJ1 CFI EJT,,EO GET EJT ENTRY OFFSET
06103 M01S03539.1sj50 ---| ADC **
06104 M01S03540.1sj50 ---| SEJA EQU *-1 (EJT FWA)
06105 M01S03541.1sj50 ---| ADK JSNE
06106 M01S03542.1sj50 ---| CRD EJ
| Line S03543 Modification History |
M01 (Removed by) | 1sj31 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06107 M02S03543.1sj50 ---| ADN SCLE-JSNE
| Line S00003 Modification History |
M01 (Added by) | 1sj31 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06108 M02S00003.1sj50 ---| ADK SCHE-JSNE
06109 M02S00004.1sj50 ---| CRD AA
| Line S00005 Modification History |
M01 (Added by) | 1sj31 |
M02 (Removed by) | 1sj33 |
M03 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06110 M03S00005.1sj50 ---| ADK SCLE-SCHE
| Line S00015 Modification History |
M01 (Added by) | 1sj33 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06111 M02S00015.1sj50 ---| ADK PRFE-SCHE
06112 M02S00016.1sj50 ---| CRD BB
06113 M02S00017.1sj50 ---| ADK SCLE-PRFE
| Line S03544 Modification History |
M01 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06114 M01S03544.1sj50 ---| CRD CM
06115 M01S03545.1sj50 ---| LDD EJ
06116 M01S03546.1sj50 ---| NJN SEJ4 IF NOT AN EMPTY ENTRY
06117 M01S03547.1sj50 ---| AOD TP INCREMENT EMPTY ENTRY COUNT
06118 M01S03548.1sj50 ---| SEJ2 SOD EO DECREMENT EJT ORDINAL
06119 M01S03549.1sj50 ---| NJN SEJ1 IF EJT SCAN NOT COMPLETE
06120 M01S03550.1sj50 ---| LDD TP
| Line S03551 Modification History |
M01 (Removed by) | 1sj15 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06121 M02S03551.1sj50 ---| NJN SEJ3 IF EMPTY EJT ENTRIES EXIST
| Line S00006 Modification History |
M01 (Added by) | 1sj15 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06122 M02S00006.1sj50 ---| SBN /CPS/EJTR+1
| Line S00007 Modification History |
M01 (Added by) | 1sj15 |
M02 (Removed by) | 1sj33 |
M03 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06123 M03S00007.1sj50 ---| PJN SEJ8 IF NOT ABOVE THRESHOLD
| Line S00018 Modification History |
M01 (Added by) | 1sj33 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06124 M02S00018.1sj50 ---| PJP SEJ9 IF NOT ABOVE THRESHOLD
| Line S00008 Modification History |
M01 (Added by) | 1sj15 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06125 M02S00008.1sj50 ---| LDN 0
| Line S03552 Modification History |
M01 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06126 M01S03552.1sj50 ---| STD CM+1 SELECT *EATM*ENTER EVENT OPTION
06127 M01S03553.1sj50 ---| STD CM+3 STORE EVENT DESCRIPTOR
06128 M01S03554.1sj50 ---| LDN EJJE
06129 M01S03555.1sj50 ---| STD CM+4
06130 M01S03556.1sj50 ---| MONITOR EATM
| Line S00009 Modification History |
M01 (Added by) | 1sj15 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06131 M02S00009.1sj50 ---| LCN 1 FLAG EJT THRESHOLD
| Line S03557 Modification History |
M01 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06132 M01S03557.1sj50 ---| SEJ3 LJM SEJX RETURN
06133 M01S03558.1sj50 ---|
06134 M01S03559.1sj50 ---| SEJ4 LDD CM
06135 M01S03560.1sj50 ---| SHN -6
06136 M01S03561.1sj50 ---| STD SC
06137 M01S03562.1sj50 ---| SBN MXSC
06138 M01S03563.1sj50 ---| PJN SEJ2 IF INVALID SERVICE CLASS
06139 M01S03564.1sj50 ---| ADN MXSC-DSSC
06140 M01S03565.1sj50 ---| ZJN SEJ3 IF DEADSTART SEQUENCING JOB
06141 M01S03566.1sj50 ---| IFNE DSSC,MXJC,1
06142 M01S03567.1sj50 ---| ADK DSSC-MXJC
06143 M01S03568.1sj50 ---| PJN SEJ5 IF NO JCB FOR SERVICE CLASS
| Line S03569 Modification History |
M01 (Removed by) | 1sj31 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06144 M02S03569.1sj50 ---| AOM TJCT,SC INCREMENT ACTIVE JOB COUNT
| Line S00006 Modification History |
M01 (Added by) | 1sj31 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06145 M02S00006.1sj50 ---| LDD EJ+4
06146 M02S00007.1sj50 ---| LPN 77
06147 M02S00008.1sj50 ---| LMN TOJS*2
06148 M02S00009.1sj50 ---| NJN SEJ4.1 IF NOT TIMED/EVENT
06149 M02S00010.1sj50 ---| LDD AA+4
06150 M02S00011.1sj50 ---| LMN SCFE
06151 M02S00012.1sj50 ---| ZJN SEJ5 IF WAITING FOR FULL SERVICE CLASS
06152 M02S00013.1sj50 ---| SEJ4.1 AOM TJCT,SC INCREMENT ACTIVE JOB COUNT
| Line S03570 Modification History |
M01 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06153 M01S03570.1sj50 ---|
06154 M01S03571.1sj50 ---|* PERFORM SUSPENSION TIME-OUT PROCESSING IF *IAF* IS
06155 M01S03572.1sj50 ---|* ACCESSIBLE.
06156 M01S03573.1sj50 ---|
06157 M01S03574.1sj50 ---| SEJ5 LDD EJ+4
| Line S03575 Modification History |
M01 (Removed by) | 1sj31 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06158 M02S03575.1sj50 ---|* UJN SEJ2 (IF SUSPENSION TIME-OUT DISABLED)
| Line S00014 Modification History |
M01 (Added by) | 1sj31 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06159 M02S00014.1sj50 ---|* UJN SEJ7 (IF SUSPENSION TIME-OUT DISABLED)
| Line S03576 Modification History |
M01 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06160 M01S03576.1sj50 ---| SEJB EQU *-1
06161 M01S03577.1sj50 ---| LPC 3776 MASK JOB/CONNECTION STATUS AND ADVANCE
06162 M01S03578.1sj50 ---| LMC SUJS*2+DTCS*200
| Line S03579 Modification History |
M01 (Removed by) | 1sj31 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06163 M02S03579.1sj50 ---| NJN SEJ2 IF NOT DETACHED SUSPENDED JOB OR ROLLING
| Line S00015 Modification History |
M01 (Added by) | 1sj31 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06164 M02S00015.1sj50 ---| NJN SEJ7 IF NOT DETACHED SUSPENDED JOB OR ROLLING
| Line S03580 Modification History |
M01 (Removed by) | 1sj31 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06165 M02S03580.1sj50 ---| RJM EJA CALCULATE EJT ENTRY ADDRESS
06166 M02S03581.1sj50 ---| ADN SCHE
06167 M02S03582.1sj50 ---| CRD AA
| Line S03583 Modification History |
M01 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06168 M01S03583.1sj50 ---| LDD AA+3
06169 M01S03584.1sj50 ---| SBD TM
06170 M01S03585.1sj50 ---| MJN SEJ6 IF SUSPENSION TIME-OUT
06171 M01S03586.1sj50 ---| NJN SEJ7 IF NOT SUSPENSION TIME-OUT
06172 M01S03587.1sj50 ---| LDD AA+4
06173 M01S03588.1sj50 ---| SBD TM+1
06174 M01S03589.1sj50 ---| PJN SEJ7 IF NOT SUSPENSION TIME-OUT
06175 M01S03590.1sj50 ---|
06176 M01S03591.1sj50 ---|* SET *STET* ERROR FLAG.
06177 M01S03592.1sj50 ---|
| Line S03593 Modification History |
M01 (Removed by) | 1sj33 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06178 M02S03593.1sj50 ---| SEJ6 LDD EJ SAVE JSN FOR *CEFM*
| Line S00019 Modification History |
M01 (Added by) | 1sj33 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06179 M02S00019.1sj50 ---| SEJ6 LDD BB+1
06180 M02S00020.1sj50 ---| NJN SEJ8 IF ERROR FLAG ALREADY SET
06181 M02S00021.1sj50 ---| LDD EJ SAVE JSN FOR *CEFM*
| Line S03594 Modification History |
M01 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06182 M01S03594.1sj50 ---| STD CM+3
06183 M01S03595.1sj50 ---| LDD EJ+1
06184 M01S03596.1sj50 ---| STD CM+4
06185 M01S03597.1sj50 ---| LDD EO SAVE EJT ORDINAL FOR *CEFM*
06186 M01S03598.1sj50 ---| STD CM+2
06187 M01S03599.1sj50 ---| LDC STET+4000
06188 M01S03600.1sj50 ---| STD CM+1
06189 M01S03601.1sj50 ---| MONITOR CEFM
06190 M01S03602.1sj50 ---| SEJ7 LJM SEJ2 CONTINUE EJT SCAN
| Line S00022 Modification History |
M01 (Added by) | 1sj33 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06191 M02S00022.1sj50 ---|
06192 M02S00023.1sj50 ---| SEJ8 LDD EJ SET FORCED ROLLIN FLAG
06193 M02S00024.1sj50 ---| STM SEJD+3
06194 M02S00025.1sj50 ---| LDD EJ+1
06195 M02S00026.1sj50 ---| STM SEJD+4
06196 M02S00027.1sj50 ---| LDD EO
06197 M02S00028.1sj50 ---| CFI EJT,,EO GET EJT ADDRESS
06198 M02S00029.1sj50 ---| ADC **
06199 M02S00030.1sj50 ---| SEJC EQU *-1
06200 M02S00031.1sj50 ---| STD CM+4
06201 M02S00032.1sj50 ---| SHN -14
06202 M02S00033.1sj50 ---| STD CM+3
06203 M02S00034.1sj50 ---| LDN 2
06204 M02S00035.1sj50 ---| STD CM+1
06205 M02S00036.1sj50 ---| LDD MA
06206 M02S00037.1sj50 ---| CWM SEJD,CM+1
06207 M02S00038.1sj50 ---| MONITOR UTEM
06208 M02S00039.1sj50 ---| UJN SEJ7 CONTINUE EJT SCAN
06209 M02S00040.1sj50 ---|
06210 M02S00041.1sj50 ---|
06211 M02S00042.1sj50 ---| SEJD VFD 6/40+JSNE,6/24D,6/36D,42/0
06212 M02S00043.1sj50 ---| VFD 6/SCLE,6/1,6/52D,42/1
06213 M00S03603.1sj +++| SIQ SPACE 4,20
06214 M00S03604.1sj +++|** SIQ - SCAN QFT.
06215 M00S03605.1sj +++|*
06216 M00S03606.1sj +++|* SCAN THE QFT LOOKING FOR SCHEDULABLE INPUT FILES. BUILD
06217 M00S03607.1sj +++|* *TIOO* TABLE ENTRIES FOR THE *N* HIGHEST PRIORITY INPUT
06218 M00S03608.1sj +++|* FILES, WHERE *N* = MIN(*TP*,*TIOOL*). *TP* IS THE NUMBER OF
06219 M00S03609.1sj +++|* AVAILABLE EJT ENTRIES AND *TIOOL* IS AN ASSEMBLY CONSTANT.
| Line S00016 Modification History |
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act
----------------------------+
06220 M01S00016.ns21000 +++|* IF AN INPUT QFT ENTRY CONTAINS A DESTINATION LID (*DLID*),
06221 M01S00017.ns21000 +++|* *1SJ* WILL ONLY SCHEDULE THE JOB IF THE *DLID* HAS THE
06222 M01S00018.ns21000 +++|* ATTRIBUTES *HOST* AND *ENABLED*.
06223 M00S03610.1sj +++|*
| Line S03611 Modification History |
M01 (Removed by) | 1sj15 |
Seq # *Modification Id* Act
----------------------------+
06224 M01S03611.1sj15 ---|* ENTRY (TP) = NUMBER OF AVAILABLE EJT ENTRIES.
| Line S00010 Modification History |
M01 (Added by) | 1sj15 |
Seq # *Modification Id* Act
----------------------------+
06225 M01S00010.1sj15 +++|* ENTRY (A) .LT. 0, ONLY SCHEDULE SYSTEM JOBS.
06226 M01S00011.1sj15 +++|* (TP) = NUMBER OF AVAILABLE EJT ENTRIES.
06227 M00S03612.1sj +++|* (IO) = LARGEST QFT ORDINAL.
06228 M00S03613.1sj +++|*
06229 M00S03614.1sj +++|* EXIT (T7) = CURRENT *TIOO* INDEX.
06230 M00S03615.1sj +++|*
| Line S03616 Modification History |
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act
----------------------------+
06231 M01S03616.ns21000 ---|* USES T1 - T5, T7, CM - CM+4, AA - AA+4, IO, SC, TP.
| Line S00019 Modification History |
M01 (Added by) | ns21000 |
M02 (Removed by) | ns2242 |
Seq # *Modification Id* Act
----------------------------+
06232 M02S00019.ns2242 ---|* USES IO, SC, TP, AA - AA+4, BB - BB+4, CM - CM+4, T1 - T7.
| Line S00001 Modification History |
M01 (Added by) | ns2242 |
Seq # *Modification Id* Act
----------------------------+
06233 M01S00001.ns2242 +++|* USES EO, IO, SC, TP, AA - AA+4, BB - BB+4, CM - CM+4,
06234 M01S00002.ns2242 +++|* T1 - T7.
06235 M00S03617.1sj +++|*
06236 M00S03618.1sj +++|* CALLS CPR, FLP, IOA.
06237 M00S03619.1sj +++|*
06238 M00S03620.1sj +++|* MACROS CFI.
06239 M00S03621.1sj +++|
06240 M00S03622.1sj +++|
06241 M00S03623.1sj +++| SIQ SUBR ENTRY/EXIT
| Line S00012 Modification History |
M01 (Added by) | 1sj15 |
Seq # *Modification Id* Act
----------------------------+
06242 M01S00012.1sj15 +++| PJN SIQ0 IF NOT EJT THRESHOLD
06243 M01S00013.1sj15 +++| LDC LMNI+SYSC
06244 M01S00014.1sj15 +++| UJN SIQ0.1 CONTINUE
06245 M01S00015.1sj15 +++|
06246 M01S00016.1sj15 +++| SIQ0 LDC UJNI+SIQ3.0-SIQE SET NORMAL SCHEDULING
06247 M01S00017.1sj15 +++| ERRNG 37-SIQ3.0+SIQE IF JUMP OUT OF RANGE
06248 M01S00018.1sj15 +++| SIQ0.1 STM SIQE
06249 M00S03624.1sj +++| LDN TIOOL INITIALIZE *TIOO* INDEX
06250 M00S03625.1sj +++| STD T7
06251 M00S03626.1sj +++| SBN 1 INITIALIZE INDEX OF LOWEST PRIORITY JOB
06252 M00S03627.1sj +++| STD T5
06253 M00S03628.1sj +++| LCN 0 INITIALIZE LOWEST *TIOO* ENTRY PRIORITY
06254 M00S03629.1sj +++| STD T4
06255 M00S03630.1sj +++| LDD IO
06256 M00S03631.1sj +++| SIQ1 CFI QFT,,IO GET QFT ENTRY OFFSET
06257 M00S03632.1sj +++| ADC **
06258 M00S03633.1sj +++| SIQA EQU *-1 (QFT FWA)
06259 M00S03634.1sj +++| ADK JSNQ
06260 M00S03635.1sj +++| CRD CM
06261 M00S03636.1sj +++| LDD CM
06262 M00S03637.1sj +++| NJN SIQ3 IF NOT AN EMPTY ENTRY
06263 M00S03638.1sj +++| SIQ2 SOD IO
06264 M00S03639.1sj +++| NJN SIQ1 IF QFT SCAN NOT COMPLETE
06265 M00S03640.1sj +++| UJN SIQX RETURN
06266 M00S03641.1sj +++|
06267 M00S03642.1sj +++| SIQ3 LDD CM+4
06268 M00S03643.1sj +++| ERRNZ INQF CODE ASSUMES *INQF* = 0
06269 M00S03644.1sj +++| LPC 7003
| Line S03645 Modification History |
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act
----------------------------+
06270 M01S03645.ns21000 ---| NJN SIQ2 IF FILE IS INELIGIBLE FOR SCHEDULING
| Line S00020 Modification History |
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act
----------------------------+
06271 M01S00020.ns21000 +++| NJN SIQ2 IF FILE NOT ELIGIBLE FOR SCHEDULING
| Line S00003 Modification History |
M01 (Added by) | ns2242 |
Seq # *Modification Id* Act
----------------------------+
06272 M01S00003.ns2242 +++| LDN 1 SET NOT ABORTED INPUT FILE
06273 M01S00004.ns2242 +++| STD EO
06274 M00S03646.1sj +++| RJM IOA CALCULATE QFT ENTRY ADDRESS
06275 M00S03647.1sj +++| ADN ENTQ
06276 M00S03648.1sj +++| CRD CM
| Line S03649 Modification History |
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act
----------------------------+
06277 M01S03649.ns21000 ---| ADN SCLQ-ENTQ
| Line S00021 Modification History |
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act
----------------------------+
06278 M01S00021.ns21000 +++| ADN INSQ-ENTQ READ DESTINATION LID
06279 M01S00022.ns21000 +++| CRD BB
06280 M01S00023.ns21000 +++| ADN SCLQ-INSQ
06281 M00S03650.1sj +++| CRD AA
06282 M00S03651.1sj +++| LDD AA GET SERVICE CLASS
06283 M00S03652.1sj +++| SHN -6
06284 M00S03653.1sj +++| STD SC
| Line S03654 Modification History |
M01 (Removed by) | 1sj15 |
Seq # *Modification Id* Act
----------------------------+
06285 M01S03654.1sj15 ---| SBN DSSC
| Line S00019 Modification History |
M01 (Added by) | 1sj15 |
Seq # *Modification Id* Act
----------------------------+
06286 M01S00019.1sj15 +++| SIQE UJN SIQ3.0 CONTINUE
06287 M01S00020.1sj15 +++|* LMN SYSC (EJT FULL, ONLY SCHEDULE SYSTEM JOBS)
06288 M01S00021.1sj15 +++| ZJN SIQ3.0 IF SYSTEM JOB
06289 M01S00022.1sj15 +++| LMN DSSC&SYSC
06290 M01S00023.1sj15 +++| ZJN SIQ3.0 IF DEADSTART SEQUENCING JOB
06291 M01S00024.1sj15 +++| LMN SSSC&DSSC
06292 M01S00025.1sj15 +++| NJN SIQ2 IF NOT A SUBSYSTEM
06293 M01S00026.1sj15 +++| SIQ3.0 LDD SC
06294 M01S00027.1sj15 +++| SBN DSSC
| Line S03655 Modification History |
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act
----------------------------+
06295 M01S03655.ns21000 ---| NJN SIQ4 IF NOT DEADSTART SEQUENCING JOB
| Line S00024 Modification History |
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act
----------------------------+
06296 M01S00024.ns21000 +++| NJN SIQ3.1 IF NOT DEADSTART SEQUENCING JOB
06297 M00S03656.1sj +++| LDN TIOOL-1 RESET *TIOO* INDEX
06298 M00S03657.1sj +++| STD T7
06299 M00S03658.1sj +++| ERRNZ LJMI-100
06300 M00S03659.1sj +++| LDD HN STORE *LJM* INSTRUCTION
06301 M00S03660.1sj +++| STM SIQC
06302 M00S03661.1sj +++| LDC SIQX
06303 M00S03662.1sj +++| STM SIQC+1
06304 M00S03663.1sj +++| LCN 0 SET PRIORITY TO MAXIMUM
06305 M00S03664.1sj +++| LJM SIQ8 BUILD *TIOO* ENTRY
06306 M00S03665.1sj +++|
| Line S03666 Modification History |
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act
----------------------------+
06307 M01S03666.ns21000 ---|* THIS INPUT FILE IS SCHEDULABLE. CALCULATE ITS QUEUE
06308 M01S03667.ns21000 ---|* PRIORITY.
06309 M01S03668.ns21000 ---|
| Line S00025 Modification History |
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act
----------------------------+
06310 M01S00025.ns21000 +++|* THIS INPUT FILE IS SCHEDULABLE.
06311 M01S00026.ns21000 +++|* DETERMINE IF DESTINATION LID IS HOST LID.
06312 M01S00027.ns21000 +++|
06313 M01S00028.ns21000 +++| SIQ3.1 LDD BB+2 CHECK IF DLID PRESENT IN QFT
06314 M01S00029.ns21000 +++| SCN 77
06315 M01S00030.ns21000 +++| ADD BB+1
06316 M01S00031.ns21000 +++| ZJN SIQ4 IF NO DLID
06317 M01S00032.ns21000 +++| LDC ** INITIALIZE *THLD* TABLE INDEX
| Line S00033 Modification History |
M01 (Added by) | ns21000 |
M02 (Removed by) | v23l617 |
Seq # *Modification Id* Act
----------------------------+
06318 M02S00033.v23l617 ---| SIQD EQU *-1 (2*NUMBER OF HOST LIDS - 2)
| Line S00098 Modification History |
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act
----------------------------+
06319 M01S00098.v23l617 +++| SIQD EQU *-1 (2*NUMBER OF HOST LIDS)
| Line S00099 Modification History |
M01 (Added by) | v23l617 |
M02 (Removed by) | ns2242 |
M03 (Removed by) | ns2285 |
Seq # *Modification Id* Act
----------------------------+
06320 M03S00099.ns2285 ---| ZJN SIQ5 IF NO HOST LIDS PRESENT
| Line S00005 Modification History |
M01 (Added by) | ns2285 |
Seq # *Modification Id* Act
----------------------------+
06321 M01S00005.ns2285 +++| ZJP SIQ2 IF NO HOST LIDS PRESENT
| Line S00005 Modification History |
M01 (Added by) | ns2242 |
M02 (Removed by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
06322 M02S00005.241l630 ---| ZJP SIQ2 IF NO HOST LIDS PRESENT
| Line S00100 Modification History |
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act
----------------------------+
06323 M01S00100.v23l617 +++| SBN 2
| Line S00034 Modification History |
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act
----------------------------+
06324 M01S00034.ns21000 +++| STD T6
06325 M01S00035.ns21000 +++| SIQ3.2 LDD BB+1 CHECK NEXT LID
06326 M01S00036.ns21000 +++| LMM THLD,T6
06327 M01S00037.ns21000 +++| NJN SIQ3.3 IF NOT A MATCH
06328 M01S00038.ns21000 +++| LDD BB+2
06329 M01S00039.ns21000 +++| LMM THLD+1,T6
06330 M01S00040.ns21000 +++| SCN 77
06331 M01S00041.ns21000 +++| ZJN SIQ4 IF A MATCH
06332 M01S00042.ns21000 +++| SIQ3.3 LCN 2
06333 M01S00043.ns21000 +++| RAD T6
06334 M01S00044.ns21000 +++| PJN SIQ3.2 IF NOT END OF TABLE
06335 M01S00045.ns21000 +++| UJN SIQ5 CHECK NEXT QFT ENTRY
06336 M01S00046.ns21000 +++|
| Line S00006 Modification History |
M01 (Added by) | ns2285 |
M02 (Removed by) | ns2285a |
Seq # *Modification Id* Act
----------------------------+
06337 M02S00006.ns2285a ---| SIQ4 LDD SC
| Line S00001 Modification History |
M01 (Added by) | ns2285a |
Seq # *Modification Id* Act
----------------------------+
06338 M01S00001.ns2285a +++| SIQ4 LDD CM+3 SAVE ENTRY TIME
06339 M01S00002.ns2285a +++| STD T1
06340 M01S00003.ns2285a +++| LDD CM+4
06341 M01S00004.ns2285a +++| STD T2
06342 M01S00005.ns2285a +++| LDD SC
| Line S00007 Modification History |
M01 (Added by) | ns2285 |
Seq # *Modification Id* Act
----------------------------+
06343 M01S00007.ns2285 +++| RJM RJC
06344 M01S00008.ns2285 +++| ADK JCTT
06345 M01S00009.ns2285 +++| CRD BB
06346 M01S00010.ns2285 +++| LDD BB+1
06347 M01S00011.ns2285 +++| NJN SIQ5 IF JOBS WAITING FOR THIS SERVICE CLASS
06348 M01S00012.ns2285 +++|
| Line S00047 Modification History |
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act
----------------------------+
06349 M01S00047.ns21000 +++|* CALCULATE QUEUE PRIORITY OF SELECTED INPUT FILE.
06350 M01S00048.ns21000 +++|
| Line S03669 Modification History |
M01 (Removed by) | ns2285 |
Seq # *Modification Id* Act
----------------------------+
06351 M01S03669.ns2285 ---| SIQ4 LDD CM+3
| Line S00013 Modification History |
M01 (Added by) | ns2285 |
M02 (Removed by) | ns2285a |
Seq # *Modification Id* Act
----------------------------+
06352 M02S00013.ns2285a ---| LDD CM+3
| Line S03670 Modification History |
M01 (Removed by) | ns2285a |
Seq # *Modification Id* Act
----------------------------+
06353 M01S03670.ns2285a ---| STD T1
06354 M01S03671.ns2285a ---| LDD CM+4
06355 M01S03672.ns2285a ---| STD T2
| Line S00006 Modification History |
M01 (Added by) | ns2285a |
Seq # *Modification Id* Act
----------------------------+
06356 M01S00006.ns2285a +++| LDD T2
| Line S03673 Modification History |
M01 (Removed by) | ns2242 |
Seq # *Modification Id* Act
----------------------------+
06357 M01S03673.ns2242 ---| LDD SC
| Line S00006 Modification History |
M01 (Added by) | ns2242 |
Seq # *Modification Id* Act
----------------------------+
06358 M01S00006.ns2242 +++| ZJN SIQ4.1 IF NOT POSSIBLE ABORTED INPUT FILE
06359 M01S00007.ns2242 +++| LMN 1 CHECK FOR ENTRY TIME OF 1
06360 M01S00008.ns2242 +++| NJN SIQ4.1 IF NOT ABORTED INPUT FILE
06361 M01S00009.ns2242 +++| LDD T1
06362 M01S00010.ns2242 +++| NJN SIQ4.1 IF NOT ABORTED INPUT FILE
06363 M01S00011.ns2242 +++| SOD EO SET ABORTED INPUT FILE
06364 M01S00012.ns2242 +++| SIQ4.1 LDD SC
06365 M00S03674.1sj +++| SHN 14
06366 M00S03675.1sj +++| LMK INQT
06367 M00S03676.1sj +++| RJM CPR CALCULATE QUEUE PRIORITY
06368 M00S03677.1sj +++| MJN SIQ5 IF NO JCB FOR SERVICE CLASS
06369 M00S03678.1sj +++| NJN SIQ6 IF NON-ZERO ENTRY TIME
06370 M00S03679.1sj +++| SIQ5 LJM SIQ2 CONTINUE QFT SCAN
06371 M00S03680.1sj +++|
06372 M00S03681.1sj +++|* CHECK JOB COUNT LIMIT.
06373 M00S03682.1sj +++|
06374 M00S03683.1sj +++| SIQ6 STD T2 SAVE CALCULATED PRIORITY
| Line S03684 Modification History |
M01 (Removed by) | 1sj2 |
Seq # *Modification Id* Act
----------------------------+
06375 M01S03684.1sj2 ---| LDM TJAM,SC
06376 M01S03685.1sj2 ---| LMM TJCT,SC
06377 M01S03686.1sj2 ---| NJN SIQ7 IF JOB COUNT LIMIT NOT REACHED
| Line S00001 Modification History |
M01 (Added by) | 1sj2 |
M02 (Removed by) | ns2242 |
Seq # *Modification Id* Act
----------------------------+
06378 M02S00001.ns2242 ---| LDM TJCT,SC
| Line S00013 Modification History |
M01 (Added by) | ns2242 |
Seq # *Modification Id* Act
----------------------------+
06379 M01S00013.ns2242 +++| LDD EO
06380 M01S00014.ns2242 +++| NJN SIQ6.1 IF NOT ABORTED INPUT FILE
06381 M01S00015.ns2242 +++| LCN 0 SET PRIORITY MAXIMUM
06382 M01S00016.ns2242 +++| STD T2
06383 M01S00017.ns2242 +++| UJN SIQ7 SKIP JOB COUNT CHECK
06384 M01S00018.ns2242 +++|
06385 M01S00019.ns2242 +++| SIQ6.1 LDM TJCT,SC
| Line S00002 Modification History |
M01 (Added by) | 1sj2 |
Seq # *Modification Id* Act
----------------------------+
06386 M01S00002.1sj2 +++| SBM TJAM,SC
06387 M01S00003.1sj2 +++| MJN SIQ7 IF JOB COUNT LIMIT NOT REACHED
06388 M00S03687.1sj +++| LDD SC
06389 M00S03688.1sj +++| LMN DISC
06390 M00S03689.1sj +++| ZJN SIQ7 IF DETACHED JOB
06391 M00S03690.1sj +++| LDD AA
06392 M00S03691.1sj +++| LPN 17
| Line S03692 Modification History |
M01 (Removed by) | ns2134 |
Seq # *Modification Id* Act
----------------------------+
06393 M01S03692.ns2134 ---| LMN TXOT
| Line S00062 Modification History |
M01 (Added by) | ns2134 |
Seq # *Modification Id* Act
----------------------------+
06394 M01S00062.ns2134 +++| LMK IAOT
06395 M00S03693.1sj +++| ZJN SIQ7 IF INTERACTIVE JOB
06396 M00S03694.1sj +++| RJM FLP FIND LOWEST PRIORITY JOB OF SERVICE CLASS
06397 M00S03695.1sj +++| SHN 6
06398 M00S03696.1sj +++| MJN SIQ5 IF NO JOBS OF SERVICE CLASS IN *TIOO*
06399 M00S03697.1sj +++| LDD T4
06400 M00S03698.1sj +++| SBD T2
06401 M00S03699.1sj +++| PJN SIQ5 IF PRIORITY OF NEW JOB .LE. LOWEST
06402 M00S03700.1sj +++| LJM SIQ13 CREATE *TIOO* ENTRY FOR CURRENT QFT ENTRY
06403 M00S03701.1sj +++|
06404 M00S03702.1sj +++|* BUILD *TIOO* ENTRY.
06405 M00S03703.1sj +++|
06406 M00S03704.1sj +++| SIQ7 SOD T7 DECREMENT *TIOO* INDEX
06407 M00S03705.1sj +++| SOD TP DECREMENT AVAILABLE EJT ENTRY COUNT
06408 M00S03706.1sj +++|* LJM SIQ12 (IF NO NEW *TIOO* SLOTS SHOULD BE USED)
06409 M00S03707.1sj +++| SIQB EQU *-2
06410 M00S03708.1sj +++| LDD T2
06411 M00S03709.1sj +++| SIQ8 STM TIOO+1*TIOOL,T7
06412 M00S03710.1sj +++| LDD IO PLACE QFT ORDINAL IN *TIOO* ENTRY
06413 M00S03711.1sj +++| STM TIOO,T7
06414 M00S03712.1sj +++| LDD SC PLACE SERVICE CLASS IN *TIOO* ENTRY
06415 M00S03713.1sj +++| STM TIOO+2*TIOOL,T7
| Line S03714 Modification History |
M01 (Removed by) | ns2242 |
Seq # *Modification Id* Act
----------------------------+
06416 M01S03714.ns2242 ---| AOM TJCT,SC INCREMENT JOB COUNT
| Line S00020 Modification History |
M01 (Added by) | ns2242 |
Seq # *Modification Id* Act
----------------------------+
06417 M01S00020.ns2242 +++| LDD EO 0= ABORTED INPUT FILE, 1=NORMAL INPUT FILE
06418 M01S00021.ns2242 +++| RAM TJCT,SC INCREMENT JOB COUNT
06419 M00S03715.1sj +++|* LJM SIQX (IF DEADSTART SEQUENCING JOB FOUND)
06420 M00S03716.1sj +++| SIQC EQU *-2
06421 M00S03717.1sj +++| LDD T2
06422 M00S03718.1sj +++| SBD T4
06423 M00S03719.1sj +++| PJN SIQ9 IF JOB-S PRIORITY NOT NEW LOWEST OF *TIOO*
06424 M00S03720.1sj +++| LDD T7 SAVE INDEX OF NEW LOWEST PRIORITY JOB
06425 M00S03721.1sj +++| STD T5
06426 M00S03722.1sj +++| LDD T2 SAVE PRIORITY OF NEW LOWEST JOB
06427 M00S03723.1sj +++| STD T4
06428 M00S03724.1sj +++| SIQ9 LDD T7
06429 M00S03725.1sj +++| ZJN SIQ10 IF *TIOO* TABLE IS FULL
06430 M00S03726.1sj +++| LDD TP
06431 M00S03727.1sj +++| NJN SIQ11 IF MORE AVAILABLE EJT ENTRIES EXIST
06432 M00S03728.1sj +++| SIQ10 LDC SIQ12 PREVENT USE OF NEW *TIOO* SLOTS
06433 M00S03729.1sj +++| STM SIQB+1
06434 M00S03730.1sj +++| LDD HN STORE *LJM*
06435 M00S03731.1sj +++| STM SIQB
06436 M00S03732.1sj +++| SIQ11 LJM SIQ2 CONTINUE QFT SCAN
06437 M00S03733.1sj +++|
06438 M00S03734.1sj +++|* NO NEW *TIOO* SLOTS MAY BE USED. SEE IF THE CURRENT QFT
06439 M00S03735.1sj +++|* ENTRY HAS A HIGHER QUEUE PRIORITY THAN THE LOWEST PRIORITY
06440 M00S03736.1sj +++|* *TIOO* ENTRY. IF SO, REPLACE THAT JOB-S *TIOO* ENTRY WITH A
06441 M00S03737.1sj +++|* NEW ONE FOR THE CURRENT QFT ENTRY.
06442 M00S03738.1sj +++|
06443 M00S03739.1sj +++| SIQ12 LDD T4
06444 M00S03740.1sj +++| SBD T2
06445 M00S03741.1sj +++| PJN SIQ11 IF NEW JOB-S PRIORITY .LE. *TIOO* LOWEST
06446 M00S03742.1sj +++| SIQ13 LDM TIOO+2*TIOOL,T5 GET SERVICE CLASS OF CURRENT LOWEST
06447 M00S03743.1sj +++| STD T3
06448 M00S03744.1sj +++| SOM TJCT,T3 DECREMENT JOB COUNT FOR OLD *TIOO* LOWEST
06449 M00S03745.1sj +++| AOM TJCT,SC INCREMENT JOB COUNT FOR NEW JOB
06450 M00S03746.1sj +++| LDD IO SAVE QFT ORDINAL IN *TIOO* ENTRY
06451 M00S03747.1sj +++| STM TIOO,T5
06452 M00S03748.1sj +++| LDD T2 SAVE QUEUE PRIORITY IN *TIOO* ENTRY
06453 M00S03749.1sj +++| STM TIOO+1*TIOOL,T5
06454 M00S03750.1sj +++| LDD SC SAVE SERVICE CLASS IN *TIOO* ENTRY
06455 M00S03751.1sj +++| STM TIOO+2*TIOOL,T5
06456 M00S03752.1sj +++|
06457 M00S03753.1sj +++|* SCAN THE *TIOO* TABLE TO FIND THE NEW LOWEST PRIORITY JOB.
06458 M00S03754.1sj +++|
06459 M00S03755.1sj +++| LDN 0
06460 M00S03756.1sj +++| RJM FLP FIND LOWEST PRIORITY JOB
06461 M00S03757.1sj +++| UJN SIQ11 CONTINUE QFT SCAN
06462 M00S03758.1sj +++| SPACE 4,10
06463 M00S03759.1sj +++|* COMMON DECKS.
06464 M00S03760.1sj +++|
06465 M00S03761.1sj +++|
06466 M00S03762.1sj +++| CPR$ SET 1 ASSEMBLE ROUTINE *CPR* OF *COMPCPE*
06467 M00S03763.1sj +++| CET$ SET 1 ASSEMBLE ROUTINE *CET* OF *COMPCPE*
| Line S00001 Modification History |
M01 (Added by) | 1sj22 |
Seq # *Modification Id* Act
----------------------------+
06468 M01S00001.1sj22 +++| IOQ$ SET 1 ENABLE ZERO ENTRY TIME CHECK
06469 M00S03764.1sj +++| LIST X
| Line S03765 Modification History |
M01 (Removed by) | ns2437 |
Seq # *Modification Id* Act
----------------------------+
06470 M01S03765.ns2437 ---|*CALL COMPAST
06471 M00S03766.1sj +++|*CALL COMPCPE
06472 M00S03767.1sj +++| LIST *
| Line S00001 Modification History |
M01 (Added by) | ns2437 |
Seq # *Modification Id* Act
----------------------------+
06473 M01S00001.ns2437 +++|
06474 M01S00002.ns2437 +++|
06475 M01S00003.ns2437 +++| ERRNG TJCT-* OVERFLOW INTO *TJCT*
| Line S03768 Modification History |
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act
----------------------------+
06476 M01S03768.ns21000 ---| SPACE 4,10
06477 M01S03769.ns21000 ---| USE TABLES
06478 M01S03770.ns21000 ---| TABLES BSS 0 *3SC* TABLES ORIGIN
| Line S00049 Modification History |
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act
----------------------------+
06479 M01S00049.ns21000 +++| TITLE PRESET.
| Line S00004 Modification History |
M01 (Added by) | ns2437 |
Seq # *Modification Id* Act
----------------------------+
06480 M01S00004.ns2437 +++| USE TABLES
06481 M00S03771.1sj +++| PRS SPACE 4,10
| Line S03772 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
06482 M01S03772.271l716 ---|** PRS - PRESET *3SC*.
| Line S00540 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
06483 M01S00540.271l716 +++|** PRS - PRESET *3SB*.
06484 M00S03773.1sj +++|*
| Line S03774 Modification History |
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act
----------------------------+
06485 M01S03774.ns21000 ---|* USES CM - CM+4, IO.
| Line S00050 Modification History |
M01 (Added by) | ns21000 |
M02 (Removed by) | v23l617 |
Seq # *Modification Id* Act
----------------------------+
06486 M02S00050.v23l617 ---|* BUILDS THE *THLD* TABLE OF HOST-ENABLED LID-S.
| Line S00101 Modification History |
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act
----------------------------+
06487 M01S00101.v23l617 +++|* BUILDS THE *THLD* TABLE OF HOST-ENABLED LIDS. IF
06488 M01S00102.v23l617 +++|* DEADSTART SEQUENCING JOB IS ACTIVE, OR IF THE LDT
06489 M01S00103.v23l617 +++|* HAS NOT BEEN CREATED YET DUE TO A *CLDT* ABORT,
06490 M01S00104.v23l617 +++|* THEN NO *THLD* TABLE WILL BE CREATED, AND NO INPUT
06491 M01S00105.v23l617 +++|* FILES CONTAINING A DESTINATION LID IN THE QFT ENTRY
06492 M01S00106.v23l617 +++|* WILL BE SCHEDULED.
| Line S00051 Modification History |
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act
----------------------------+
06493 M01S00051.ns21000 +++|*
| Line S00052 Modification History |
M01 (Added by) | ns21000 |
M02 (Removed by) | v23l617 |
Seq # *Modification Id* Act
----------------------------+
06494 M02S00052.v23l617 ---|* EXIT (LD) = LWA+1 OF *THLD*.
06495 M02S00053.v23l617 ---|*
06496 M02S00054.v23l617 ---|* USES IO, TP, AA - AA+4, BB - BB+4, CM - CM+4.
| Line S00107 Modification History |
M01 (Added by) | v23l617 |
M02 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06497 M02S00107.1sj50 ---|* USES IO, TP, T6, AA - AA+4, BB - BB+4, CM - CM+4,
| Line S00001 Modification History |
M01 (Added by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06498 M01S00001.1sj50 +++|* EXIT (A) = RESPONSE FROM *SEJ*.
06499 M01S00002.1sj50 +++|*
06500 M01S00003.1sj50 +++|* USES IO, T6, T9, AA - AA+4, BB - BB+4, CM - CM+4,
| Line S00108 Modification History |
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act
----------------------------+
06501 M01S00108.v23l617 +++|* T1 - T1+4.
06502 M00S03775.1sj +++|*
| Line S03776 Modification History |
M01 (Removed by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06503 M01S03776.1sj50 ---|* CALLS AST.
| Line S00004 Modification History |
M01 (Added by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06504 M01S00004.1sj50 +++|* CALLS AST, SEJ.
| Line S00055 Modification History |
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act
----------------------------+
06505 M01S00055.ns21000 +++|*
| Line S00056 Modification History |
M01 (Added by) | ns21000 |
M02 (Removed by) | ns2134 |
Seq # *Modification Id* Act
----------------------------+
06506 M02S00056.ns2134 ---|* MACROS MONITOR.
| Line S00063 Modification History |
M01 (Added by) | ns2134 |
Seq # *Modification Id* Act
----------------------------+
06507 M01S00063.ns2134 +++|* MACROS ISTORE, MONITOR.
06508 M00S03777.1sj +++|
06509 M00S03778.1sj +++|
| Line S00005 Modification History |
M01 (Added by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06510 M01S00005.1sj50 +++| PRS8 LDC ** RETURN RESPONSE FROM *SEJ*
06511 M01S00006.1sj50 +++| PRSA EQU *-1
06512 M00S03779.1sj +++| PRS SUBR ENTRY/EXIT
| Line S00007 Modification History |
M01 (Added by) | 1sj50 |
Seq # *Modification Id* Act
----------------------------+
06513 M01S00007.1sj50 +++| LDC IFSI+FECF*10000 CHECK *IAF* ACCESSIBILITY
06514 M01S00008.1sj50 +++| RJM AST GET *IAF* SSCT ENTRY
06515 M01S00009.1sj50 +++| SHN 21-13
06516 M01S00010.1sj50 +++| MJN PRS0 IF *IAF* ACCESSIBLE
06517 M01S00011.1sj50 +++| LDC UJNI+SEJ8-SEJB DISABLE SUSPENSION TIME-OUT
06518 M01S00012.1sj50 +++| STM SEJB
06519 M01S00013.1sj50 +++| ERRNG 37-SEJ8+SEJB JUMP OVERFLOW
06520 M01S00014.1sj50 +++| PRS0 LDN MXJC-1 INITIALIZE *TJCT* TABLE
06521 M01S00015.1sj50 +++| STD T1
06522 M01S00016.1sj50 +++| PRS0.1 LDN 0
06523 M01S00017.1sj50 +++| STM TJCT,T1
06524 M01S00018.1sj50 +++| SOD T1 DECREMENT TABLE INDEX