User Tools

Site Tools


Action unknown: copypageplugin__copy
cdc:nos2.source:opl.opl871:deck:1aj.002

Deck 1AJ Part 002

214 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
02521  M00S01597.1aj     +++|
02522  M00S01598.1aj     +++|
02523  M00S01599.1aj     +++| PJC      SUBR               ENTRY/EXIT
Line S01600 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02524  M01S01600.v23l617 ---|          LDD    CP          WRITE CREATOR-S USER NUMBER/INDEX TO CPA
Line S00072 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02525  M01S00072.v23l617 +++|          LDD    CP          WRITE CREATOR-S USER NAME/INDEX TO CPA
02526  M00S01601.1aj     +++|          ADN    UIDW
02527  M00S01602.1aj     +++|          CWM    ACSS,ON
02528  M00S01603.1aj     +++|          UJN    PJCX        RETURN
02529  M00S01604.1aj     +++|          SPACE  4,10
02530  M00S01605.1aj     +++|**        PBC - *BCIE*/*HDIE* PROCESSOR.
02531  M00S01606.1aj     +++|*
Line S01607 Modification History
M01 (Removed by) 1aj20
Seq #  *Modification Id* Act 
----------------------------+
02532  M01S01607.1aj20   ---|*         CALLS  C2D.
Line S00001 Modification History
M01 (Added by) 1aj20
Seq #  *Modification Id* Act 
----------------------------+
02533  M01S00001.1aj20   +++|*         CALLS  CDD.
02534  M00S01608.1aj     +++|
02535  M00S01609.1aj     +++|
02536  M00S01610.1aj     +++| PBC      SUBR               ENTRY/EXIT
02537  M00S01611.1aj     +++|          LDM    TAIM,T1     SET CONVERSION TARGET ADDRESSES
02538  M00S01612.1aj     +++|          ADN    12D
02539  M00S01613.1aj     +++|          STM    PBCA
02540  M00S01614.1aj     +++|          ADN    1
02541  M00S01615.1aj     +++|          STM    PBCB
02542  M00S01616.1aj     +++|          ADN    3
02543  M00S01617.1aj     +++|          STM    PBCC
02544  M00S01618.1aj     +++|          ADN    1
02545  M00S01619.1aj     +++|          STM    PBCD
02546  M00S01620.1aj     +++|          LDM    RNSS        CONVERT RECORD NUMBER
Line S01621 Modification History
M01 (Removed by) 1aj20
Seq #  *Modification Id* Act 
----------------------------+
02547  M01S01621.1aj20   ---|          SHN    -6
02548  M01S01622.1aj20   ---|          RJM    C2D
02549  M01S01623.1aj20   ---|          STM    **
02550  M01S01624.1aj20   ---| PBCA     EQU    *-1
02551  M01S01625.1aj20   ---|          LDM    RNSS
02552  M01S01626.1aj20   ---|          RJM    C2D
02553  M01S01627.1aj20   ---|          STM    **
02554  M01S01628.1aj20   ---| PBCB     EQU    *-1
Line S00002 Modification History
M01 (Added by) 1aj20
Seq #  *Modification Id* Act 
----------------------------+
02555  M01S00002.1aj20   +++|          RJM    CDD         CONVERT TO DECIMAL
Line S00003 Modification History
M01 (Added by) 1aj20
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02556  M02S00003.v23l617 ---|          LDD    CM+3        STORE CARD NUMBER IN MESSAGE
Line S00073 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02557  M01S00073.v23l617 +++|          LDD    CM+3        STORE COMMAND NUMBER IN MESSAGE
Line S00004 Modification History
M01 (Added by) 1aj20
Seq #  *Modification Id* Act 
----------------------------+
02558  M01S00004.1aj20   +++|          STM    **
02559  M01S00005.1aj20   +++| PBCA     EQU    *-1
02560  M01S00006.1aj20   +++|          LDD    CM+4
02561  M01S00007.1aj20   +++|          STM    **
02562  M01S00008.1aj20   +++| PBCB     EQU    *-1
Line S01629 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02563  M01S01629.v23l617 ---|          LDM    CNSS        CONVERT CARD NUMBER
Line S00074 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02564  M01S00074.v23l617 +++|          LDM    CNSS        CONVERT COMMAND NUMBER
Line S01630 Modification History
M01 (Removed by) 1aj20
Seq #  *Modification Id* Act 
----------------------------+
02565  M01S01630.1aj20   ---|          SHN    -6
02566  M01S01631.1aj20   ---|          RJM    C2D
02567  M01S01632.1aj20   ---|          STM    **
02568  M01S01633.1aj20   ---| PBCC     EQU    *-1
02569  M01S01634.1aj20   ---|          LDM    CNSS
02570  M01S01635.1aj20   ---|          RJM    C2D
02571  M01S01636.1aj20   ---|          STM    **
02572  M01S01637.1aj20   ---| PBCD     EQU    *-1
Line S00009 Modification History
M01 (Added by) 1aj20
Seq #  *Modification Id* Act 
----------------------------+
02573  M01S00009.1aj20   +++|          RJM    CDD         CONVERT TO DECIMAL
02574  M01S00010.1aj20   +++|          LDD    CM+3
02575  M01S00011.1aj20   +++|          STM    **
02576  M01S00012.1aj20   +++| PBCC     EQU    *-1
02577  M01S00013.1aj20   +++|          LDD    CM+4
02578  M01S00014.1aj20   +++|          STM    **
02579  M01S00015.1aj20   +++| PBCD     EQU    *-1
02580  M00S01638.1aj     +++|          LJM    PBCX        RETURN
02581  M00S01639.1aj     +++|
02582  M00S01640.1aj     +++| PHD      EQU    PBC         *HDIE* PROCESSOR ENTRY LOCATION
02583  M00S01641.1aj     +++| TAIM     SPACE  4,10
02584  M00S01642.1aj     +++|**        TAIM - TABLE OF ABORTED INPUT FILE ERROR MESSAGES.
02585  M00S01643.1aj     +++|*                INDEXED BY ABORTED INPUT FILE ERROR CODE.
02586  M00S01644.1aj     +++|*
02587  M00S01645.1aj     +++|*         NOTE - ADDITION OF ANY ENTRY TO THIS TABLE REQUIRES INCLUSION
02588  M00S01646.1aj     +++|*                OF THE NEW ERROR FLAG IN THE *MAX* PARAMETER LIST.
02589  M00S01647.1aj     +++|
02590  M00S01648.1aj     +++|
Line S01649 Modification History
M01 (Removed by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
02591  M01S01649.ns21000 ---| TAIML    MAX    JCIE,CRIE,OTIE,DFIE,MSIE,NRIE,BCIE,HDIE,ODIE
Line S00024 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
02592  M01S00024.ns21000 +++| TAIML    MAX    JCIE,CRIE,OTIE,DFIE,MSIE,NRIE,BCIE,HDIE,ODIE,STIE,IDIE,
Line S00025 Modification History
M01 (Added by) ns21000
M02 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02593  M02S00025.ns22000 ---|,DBIE,VLIE,NLIE
Line S00106 Modification History
M01 (Added by) ns22000
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02594  M02S00106.v23l617 ---|,DBIE,VLIE,UNIE,SCIE,USIE,UCIE
Line S00075 Modification History
M01 (Added by) v23l617
M02 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02595  M02S00075.241l630 ---|,DBIE,VLIE,UNIE,SCIE,USIE,UCIE,HRIE
Line S00031 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02596  M01S00031.241l630 +++|,DBIE,VLIE,UNIE,SCIE,USIE,UCIE,HRIE,SWIE
02597  M00S01650.1aj     +++|
02598  M00S01651.1aj     +++| TAIM     INDEX
Line S01652 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02599  M01S01652.v23l617 ---|          INDEX  JCIE,(=C* JOB CARD ERROR.*)
Line S00076 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02600  M01S00076.v23l617 +++|          INDEX  JCIE,(=C* JOB COMMAND ERROR.*)
02601  M00S01653.1aj     +++|          INDEX  CRIE,(=C* CARD READER ERROR.*)
02602  M00S01654.1aj     +++|          INDEX  OTIE,(=C* OPERATOR INPUT TERMINATION.*)
02603  M00S01655.1aj     +++|          INDEX  DFIE,(=C* DISK FULL.*)
02604  M00S01656.1aj     +++|          INDEX  MSIE,(=C* MASS STORAGE ERROR.*)
02605  M00S01657.1aj     +++|          INDEX  NRIE,(=C* JOB IN NO RERUN STATE ON RECOVERY.*)
02606  M00S01658.1aj     +++|          INDEX  BCIE,(=C* BINARY SEQ. ERROR,  REC0000  CD0000.   *)
Line S01659 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02607  M01S01659.v23l617 ---|          INDEX  HDIE,(=C* ILLEGAL HOLL. CODE, REC0000  CD0000.   *)
Line S00077 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02608  M01S00077.v23l617 +++|          INDEX  HDIE,(=C* UNKNOWN HOLL. CODE, REC0000  CD0000.   *)
02609  M00S01660.1aj     +++|          INDEX  ODIE,(=C* OPERATOR DROP.*)
Line S00026 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
02610  M01S00026.ns21000 +++|          INDEX  STIE,(=C/ USER NOT VALIDATED TO SPECIFY *ST*./)
Line S00027 Modification History
M01 (Added by) ns21000
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02611  M02S00027.v23l617 ---|          INDEX  IDIE,(=C* INVALID LID.*)
Line S00078 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02612  M01S00078.v23l617 +++|          INDEX  IDIE,(=C* INCORRECT LID.*)
Line S00028 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
02613  M01S00028.ns21000 +++|          INDEX  DBIE,(=C* QUEUE LIMITS EXCEEDED ON REMOTE MAINFRAME.*)
02614  M01S00029.ns21000 +++|          INDEX  VLIE,(=C* JOB NOT VALID ON REMOTE MAINFRAME.*)
02615  M01S00030.ns21000 +++|          INDEX  NLIE,(=C* JOB NOT VALIDATED TO USE LINK.*)
Line S00107 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02616  M01S00107.ns22000 +++|          INDEX  UNIE,(=C* USER NAME/PASSWORD NOT VALID.*)
Line S00108 Modification History
M01 (Added by) ns22000
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02617  M02S00108.v23l617 ---|          INDEX  SCIE,(=C* INVALID SERVICE CLASS.*)
Line S00079 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02618  M01S00079.v23l617 +++|          INDEX  SCIE,(=C* INCORRECT SERVICE CLASS.*)
Line S00109 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02619  M01S00109.ns22000 +++|          INDEX  USIE,(=C* UNDEFINED SERVICE CLASS.*)
02620  M01S00110.ns22000 +++|          INDEX  UCIE,(=C* USER SECURITY COUNT EXHAUSTED.*)
Line S00080 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02621  M01S00080.v23l617 +++|          INDEX  HRIE,(=C* HARDWARE RERUN THRESHOLD EXCEEDED.*)
Line S01661 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02622  M01S01661.241l630 ---|          INDEX  TAIML+1
Line S00032 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02623  M01S00032.241l630 +++|          INDEX  SWIE,(=C* SYSTEM SOFTWARE RERUN THRESHOLD EXCEEDED.*)
02624  M01S00033.241l630 +++|          INDEX  TAIML+1,(=C* INCORRECT ABORT CODE XX.*)
02625  M01S00034.241l630 +++|          INDEX  TAIML+2
02626  M00S01662.1aj     +++| TAIP     SPACE  4,10
02627  M00S01663.1aj     +++|**        TAIP - TABLE OF ABORTED INPUT FILE PROCESSORS.
02628  M00S01664.1aj     +++|*                INDEXED BY ABORTED INPUT FILE ERROR CODE.
02629  M00S01665.1aj     +++|*
02630  M00S01666.1aj     +++|*         NOTE - ADDITION OF AN ENTRY TO THIS TABLE REQUIRES INCLUSION
02631  M00S01667.1aj     +++|*                OF THE NEW ERROR FLAG IN THE *MAX* PARAMETER LIST IN
02632  M00S01668.1aj     +++|*                THE *TAIM* TABLE DEFINITION.
02633  M00S01669.1aj     +++|
02634  M00S01670.1aj     +++|
02635  M00S01671.1aj     +++| TAIPL    EQU    TAIML       TABLE LENGTH
02636  M00S01672.1aj     +++|
02637  M00S01673.1aj     +++| TAIP     INDEX
02638  M00S01674.1aj     +++|          INDEX  JCIE,PJC
02639  M00S01675.1aj     +++|          INDEX  BCIE,PBC
02640  M00S01676.1aj     +++|          INDEX  HDIE,PHD
Line S00031 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
02641  M01S00031.ns21000 +++|          INDEX  STIE,PJC
02642  M01S00032.ns21000 +++|          INDEX  IDIE,PJC
02643  M01S00033.ns21000 +++|          INDEX  DBIE,PJC
02644  M01S00034.ns21000 +++|          INDEX  VLIE,PJC
02645  M01S00035.ns21000 +++|          INDEX  NLIE,PJC
Line S01677 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02646  M01S01677.241l630 ---|          INDEX  TAIPL+1
Line S00035 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02647  M01S00035.241l630 +++|          INDEX  TAIPL+1,PUA
02648  M01S00036.241l630 +++|          INDEX  TAIPL+2
02649  M00S01678.1aj     +++| CCA      SPACE  4,20
02650  M00S01679.1aj     +++|**        CCA - COMPLETE CONTROL POINT AREA INITIALIZATION.
02651  M00S01680.1aj     +++|*
02652  M00S01681.1aj     +++|*         INITIALIZE FIELDS OF THE CONTROL POINT AREA THAT REQUIRE NO
02653  M00S01682.1aj     +++|*         DISTINCTION BETWEEN SUBSYSTEM AND NON-SUBSYSTEM JOBS.
02654  M00S01683.1aj     +++|*
02655  M00S01684.1aj     +++|*         ENTRY  *BFMS* CONTAINS INPUT FILE SYSTEM SECTOR.
02656  M00S01685.1aj     +++|*                (JBOT) = ORIGIN TYPE.
Line S01686 Modification History
M01 (Removed by) 1aj16
Seq #  *Modification Id* Act 
----------------------------+
02657  M01S01686.1aj16   ---|*                (SC) = SERVICE CLASS.
Line S00001 Modification History
M01 (Added by) 1aj16
Seq #  *Modification Id* Act 
----------------------------+
02658  M01S00001.1aj16   +++|*                (JBSC) = SERVICE CLASS.
02659  M00S01687.1aj     +++|*                (FS) = INPUT FILE EQUIPMENT.
02660  M00S01688.1aj     +++|*                (FS+1) = INPUT FILE FIRST TRACK.
02661  M00S01689.1aj     +++|*                (T6) = INPUT FILE CURRENT TRACK.
02662  M00S01690.1aj     +++|*                (T7) = INPUT FILE CURRENT SECTOR.
02663  M00S01691.1aj     +++|*
02664  M00S01692.1aj     +++|*         USES   T1, CM - CM+4, AB - AB+4, FS - FS+4, SP - SP+4,
02665  M00S01693.1aj     +++|*                CN - CN+4, CW - CW+4.
02666  M00S01694.1aj     +++|*
02667  M00S01695.1aj     +++|*         CALLS  CMX, ECS, EOJ, PFC.
02668  M00S01696.1aj     +++|*
02669  M00S01697.1aj     +++|*         MACROS MONITOR, NFA.
02670  M00S01698.1aj     +++|
02671  M00S01699.1aj     +++|
02672  M00S01700.1aj     +++| CCA      SUBR               ENTRY/EXIT
02673  M00S01701.1aj     +++|
02674  M00S01702.1aj     +++|*         BUILD INPUT FILE FNT/FST.
02675  M00S01703.1aj     +++|
02676  M00S01704.1aj     +++|          LDD    T6          SET CURRENT TRACK
02677  M00S01705.1aj     +++|          STD    FS+2
02678  M00S01706.1aj     +++|          LDD    T7          SET CURRENT SECTOR
02679  M00S01707.1aj     +++|          STD    FS+3
02680  M00S01708.1aj     +++|          LDN    5           SET FILE STATUS = COMPLETED READ
02681  M00S01709.1aj     +++|          STD    FS+4
Line S00111 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02682  M01S00111.ns22000 +++|          LDN    ZERL
02683  M01S00112.ns22000 +++|          CRD    CM
02684  M01S00113.ns22000 +++|          LDM    IOSS+5*INSQ+3  SET ACCESS LEVEL
02685  M01S00114.ns22000 +++|          LPN    70
02686  M01S00115.ns22000 +++|          SHN    -3
02687  M01S00116.ns22000 +++|          STD    CM+2
02688  M00S01710.1aj     +++|          NFA    FNTN        WRITE INPUT FILE FNT/FST TO NFL
02689  M00S01711.1aj     +++|          CWM    CCAA,ON
Line S00117 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02690  M01S00117.ns22000 +++|          ERRNZ  FSTL-1      CODE DEPENDS ON VALUE
02691  M00S01712.1aj     +++|          CWD    FS
Line S00118 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02692  M01S00118.ns22000 +++|          ADN    FUTL-FSTL
02693  M01S00119.ns22000 +++|          CWD    CM
02694  M00S01713.1aj     +++|
Line S01714 Modification History
M01 (Removed by) 1aj56
Seq #  *Modification Id* Act 
----------------------------+
02695  M01S01714.1aj56   ---|*         SET SRU MULTIPLIERS.
02696  M01S01715.1aj56   ---|
02697  M01S01716.1aj56   ---|          LDD    MA          WRITE PARAMETERS INTO MESSAGE BUFFER
02698  M01S01717.1aj56   ---|          CWM    IJBK,ON
02699  M01S01718.1aj56   ---|          LDN    ABBF        ACCOUNT BLOCK BEGIN (SUBFUNCTION)
02700  M01S01719.1aj56   ---|          STD    CM+1
02701  M01S01720.1aj56   ---|          MONITOR  ACTM
02702  M01S01721.1aj56   ---|
02703  M00S01722.1aj     +++|*         SET JOB STEP AND SRU LIMITS.
02704  M00S01723.1aj     +++|
02705  M00S01724.1aj     +++|          LDM    VASS+AHMT*5+2  SET SRU VALIDATION INDEX
02706  M00S01725.1aj     +++|          RJM    SLI         SRU LIMIT INDEX
Line S00001 Modification History
M01 (Added by) ns2516
Seq #  *Modification Id* Act 
----------------------------+
02707  M01S00001.ns2516  +++|          SHN    -3
02708  M00S01726.1aj     +++|          STM    IJBE+1
02709  M00S01727.1aj     +++|          LDM    JBOT        CHECK ORIGIN TYPE
02710  M00S01728.1aj     +++|          LMK    TXOT
02711  M00S01729.1aj     +++|          ZJN    CCA1        IF *TXOT* ORIGIN
Line S01730 Modification History
M01 (Removed by) 1aj16
Seq #  *Modification Id* Act 
----------------------------+
02712  M01S01730.1aj16   ---|          LDM    IJBE+1      SET SRU LIMIT
Line S00002 Modification History
M01 (Added by) 1aj16
Seq #  *Modification Id* Act 
----------------------------+
02713  M01S00002.1aj16   +++|          LDM    JBSC
02714  M01S00003.1aj16   +++|          LMN    SSSC
02715  M01S00004.1aj16   +++|          NJN    CCA0        IF NOT A SUBSYSTEM
02716  M01S00005.1aj16   +++|          LJM    CCA5.1      CONTINUE
02717  M01S00006.1aj16   +++|
02718  M01S00007.1aj16   +++| CCA0     LDM    IJBE+1      SET SRU LIMIT
Line S01731 Modification History
M01 (Removed by) 1aj27
Seq #  *Modification Id* Act 
----------------------------+
02719  M01S01731.1aj27   ---|          SHN    3           MULTIPLY BY 10B
02720  M00S01732.1aj     +++|          LJM    CCA5        CONTINUE
02721  M00S01733.1aj     +++|
02722  M00S01734.1aj     +++| CCA1     LDM    VASS+AHMT*5+2  TIME LIMIT INDEX
02723  M00S01735.1aj     +++|          RJM    TLI         TIME LIMIT INDEX
02724  M00S01736.1aj     +++|          LPC    7777
02725  M00S01737.1aj     +++|          SHN    3           MULTIPLY BY 10B
Line S01738 Modification History
M01 (Removed by) 1aj15
Seq #  *Modification Id* Act 
----------------------------+
02726  M01S01738.1aj15   ---|          ADC    -DFCP
Line S00001 Modification History
M01 (Added by) 1aj15
Seq #  *Modification Id* Act 
----------------------------+
02727  M01S00001.1aj15   +++|          ADC    -/REM/UTIS*10
02728  M00S01739.1aj     +++|          PJN    CCA2        IF DEFAULT .LE. VALIDATION LIMIT
Line S01740 Modification History
M01 (Removed by) 1aj15
Seq #  *Modification Id* Act 
----------------------------+
02729  M01S01740.1aj15   ---|          ADC    DFCP        USE VALIDATION LIMIT
Line S00002 Modification History
M01 (Added by) 1aj15
Seq #  *Modification Id* Act 
----------------------------+
02730  M01S00002.1aj15   +++|          ADC    /REM/UTIS*10  USE VALIDATION LIMIT
02731  M00S01741.1aj     +++|          UJN    CCA3        CONTINUE
02732  M00S01742.1aj     +++|
Line S01743 Modification History
M01 (Removed by) 1aj15
Seq #  *Modification Id* Act 
----------------------------+
02733  M01S01743.1aj15   ---| CCA2     LDK    DFCP        USE DEFAULT
Line S00003 Modification History
M01 (Added by) 1aj15
Seq #  *Modification Id* Act 
----------------------------+
02734  M01S00003.1aj15   +++| CCA2     LDK    /REM/UTIS*10  USE DEFAULT
02735  M00S01744.1aj     +++| CCA3     STM    JTSS+1
02736  M00S01745.1aj     +++|          SHN    -14
02737  M00S01746.1aj     +++|          STM    JTSS
02738  M00S01747.1aj     +++|
02739  M00S01748.1aj     +++|*         SET SRU DEFAULT OR VALIDATION LIMIT
02740  M00S01749.1aj     +++|
02741  M00S01750.1aj     +++|          LDM    IJBE+1      GET SRU VALIDATION INDEX
Line S01751 Modification History
M01 (Removed by) 1aj27
Seq #  *Modification Id* Act 
----------------------------+
02742  M01S01751.1aj27   ---|          LPC    7777
02743  M01S01752.1aj27   ---|          SHN    3           MULTIPLY BY 10B
02744  M01S01753.1aj27   ---|          ADC    -DFSL
Line S00001 Modification History
M01 (Added by) 1aj27
M02 (Removed by) ns2516
Seq #  *Modification Id* Act 
----------------------------+
02745  M02S00001.ns2516  ---|          ADK    -DFSL/10
Line S00002 Modification History
M01 (Added by) ns2516
Seq #  *Modification Id* Act 
----------------------------+
02746  M01S00002.ns2516  +++|          ADK    -DFSL/100
02747  M00S01754.1aj     +++|          PJN    CCA4        IF DEFAULT .LE. VALIDATION LIMIT
Line S01755 Modification History
M01 (Removed by) 1aj27
Seq #  *Modification Id* Act 
----------------------------+
02748  M01S01755.1aj27   ---|          ADC    DFSL        USE VALIDATION LIMIT
Line S00002 Modification History
M01 (Added by) 1aj27
M02 (Removed by) ns2516
Seq #  *Modification Id* Act 
----------------------------+
02749  M02S00002.ns2516  ---|          ADK    DFSL/10
Line S00003 Modification History
M01 (Added by) ns2516
Seq #  *Modification Id* Act 
----------------------------+
02750  M01S00003.ns2516  +++|          ADK    DFSL/100
02751  M00S01756.1aj     +++|          UJN    CCA5        CONTINUE
02752  M00S01757.1aj     +++|
Line S01758 Modification History
M01 (Removed by) 1aj27
Seq #  *Modification Id* Act 
----------------------------+
02753  M01S01758.1aj27   ---| CCA4     LDK    DFSL        SET SRU LIMIT
02754  M01S01759.1aj27   ---| CCA5     SHN    14
Line S00003 Modification History
M01 (Added by) 1aj27
M02 (Removed by) ns2516
Seq #  *Modification Id* Act 
----------------------------+
02755  M02S00003.ns2516  ---| CCA4     LDK    DFSL/10     SET DEFAULT SRU LIMIT
Line S00004 Modification History
M01 (Added by) ns2516
Seq #  *Modification Id* Act 
----------------------------+
02756  M01S00004.ns2516  +++| CCA4     LDK    DFSL/100    SET DEFAULT SRU LIMIT
Line S00004 Modification History
M01 (Added by) 1aj27
Seq #  *Modification Id* Act 
----------------------------+
02757  M01S00004.1aj27   +++| CCA5     LMC    7777
02758  M01S00005.1aj27   +++|          NJN    CCA5.0      IF NOT UNLIMITED
02759  M01S00006.1aj27   +++|          LDC    770000
02760  M01S00007.1aj27   +++| CCA5.0   LMC    7777
Line S00008 Modification History
M01 (Added by) 1aj27
M02 (Removed by) ns2516
Seq #  *Modification Id* Act 
----------------------------+
02761  M02S00008.ns2516  ---|          SHN    14+3
02762  M00S01760.1aj     +++|          STM    IJBB
02763  M00S01761.1aj     +++|          STM    IJBC+1
02764  M00S01762.1aj     +++|          SHN    -6
02765  M00S01763.1aj     +++|          SCN    77
02766  M00S01764.1aj     +++|          STM    IJBC+2
02767  M00S01765.1aj     +++|          LMN    77
02768  M00S01766.1aj     +++|          STM    IJBB+1
02769  M00S01767.1aj     +++|
Line S00001 Modification History
M01 (Added by) 1aj56
Seq #  *Modification Id* Act 
----------------------------+
02770  M01S00001.1aj56   +++|*         SET SRU MULTIPLIERS.
02771  M01S00002.1aj56   +++|
Line S00003 Modification History
M01 (Added by) 1aj56
M02 (Removed by) 1aj56a
Seq #  *Modification Id* Act 
----------------------------+
02772  M02S00003.1aj56a  ---|          LDD    CP          WRITE *STLW*
Line S00001 Modification History
M01 (Added by) 1aj56a
Seq #  *Modification Id* Act 
----------------------------+
02773  M01S00001.1aj56a  +++| CCA5.1   LDD    CP          WRITE *STLW*
Line S00004 Modification History
M01 (Added by) 1aj56
Seq #  *Modification Id* Act 
----------------------------+
02774  M01S00004.1aj56   +++|          ADK    STLW
02775  M01S00005.1aj56   +++|          CWM    IJBB,ON
02776  M01S00006.1aj56   +++|          LDD    MA          WRITE PARAMETERS INTO MESSAGE BUFFER
02777  M01S00007.1aj56   +++|          CWM    IJBK,ON
02778  M01S00008.1aj56   +++|          LDN    ABBF        ACCOUNT BLOCK BEGIN (SUBFUNCTION)
02779  M01S00009.1aj56   +++|          STD    CM+1
02780  M01S00010.1aj56   +++|          MONITOR  ACTM
02781  M01S00011.1aj56   +++|
02782  M00S01768.1aj     +++|*         SET JOB STEP TIME LIMIT.
02783  M00S01769.1aj     +++|
Line S01770 Modification History
M01 (Removed by) 1aj16
Seq #  *Modification Id* Act 
----------------------------+
02784  M01S01770.1aj16   ---|          LDM    JTSS
Line S00008 Modification History
M01 (Added by) 1aj16
M02 (Removed by) 1aj56a
Seq #  *Modification Id* Act 
----------------------------+
02785  M02S00008.1aj56a  ---| CCA5.1   LDM    JTSS
Line S00002 Modification History
M01 (Added by) 1aj56a
Seq #  *Modification Id* Act 
----------------------------+
02786  M01S00002.1aj56a  +++|          LDM    JTSS
02787  M00S01771.1aj     +++|          SHN    14
02788  M00S01772.1aj     +++|          LMM    JTSS+1
Line S01773 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02789  M01S01773.v23l617 ---|          ZJN    CCA6        IF NO TIME ON JOB CARD
Line S00081 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02790  M01S00081.v23l617 +++|          ZJN    CCA6        IF NO TIME ON JOB COMMAND
02791  M00S01774.1aj     +++|          SHN    21-5
02792  M00S01775.1aj     +++|          STM    IJBD+1
02793  M00S01776.1aj     +++|          SHN    -6
02794  M00S01777.1aj     +++|          SCN    77
02795  M00S01778.1aj     +++|          STM    IJBD+2
Line S00120 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02796  M01S00120.ns22000 +++|
02797  M01S00121.ns22000 +++|*         SET PAGE PARAMETERS.
02798  M01S00122.ns22000 +++|
Line S00123 Modification History
M01 (Added by) ns22000
M02 (Removed by) 1aj54
Seq #  *Modification Id* Act 
----------------------------+
02799  M02S00123.1aj54   ---|          LDN    IPPL        GET SYSTEM PAGE PARAMETERS
Line S00001 Modification History
M01 (Added by) 1aj54
Seq #  *Modification Id* Act 
----------------------------+
02800  M01S00001.1aj54   +++| CCA6     LDN    IPPL        GET SYSTEM PAGE PARAMETERS
Line S00124 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02801  M01S00124.ns22000 +++|          CRD    CM
02802  M01S00125.ns22000 +++|          LDN    0
02803  M01S00126.ns22000 +++|          STD    CM          CLEAR UNRELATED BYTES
02804  M01S00127.ns22000 +++|          STD    CM+1
02805  M01S00128.ns22000 +++|          NFA    JPPN
02806  M01S00129.ns22000 +++|          CWD    CM          SYSTEM VALUES AS JOB INITIAL DEFAULTS
02807  M00S01779.1aj     +++|
02808  M00S01780.1aj     +++|*         INITIALIZE RECALL AREA LINKS.
02809  M00S01781.1aj     +++|
Line S01782 Modification History
M01 (Removed by) 1aj54
Seq #  *Modification Id* Act 
----------------------------+
02810  M01S01782.1aj54   ---| CCA6     LDN    ZERL
Line S00002 Modification History
M01 (Added by) 1aj54
Seq #  *Modification Id* Act 
----------------------------+
02811  M01S00002.1aj54   +++|          LDN    ZERL
02812  M00S01783.1aj     +++|          CRD    CM
02813  M00S01784.1aj     +++|          CRD    AB          CLEAR *FLCW* IMAGE
02814  M00S01785.1aj     +++|          CRD    FS          CLEAR *EOJW* IMAGE
02815  M00S01786.1aj     +++|          CRD    SP          CLEAR EXCHANGE PACKAGE EXIT WORD IMAGE
02816  M00S01787.1aj     +++|          CRD    CN          CLEAR *ELCW* IMAGE
02817  M00S01788.1aj     +++|          CRD    CW          CLEAR *PFCW* IMAGE
02818  M00S01789.1aj     +++|          LDN    2
02819  M00S01790.1aj     +++|          STD    CM+4
02820  M00S01791.1aj     +++| CCA7     LDC    RCCW-2
02821  M00S01792.1aj     +++|          ADD    CM+4
02822  M00S01793.1aj     +++|          ADD    CP
02823  M00S01794.1aj     +++|          CWD    CM
02824  M00S01795.1aj     +++|          AOD    CM+4
02825  M00S01796.1aj     +++|          LMN    LREC+1
02826  M00S01797.1aj     +++|          NJN    CCA7        IF INITIALIZATION IS INCOMPLETE
02827  M00S01798.1aj     +++|
02828  M00S01799.1aj     +++|*         SET ERROR EXIT MODE IN EXCHANGE PACKAGE.
02829  M00S01800.1aj     +++|
Line S01801 Modification History
M01 (Removed by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
02830  M01S01801.ns21000 ---|          LDN    CPUL
Line S00036 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
02831  M01S00036.ns21000 +++|          LDK    MABL
02832  M00S01802.1aj     +++|          CRD    CM
02833  M00S01803.1aj     +++|          LDC    7007
02834  M00S01804.1aj     +++|          STD    SP
Line S01805 Modification History
M01 (Removed by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
02835  M01S01805.ns21000 ---|          LDD    CM+3
02836  M01S01806.ns21000 ---|          LPC    300
02837  M01S01807.ns21000 ---|          ZJN    CCA8        IF NOT A CYBER 176
Line S00037 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
02838  M01S00037.ns21000 +++|          LDD    CM+1
02839  M01S00038.ns21000 +++|          SHN    -11
02840  M01S00039.ns21000 +++|          LMN    7
02841  M01S00040.ns21000 +++|          NJN    CCA8        IF NOT CYBER 176
02842  M00S01808.1aj     +++|          SOD    SP          DESELECT UNDERFLOW
Line S01809 Modification History
M01 (Removed by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
02843  M01S01809.ns21000 ---| CCA8     LDD    CM+3        CHECK FOR CYBER 170-8X5
02844  M01S01810.ns21000 ---|          SHN    21-10
02845  M01S01811.ns21000 ---|          PJN    CCA9        IF NOT A CYBER 170-8X5
02846  M01S01812.ns21000 ---|          LDK    OABL        CHECK FOR UEM PRESENT
Line S00041 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
02847  M01S00041.ns21000 +++| CCA8     LDD    CM+1        CHECK FOR CYBER 170-8X5
02848  M01S00042.ns21000 +++|          SHN    21-13
02849  M01S00043.ns21000 +++|          MJN    CCA9        IF NOT CYBER 170-8X5
02850  M01S00044.ns21000 +++|          LDK    UEML        CHECK FOR UEM PRESENT
02851  M00S01813.1aj     +++|          CRD    CM
02852  M00S01814.1aj     +++|          LDD    CM+4
02853  M00S01815.1aj     +++|          LPN    2
02854  M00S01816.1aj     +++|          SHN    10-1
02855  M00S01817.1aj     +++|          RAD    SP          SET/CLEAR UEM PRESENT FLAG
02856  M00S01818.1aj     +++|          LDM    JBOT        DON-T SET PURGING FLAG IF SYSTEM ORIGIN
02857  M00S01819.1aj     +++|          LMK    SYOT
02858  M00S01820.1aj     +++|          ZJN    CCA9        IF SYSTEM ORIGIN JOB
02859  M00S01821.1aj     +++|          LDK    SSTL        SET EXTENDED PURGING BIT
02860  M00S01822.1aj     +++|          CRD    CM
02861  M00S01823.1aj     +++|          LDD    CM+3
02862  M00S01824.1aj     +++|          LPN    40
02863  M00S01825.1aj     +++|          LMN    40
02864  M00S01826.1aj     +++|          SHN    4-5
02865  M00S01827.1aj     +++|          RAD    SP          SET/CLEAR PURGING FLAG
Line S00001 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
02866  M01S00001.252l678 +++| CCA9     LDK    MEFL
02867  M01S00002.252l678 +++|          CRD    CM
02868  M01S00003.252l678 +++|          LDD    CM+2
02869  M01S00004.252l678 +++|          LPC    200         EXPANDED ADDRESSING FLAG
02870  M01S00005.252l678 +++|          RAD    SP
02871  M00S01828.1aj     +++|
02872  M00S01829.1aj     +++|*         DETERMINE MFL AND MAXFL FOR FL BY THE FOLLOWING FORMULA -
02873  M00S01830.1aj     +++|*
02874  M00S01831.1aj     +++|*                A = MIN(JCSS, VALIDATED CM, MAXIMUM MACHINE SIZE).
02875  M00S01832.1aj     +++|*                MFL,MAXFL = MAX(A, AFFL, JTFL).
02876  M00S01833.1aj     +++|*
02877  M00S01834.1aj     +++|*                AFFL = *ACCFAM* FIELD LENGTH.
02878  M00S01835.1aj     +++|*                JTFL = MAXIMUM OF *DAYFILE, MFILES* FIELD LENGTH.
02879  M00S01836.1aj     +++|
Line S01837 Modification History
M01 (Removed by) ns2069
Seq #  *Modification Id* Act 
----------------------------+
02880  M01S01837.ns2069  ---| CCA9     LDM    VASS+AHMT*5+3  GET MAXIMUM VALIDATED CM
Line S00001 Modification History
M01 (Added by) ns2069
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
02881  M02S00001.252l678 ---| CCA9     LDM    JBOT        SET JOB ORIGIN
Line S00006 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
02882  M01S00006.252l678 +++|          LDM    JBOT        SET JOB ORIGIN
Line S00002 Modification History
M01 (Added by) ns2069
Seq #  *Modification Id* Act 
----------------------------+
02883  M01S00002.ns2069  +++|          STD    T1
02884  M01S00003.ns2069  +++|          LDM    VASS+AHMT*5+3  GET MAXIMUM VALIDATED CM FL
02885  M00S01838.1aj     +++|          RJM    CMX         COMPUTE MAXIMUM VALIDATED CM
02886  M00S01839.1aj     +++|          STD    AB          SET MFL
02887  M00S01840.1aj     +++|          STD    AB+2        SET MAXFL
02888  M00S01841.1aj     +++|          SBM    JCSS
02889  M00S01842.1aj     +++|          MJN    CCA10       IF SPECIFIED FL .GE. ALLOWABLE FL
02890  M00S01843.1aj     +++|          LDM    JCSS        USE SPECIFIED AS MFL AND MAXFL
02891  M00S01844.1aj     +++|          STD    AB
02892  M00S01845.1aj     +++|          STD    AB+2
02893  M00S01846.1aj     +++|
02894  M00S01847.1aj     +++|*         DETERMINE IF FIELD LENGTH CALCULATED ABOVE IS GREATER
02895  M00S01848.1aj     +++|*         THAN OR EQUAL TO THE MINIMUM FL NEEDED TO EXECUTE JOB
02896  M00S01849.1aj     +++|*         TERMINATION.  IF IT IS, USE THE FIELD LENGTH CALCULATED
02897  M00S01850.1aj     +++|*         ABOVE.  IF IT IS NOT, USE THE MINIMUM FIELD LENGTH NEEDED
02898  M00S01851.1aj     +++|*         FOR JOB TERMINATION.
02899  M00S01852.1aj     +++|
02900  M00S01853.1aj     +++| CCA10    LDD    AB          COMPUTE MAX(AB, AFFL, JTFL)
02901  M00S01854.1aj     +++|          SBK    IJFL
02902  M00S01855.1aj     +++|          PJN    CCA11       IF CALCULATED FL .GE. TERMINATION FL
02903  M00S01856.1aj     +++|          LDK    IJFL        USE MINIMUM JOB TERMINATION FL
02904  M00S01857.1aj     +++|          STD    AB          SET MFL
02905  M00S01858.1aj     +++|          STD    AB+2        SET MAXFL
02906  M00S01859.1aj     +++|
02907  M00S01860.1aj     +++|*         DETERMINE MINIMUM OF SPECIFIED ECS FL AND VALIDATION ECS FL.
02908  M00S01861.1aj     +++|
02909  M00S01862.1aj     +++| CCA11    LDM    VASS+AHMT*5+3  GET VALIDATION INDEX FOR ECS
02910  M00S01863.1aj     +++|          LPN    77
Line S01864 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02911  M01S01864.v23l617 ---|          RJM    ECX         CALCULATE VALIDATION ECS FL
Line S00082 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02912  M01S00082.v23l617 +++|          RJM    ECX         CALCULATE VALIDATION EXTENDED MEMORY FL
02913  M00S01865.1aj     +++|          STD    CN          SET MFLE TO VALIDATION MAXIMUM
02914  M00S01866.1aj     +++|          STD    CN+2        SET MAXFLE TO VALIDATION MAXIMUM
02915  M00S01867.1aj     +++|          SBM    JESS
02916  M00S01868.1aj     +++|          MJN    CCA12       IF SPECIFIED ECS FL IS TOO BIG
02917  M00S01869.1aj     +++|          LDM    JESS        USE SPECIFIED ECS FL AS MFLE AND MAXFLE
02918  M00S01870.1aj     +++|          STD    CN
02919  M00S01871.1aj     +++|          STD    CN+2
02920  M00S01872.1aj     +++|
02921  M00S01873.1aj     +++|*         FINISH BUILDING CPA.
02922  M00S01874.1aj     +++|
02923  M00S01875.1aj     +++| CCA12    RJM    EOJ         BUILD *EOJW* IN *FS - FS+4*
02924  M00S01876.1aj     +++|          RJM    PFC         BUILD *PFCW* IN *CW - CW+4*
02925  M00S01877.1aj     +++|          ERRNZ  DFBJ-DFSO   CODE REQUIRES BATCH/SYSTEM DEFAULTS EQUAL
02926  M00S01878.1aj     +++|          ERRNZ  DFBA-DFSO   CODE REQUIRES BATCH/SYSTEM DEFAULTS EQUAL
02927  M00S01879.1aj     +++|          LDD    CP
02928  M00S01880.1aj     +++|          ADN    3
02929  M00S01881.1aj     +++|          CWD    SP
Line S01882 Modification History
M01 (Removed by) 1aj56
Seq #  *Modification Id* Act 
----------------------------+
02930  M01S01882.1aj56   ---|          ADN    STLW-3      WRITE *STLW*, *SRJW*, *CPJW*
02931  M01S01883.1aj56   ---|          ERRNZ  SRJW-STLW-1 CODE ASSUMES *STLW* AND *SRJW* CONTIGUOUS
Line S00012 Modification History
M01 (Added by) 1aj56
Seq #  *Modification Id* Act 
----------------------------+
02932  M01S00012.1aj56   +++|          ADN    SRJW-3      WRITE *SRJW*, *CPJW* AND *FPFW*
02933  M00S01884.1aj     +++|          ERRNZ  CPJW-SRJW-1 CODE ASSUMES *SRJW* AND *CPJW* CONTIGUOUS
Line S00003 Modification History
M01 (Added by) 1aj54
Seq #  *Modification Id* Act 
----------------------------+
02934  M01S00003.1aj54   +++|          ERRNZ  FPFW-CPJW-1 CODE ASSUMES *CPJW* AND *FPFW* CONTIGUOUS
Line S01885 Modification History
M01 (Removed by) 1aj56
Seq #  *Modification Id* Act 
----------------------------+
02935  M01S01885.1aj56   ---|          CWM    IJBB,ON     WRITE *STLW*
02936  M00S01886.1aj     +++|          CWM    IJBC,ON     WRITE *SRJW*
02937  M00S01887.1aj     +++|          CWM    IJBD,ON     WRITE *CPJW*
Line S01888 Modification History
M01 (Removed by) 1aj54
Seq #  *Modification Id* Act 
----------------------------+
02938  M01S01888.1aj54   ---|          ADN    FLCW-CPJW-1
Line S00004 Modification History
M01 (Added by) 1aj54
Seq #  *Modification Id* Act 
----------------------------+
02939  M01S00004.1aj54   +++|          CWM    IJBE,ON     WRITE *FPFW*
02940  M01S00005.1aj54   +++|          ADN    FLCW-FPFW-1
02941  M00S01889.1aj     +++|          CWD    AB
02942  M00S01890.1aj     +++|          ADN    ELCW-FLCW
02943  M00S01891.1aj     +++|          CWD    CN
02944  M00S01892.1aj     +++|          ADN    PFCW-ELCW
02945  M00S01893.1aj     +++|          CWD    CW
02946  M00S01894.1aj     +++|          ADN    ALMW-PFCW
02947  M00S01895.1aj     +++|          ERRNZ  DFBA-777777 CODE REQUIRES *IJBF - IJBF+4* = 0
02948  M00S01896.1aj     +++|          CWM    IJBM,ON     WRITE *ALMW*
02949  M00S01897.1aj     +++|          IFNE   ACLW-ALMW,1,1
02950  M00S01898.1aj     +++|          ADN    ACLW-ALMW-1
Line S01899 Modification History
M01 (Removed by) 1aj107
Seq #  *Modification Id* Act 
----------------------------+
02951  M01S01899.1aj107  ---|          CWM    IJBM,ON     WRITE *ACLW*
Line S00008 Modification History
M01 (Added by) 1aj107
Seq #  *Modification Id* Act 
----------------------------+
02952  M01S00008.1aj107  +++|          CWM    IJBM+2,ON   WRITE *ACLW*
02953  M00S01900.1aj     +++|          IFNE   AACW-ACLW,1,1
02954  M00S01901.1aj     +++|          ADN    AACW-ACLW-1
02955  M00S01902.1aj     +++|          CWM    IJBM,ON     WRITE *AACW*
02956  M00S01903.1aj     +++|          SBN    AACW+1-EOJW
02957  M00S01904.1aj     +++|          CWD    FS          WRITE *EOJW*
02958  M00S01905.1aj     +++|          ADN    TSCW-EOJW   READ *TSCW*
02959  M00S01906.1aj     +++|          CRD    CM
02960  M00S01907.1aj     +++|          STD    FS
02961  M00S01908.1aj     +++|          LDK    RTCL        COMPUTE CM SLICE
02962  M00S01909.1aj     +++|          CRD    CN
02963  M00S01910.1aj     +++|          LDD    CN+1
02964  M00S01911.1aj     +++|          RAD    CM+1
02965  M00S01912.1aj     +++|          SHN    -14
02966  M00S01913.1aj     +++|          ADD    CN
02967  M00S01914.1aj     +++|          STD    CM
Line S00013 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02968  M01S00013.271l716 +++|          LDD    CN+1        COMPUTE CONTROL POINT SLICE
02969  M01S00014.271l716 +++|          RAD    CM+4
02970  M01S00015.271l716 +++|          SHN    -14
02971  M01S00016.271l716 +++|          ADD    CN
02972  M01S00017.271l716 +++|          STD    CM+3
02973  M00S01915.1aj     +++|          LDD    FS          WRITE *TSCW*
02974  M00S01916.1aj     +++|          CWD    CM
Line S00045 Modification History
M01 (Added by) ns21000
M02 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02975  M02S00045.ns22000 ---|          ADN    JSCW-TSCW   READ *JSCW*
02976  M02S00046.ns22000 ---|          CRD    CM
02977  M02S00047.ns22000 ---|          STD    FS
02978  M02S00048.ns22000 ---|          LDD    CM+1
02979  M02S00049.ns22000 ---|          SCN    77
02980  M02S00050.ns22000 ---|          STD    CM+1
02981  M02S00051.ns22000 ---|          LDM    VASS+APRN*5+4  GET *APAL*
02982  M02S00052.ns22000 ---|          SHN    -6
02983  M02S00053.ns22000 ---|          RAD    CM+1
02984  M02S00054.ns22000 ---|          LDD    FS
02985  M02S00055.ns22000 ---|          CWD    CM          WRITE *JSCW*
Line S00130 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02986  M01S00130.ns22000 +++|          ADN    JSCW-TSCW   BUILD *JSCW*
02987  M01S00131.ns22000 +++|          STD    FS
02988  M01S00132.ns22000 +++|          LDM    IOSS+5*INSQ+3  SET JOB ACCESS LEVEL LIMIT
02989  M01S00133.ns22000 +++|          LPN    7
02990  M01S00134.ns22000 +++|          SHN    13-2
02991  M01S00135.ns22000 +++|          RAM    VASS+5*ASVW+2
02992  M01S00136.ns22000 +++|          LDM    IOSS+5*INSQ+3  SET INITIAL JOB ACCESS LEVEL
02993  M01S00137.ns22000 +++|          LPN    70
02994  M01S00138.ns22000 +++|          SHN    13-5
02995  M01S00139.ns22000 +++|          RAM    VASS+5*ASVW+1
02996  M01S00140.ns22000 +++|          LDD    FS          WRITE *JSCW*
02997  M01S00141.ns22000 +++|          CWM    VASS+5*ASVW,ON
Line S01917 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02998  M01S01917.ns22000 ---|          LDN    ZERL
Line S00142 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02999  M01S00142.ns22000 +++|          LDD    CP
03000  M01S00143.ns22000 +++|          ADK    AALW        READ *AALW*
03001  M01S00144.ns22000 +++|          CRD    CM
03002  M01S00145.ns22000 +++|          STD    FS
03003  M01S00146.ns22000 +++|          LDM    VASS+APRN*5+4  GET APPLICATION ACCESS LEVEL
03004  M01S00147.ns22000 +++|          SHN    -6
03005  M01S00148.ns22000 +++|          STD    CM+4
03006  M01S00149.ns22000 +++|          LDD    FS
03007  M01S00150.ns22000 +++|          CWD    CM          WRITE *AALW*
03008  M01S00151.ns22000 +++|          LDN    ZERL
03009  M00S01918.1aj     +++|          CRD    CM
03010  M00S01919.1aj     +++|          LDD    FL
03011  M00S01920.1aj     +++|          ZJN    CCA13       IF NO CM FL IS ASSIGNED
03012  M00S01921.1aj     +++|          LDD    RA          CLEAR RA - RA+2
03013  M00S01922.1aj     +++|          SHN    6
03014  M00S01923.1aj     +++|          CWD    CM
03015  M00S01924.1aj     +++|          ADN    1
03016  M00S01925.1aj     +++|          CWD    CM
03017  M00S01926.1aj     +++|          ADN    1
03018  M00S01927.1aj     +++|          CWD    CM
Line S01928 Modification History
M01 (Removed by) ns2181b
Seq #  *Modification Id* Act 
----------------------------+
03019  M01S01928.ns2181b ---| CCA13    LDM    JBSC        CHECK FOR DEADSTART SEQUENCING JOB
03020  M01S01929.ns2181b ---|          LMN    DSSC
03021  M01S01930.ns2181b ---|          NJN    CCA14       IF NOT DEADSTART SEQUENCING JOB
03022  M01S01931.ns2181b ---|
03023  M01S01932.ns2181b ---|*         STORE DEADSTART SEQUENCING IDENTIFICATION NUMBER IN *JCIW*
03024  M01S01933.ns2181b ---|*         FOR *CMS* AND *ISF*.
03025  M01S01934.ns2181b ---|
03026  M01S01935.ns2181b ---|          LDD    CP
03027  M01S01936.ns2181b ---|          ADN    JCIW
03028  M01S01937.ns2181b ---|          CRD    CM
03029  M01S01938.ns2181b ---|          LCN    7777-DSSI
03030  M01S01939.ns2181b ---|          STD    CM+2
03031  M01S01940.ns2181b ---|          LDD    CP
03032  M01S01941.ns2181b ---|          ADN    JCIW
03033  M01S01942.ns2181b ---|          CWD    CM
03034  M01S01943.ns2181b ---| CCA14    LJM    CCAX        RETURN
Line S00007 Modification History
M01 (Added by) ns2181b
Seq #  *Modification Id* Act 
----------------------------+
03035  M01S00007.ns2181b +++| CCA13    LJM    CCAX        RETURN
03036  M00S01944.1aj     +++|
03037  M00S01945.1aj     +++|
Line S01946 Modification History
M01 (Removed by) 1aj111
Seq #  *Modification Id* Act 
----------------------------+
03038  M01S01946.1aj111  ---| CCAA     VFD    42/5LINPUT,6/1,12/INFT*100
Line S00001 Modification History
M01 (Added by) 1aj111
Seq #  *Modification Id* Act 
----------------------------+
03039  M01S00001.1aj111  +++| CCAA     VFD    42/5LINPUT,6/1,6/INFT,6/NDST
Line S01947 Modification History
M01 (Removed by) ns2308
Seq #  *Modification Id* Act 
----------------------------+
03040  M01S01947.ns2308  ---| CCP      SPACE  4,10
03041  M01S01948.ns2308  ---|**        CCP - CLEAR CONTROL POINT AREA.
03042  M01S01949.ns2308  ---|*
03043  M01S01950.ns2308  ---|*         ENTRY  (CP) = CONTROL POINT AREA ADDRESS.
03044  M01S01951.ns2308  ---|*
03045  M01S01952.ns2308  ---|*         USES   T1, T2, CM - CM+4.
Line S00001 Modification History
M01 (Added by) ns2124
M02 (Removed by) ns2308
Seq #  *Modification Id* Act 
----------------------------+
03046  M02S00001.ns2308  ---|*
03047  M02S00002.ns2308  ---|*         MACROS PAUSE.
Line S01953 Modification History
M01 (Removed by) ns2308
Seq #  *Modification Id* Act 
----------------------------+
03048  M01S01953.ns2308  ---|
03049  M01S01954.ns2308  ---|
03050  M01S01955.ns2308  ---| CCP      SUBR               ENTRY/EXIT
Line S00003 Modification History
M01 (Added by) ns2124
M02 (Removed by) ns2308
Seq #  *Modification Id* Act 
----------------------------+
03051  M02S00003.ns2308  ---| CCP0     PAUSE              CHECK PP COUNT
03052  M02S00004.ns2308  ---|          LDD    CM
03053  M02S00005.ns2308  ---|          SBN    1
03054  M02S00006.ns2308  ---|          NJN    CCP0        IF OTHER PP-S ASSIGNED
Line S01956 Modification History
M01 (Removed by) ns2308
Seq #  *Modification Id* Act 
----------------------------+
03055  M01S01956.ns2308  ---|          LDN    CCPAL       INITIALIZE TABLE INDEX
03056  M01S01957.ns2308  ---|          STD    T1
03057  M01S01958.ns2308  ---|          LDC    200         INITIALIZE WORD OFFSET
03058  M01S01959.ns2308  ---|          STD    T2
03059  M01S01960.ns2308  ---|          LDN    ZERL
03060  M01S01961.ns2308  ---|          CRD    CM
03061  M01S01962.ns2308  ---| CCP1     SOD    T1          DECREMENT TABLE INDEX
03062  M01S01963.ns2308  ---| CCP2     SOD    T2          DECREMENT WORD OFFSET
03063  M01S01964.ns2308  ---|          MJN    CCPX        IF CPA CLEARED
03064  M01S01965.ns2308  ---|          LMM    CCPA,T1
03065  M01S01966.ns2308  ---|          ZJN    CCP1        IF WORD SHOULD NOT BE CLEARED
03066  M01S01967.ns2308  ---|          LDD    T2          CLEAR CPA WORD
03067  M01S01968.ns2308  ---|          ADD    CP
03068  M01S01969.ns2308  ---|          CWD    CM
03069  M01S01970.ns2308  ---|          UJN    CCP2        CHECK NEXT WORD
03070  M01S01971.ns2308  ---|
03071  M01S01972.ns2308  ---|
03072  M01S01973.ns2308  ---|*         TABLE OF PRESERVED CONTROL POINT AREA WORDS.  ENTRIES MUST
03073  M01S01974.ns2308  ---|*         BE ORDERED BY ASCENDING ADDRESSES.
03074  M01S01975.ns2308  ---|
03075  M01S01976.ns2308  ---| CCPA     CON    -0
03076  M01S01977.ns2308  ---|          CON    6           MA WORD OF EXCHANGE PACKAGE
03077  M01S01978.ns2308  ---|          CON    7           EEA WORD OF EXCHANGE PACKAGE
03078  M01S01979.ns2308  ---|          CON    STSW
03079  M01S01980.ns2308  ---|          CON    JCIW
03080  M01S01981.ns2308  ---|          CON    FLSW
03081  M01S01982.ns2308  ---|          CON    ECSW
03082  M01S01983.ns2308  ---|          CON    TFSW
03083  M01S01984.ns2308  ---|          CON    TSCW
03084  M01S01985.ns2308  ---| CCPAL    EQU    *-CCPA      TABLE LENGTH
Line S00016 Modification History
M01 (Added by) 1aj20
Seq #  *Modification Id* Act 
----------------------------+
03085  M01S00016.1aj20   +++| CDD      SPACE  4,10
03086  M01S00017.1aj20   +++|**        CDD - CONVERT TO DECIMAL DISPLAY CODE.
03087  M01S00018.1aj20   +++|*
03088  M01S00019.1aj20   +++|*         ENTRY  (A) = INTEGER TO CONVERT.
03089  M01S00020.1aj20   +++|*
03090  M01S00021.1aj20   +++|*         EXIT   (CM+3 - CM+4) = DISPLAY CODE VALUE.
03091  M01S00022.1aj20   +++|*
03092  M01S00023.1aj20   +++|*         USES   CM - CM+4, T7.
03093  M01S00024.1aj20   +++|*
03094  M01S00025.1aj20   +++|*         MACROS MONITOR.
03095  M01S00026.1aj20   +++|
03096  M01S00027.1aj20   +++|
03097  M01S00028.1aj20   +++| CDD      SUBR               ENTRY/EXIT
03098  M01S00029.1aj20   +++|          STD    CM+4        SET UP CALL FOR *RDCM*
03099  M01S00030.1aj20   +++|          LDN    ZERL
03100  M01S00031.1aj20   +++|          CRD    T7
03101  M01S00032.1aj20   +++|          LDD    MA
03102  M01S00033.1aj20   +++|          CWD    CM
03103  M01S00034.1aj20   +++|          MONITOR  RDCM      CONVERT DATA
03104  M01S00035.1aj20   +++|          LDD    MA
03105  M01S00036.1aj20   +++|          CRD    CM
03106  M01S00037.1aj20   +++|          LDD    CM+2        REMOVE DECIMAL POINT
03107  M01S00038.1aj20   +++|          LPN    77
03108  M01S00039.1aj20   +++|          SHN    6
03109  M01S00040.1aj20   +++|          STD    CM+2
03110  M01S00041.1aj20   +++|          LDD    CM+3
03111  M01S00042.1aj20   +++|          LPN    77
03112  M01S00043.1aj20   +++|          LMD    CM+2
03113  M01S00044.1aj20   +++|          STD    CM+3
03114  M01S00045.1aj20   +++|          UJN    CDDX        RETURN
03115  M00S01986.1aj     +++| PNS      SPACE  4,20
03116  M00S01987.1aj     +++|**        PNS - PROCESS NON-SUBSYSTEM JOB.
03117  M00S01988.1aj     +++|*
03118  M00S01989.1aj     +++|*         PERFORM THAT PART OF JOB INITIATION PECULIAR TO NON-SUBSYSTEM
03119  M00S01990.1aj     +++|*         JOBS.
03120  M00S01991.1aj     +++|*
03121  M00S01992.1aj     +++|*         ENTRY  *BFMS* CONTAINS INPUT FILE SYSTEM SECTOR.
03122  M00S01993.1aj     +++|*
03123  M00S01994.1aj     +++|*         EXIT   (A) .GE. 0 IF JOB SHOULD NOT BE TERMINATED.
03124  M00S01995.1aj     +++|*                (A) .LT. 0 IF JOB SHOULD BE TERMINATED.
03125  M00S01996.1aj     +++|*
Line S01997 Modification History
M01 (Removed by) ns2748
Seq #  *Modification Id* Act 
----------------------------+
03126  M01S01997.ns2748  ---|*         USES   CM - CM+4, FS, AB - AB+4, TA, TN.
Line S00004 Modification History
M01 (Added by) ns2748
Seq #  *Modification Id* Act 
----------------------------+
03127  M01S00004.ns2748  +++|*         USES   TN, AB - AB+4, CM - CM+4.
03128  M00S01998.1aj     +++|*
Line S01999 Modification History
M01 (Removed by) ns2748
Seq #  *Modification Id* Act 
----------------------------+
03129  M01S01999.ns2748  ---|*         CALLS  BCS, IAM, ISD, STA.
Line S00005 Modification History
M01 (Added by) ns2748
Seq #  *Modification Id* Act 
----------------------------+
03130  M01S00005.ns2748  +++|*         CALLS  BCS, IAM, ISD, RRR, SRR, STA.
03131  M00S02000.1aj     +++|*
03132  M00S02001.1aj     +++|*         MACROS SFA.
03133  M00S02002.1aj     +++|
03134  M00S02003.1aj     +++|
03135  M00S02004.1aj     +++| PNS      SUBR               ENTRY/EXIT
Line S02005 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03136  M01S02005.v23l617 ---|          RJM    BCS         BUILD CONTROL STATEMENT BUFFER
Line S00083 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03137  M01S00083.v23l617 +++|          RJM    BCS         BUILD COMMAND BUFFER
03138  M00S02006.1aj     +++|
03139  M00S02007.1aj     +++|*         SET 026/029 PUNCH MODE FLAG IN CPA.
03140  M00S02008.1aj     +++|
03141  M00S02009.1aj     +++|          LDN    ZERL
03142  M00S02010.1aj     +++|          CRD    CM
Line S02011 Modification History
M01 (Removed by) ns2006
Seq #  *Modification Id* Act 
----------------------------+
03143  M01S02011.ns2006  ---|          LDM    JISS
Line S00001 Modification History
M01 (Added by) ns2006
Seq #  *Modification Id* Act 
----------------------------+
03144  M01S00001.ns2006  +++|          LDM    JFSS
03145  M00S02012.1aj     +++|          LPN    1
03146  M00S02013.1aj     +++|          SHN    12
03147  M00S02014.1aj     +++|          STD    CM
03148  M00S02015.1aj     +++|          LDD    CP
03149  M00S02016.1aj     +++|          ADN    SNSW
03150  M00S02017.1aj     +++|          CWD    CM
03151  M00S02018.1aj     +++|
Line S02019 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03152  M01S02019.v23l617 ---|*         ISSUE JOB STATEMENT TO DAYFILE.
Line S00084 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03153  M01S00084.v23l617 +++|*         ISSUE JOB COMMAND TO DAYFILE.
03154  M00S02020.1aj     +++|
03155  M00S02021.1aj     +++|          LDC    STMT
Line S02022 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03156  M01S02022.v23l617 ---|          RJM    ISD         ISSUE CONTROL STATEMENT TO DAYFILE
Line S00085 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03157  M01S00085.v23l617 +++|          RJM    ISD         ISSUE COMMAND TO DAYFILE
03158  M00S02023.1aj     +++|
03159  M00S02024.1aj     +++|*         ISSUE ACCOUNTING MESSAGE TO DAYFILE.
03160  M00S02025.1aj     +++|
03161  M00S02026.1aj     +++|          RJM    IAM         ISSUE ACCOUNTING MESSAGE TO DAYFILE
03162  M00S02027.1aj     +++|
03163  M00S02028.1aj     +++|*         CONTINUE BUILDING CONTROL POINT AREA.
03164  M00S02029.1aj     +++|
03165  M00S02030.1aj     +++|          LDD    CP          SET/CLEAR SSID FIELD
03166  M00S02031.1aj     +++|          ADN    JCIW
03167  M00S02032.1aj     +++|          CRD    CM
03168  M00S02033.1aj     +++|          LDM    SISS
03169  M00S02034.1aj     +++|          STD    CM+2
03170  M00S02035.1aj     +++|          LDD    CP
03171  M00S02036.1aj     +++|          ADN    JCIW
03172  M00S02037.1aj     +++|          CWD    CM
Line S02038 Modification History
M01 (Removed by) ns2323
Seq #  *Modification Id* Act 
----------------------------+
03173  M01S02038.ns2323  ---|          LDM    JBOT        CHECK FOR SYSTEM ORIGIN JOB
03174  M01S02039.ns2323  ---|          LMK    SYOT
03175  M01S02040.ns2323  ---|          ZJN    PNS1        IF SYSTEM ORIGIN JOB
Line S02041 Modification History
M01 (Removed by) ns22000
M02 (Removed by) ns2323
Seq #  *Modification Id* Act 
----------------------------+
03176  M02S02041.ns2323  ---|          LDN    ZERL
03177  M02S02042.ns2323  ---|          CRM    IJBG,ON
03178  M02S02043.ns2323  ---|          LDN    40          SET CHARGE REQUIRED FLAG IN *UIDW*
03179  M02S02044.ns2323  ---|          STM    IJBG+3
Line S00152 Modification History
M01 (Added by) ns22000
M02 (Removed by) ns2323
Seq #  *Modification Id* Act 
----------------------------+
03180  M02S00152.ns2323  ---|          LDM    ACSS+3      SET CHARGE REQUIRED FLAG
03181  M02S00153.ns2323  ---|          SCN    40
03182  M02S00154.ns2323  ---|          LMN    40
03183  M02S00155.ns2323  ---|          STM    ACSS+3
Line S02045 Modification History
M01 (Removed by) ns2323
Seq #  *Modification Id* Act 
----------------------------+
03184  M01S02045.ns2323  ---| PNS1     LDD    CP          UPDATE *UIDW*
03185  M01S02046.ns2323  ---|          ADN    UIDW
Line S00057 Modification History
M01 (Added by) ns2323
Seq #  *Modification Id* Act 
----------------------------+
03186  M01S00057.ns2323  +++|          ADN    UIDW-JCIW   WRITE USER IDENTIFICATION
Line S02047 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03187  M01S02047.ns22000 ---|          CWM    IJBG,ON
Line S00156 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03188  M01S00156.ns22000 +++|          CWM    ACSS,ON
03189  M00S02048.1aj     +++|
03190  M00S02049.1aj     +++|*         IF THE JOB IS ON-LINE INTERACTIVE, STORE ITS TERMINAL NUMBER
03191  M00S02050.1aj     +++|*         IN THE CONTROL POINT AREA AND STORE ITS EJT ORDINAL IN THE
03192  M00S02051.1aj     +++|*         TERMINAL TABLE.
03193  M00S02052.1aj     +++|
03194  M00S02053.1aj     +++|          LDM    JBOT        CHECK JOB ORIGIN TYPE
03195  M00S02054.1aj     +++|          LMK    TXOT
03196  M00S02055.1aj     +++|          NJN    PNS2        IF NOT INTERACTIVE JOB
03197  M00S02056.1aj     +++|          SFA    EJT,JO      SET EJT ADDRESS
03198  M00S02057.1aj     +++|          ADK    JSNE        READ CONNECTION STATUS WORD
03199  M00S02058.1aj     +++|          CRD    CM
03200  M00S02059.1aj     +++|          LDD    CM+4        CHECK CONNECTION STATUS
03201  M00S02060.1aj     +++|          SHN    -7
03202  M00S02061.1aj     +++|          LPN    17
03203  M00S02062.1aj     +++|          LMK    OLCS
03204  M00S02063.1aj     +++|          ZJN    PNS3        IF ONLINE
03205  M00S02064.1aj     +++| PNS2     LJM    PNSX        EXIT
03206  M00S02065.1aj     +++|
03207  M00S02066.1aj     +++| PNS3     LDN    ZERL        INITIALIZE *TTNW*
03208  M00S02067.1aj     +++|          CRD    CM
03209  M00S02068.1aj     +++|          LDM    TRSS        GET TERMINAL NUMBER FROM SYSTEM SECTOR
03210  M00S02069.1aj     +++|          STM    TSTN        SET JOB TERMINAL NUMBER
03211  M00S02070.1aj     +++|          STD    CM+1
03212  M00S02071.1aj     +++|          STD    TN
Line S02072 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03213  M01S02072.ns22000 ---|          LDM    VASS+ATIS*5+1  LOAD INITIAL SUBSYSTEM
03214  M01S02073.ns22000 ---|          LPC    3700
Line S00157 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03215  M01S00157.ns22000 +++|          LDM    ISSS        LOAD INITIAL INTERACTIVE SUBSYSTEM
Line S00002 Modification History
M01 (Added by) 261l700
Seq #  *Modification Id* Act 
----------------------------+
03216  M01S00002.261l700 +++|          LPN    37
Line S00158 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03217  M01S00158.ns22000 +++|          SHN    6
03218  M00S02074.1aj     +++|          STD    CM
03219  M00S02075.1aj     +++|          LDD    CP          WRITE *TTNW*
03220  M00S02076.1aj     +++|          ADK    TTNW
03221  M00S02077.1aj     +++|          CWD    CM
03222  M00S02078.1aj     +++|          LDM    TSAF        GET *IAF* CP NUMBER
03223  M00S02079.1aj     +++|          NJN    PNS4        IF *IAF* IS ACCESSIBLE
03224  M00S02080.1aj     +++|          STM    TSTN        CLEAR TERMINAL NUMBER
Line S00001 Modification History
M01 (Added by) 1aj101
Seq #  *Modification Id* Act 
----------------------------+
03225  M01S00001.1aj101  +++|          LDN    12D         CHANGE CONNECTION STATUS TO *NICS*
03226  M01S00002.1aj101  +++|          STM    IJBL+0
03227  M01S00003.1aj101  +++|          LDC    100+EXJS*2+1  RESET JOB ADVANCE FLAG
03228  M01S00004.1aj101  +++|          STM    IJBL+4
03229  M00S02081.1aj     +++|          LCN    0           INDICATE JOB MUST BE TERMINATED
03230  M00S02082.1aj     +++|          UJN    PNS2        EXIT
03231  M00S02083.1aj     +++|
03232  M00S02084.1aj     +++|*         STORE EJT ORDINAL IN TERMINAL TABLE.
03233  M00S02085.1aj     +++|
Line S02086 Modification History
M01 (Removed by) ns2748
Seq #  *Modification Id* Act 
----------------------------+
03234  M01S02086.ns2748  ---| PNS4     SHN    7           SET *IAF* CONTROL POINT ADDRESS
03235  M01S02087.ns2748  ---|          ADK    FLSW        READ FL CONTROL WORD
03236  M01S02088.ns2748  ---|          CRD    CM
03237  M01S02089.ns2748  ---|          LDD    CM+3        SET *IAF* RA FOR *STA*
03238  M01S02090.ns2748  ---|          STD    TA
Line S00006 Modification History
M01 (Added by) ns2748
Seq #  *Modification Id* Act 
----------------------------+
03239  M01S00006.ns2748  +++| PNS4     RJM    SRR         SET R-REGISTER TO IAF RA
03240  M00S02091.1aj     +++|          RJM    STA         SET FWA OF TERMINAL TABLE
03241  M00S02092.1aj     +++|          ADK    /REM/VUIT
03242  M00S02093.1aj     +++|          CRD    AB
03243  M00S02094.1aj     +++|          LDD    JO          STORE EJT ORDINAL IN TERMINAL TABLE
03244  M00S02095.1aj     +++|          STD    AB+4
03245  M00S02096.1aj     +++|          LDD    TT
03246  M00S02097.1aj     +++|          SHN    14
03247  M00S02098.1aj     +++|          LMD    TT+1
03248  M00S02099.1aj     +++|          ADK    /REM/VUIT
03249  M00S02100.1aj     +++|          CWD    AB
Line S00007 Modification History
M01 (Added by) ns2748
Seq #  *Modification Id* Act 
----------------------------+
03250  M01S00007.ns2748  +++|          RJM    RRR         RESTORE R-REGISTER
03251  M00S02101.1aj     +++|          LDN    1R*         CHANGE INPUT FILE TO INPUT*
03252  M00S02102.1aj     +++|          RAM    CCAA+2
03253  M00S02103.1aj     +++|          JMP    PNSX        RETURN
03254  M00S02104.1aj     +++| PSS      SPACE  4,15
03255  M00S02105.1aj     +++|**        PSS - PROCESS SUBSYSTEM.
03256  M00S02106.1aj     +++|*
03257  M00S02107.1aj     +++|*         PERFORM THAT PART OF JOB INITIATION PECULIAR TO SUBSYSTEMS.
03258  M00S02108.1aj     +++|*
03259  M00S02109.1aj     +++|*         ENTRY *BFMS* CONTAINS INPUT FILE SYSTEM SECTOR.
03260  M00S02110.1aj     +++|*
03261  M00S02111.1aj     +++|*         EXIT   (A) = 0 IF NO ERROR.
03262  M00S02112.1aj     +++|*                    = SSID IF ERROR.
03263  M00S02113.1aj     +++|*
03264  M00S02114.1aj     +++|*         USES   T1, T2, CM - CM+4.
03265  M00S02115.1aj     +++|*
03266  M00S02116.1aj     +++|*         ERROR  PP HUNG IF SCP WITH NO CM FL ASSIGNED.
03267  M00S02117.1aj     +++|*
Line S00056 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
03268  M01S00056.ns21000 +++|*         CALLS  BCS, IAM, ISD.
03269  M01S00057.ns21000 +++|*
03270  M00S02118.1aj     +++|*         MACROS MONITOR, NFA.
03271  M00S02119.1aj     +++|
03272  M00S02120.1aj     +++|
03273  M00S02121.1aj     +++| PSS6     LDN    0           SET EXIT CONDITION
03274  M00S02122.1aj     +++|
03275  M00S02123.1aj     +++| PSS      SUBR               ENTRY/EXIT
03276  M00S02124.1aj     +++|          LDD    CP
03277  M00S02125.1aj     +++|          ADN    JCIW
03278  M00S02126.1aj     +++|          CRD    CM
03279  M00S02127.1aj     +++|          LDM    SISS        PLACE SUBSYSTEM IDENTIFIER IN CPA
03280  M00S02128.1aj     +++|          STD    CM+2
Line S02129 Modification History
M01 (Removed by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
03281  M01S02129.ns21000 ---|          LDD    CP
Line S00058 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
03282  M01S00058.ns21000 +++|          LMC    RDSI
Line S00059 Modification History
M01 (Added by) ns21000
M02 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03283  M02S00059.ns22000 ---|          NJN    PSS0        IF NOT * RDF*
Line S00159 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03284  M01S00159.ns22000 +++|          NJN    PSS1        IF NOT *RDF*
Line S00060 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
03285  M01S00060.ns21000 +++|          LDC    IFSI        SET *IAF* IDENTIFIER
03286  M01S00061.ns21000 +++|          STD    CM+2
Line S00062 Modification History
M01 (Added by) ns21000
M02 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03287  M02S00062.ns22000 ---| PSS0     LDD    CP
Line S00160 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03288  M01S00160.ns22000 +++| PSS1     LDD    CP
03289  M00S02130.1aj     +++|          ADN    JCIW
03290  M00S02131.1aj     +++|          CWD    CM
Line S02132 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03291  M01S02132.ns22000 ---|          LDC    MXSI
Line S02133 Modification History
M01 (Removed by) ns21000
M02 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03292  M02S02133.ns22000 ---|          SBD    CM+2
Line S00063 Modification History
M01 (Added by) ns21000
M02 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03293  M02S00063.ns22000 ---|          SBM    SISS
Line S02134 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03294  M01S02134.ns22000 ---|          STD    T1
03295  M01S02135.ns22000 ---|          LDM    TSPP,T1
03296  M01S02136.ns22000 ---|          STD    T2
Line S02137 Modification History
M01 (Removed by) ns21000
M02 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03297  M02S02137.ns22000 ---|          ADN    2
03298  M02S02138.ns22000 ---|          STM    PSSA
03299  M02S02139.ns22000 ---|          ADN    6-2
03300  M02S02140.ns22000 ---|          STD    T1
Line S02141 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03301  M01S02141.ns22000 ---|          LDD    EF
03302  M01S02142.ns22000 ---|          ZJN    PSS1        IF NO ERROR FLAG SET
03303  M01S02143.ns22000 ---|          LDD    CM+2        SET EXIT CONDITION
Line S02144 Modification History
M01 (Removed by) ns21000
M02 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03304  M02S02144.ns22000 ---|          UJN    PSSX        RETURN
Line S00064 Modification History
M01 (Added by) ns21000
M02 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03305  M02S00064.ns22000 ---|          LJM    PSSX        RETURN
Line S02145 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03306  M01S02145.ns22000 ---|
03307  M01S02146.ns22000 ---| PSS1     LDI    T2          CHECK INITIATION METHOD
Line S00161 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03308  M01S00161.ns22000 +++|          LDD    EF
03309  M01S00162.ns22000 +++|          ZJN    PSS2        IF NO ERROR FLAG SET
03310  M01S00163.ns22000 +++|          LDD    CM+2        SET EXIT CONDITION
03311  M01S00164.ns22000 +++|          UJP    PSSX        RETURN
03312  M01S00165.ns22000 +++|
03313  M01S00166.ns22000 +++| PSS2     LDM    SISS        CHECK SUBSYSTEM ID
03314  M01S00167.ns22000 +++|          SBK    LSSI+1
03315  M01S00168.ns22000 +++|          MJN    PSS3        IF PSEUDO SUBSYSTEM
03316  M01S00169.ns22000 +++|          LDC    MXSI
03317  M01S00170.ns22000 +++|          SBM    SISS
Line S00038 Modification History
M01 (Added by) v22l602
Seq #  *Modification Id* Act 
----------------------------+
03318  M01S00038.v22l602 +++|          SHN    1
Line S00171 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03319  M01S00171.ns22000 +++|          STD    T1
03320  M01S00172.ns22000 +++|          LDM    TSPP,T1
Line S00173 Modification History
M01 (Added by) ns22000
M02 (Removed by) v22l602
Seq #  *Modification Id* Act 
----------------------------+
03321  M02S00173.v22l602 ---|          STD    T2
03322  M02S00174.v22l602 ---|          LDI    T2
Line S02147 Modification History
M01 (Removed by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
03323  M01S02147.ns21000 ---|          NJN    PSS6        IF PP INITIATED SUBSYSTEM
Line S00065 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
03324  M01S00065.ns21000 +++|          NJP    PSS6        IF PP INITIATED SUBSYSTEM
Line S02148 Modification History
M01 (Removed by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
03325  M01S02148.ns21000 ---|
03326  M01S02149.ns21000 ---|*         GENERATE CONTROL STATEMENTS FOR SUBSYSTEM INITIATION.
03327  M01S02150.ns21000 ---|*
03328  M01S02151.ns21000 ---|*         $GET,SSSFFFF/NA.
03329  M01S02152.ns21000 ---|*         SSSFFFF.
03330  M01S02153.ns21000 ---|
03331  M01S02154.ns21000 ---|          LDD    CP          CREATE *UIDW* AND *CSPW*
03332  M01S02155.ns21000 ---|          ADN    UIDW
03333  M01S02156.ns21000 ---|          CWM    IJBG,ON
03334  M01S02157.ns21000 ---|          ADN    CSPW-UIDW-1
03335  M01S02158.ns21000 ---|          CWM    IJBH,ON
03336  M01S02159.ns21000 ---|          LDD    T2          SAVE FWA OF MESSAGE
03337  M01S02160.ns21000 ---|          STD    CM
03338  M01S02161.ns21000 ---|          LDC    PNSS        APPEND PROCEDURE FILE NAME
03339  M01S02162.ns21000 ---|          RJM    ACS         ASSEMBLE CHARACTER STRING
03340  M01S02163.ns21000 ---|          LDC    PSSB
03341  M01S02164.ns21000 ---|          RJM    ACS         ASSEMBLE CHARACTER STRING
03342  M01S02165.ns21000 ---|          LDD    CM          RESTORE FWA OF MESSAGE
03343  M01S02166.ns21000 ---|          ADN    15
03344  M01S02167.ns21000 ---|          STD    T1
03345  M01S02168.ns21000 ---|          LDC    PNSS        SET PROCEDURE FILE NAME
03346  M01S02169.ns21000 ---|          RJM    ACS         ASSEMBLE CHARACTER STRING
03347  M01S02170.ns21000 ---|          LDC    PSSC
03348  M01S02171.ns21000 ---|          RJM    ACS         ASSEMBLE CHARACTER STRING
03349  M01S02172.ns21000 ---|          LDN    3           SET CONTROL STATEMENT WORD COUNT
03350  M01S02173.ns21000 ---|          STD    T1
03351  M01S02174.ns21000 ---|          NFA    CSBN        WRITE CONTROL STATEMENT WORDS IN BUFFER
03352  M01S02175.ns21000 ---|          CWM    **,T1
03353  M01S02176.ns21000 ---| PSSA     EQU    *-1
Line S00066 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
03354  M01S00066.ns21000 +++|
Line S00067 Modification History
M01 (Added by) ns21000
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03355  M02S00067.v23l617 ---|*         READ CONTROL STATEMENTS FOR NON-PP-INITIATED SUBSYSTEM.
Line S00086 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03356  M01S00086.v23l617 +++|*         READ COMMANDS FOR NON-PP-INITIATED SUBSYSTEM.
Line S00068 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
03357  M01S00068.ns21000 +++|
Line S00069 Modification History
M01 (Added by) ns21000
M02 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03358  M02S00069.ns22000 ---|          RJM    BCS         BUILD CONTROL STATEMENT BUFFER
Line S00175 Modification History
M01 (Added by) ns22000
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03359  M02S00175.v23l617 ---| PSS3     RJM    BCS         BUILD CONTROL STATEMENT BUFFER
Line S00070 Modification History
M01 (Added by) ns21000
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03360  M02S00070.v23l617 ---|          LDC    STMT        ISSUE JOB STATEMENT TO DAYFILE
Line S00087 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03361  M01S00087.v23l617 +++| PSS3     RJM    BCS         BUILD COMMAND BUFFER
03362  M01S00088.v23l617 +++|          LDC    STMT        ISSUE JOB COMMAND TO DAYFILE
Line S00071 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
03363  M01S00071.ns21000 +++|          RJM    ISD
03364  M01S00072.ns21000 +++|          RJM    IAM         ISSUE ACCOUNTING MESSAGE
03365  M01S00073.ns21000 +++|          LDD    CP          SET UP *UIDW*
03366  M01S00074.ns21000 +++|          ADN    UIDW
Line S00075 Modification History
M01 (Added by) ns21000
M02 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03367  M02S00075.ns22000 ---|          CWM    IJBG,ON
Line S00176 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03368  M01S00176.ns22000 +++|          CWM    ACSS,ON
03369  M00S02177.1aj     +++|
Line S02178 Modification History
M01 (Removed by) v22l602
Seq #  *Modification Id* Act 
----------------------------+
03370  M01S02178.v22l602 ---|*         IF THE SUBSYSTEM IS A SCP, CLEAR THE SUBSYSTEM IDENTIFICATION
03371  M01S02179.v22l602 ---|*         AND BUFFER POINTER WORDS.
Line S00039 Modification History
M01 (Added by) v22l602
Seq #  *Modification Id* Act 
----------------------------+
03372  M01S00039.v22l602 +++|*         CLEAR THE SUBSYSTEM IDENTIFICATION AND BUFFER POINTER WORDS.
03373  M00S02180.1aj     +++|
03374  M00S02181.1aj     +++|          LDM    SISS
Line S02182 Modification History
M01 (Removed by) v22l602
Seq #  *Modification Id* Act 
----------------------------+
03375  M01S02182.v22l602 ---|          ADC    -MNSI
03376  M01S02183.v22l602 ---|          MJN    PSS5        IF NOT A SCP
Line S00040 Modification History
M01 (Added by) v22l602
Seq #  *Modification Id* Act 
----------------------------+
03377  M01S00040.v22l602 +++|          SBK    LSSI+1
03378  M01S00041.v22l602 +++|          MJN    PSS5        IF A PSEUDO SUBSYSTEM
03379  M00S02184.1aj     +++|          LDD    FL
03380  M00S02185.1aj     +++|          NJN    PSS4        IF FL IS ASSIGNED
Line S02186 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
03381  M01S02186.241l630 ---|          MONITOR  HNGM
03382  M01S02187.241l630 ---|          UJN    *           HANG PP
Line S00037 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
03383  M01S00037.241l630 +++|*         LDN    0
03384  M01S00038.241l630 +++|          STD    CM+2        SET NO ERROR FLAG
03385  M01S00039.241l630 +++|          LDC    *
03386  M01S00040.241l630 +++|          STD    CM+1        ADDRESS WHERE ERROR DETECTED
03387  M01S00041.241l630 +++|          MONITOR  CHGM      CONDITIONAL HANG FOR NO FL
03388  M01S00042.241l630 +++|          UJN    PSS5        RETURN WITH NO ERROR
03389  M00S02188.1aj     +++|
03390  M00S02189.1aj     +++| PSS4     LDN    ZERL
03391  M00S02190.1aj     +++|          CRD    CM
03392  M00S02191.1aj     +++|          LDD    RA
03393  M00S02192.1aj     +++|          SHN    6
03394  M00S02193.1aj     +++|          ADN    SSIW
03395  M00S02194.1aj     +++|          CWD    CM
03396  M00S02195.1aj     +++|          ADN    SSCR-SSIW
03397  M00S02196.1aj     +++|          CWD    CM
03398  M00S02197.1aj     +++| PSS5     LJM    PSS6        RETURN
Line S02198 Modification History
M01 (Removed by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
03399  M01S02198.ns21000 ---|
03400  M01S02199.ns21000 ---| PSSB     DATA   4L/NA.
03401  M01S02200.ns21000 ---|          DATA   0
03402  M01S02201.ns21000 ---| PSSC     DATA   1L.
03403  M01S02202.ns21000 ---|          DATA   0
03404  M00S02203.1aj     +++|          SPACE  4,10
03405  M00S02204.1aj     +++|*         SUBSYSTEM TABLES.
03406  M00S02205.1aj     +++|          SPACE  4,10
Line S02206 Modification History
M01 (Removed by) v22l602
Seq #  *Modification Id* Act 
----------------------------+
03407  M01S02206.v22l602 ---|**        TSPP - TABLE OF SUBSYSTEM PARAMETER LIST POINTERS.
03408  M01S02207.v22l602 ---|*
03409  M01S02208.v22l602 ---|*         EACH ENTRY CONTAINS A POINTER TO THE CORRESPONDING SUBSYSTEM
03410  M01S02209.v22l602 ---|*         PARAMETER LIST.
03411  M01S02210.v22l602 ---|
03412  M01S02211.v22l602 ---| TSPP     INDEX
03413  M01S02212.v22l602 ---|          INDEX  (MXSI-IFSI),IFPL
03414  M01S02213.v22l602 ---|          INDEX  (MXSI-RFSI),RFPL
03415  M01S02214.v22l602 ---|          INDEX  (MXSI-TRSI),TRPL
03416  M01S02215.v22l602 ---|          INDEX  (MXSI-MPSI),MPPL
03417  M01S02216.v22l602 ---|          INDEX  (MXSI-NMSI),NMPL
Line S00076 Modification History
M01 (Added by) ns21000
M02 (Removed by) v22l602
Seq #  *Modification Id* Act 
----------------------------+
03418  M02S00076.v22l602 ---|          INDEX  (MXSI-NVSI),NVPL
Line S02217 Modification History
M01 (Removed by) v22l602
Seq #  *Modification Id* Act 
----------------------------+
03419  M01S02217.v22l602 ---|          INDEX  (MXSI-RBSI),RBPL
03420  M01S02218.v22l602 ---|          INDEX  (MXSI-CDSI),CDPL
03421  M01S02219.v22l602 ---|          INDEX  (MXSI-MCSI),MCPL
Line S00077 Modification History
M01 (Added by) ns21000
M02 (Removed by) v22l602
Seq #  *Modification Id* Act 
----------------------------+
03422  M02S00077.v22l602 ---|          INDEX  (MXSI-RDSI),RDFL
Line S02220 Modification History
M01 (Removed by) v22l602
Seq #  *Modification Id* Act 
----------------------------+
03423  M01S02220.v22l602 ---|          INDEX  (MXSI-MFSI),MFPL
03424  M01S02221.v22l602 ---|          INDEX  (MXSI-BISI),BIPL
03425  M01S02222.v22l602 ---|          INDEX  (MXSI-MTSI),MTPL
03426  M01S02223.v22l602 ---|          INDEX  (MXSI-STSI),STPL
03427  M01S02224.v22l602 ---|          INDEX  (MXSI-MSSI),MSPL
Line S00078 Modification History
M01 (Added by) ns21000
M02 (Removed by) v22l602
Seq #  *Modification Id* Act 
----------------------------+
03428  M02S00078.v22l602 ---|          INDEX  (MXSI-SMSI),SMPL
03429  M02S00079.v22l602 ---|          INDEX  (MXSI-SSSI),SSPL
Line S02225 Modification History
M01 (Removed by) v22l602
Seq #  *Modification Id* Act 
----------------------------+
03430  M01S02225.v22l602 ---|          INDEX  MXSI-LSSI
03431  M01S02226.v22l602 ---|          SPACE  4,10
03432  M01S02227.v22l602 ---|**        TSPL - TABLE OF SUBSYSTEM PARAMETERS.
03433  M01S02228.v22l602 ---|*
03434  M01S02229.v22l602 ---|*         TABLE FORMAT FOR PP-INITIATED SUBSYSTEM.
03435  M01S02230.v22l602 ---|*
03436  M01S02231.v22l602 ---|*T        18/ PP NAME, 6/0
Figure

056230 PP NAME

03437  M01S02232.v22l602 ---|*
Line S02233 Modification History
M01 (Removed by) ns21000
M02 (Removed by) v22l602
Seq #  *Modification Id* Act 
----------------------------+
03438  M02S02233.v22l602 ---|*         TABLE FORMAT FOR PROCEDURE-INITIATED SUBSYSTEM.
03439  M02S02234.v22l602 ---|*
03440  M02S02235.v22l602 ---|*T        24/0
Figure

0230

03441  M02S02236.v22l602 ---|*T,       60/ *$GET,SSS* (COMPLETED IN ROUTINE *PSS*)
Figure

Bitfield Rendering Failure
======== ========= =======
The field description 
[
{ "name": "", "bits": SSS* (COMPLETED IN ROUTINE *PSS*), "type": 2 },
{ "name": " *$GET", "bits": 60, "type": 1 }
]


 is invalid.

Please check your syntax and try again.

03442  M02S02237.v22l602 ---|*T,       60 / 0         (COMPLETED IN ROUTINE *PSS*)
Figure

029 0 (COMPLETED IN ROUTINE *PSS*)3059 0 (COMPLETED IN ROUTINE *PSS*)

03443  M02S02238.v22l602 ---|*T,       60/ *SSS*      (COMPLETED IN ROUTINE *PSS*)
Figure

029 *SSS* (COMPLETED IN ROUTINE *PSS*)3059 *SSS* (COMPLETED IN ROUTINE *PSS*)

03444  M02S02239.v22l602 ---|*
03445  M02S02240.v22l602 ---|*         SSS = SUBSYSTEM NAME.
Line S00080 Modification History
M01 (Added by) ns21000
M02 (Removed by) v22l602
Seq #  *Modification Id* Act 
----------------------------+
03446  M02S00080.v22l602 ---|*         TABLE FORMAT FOR NON-PP-INITIATED SUBSYSTEM.
03447  M02S00081.v22l602 ---|*
03448  M02S00082.v22l602 ---|*T        12/0
Figure

0110


Line S02241 Modification History
M01 (Removed by) v22l602
Seq #  *Modification Id* Act 
----------------------------+
03449  M01S02241.v22l602 ---|
03450  M01S02242.v22l602 ---|
03451  M01S02243.v22l602 ---| IFPL     SUBSYS IAF
03452  M01S02244.v22l602 ---| RFPL     SUBSYS RHF
03453  M01S02245.v22l602 ---| TRPL     SUBSYS TAF
03454  M01S02246.v22l602 ---| MPPL     SUBSYS MAP
03455  M01S02247.v22l602 ---| NMPL     SUBSYS NAM
Line S00083 Modification History
M01 (Added by) ns21000
M02 (Removed by) v22l602
Seq #  *Modification Id* Act 
----------------------------+
03456  M02S00083.v22l602 ---| NVPL     SUBSYS NVE
Line S02248 Modification History
M01 (Removed by) v22l602
Seq #  *Modification Id* Act 
----------------------------+
03457  M01S02248.v22l602 ---| RBPL     SUBSYS RBF
03458  M01S02249.v22l602 ---| CDPL     SUBSYS CDC
03459  M01S02250.v22l602 ---| MCPL     SUBSYS MCS
Line S00084 Modification History
M01 (Added by) ns21000
M02 (Removed by) v22l602
Seq #  *Modification Id* Act 
----------------------------+
03460  M02S00084.v22l602 ---| RDFL     SUBSYS RDF
Line S02251 Modification History
M01 (Removed by) v22l602
Seq #  *Modification Id* Act 
----------------------------+
03461  M01S02251.v22l602 ---| MFPL     SUBSYS MSS
03462  M01S02252.v22l602 ---| BIPL     SUBSYS BIO,1IO
03463  M01S02253.v22l602 ---| MTPL     SUBSYS MAG
03464  M01S02254.v22l602 ---| STPL     SUBSYS STM
03465  M01S02255.v22l602 ---| MSPL     SUBSYS CMS,CMS
Line S00085 Modification History
M01 (Added by) ns21000
M02 (Removed by) v22l602
Seq #  *Modification Id* Act 
----------------------------+
03466  M02S00085.v22l602 ---| SMPL     SUBSYS SMF
03467  M02S00086.v22l602 ---| SSPL     SUBSYS SSF
Line S00042 Modification History
M01 (Added by) v22l602
Seq #  *Modification Id* Act 
----------------------------+
03468  M01S00042.v22l602 +++|**        TSPP - TABLE OF SUBSYSTEM PP NAMES.
03469  M01S00043.v22l602 +++|*
03470  M01S00044.v22l602 +++|*         TABLE FORMAT FOR PP-INITIATED SUBSYSTEMS.
03471  M01S00045.v22l602 +++|*
Line S00046 Modification History
M01 (Added by) v22l602
M02 (Removed by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
03472  M02S00046.271l750 ---|*T        18/ PP NAME, 6/ 0
Figure

05623 0 PP NAME


Line S00040 Modification History
M01 (Added by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
03473  M01S00040.271l750 +++|*T        18/ PP NAME,6/ CPU
Figure

05623 CPU PP NAME


Line S00047 Modification History
M01 (Added by) v22l602
Seq #  *Modification Id* Act 
----------------------------+
03474  M01S00047.v22l602 +++|*
03475  M01S00048.v22l602 +++|*         TABLE FORMAT FOR NON-PP-INITIATED SUBSYSTEMS.
03476  M01S00049.v22l602 +++|*
Line S00050 Modification History
M01 (Added by) v22l602
M02 (Removed by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
03477  M02S00050.271l750 ---|*T        24/ 0
Figure

023 0


Line S00041 Modification History
M01 (Added by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
03478  M01S00041.271l750 +++|*T        18/ 0,6/ CPU
Figure

05623 CPU 0

03479  M01S00042.271l750 +++|*
03480  M01S00043.271l750 +++|*         CPU .NE. 0, IF SUBSYSTEM MUST RUN IN CPU 0 ON A DUAL CPU
03481  M01S00044.271l750 +++|*         MACHINE WITH CACHE.
Line S00051 Modification History
M01 (Added by) v22l602
Seq #  *Modification Id* Act 
----------------------------+
03482  M01S00051.v22l602 +++|
03483  M01S00052.v22l602 +++|
03484  M01S00053.v22l602 +++| TSPP     INDEX
03485  M01S00054.v22l602 +++| .SUB     HERE
03486  M01S00055.v22l602 +++|          INDEX  MXSI*2-LSSI*2
03487  M00S02256.1aj     +++|          TITLE  SECONDARY SUBROUTINES.
03488  M00S02257.1aj     +++| BCS      SPACE  4,10
Line S02258 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03489  M01S02258.v23l617 ---|**        BCS - BUILD CONTROL STATEMENT BUFFER.
Line S00089 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03490  M01S00089.v23l617 +++|**        BCS - BUILD COMMAND BUFFER.
03491  M00S02259.1aj     +++|*
03492  M00S02260.1aj     +++|*         ENTRY  *BFMS* CONTAINS INPUT FILE SYSTEM SECTOR.
03493  M00S02261.1aj     +++|*                I/O SEQUENCE HAS BEEN INITIATED.
03494  M00S02262.1aj     +++|*
03495  M00S02263.1aj     +++|*         USES   CN - CN+4, SP - SP+4.
03496  M00S02264.1aj     +++|*
Line S02265 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03497  M01S02265.242l642 ---|*         CALLS  RCS, RNS.
Line S00053 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03498  M01S00053.242l642 +++|*         CALLS  MSR, RCS, RNS.
03499  M00S02266.1aj     +++|*
03500  M00S02267.1aj     +++|*         MACROS ENDMS, NFA.
03501  M00S02268.1aj     +++|
03502  M00S02269.1aj     +++|
03503  M00S02270.1aj     +++| BCS      SUBR               ENTRY/EXIT
03504  M00S02271.1aj     +++|          LDN    ZERL        CLEAR *CSPW* IMAGE
03505  M00S02272.1aj     +++|          CRD    SP
03506  M00S02273.1aj     +++|          LDN    0           CLEAR BYTE 4 OF *CSSW* IMAGE
03507  M00S02274.1aj     +++|          STD    CN+4
03508  M00S02275.1aj     +++|          LDN    FSMS        SET POSITION AT FIRST DATA SECTOR
03509  M00S02276.1aj     +++|          STD    T7
03510  M00S02277.1aj     +++|          ADN    1           SET CURRENT SECTOR TO 2ND DATA SECTOR
03511  M00S02278.1aj     +++|          STD    CN+3
03512  M00S02279.1aj     +++|          LDD    T6          SET FIRST AND CURRENT TRACK
03513  M00S02280.1aj     +++|          STD    CN+1
03514  M00S02281.1aj     +++|          STD    CN+2
03515  M00S02282.1aj     +++|          LDD    T5          SET EST ORDINAL AND INPUT FILE FLAG
03516  M00S02283.1aj     +++|          LMC    4000
03517  M00S02284.1aj     +++|          STD    CN
03518  M00S02285.1aj     +++|          LDC    SBUF        READ 1ST DATA SECTOR
03519  M00S02286.1aj     +++|          RJM    RNS
Line S00054 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03520  M01S00054.242l642 +++|          MJN    BCS2.1      IF MASS STORAGE ERROR
Line S02287 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03521  M01S02287.v23l617 ---|          LDC    CSBN        SET NEXT STATEMENT INDEX
Line S00090 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03522  M01S00090.v23l617 +++|          LDC    CSBN        SET NEXT COMMAND INDEX
03523  M00S02288.1aj     +++|          STD    SP+3
03524  M00S02289.1aj     +++|          SBD    T1          SET LIMIT INDEX
03525  M00S02290.1aj     +++|          STD    SP+4
03526  M00S02291.1aj     +++|          LDD    T1
03527  M00S02292.1aj     +++|          ZJN    BCS1        IF DATA SECTOR IS EMPTY
Line S00058 Modification History
M01 (Added by) ns2323
Seq #  *Modification Id* Act 
----------------------------+
03528  M01S00058.ns2323  +++|          AOM    ADJB        SET COMMANDS PRESENT
Line S02293 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03529  M01S02293.v23l617 ---|          NFA    SP+3,R      MOVE SECTOR TO CONTROL STATEMENT BUFFER
Line S00091 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03530  M01S00091.v23l617 +++|          NFA    SP+3,R      MOVE SECTOR TO COMMAND BUFFER
03531  M00S02294.1aj     +++|          CWM    SBUF+2,T1
03532  M00S02295.1aj     +++|          LDD    T1
03533  M00S02296.1aj     +++|          SHN    -6
03534  M00S02297.1aj     +++|          NJN    BCS2        IF NOT EOR
03535  M00S02298.1aj     +++| BCS1     LDC    4000        SET EOR FLAG
03536  M00S02299.1aj     +++|          STD    SP+1
03537  M00S02300.1aj     +++|          UJN    BCS3        AVOID POSITIONING LOOP
03538  M00S02301.1aj     +++|
03539  M00S02302.1aj     +++|*         SKIP TO FIRST EOR SO INPUT FILE FST CAN BE BUILT WITH DISK
03540  M00S02303.1aj     +++|*         ADDRESS SET TO THE START OF THE NEXT RECORD.
03541  M00S02304.1aj     +++|
03542  M00S02305.1aj     +++| BCS2     LDC    SBUF
03543  M00S02306.1aj     +++|          RJM    RNS         READ NEXT SECTOR
Line S00055 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03544  M01S00055.242l642 +++| BCS2.1   MJN    BCS4        IF MASS STORAGE ERROR
03545  M00S02307.1aj     +++|          SHN    -6
03546  M00S02308.1aj     +++|          NJN    BCS2        IF NOT AT EOR
03547  M00S02309.1aj     +++| BCS3     ENDMS
Line S02310 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03548  M01S02310.v23l617 ---|          RJM    RCS         READ JOB STATEMENT
Line S00092 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03549  M01S00092.v23l617 +++|          RJM    RCS         READ JOB COMMAND
Line S00056 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03550  M01S00056.242l642 +++|          PJN    BCS5        IF NO MASS STORAGE ERROR
03551  M01S00057.242l642 +++| BCS4     RJM    MSR         PROCESS MASS STORAGE ERROR, NO RETURN
03552  M00S02311.1aj     +++|
Line S00059 Modification History
M01 (Added by) ns2323
Seq #  *Modification Id* Act 
----------------------------+
03553  M01S00059.ns2323  +++|*         SET CHARGE REQUIRED FOR NON-SYSTEM ORIGIN JOBS.
03554  M01S00060.ns2323  +++|
Line S00061 Modification History
M01 (Added by) ns2323
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03555  M02S00061.242l642 ---|          LDM    JBOT
Line S00058 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03556  M01S00058.242l642 +++| BCS5     LDM    JBOT
Line S00062 Modification History
M01 (Added by) ns2323
Seq #  *Modification Id* Act 
----------------------------+
03557  M01S00062.ns2323  +++|          LMK    SYOT
Line S00063 Modification History
M01 (Added by) ns2323
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03558  M02S00063.242l642 ---|          ZJN    BCS4        IF SYSTEM ORIGIN
Line S00059 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03559  M01S00059.242l642 +++|          ZJN    BCS6        IF SYSTEM ABORT
Line S00064 Modification History
M01 (Added by) ns2323
Seq #  *Modification Id* Act 
----------------------------+
03560  M01S00064.ns2323  +++|          LDN    4           SET CHARGE REQUIRED
Line S00012 Modification History
M01 (Added by) 1aj116
Seq #  *Modification Id* Act 
----------------------------+
03561  M01S00012.1aj116  +++|          STM    CRQF
Line S00065 Modification History
M01 (Added by) ns2323
Seq #  *Modification Id* Act 
----------------------------+
03562  M01S00065.ns2323  +++|          RAD    SP
03563  M01S00066.ns2323  +++|
Line S02312 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03564  M01S02312.v23l617 ---|*         WRITE UPDATED CONTROL STATEMENT BUFFER CONTROL WORDS TO CM.
Line S00093 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03565  M01S00093.v23l617 +++|*         WRITE UPDATED COMMAND BUFFER WORDS TO CM.
03566  M00S02313.1aj     +++|
Line S02314 Modification History
M01 (Removed by) ns2323
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03567  M02S02314.242l642 ---|          LDD    CP
Line S00067 Modification History
M01 (Added by) ns2323
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03568  M02S00067.242l642 ---| BCS4     LDD    CP
Line S00060 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03569  M01S00060.242l642 +++| BCS6     LDD    CP
03570  M00S02315.1aj     +++|          ADN    CSPW
03571  M00S02316.1aj     +++|          CWD    SP
03572  M00S02317.1aj     +++|          ADN    CSSW-CSPW
03573  M00S02318.1aj     +++|          CWD    CN
03574  M00S02319.1aj     +++|          LJM    BCSX        RETURN
03575  M00S02320.1aj     +++| EOJ      SPACE 4,10
03576  M00S02321.1aj     +++|**        EOJ - BUILD END OF JOB CONTROL WORD, *EOJW*.
03577  M00S02322.1aj     +++|*
03578  M00S02323.1aj     +++|*         ENTRY  (FS - FS+4) = ZERO WORD.
03579  M00S02324.1aj     +++|*
03580  M00S02325.1aj     +++|*         EXIT   (FS - FS+4) = *EOJW* WORD.
Line S00087 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
03581  M01S00087.ns21000 +++|*                (JTFG) = JOB TERMINATION FLAGS.
Line S00003 Modification History
M01 (Added by) 1aj21
Seq #  *Modification Id* Act 
----------------------------+
03582  M01S00003.1aj21   +++|*                (JTOP) = JOB TERMINATION OPTIONS.
03583  M00S02326.1aj     +++|
03584  M00S02327.1aj     +++|
03585  M00S02328.1aj     +++| EOJ      SUBR               ENTRY/EXIT
03586  M00S02329.1aj     +++|          LDM    IOSS+JSNQ*5+4     GET FILE TYPE FROM QFT ENTRY
03587  M00S02330.1aj     +++|          SHN    -6
03588  M00S02331.1aj     +++|          LMK    INQF        CHECK FILE TYPE
03589  M00S02332.1aj     +++|          ZJN    EOJ2        IF *INPUT QUEUE* TYPE
03590  M00S02333.1aj     +++|          LMK    NOQF&INQF
03591  M00S02334.1aj     +++|          NJN    EOJ1        IF NOT *NO OUTPUT* FILE TYPE
03592  M00S02335.1aj     +++|          LDK    NOJT        SELECT *DROP OUTPUT*
03593  M00S02336.1aj     +++|          UJN    EOJ3        SET QUEUE FILE DISPOSITION
03594  M00S02337.1aj     +++|
03595  M00S02338.1aj     +++| EOJ1     LMK    TOQF&NOQF   CHECK FILE TYPE
Line S02339 Modification History
M01 (Removed by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
03596  M01S02339.ns21000 ---|          NJN    EOJ2        IF NOT *TERMINAL OUTPUT*
Line S00088 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
03597  M01S00088.ns21000 +++|          NJN    EOJ1.1      IF NOT *TERMINAL OUTPUT*
03598  M00S02340.1aj     +++|          LDK    TTJT        SELECT *QUEUE OUTPUT TO TERMINAL*
03599  M00S02341.1aj     +++|          UJN    EOJ3        SET QUEUE FILE DISPOSITION
03600  M00S02342.1aj     +++|
Line S00089 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
03601  M01S00089.ns21000 +++| EOJ1.1   LMK    SOQF&TOQF
03602  M01S00090.ns21000 +++|          NJN    EOJ2        IF NOT *STATION OUTPUT*
03603  M01S00091.ns21000 +++|          LDK    SSJT        SELECT *QUEUE OUTPUT TO STATION*
03604  M01S00092.ns21000 +++|          UJN    EOJ3        SET QUEUE FILE DISPOSITION
03605  M01S00093.ns21000 +++|
03606  M00S02343.1aj     +++| EOJ2     LDK    QOJT        SELECT *QUEUE ALL OUTPUT*
03607  M00S02344.1aj     +++| EOJ3     SHN    6           STORE QUEUE FILE DISPOSITION
03608  M00S02345.1aj     +++|          STD    FS
03609  M00S02346.1aj     +++|
03610  M00S02347.1aj     +++|*         SET DEFAULT JOB TERMINATION OPTION.
03611  M00S02348.1aj     +++|
03612  M00S02349.1aj     +++|          LDM    JBOT
03613  M00S02350.1aj     +++|          STD    FS+3        SET JOB ORIGIN TYPE
03614  M00S02351.1aj     +++|          LMK    TXOT
03615  M00S02352.1aj     +++|          ZJN    EOJ4        IF INTERACTIVE JOB
03616  M00S02353.1aj     +++|          LDK    TJJT&SUJT
03617  M00S02354.1aj     +++| EOJ4     LMK    SUJT
03618  M00S02355.1aj     +++|          SHN    11
03619  M00S02356.1aj     +++|          RAD    FS
Line S00043 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
03620  M01S00043.241l630 +++|          SHN    -6
Line S00094 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
03621  M01S00094.ns21000 +++|          STM    JTFG        SET JOB TERMINATION FLAGS
Line S02357 Modification History
M01 (Removed by) 1aj21
Seq #  *Modification Id* Act 
----------------------------+
03622  M01S02357.1aj21   ---|          UJN    EOJX        RETURN
Line S00004 Modification History
M01 (Added by) 1aj21
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03623  M02S00004.242l642 ---|          SHN    0-11
Line S00061 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03624  M01S00061.242l642 +++|          SHN    -3
03625  M01S00062.242l642 +++|          LPN    3
Line S00005 Modification History
M01 (Added by) 1aj21
M02 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
03626  M02S00005.241l630 ---|          LPN    3
Line S00006 Modification History
M01 (Added by) 1aj21
Seq #  *Modification Id* Act 
----------------------------+
03627  M01S00006.1aj21   +++|          STM    JTOP
03628  M01S00007.1aj21   +++|          LJM    EOJX        RETURN
03629  M00S02358.1aj     +++| IAM      SPACE  4,10
03630  M00S02359.1aj     +++|**        IAM - ISSUE ACCOUNTING MESSAGE.
03631  M00S02360.1aj     +++|*
03632  M00S02361.1aj     +++|*         ENTRY  *BFMS* CONTAINS INPUT FILE SYSTEM SECTOR.
03633  M00S02362.1aj     +++|*
03634  M00S02363.1aj     +++|*         USES   T1, CM - CM+5.
03635  M00S02364.1aj     +++|*
03636  M00S02365.1aj     +++|*         CALLS  ACS, DFM.
03637  M00S02366.1aj     +++|*
03638  M00S02367.1aj     +++|*         MACROS MONITOR.
03639  M00S02368.1aj     +++|
03640  M00S02369.1aj     +++|
03641  M00S02370.1aj     +++| IAM      SUBR               ENTRY/EXIT
03642  M00S02371.1aj     +++|          LDN    ZERL
03643  M00S02372.1aj     +++|          CRD    CM
03644  M00S02373.1aj     +++|          LDM    CRSS
03645  M00S02374.1aj     +++|          STD    CM+3
03646  M00S02375.1aj     +++|          LDM    CRSS+1
03647  M00S02376.1aj     +++|          STD    CM+4
03648  M00S02377.1aj     +++|          ADD    CM+3
Line S02378 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03649  M01S02378.v23l617 ---|          ZJN    IAMX        IF NO STATEMENT COUNT
03650  M01S02379.v23l617 ---|          LDD    MA          CONVERT STATEMENT COUNT
Line S00094 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03651  M01S00094.v23l617 +++|          ZJN    IAMX        IF NO COMMAND COUNT
03652  M01S00095.v23l617 +++|          LDD    MA          CONVERT COMMAND COUNT
03653  M00S02380.1aj     +++|          CWD    CM
03654  M00S02381.1aj     +++|          MONITOR  RDCM
03655  M00S02382.1aj     +++|*         LDN    0
03656  M00S02383.1aj     +++|          STD    CM+5
03657  M00S02384.1aj     +++|          LDC    MBUF        SET ASSEMBLY BUFFER ADDRESS FOR *ACS*
03658  M00S02385.1aj     +++|          STD    T1
03659  M00S02386.1aj     +++|          LDC    IAMA        ASSEMBLE *UCCR, * CHARACTER STRING
03660  M00S02387.1aj     +++|          RJM    ACS
03661  M00S02388.1aj     +++|          LDM    CMSS        ASSEMBLE CREATION MAINFRAME MACHINE ID
03662  M00S02389.1aj     +++|          STD    CM
03663  M00S02390.1aj     +++|          LPN    77
03664  M00S02391.1aj     +++|          NJN    IAM1        IF NOT SINGLE-CHARACTER MACHINE ID
03665  M00S02392.1aj     +++|          LDN    1R          BLANK-FILL MACHINE ID
03666  M00S02393.1aj     +++|          RAD    CM
03667  M00S02394.1aj     +++| IAM1     LDN    CM
03668  M00S02395.1aj     +++|          RJM    ACS
03669  M00S02396.1aj     +++|          LDC    IAMB        ASSEMBLE SEPARATOR
03670  M00S02397.1aj     +++|          RJM    ACS
Line S02398 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03671  M01S02398.ns22000 ---|          LDM    TNSS        ASSEMBLE TERMINAL ID/EQUIPMENT NUMBER
Line S00177 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03672  M01S00177.ns22000 +++|          LDM    TNSS        ASSEMBLE TERMINAL ID/EST ORDINAL
03673  M00S02399.1aj     +++|          STD    CM
03674  M00S02400.1aj     +++|          LDM    TNSS+1
03675  M00S02401.1aj     +++|          STD    CM+1
03676  M00S02402.1aj     +++|          LDM    TNSS+2
03677  M00S02403.1aj     +++|          STD    CM+2
03678  M00S02404.1aj     +++|          LDM    TNSS+3
03679  M00S02405.1aj     +++|          SCN    77
03680  M00S02406.1aj     +++|          STD    CM+3
03681  M00S02407.1aj     +++|          LDN    CM
03682  M00S02408.1aj     +++|          RJM    ACS
03683  M00S02409.1aj     +++|          LDC    IAMB        ASSEMBLE SEPARATOR
03684  M00S02410.1aj     +++|          RJM    ACS
Line S02411 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03685  M01S02411.v23l617 ---|          LDD    MA          ASSEMBLE CARD COUNT
Line S00096 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03686  M01S00096.v23l617 +++|          LDD    MA          ASSEMBLE COMMAND COUNT
03687  M00S02412.1aj     +++|          CRD    CM
03688  M00S02413.1aj     +++|          LDN    CM
03689  M00S02414.1aj     +++|          RJM    ACS
03690  M00S02415.1aj     +++|          LDC    IAMC        ASSEMBLE UNITS
03691  M00S02416.1aj     +++|          RJM    ACS
03692  M00S02417.1aj     +++|          LDC    MBUF+ACFN   ISSUE MESSAGE TO ACCOUNT DAYFILE
03693  M00S02418.1aj     +++|          RJM    DFM
03694  M00S02419.1aj     +++|          LDC    MBUF+CPON   ISSUE MESSAGE TO USER DAYFILE
03695  M00S02420.1aj     +++|          RJM    DFM
Line S00095 Modification History
M01 (Added by) ns21000
M02 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
03696  M02S00095.241l630 ---|          LDC    MBUF+ERLN   ISSUE MESSAGE TO THE ERROR LOG
03697  M02S00096.241l630 ---|          RJM    DFM
03698  M00S02421.1aj     +++|          LJM    IAMX        RETURN
03699  M00S02422.1aj     +++|
03700  M00S02423.1aj     +++|
03701  M00S02424.1aj     +++| IAMA     DATA   6CUCCR,
03702  M00S02425.1aj     +++| IAMB     DATA   C*, *
03703  M00S02426.1aj     +++| IAMC     DATA   C*KCDS.*
03704  M00S02427.1aj     +++| ISD      SPACE  4,10
Line S02428 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03705  M01S02428.v23l617 ---|**        ISD - ISSUE CONTROL STATEMENT TO DAYFILE.
Line S00097 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03706  M01S00097.v23l617 +++|**        ISD - ISSUE COMMAND TO DAYFILE.
03707  M00S02429.1aj     +++|*
Line S02430 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03708  M01S02430.v23l617 ---|*         ENTRY  (A) = ADDRESS OF ZERO FILLED CONTROL STATEMENT.
Line S00098 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03709  M01S00098.v23l617 +++|*         ENTRY  (A) = ADDRESS OF ZERO FILLED COMMAND.
03710  M00S02431.1aj     +++|*
03711  M00S02432.1aj     +++|*         USES   T1, T2, T9.
03712  M00S02433.1aj     +++|*
03713  M00S02434.1aj     +++|*         CALLS  DFM.
03714  M00S02435.1aj     +++|
03715  M00S02436.1aj     +++|
03716  M00S02437.1aj     +++| ISD      SUBR               ENTRY/EXIT
Line S02438 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03717  M01S02438.v23l617 ---|          STD    T2          SET STATEMENT ADDRESS
Line S00099 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03718  M01S00099.v23l617 +++|          STD    T2          SET COMMAND ADDRESS
03719  M00S02439.1aj     +++|          ADN    5*5         SET END OF MESSAGE ADDRESS
03720  M00S02440.1aj     +++|          STD    T3
03721  M00S02441.1aj     +++|          LDI    T3          SAVE END OF MESSAGE BYTE
03722  M00S02442.1aj     +++|          STD    T9
03723  M00S02443.1aj     +++|          LDN    0           ENSURE END OF MESSAGE
03724  M00S02444.1aj     +++|          STI    T3
03725  M00S02445.1aj     +++|          LDI    T2
Line S02446 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03726  M01S02446.v23l617 ---|          ZJN    ISDX        IF NO JOB CARD
03727  M01S02447.v23l617 ---|          LDD    T2          ISSUE CONTROL STATEMENT TO DAYFILE
Line S00100 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
03728  M01S00100.v23l617 +++|          ZJN    ISDX        IF NO JOB COMMAND
03729  M01S00101.v23l617 +++|          LDD    T2          ISSUE COMMAND TO DAYFILE
Proceed to Part 3
cdc/nos2.source/opl.opl871/deck/1aj.002.txt ยท Last modified: by 127.0.0.1