Deck SET Part 010

79 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
Line S08311 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
12224  M02S08311.283l840 ---|          ZJN    PRS2        IF VALID SEPARATOR
Line S08312 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
12225  M02S08312.283l840 ---| PRS1     JMP    ILL         PROCESS INCORRECT ENTRY
Line S08313 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
12226  M02S08313.283l840 ---|
Line S08314 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
12227  M02S08314.283l840 ---| PRS2     AOD    KA          SKIP SEPARATOR
Line S08315 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
12228  M02S08315.283l840 ---|          RJM    ASD         ASSEMBLE DIGITS
Line S08316 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
12229  M02S08316.283l840 ---|          SBK    377
Line S08317 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
12230  M02S08317.283l840 ---|          PJN    PRS1        IF DEVICE COUNT TOO LARGE
Line S08318 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
12231  M02S08318.283l840 ---|          LDD    AB+4
Line S08319 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
12232  M02S08319.283l840 ---|          SBD    NS
Line S08320 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
12233  M02S08320.283l840 ---|          MJN    PRS1        IF .LT. NUMBER OF SHARED DEVICES
Line S08321 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
12234  M02S08321.283l840 ---| PRS3     ADD    NS
Line S08322 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
12235  M02S08322.283l840 ---|          ADN    1           ALLOW FOR *DAT* TABLES
Line S08323 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
12236  M02S08323.283l840 ---|          STM    SETD
Line S08324 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
12237  M02S08324.283l840 ---| PRS4     JMP    KBR         RETURN
Line S08325 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
12238  M02S08325.283l840 ---|
Line S08326 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
12239  M02S08326.283l840 ---| PRS5     LDD    LD
Line S08327 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
12240  M02S08327.283l840 ---|          SHN    0-13
Line S08328 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
12241  M02S08328.283l840 ---|          ZJN    PRS1        IF NOT ISHARED ENVIRONMENT
Line S08329 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
12242  M02S08329.283l840 ---| PRS6     RJM    GNE         GET NEXT EST ORDINAL
Line S08330 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
12243  M02S08330.283l840 ---|          ZJN    PRS4        IF END OF COMMAND
Line S08331 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
12244  M02S08331.283l840 ---|          PJN    PRS1        IF NOT MASS STORAGE
Line S08332 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
12245  M02S08332.283l840 ---|          SHN    13-4
Line S08333 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
12246  M02S08333.283l840 ---|          PJN    PRS1        IF NOT ISHARED DEVICES
Line S08334 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
12247  M02S08334.283l840 ---|          LDM    DVPR+TDDB
Line S08335 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
12248  M02S08335.283l840 ---|          SCN    1
Line S08336 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
12249  M02S08336.283l840 ---|          LMN    1           SET PRESET FLAG
Line S08337 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
12250  M02S08337.283l840 ---|          STM    DVPR+TDDB
Line S08338 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
12251  M02S08338.283l840 ---|          RJM    EEB         RETURN EQUIPMENT ENTRIES
Line S08339 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
12252  M02S08339.283l840 ---|          UJN    PRS6        NEXT ORDINAL
12253  M01S08340.set     +++| UEM      SPACE  4,10
12254  M01S08341.set     +++|***       UEMIN.
12255  M01S08342.set     +++|*
12256  M01S08343.set     +++|*         TOGGLE FULL INITIALIZE STATUS FOR *UEM* EQUIPMENT
12257  M01S08344.set     +++|*         ON LEVEL 0 DEADSTART.
12258  M01S08345.set     +++|
12259  M01S08346.set     +++|
12260  M01S08347.set     +++| UEM      DATA   C*UEMIN.*
12261  M01S08348.set     +++|          LDD    EN          CHECK FOR UEM PRESENT
12262  M01S08349.set     +++|          RJM    STA
12263  M01S08350.set     +++|          ZJN    UEM1        IF EXTENDED MEMORY EQUIPMENT UNDEFINED
12264  M01S08351.set     +++|          LDM    EMTY
12265  M01S08352.set     +++|          LMN    4
12266  M01S08353.set     +++|          ZJN    UEM2        IF MEMORY TYPE *UEM*
12267  M01S08354.set     +++| UEM1     JMP    ILL         PROCESS INCORRECT ENTRY
12268  M01S08355.set     +++|
12269  M01S08356.set     +++| UEM2     LDD    RS
12270  M01S08357.set     +++|          NJN    UEM3        IF RECOVERY DEADSTART
12271  M01S08358.set     +++|          LDM    EBUT+4
12272  M01S08359.set     +++|          LPC    MLIAL+17
12273  M01S08360.set     +++|          LMC    MLIAL       SET FULL INITIALIZE REQUESTED
12274  M01S08361.set     +++|          STM    EBUT+4
12275  M01S08362.set     +++|          RJM    EEB         UPDATE EQUIPMENT SPECIFICATION
12276  M01S08363.set     +++| UEM3     JMP    KBR         RETURN
12277  M01S00231.ns2644  +++| UPC      SPACE  4,10
12278  M01S00232.ns2644  +++|***       UP,CH=C1,C2,...,CN.
12279  M01S00233.ns2644  +++|*
12280  M01S00234.ns2644  +++|*         UP SPECIFIED CHANNELS PREVIOUSLY DOWNED.
12281  M01S00235.ns2644  +++|*
12282  M01S00236.ns2644  +++|*         C1 - CN = CHANNEL NUMBER TO BE UPPED.  A PREFIX OF
12283  M01S00237.ns2644  +++|*                   *C* DESIGNATES A CONCURRENT CHANNEL.
12284  M01S00238.ns2644  +++|
12285  M01S00239.ns2644  +++|
12286  M01S00240.ns2644  +++| UPC      DATA   C*UP,*
12287  M01S00241.ns2644  +++|          LDN    0           INDICATE *UP* PROCESSING
12288  M01S00242.ns2644  +++|          UJP    DWN1        JOIN COMMON *UP*/*DOWN* PROCESSING
12289  M01S08364.set     +++| XM       SPACE  4,20
12290  M01S08365.set     +++|***       XM=MID,IIII,UUUUU,EM.
12291  M01S08366.set     +++|*         ALLOCATE EXTENDED MEMORY WHERE -
12292  M01S08367.set     +++|*
12293  M01S08368.set     +++|*         MID = MACHINE ID.
12294  M01S08369.set     +++|*         IIII = NUMBER OF WORDS/1000B TO ALLOCATE FOR 819/DEMA/895
12295  M01S08370.set     +++|*                BUFFERS.  MINIMUM = 40B (16K WORDS).
12296  M01S08371.set     +++|*                MAXIMUM = 37770B (8M WORDS).
12297  M01S08372.set     +++|*              = 0 IF NO BUFFERS DESIRED.
12298  M01S08373.set     +++|*         UUUUU = NUMBER OF WORDS/1000B TO ALLOCATE FOR USER XM.
12299  M01S08374.set     +++|*                 MAXIMUM = 77740B.
12300  M01S08375.set     +++|*         EM = IF PRESENT, FORCE USER EXTENDED MEMORY TO UEM.
12301  M01S08376.set     +++|*
12302  M01S08377.set     +++|*         XM=MID.
12303  M01S08378.set     +++|*         CLEAR ALLOCATION FOR MACHINE *ID*.
12304  M01S08379.set     +++|
12305  M01S08380.set     +++|
12306  M01S08381.set     +++| AXM      DATA   C*XM=*
12307  M01S08382.set     +++|          LDC    SHNI+3      PRESET SHIFT INSTRUCTION
12308  M01S08383.set     +++|          ADM    EMSC
12309  M01S08384.set     +++|          STM    AXMA
12310  M01S08385.set     +++|          LDN    ZERL        INITIALIZE TABLE ENTRY
12311  M01S08386.set     +++|          CRD    CN
12312  M01S08387.set     +++|          SOD    KA
12313  M01S08388.set     +++|          RJM    A2C         ASSEMBLE MACHINE ID
Line S08389 Modification History
M01 (Added by) set
M02 (Updated by) set62
Seq #  *Modification Id* Act 
----------------------------+
12314  M02S08389.set62   ---|          ZJP    .ILL        IF NOT SPECIFIED
12315  M01S00001.set62   +++| AXM0     ZJP    .ILL        IF NOT SPECIFIED
12316  M01S08390.set     +++|          STD    CN
12317  M01S08391.set     +++|          LDN    1
12318  M01S08392.set     +++|          RJM    AVS         ASSEMBLE IOB SIZE
12319  M01S08393.set     +++|          ZJN    AXM1        IF NO IOB SIZE SPECIFIED
12320  M01S08394.set     +++|          STD    CN+4
12321  M01S08395.set     +++|          RJM    CFT         CONVERT TO TRACK COUNT
12322  M01S08396.set     +++|          SHN    6
12323  M01S08397.set     +++|          ADD    T0
12324  M01S08398.set     +++|          SHN    -5
12325  M01S08399.set     +++|          SBD    CN+4
12326  M01S08400.set     +++|          SHN    0-21
12327  M01S08401.set     +++|          RAD    T0
12328  M01S08402.set     +++|          STD    CN+3
12329  M01S08403.set     +++| AXM1     LDN    0
12330  M01S08404.set     +++|          RJM    AVS         ASSEMBLE USER XM SIZE
12331  M01S08405.set     +++|          STD    CN+2
Line S08406 Modification History
M01 (Added by) set
M02 (Updated by) set62
Seq #  *Modification Id* Act 
----------------------------+
12332  M02S08406.set62   ---|          RJM    A2C         ASSEMBLE OPTIONAL *EM* PARAMETER
12333  M01S00002.set62   +++|          ZJN    AXM1.1      IF VALUE NOT SPECIFIED
12334  M01S00029.ns2633  +++|          LDM    VEFL
12335  M01S00030.ns2633  +++|          ZJN    AXM1.1      IF *VE* NOT SPECIFIED
12336  M01S00003.set62   +++|          LDM    VEMZ
Line S00004 Modification History
M01 (Added by) set62
M02 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12337  M02S00004.ns2633  ---|          SHN    21-13
Line S00005 Modification History
M01 (Added by) set62
M02 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12338  M02S00005.ns2633  ---|          PJN    AXM1.1      IF *VE* NOT SPECIFIED
Line S00006 Modification History
M01 (Added by) set62
M02 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12339  M02S00006.ns2633  ---|          SHN    6
Line S00007 Modification History
M01 (Added by) set62
M02 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12340  M02S00007.ns2633  ---|          SCN    77
Line S00008 Modification History
M01 (Added by) set62
M02 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12341  M02S00008.ns2633  ---|          LMM    VEMZ+1
12342  M01S00031.ns2633  +++|          ADM    VEMZ+1
12343  M01S00009.set62   +++|          ZJN    AXM0        IF *VE=.* SPECIFIED
12344  M01S00010.set62   +++| AXM1.1   RJM    A2C         ASSEMBLE OPTIONAL *EM* PARAMETER
12345  M01S08407.set     +++|          LMC    2REM
12346  M01S08408.set     +++|          NJN    AXM2        IF NO *EM* PARAMETER
12347  M01S08409.set     +++|          LDM    EMTY
12348  M01S08410.set     +++|          LMN    4
12349  M01S08411.set     +++|          ZJN    AXM2        IF UEM EST ENTRY PRESENT
12350  M01S08412.set     +++|          AOD    CN+1        SET USER XM IN UEM
12351  M01S08413.set     +++|
12352  M01S08414.set     +++|*         VALIDATE ENTRIES ARE CONSISTENT FOR MAINFRAME AND EM TYPE.
12353  M01S08415.set     +++|
12354  M01S08416.set     +++| AXM2     LDD    ID
12355  M01S08417.set     +++|          LMD    CN
12356  M01S08418.set     +++|          NJN    AXM6        IF NOT FOR THIS MACHINE
12357  M01S08419.set     +++|
12358  M01S08420.set     +++|*         *EM* REQUIRES CME MACHINE.
12359  M01S08421.set     +++|
12360  M01S08422.set     +++|          LDD    CN+1
12361  M01S08423.set     +++|          ZJN    AXM3        IF NOT *EM*
12362  M01S08424.set     +++|          LDD    HO
12363  M01S08425.set     +++|          SHN    21-13
12364  M01S08426.set     +++|          MJN    AXM5        IF NOT CME
12365  M01S08427.set     +++|
12366  M01S08428.set     +++|*         I/O BUFFERS REQUIRE CPU ACCESS EQUIPMENT.
12367  M01S08429.set     +++|
12368  M01S08430.set     +++| AXM3     LDD    CN+4
12369  M01S08431.set     +++|          ZJN    AXM4        IF NO I/O BUFFERS
12370  M01S08432.set     +++|          LDD    EN
12371  M01S08433.set     +++|          ZJN    AXM5        IF NO CPU ACCESS EQUIPMENT
12372  M01S08434.set     +++|
12373  M01S08435.set     +++|*         USER XM REQUIRES CPU ACCESS, UNLESS IT-S IN UEM WITH NO EST.
12374  M01S08436.set     +++|
12375  M01S08437.set     +++| AXM4     LDD    CN+2
12376  M01S08438.set     +++|          ZJN    AXM8        IF NO USER XM
12377  M01S08439.set     +++|          LDD    EN
12378  M01S08440.set     +++|          NJN    AXM8        IF CPU ACCESS EQUIPMENT
12379  M01S08441.set     +++|          LDD    CN+1
12380  M01S08442.set     +++|          NJN    AXM8        IF *EM*
12381  M01S08443.set     +++| AXM5     JMP    ILL
12382  M01S08444.set     +++|
12383  M01S08445.set     +++|*         VALIDATE ENTRIES FOR ANOTHER MACHINE.
12384  M01S08446.set     +++|*         I/O BUFFERS OR USER XM REQUIRES LINK DEVICE.
12385  M01S08447.set     +++|
12386  M01S08448.set     +++| AXM6     LDD    CN+4
12387  M01S08449.set     +++|          ADD    CN+2
12388  M01S08450.set     +++|          ZJN    AXM7        IF NO I/O BUFFERS OR USER XM
12389  M01S08451.set     +++|          LDD    PD
12390  M01S08452.set     +++|          ZJN    AXM5        IF NO LINK DEVICE
12391  M01S08453.set     +++|          LDN    0
12392  M01S08454.set     +++| AXM7     STD    CN+1        CLEAR POSSIBLE USER XM IN UEM FLAG
12393  M01S08455.set     +++|
12394  M01S08456.set     +++|*         LOCATE PROPER ENTRY IN TABLE.
12395  M01S08457.set     +++|
12396  M01S08458.set     +++| AXM8     LDN    0
12397  M01S08459.set     +++|          STD    T3          CLEAR POINTER TO EMPTY SLOT
12398  M01S08460.set     +++|          STD    T4
12399  M01S08461.set     +++|          LDD    CN
12400  M01S08462.set     +++|          LMD    ID
12401  M01S08463.set     +++|          ZJN    AXM11       IF ENTRY FOR THIS MACHINE, USE FIRST SLOT
12402  M01S08464.set     +++|
12403  M01S08465.set     +++|*         SEARCH EXTENDED MEMORY ALLOCATION TABLE FOR MATCHING ID
12404  M01S08466.set     +++|*         OR EMPTY SLOT.
12405  M01S08467.set     +++|
12406  M01S08468.set     +++| AXM9     LDN    5
12407  M01S08469.set     +++|          RAD    T4          ADVANCE SEARCH
12408  M01S08470.set     +++|          ADK    -TAXML
12409  M01S08471.set     +++|          MJN    AXM10       IF NOT END OF TABLE
12410  M01S08472.set     +++|          LDD    T3
12411  M01S08473.set     +++|          ZJN    AXM5        IF NO FREE ENTRY
12412  M01S08474.set     +++|          STD    T4
12413  M01S08475.set     +++|          LJM    AXM15       MOVE ENTRY TO TABLE
12414  M01S08476.set     +++|
12415  M01S08477.set     +++| AXM10    LDM    TAXM,T4
12416  M01S08478.set     +++|          LMD    CN
12417  M01S08479.set     +++|          ZJN    AXM15       IF MATCHING ENTRY FOUND
12418  M01S08480.set     +++|          LMD    CN
12419  M01S08481.set     +++|          NJN    AXM9        IF SLOT USED
12420  M01S08482.set     +++|          LDD    T3
12421  M01S08483.set     +++|          NJN    AXM9        IF FREE ENTRY FOUND
12422  M01S08484.set     +++|          LDD    T4
12423  M01S08485.set     +++|          STD    T3          SAVE POINTER TO EMPTY SLOT
12424  M01S08486.set     +++|          UJN    AXM9        LOOP
12425  M01S08487.set     +++|
12426  M01S08488.set     +++|*         PROCESS ENTRY FOR THIS MACHINE.
12427  M01S08489.set     +++|
12428  M01S08490.set     +++| AXM11    LDD    T5          SET SHIFT COUNT FROM *AVS*
12429  M01S08491.set     +++|          STM    UESC
12430  M01S08492.set     +++|          LDM    EMTY
12431  M01S08493.set     +++|          LMN    4
12432  M01S08494.set     +++|          ZJN    AXM15       IF UEM PRESENT, PRESERVE ITS SIZE
12433  M01S08495.set     +++|          LDD    CN+1
12434  M01S08496.set     +++|          NJN    AXM13       IF INTERNAL USER EXTENDED MEMORY SPECIFIED
12435  M01S08497.set     +++|          LDM    TAXM+1      CHECK PRIOR *XM* ENTRY
12436  M01S08498.set     +++|          ZJN    AXM15       IF NO PRIOR INTERNAL USER EM DEFINITION
12437  M01S08499.set     +++|          LDN    0
12438  M01S08500.set     +++|          UJN    AXM14       CLEAR UEM SIZE
12439  M01S08501.set     +++|
12440  M01S08502.set     +++| AXM13    LDD    CN+2        GET USER EXTENDED MEMORY SIZE
12441  M01S08503.set     +++| AXMA     SHN    3           CONVERT BACK TO 100B WORD BLOCKS
12442  M01S08504.set     +++|*         SHN    3+EMSC      (EMSC = EXTENDED MEMORY SHIFT COUNT)
12443  M01S08505.set     +++| AXM14    STM    UEMZ+1      SET/CLEAR UEM REQUIRED SIZE
12444  M01S08506.set     +++|          SHN    -14
12445  M01S08507.set     +++|          STM    UEMZ
12446  M01S08508.set     +++|
12447  M01S08509.set     +++|*         ENTER *XM* ENTRY IN *TAXM* TABLE.
12448  M01S08510.set     +++|
12449  M01S08511.set     +++| AXM15    LDN    CN
12450  M01S08512.set     +++|          STD    T1
12451  M01S08513.set     +++|          LDD    CN+2
12452  M01S08514.set     +++|          ADD    CN+4
12453  M01S08515.set     +++|          NJN    AXM16       IF NOT CLEARING ENTRY
12454  M01S08516.set     +++|          STD    CN          CLEAR MACHINE ID
12455  M01S08517.set     +++| AXM16    LDI    T1          MOVE ENTRY TO *TAXM* TABLE
12456  M01S08518.set     +++|          STM    TAXM,T4
12457  M01S08519.set     +++|          AOD    T4
12458  M01S08520.set     +++|          AOD    T1
12459  M01S08521.set     +++|          SBN    CN+5
12460  M01S08522.set     +++|          NJN    AXM16       IF MORE BYTES TO MOVE
12461  M01S08523.set     +++|          RJM    CMS
12462  M01S08524.set     +++|          ZJN    AXM17       IF NO ERROR
12463  M01S08525.set     +++|          JMP    ERR         ERROR EXIT
12464  M01S08526.set     +++|
12465  M01S08527.set     +++| AXM17    JMP    KBR         RETURN
12466  M01S08528.set     +++|          TITLE  MISCELLANEOUS SUBROUTINES.
12467  M01S08529.set     +++| ACM      SPACE  4,10
12468  M01S08530.set     +++|**        ACM - ADJUST CENTRAL MEMORY.
12469  M01S08531.set     +++|*
12470  M01S08532.set     +++|*         EXIT   (FL - FL+1) = EXECUTION FIELD LENGTH.
12471  M01S08533.set     +++|*
12472  M01S08534.set     +++|*         USES   T1 - T4.
12473  M01S08535.set     +++|
12474  M01S08536.set     +++|
12475  M01S08537.set     +++| ACM      SUBR               ENTRY/EXIT
12476  M01S08538.set     +++|          LDD    FL
12477  M01S08539.set     +++|          STM    MCMS
12478  M01S08540.set     +++|          LDD    FL+1        SAVE MINCM VALUE
12479  M01S08541.set     +++|          STM    MCMS+1
12480  M01S08542.set     +++|          LCN    0           SET MAXIMUM NOS FL TO 2097088
12481  M01S08543.set     +++|          STD    T2
12482  M01S08544.set     +++|          LPN    7
12483  M01S08545.set     +++|          STD    T1
Line S08546 Modification History
M01 (Added by) set
M02 (Updated by) set61
Seq #  *Modification Id* Act 
----------------------------+
12484  M02S08546.set61   ---| ACM1     LDM    VEMZ
Line S00002 Modification History
M01 (Added by) set61
M02 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12485  M02S00002.ns2633  ---|          LDM    VEMZ
Line S08547 Modification History
M01 (Added by) set
M02 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12486  M02S08547.ns2633  ---|          LPN    77
Line S08548 Modification History
M01 (Added by) set
M02 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12487  M02S08548.ns2633  ---|          STD    T0
12488  M01S08549.set     +++|          LDM    UEMZ+1
12489  M01S08550.set     +++|          ADM    UEMZ
Line S08551 Modification History
M01 (Added by) set
M02 (Updated by) set61
Seq #  *Modification Id* Act 
----------------------------+
12490  M02S08551.set61   ---|          ZJN    ACM2        IF NO UEM DEFINED
12491  M01S00003.set61   +++|          ZJN    ACM1        IF NO UEM DEFINED
12492  M01S08552.set     +++|          LDD    MZ+1
12493  M01S08553.set     +++|          LPN    7           ADJUST FOR 1000B WORD UEM BOUNDARY
Line S08554 Modification History
M01 (Added by) set
M02 (Updated by) set61
Seq #  *Modification Id* Act 
----------------------------+
12494  M02S08554.set61   ---| ACM2     STD    T4
Line S08555 Modification History
M01 (Added by) set
M02 (Updated by) set61
Seq #  *Modification Id* Act 
----------------------------+
12495  M02S08555.set61   ---|          LDD    MZ          AMOUNT OF CM NOT ALLOCATED TO NOS/VE OR UEM
12496  M01S00004.set61   +++| ACM1     STD    T4
Line S00005 Modification History
M01 (Added by) set61
M02 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12497  M02S00005.ns2633  ---|          LDD    MZ          MEMORY NOT ALLOCATED TO NOS/VE OR UEM
Line S08556 Modification History
M01 (Added by) set
M02 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12498  M02S08556.ns2633  ---|          SHN    14
Line S08557 Modification History
M01 (Added by) set
M02 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12499  M02S08557.ns2633  ---|          ADD    MZ+1
Line S08558 Modification History
M01 (Added by) set
M02 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12500  M02S08558.ns2633  ---|          SBM    VEMZ+1
Line S08559 Modification History
M01 (Added by) set
M02 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12501  M02S08559.ns2633  ---|          SBM    UEMZ+1
12502  M01S00032.ns2633  +++|          LDM    VEMZ+1      FIND MEMORY NOT ALLOCATED TO VE OR UEM
12503  M01S00033.ns2633  +++|          ADM    UEMZ+1
12504  M01S00034.ns2633  +++|          RAD    T4
12505  M01S00035.ns2633  +++|          SHN    -14
12506  M01S00036.ns2633  +++|          ADM    VEMZ
12507  M01S00037.ns2633  +++|          ADM    UEMZ
12508  M01S00038.ns2633  +++|          STD    T3
12509  M01S00039.ns2633  +++|          LDD    MZ+1
12510  M01S08560.set     +++|          SBD    T4
12511  M01S08561.set     +++|          STD    FL+1
Line S08562 Modification History
M01 (Added by) set
M02 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12512  M02S08562.ns2633  ---|          SHN    -14
Line S08563 Modification History
M01 (Added by) set
M02 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12513  M02S08563.ns2633  ---|          SBD    T0
Line S08564 Modification History
M01 (Added by) set
M02 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12514  M02S08564.ns2633  ---|          SBM    UEMZ
12515  M01S00040.ns2633  +++|          PJN    ACM1.1      IF NO BORROW
12516  M01S00041.ns2633  +++|          AOD    T3          ADJUST FOR BORROW
12517  M01S00042.ns2633  +++|          AOD    FL+1
12518  M01S00043.ns2633  +++| ACM1.1   LDD    MZ
12519  M01S00044.ns2633  +++|          SBD    T3
12520  M01S08565.set     +++|          STD    FL
Line S08566 Modification History
M01 (Added by) set
M02 (Updated by) set61
Seq #  *Modification Id* Act 
----------------------------+
12521  M02S08566.set61   ---|          ZJN    ACM2.1      IF LESS THAN 262K MEMORY
Line S00006 Modification History
M01 (Added by) set61
M02 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12522  M02S00006.ns2633  ---|          ZJN    ACM2        IF LESS THAN 262K MEMORY
Line S08567 Modification History
M01 (Added by) set
M02 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12523  M02S08567.ns2633  ---|*         LDN    PSNI
Line S08568 Modification History
M01 (Added by) set
M02 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12524  M02S08568.ns2633  ---|          STM    ACMA
Line S08569 Modification History
M01 (Added by) set
M02 (Updated by) set61
M03 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12525  M03S08569.ns2633  ---| ACM2.1   SHN    14
Line S00007 Modification History
M01 (Added by) set61
M02 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12526  M02S00007.ns2633  ---| ACM2     SHN    14
Line S08570 Modification History
M01 (Added by) set
M02 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12527  M02S08570.ns2633  ---|          ADD    FL+1
12528  M01S00045.ns2633  +++|          LDD    T1          COMPARE WITH MAXIMUM USABLE NOS FL
12529  M01S00046.ns2633  +++|          STD    T3
12530  M01S00047.ns2633  +++|          LDD    FL+1
12531  M01S08571.set     +++|          SBD    T2
Line S08572 Modification History
M01 (Added by) set
M02 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12532  M02S08572.ns2633  ---| ACMA     MJN    ACM4        IF LESS THAN 262K MEMORY
Line S08573 Modification History
M01 (Added by) set
M02 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12533  M02S08573.ns2633  ---|*         PSN                (MEMORY LARGER THAN 262K)
12534  M01S08574.set     +++|          STD    T4
Line S08575 Modification History
M01 (Added by) set
M02 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12535  M02S08575.ns2633  ---|          SHN    -14
Line S08576 Modification History
M01 (Added by) set
M02 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12536  M02S08576.ns2633  ---|          SBD    T1
12537  M01S00048.ns2633  +++|          PJN    ACM2        IF NO BORROW
12538  M01S00049.ns2633  +++|          AOD    T3          ADJUST FOR BORROW
12539  M01S00050.ns2633  +++|          AOD    T4
12540  M01S00051.ns2633  +++| ACM2     LDD    FL
12541  M01S00052.ns2633  +++|          SBD    T3
12542  M01S08577.set     +++|          STD    T3
12543  M01S08578.set     +++|          MJN    ACM4        IF NO UNUSED MEMORY AVAILABLE FOR NOS/VE
Line S08579 Modification History
M01 (Added by) set
M02 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12544  M02S08579.ns2633  ---|          SHN    14
Line S08580 Modification History
M01 (Added by) set
M02 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12545  M02S08580.ns2633  ---|          ADD    T4
Line S08581 Modification History
M01 (Added by) set
M02 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12546  M02S08581.ns2633  ---|          ZJN    ACM4        IF NO UNUSED MEMORY AVAILABLE FOR NOS/VE
Line S08582 Modification History
M01 (Added by) set
M02 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12547  M02S08582.ns2633  ---|          LDM    VEMZ
12548  M01S00053.ns2633  +++|          LDM    VEFL
12549  M01S08583.set     +++|          ZJN    ACM3        IF NOS/VE NOT DEFINED
12550  M01S08584.set     +++|          LDD    T4
12551  M01S08585.set     +++|          RAM    VEMZ+1      ADJUST NOS/VE MEMORY SIZE
12552  M01S08586.set     +++|          SHN    -14
12553  M01S08587.set     +++|          ADD    T3
12554  M01S08588.set     +++|          RAM    VEMZ
12555  M01S08589.set     +++| ACM3     LDD    T1          ADJUST NOS MEMORY SIZE
12556  M01S08590.set     +++|          STD    FL
12557  M01S08591.set     +++|          LDD    T2
12558  M01S08592.set     +++|          STD    FL+1
12559  M01S08593.set     +++| ACM4     LDD    FL
12560  M01S08594.set     +++|          ZJN    ACM5        IF MACHINE FL .LT. 262K
12561  M01S08595.set     +++|          LDD    HO
12562  M01S08596.set     +++|          SHN    0-13
12563  M01S08597.set     +++|          ZJN    ACM5        IF CME MAINFRAME
Line S08598 Modification History
M01 (Added by) set
M02 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12564  M02S08598.ns2633  ---|          LCN    0
12565  M01S00054.ns2633  +++|          LCN    0           SET NOS MEMORY SIZE TO 262K - 100B
12566  M01S08599.set     +++|          STD    FL+1
Line S08600 Modification History
M01 (Added by) set
M02 (Updated by) ns2633
Seq #  *Modification Id* Act 
----------------------------+
12567  M02S08600.ns2633  ---|          LDN    0           SET FL TO 262K - 100B
12568  M01S00055.ns2633  +++|          LDN    0
12569  M01S08601.set     +++|          STD    FL
Line S08602 Modification History
M01 (Added by) set
M02 (Updated by) set76
Seq #  *Modification Id* Act 
----------------------------+
12570  M02S08602.set76   ---| ACM5     LDD    FL
12571  M01S00001.set76   +++| ACM5     LDD    FL+1
12572  M01S00002.set76   +++|          ADM    UEMZ+1
12573  M01S00003.set76   +++|          SHN    -14
12574  M01S00004.set76   +++|          ADD    FL
12575  M01S08603.set     +++|          ADM    UEMZ
12576  M01S08604.set     +++|          SHN    -3
Line S08605 Modification History
M01 (Added by) set
M02 (Updated by) ns2499
Seq #  *Modification Id* Act 
----------------------------+
12577  M02S08605.ns2499  ---|          NJN    ACM7        IF EXPANDED MODE NEEDED
12578  M01S00009.ns2499  +++|          NJN    ACM6        IF EXPANDED MODE NEEDED
12579  M01S08606.set     +++|          LDM    EMSC
12580  M01S08607.set     +++|          ADD    TH
12581  M01S08608.set     +++|          ERRNZ  SHNI-1000
12582  M01S08609.set     +++|          STM    ACMB
12583  M01S08610.set     +++|          LDM    EMFL
12584  M01S08611.set     +++|          ZJN    ACM7        IF EXPANDED MODE NOT NEEDED
12585  M01S08612.set     +++| ACMB     SHN    0
12586  M01S08613.set     +++|*         SHN    EMSC
12587  M01S08614.set     +++|          SBN    1
12588  M01S08615.set     +++|          SHN    -14         CHECK FOR EMFL GT 2MW
12589  M01S08616.set     +++|          ZJN    ACM7        IF EXPANDED MODE NOT NEEDED
12590  M01S08617.set     +++| ACM6     LDK    PSNI
12591  M01S08618.set     +++|          STM    ACMD
12592  M01S08619.set     +++|          LDM    CMDL        GET MODEL NUMBER
12593  M01S08620.set     +++|          SBN    40
Line S08621 Modification History
M01 (Added by) set
M02 (Updated by) ns2499
Seq #  *Modification Id* Act 
----------------------------+
12594  M02S08621.ns2499  ---|          ZJN    ACM11       IF CYBER 835
12595  M01S00010.ns2499  +++|          ZJP    ACM11       IF CYBER 835
12596  M01S00011.ns2499  +++|          SBN    77-40
12597  M01S00012.ns2499  +++|          PJN    ACM10       IF CYBER 990
12598  M01S08622.set     +++|          LDM    C8XX
12599  M01S08623.set     +++|          ZJN    ACM8        IF CYBER 800 TYPE MAINFRAME
12600  M01S00001.set63   +++|          LDD    HO
12601  M01S00002.set63   +++|          SHN    21-13
12602  M01S00003.set63   +++|          PJN    ACM8        IF CYBER 865/875
Line S08624 Modification History
M01 (Added by) set
M02 (Updated by) ns2499
Seq #  *Modification Id* Act 
----------------------------+
12603  M02S08624.ns2499  ---|          LDC    PJNI+ACM12-ACMC
12604  M01S00013.ns2499  +++|          LDC    PJNI+ACM13-ACMC
12605  M01S08625.set     +++|          STM    ACMC        ERROR, IF ECS AND .GT. 2MW XM
12606  M01S08626.set     +++| ACM7     LDM    CMDL
12607  M01S08627.set     +++|          SBN    77
12608  M01S08628.set     +++|          PJN    ACM10       IF CYBER 990
12609  M01S08629.set     +++|          LDD    HO
12610  M01S08630.set     +++|          LPC    100         CHECK FOR A CYBER 170 TYPE MAINFRAME
12611  M01S08631.set     +++|          NJN    ACM9        IF NOT A CYBER 170 TYPE MAINFRAME
12612  M01S08632.set     +++|          LDN    CFGL
12613  M01S08633.set     +++|          CRD    CM
12614  M01S08634.set     +++|          LDD    CM+3
12615  M01S08635.set     +++|          SHN    21-12       GET ESM MODE BIT
12616  M01S08636.set     +++| ACMC     PJN    ACM9        IF ECS AND NOT ESM
Line S08637 Modification History
M01 (Added by) set
M02 (Updated by) ns2499
Seq #  *Modification Id* Act 
----------------------------+
12617  M02S08637.ns2499  ---|*         PJN    ACM12       IF ECS AND .GT. 2MW XM
12618  M01S00014.ns2499  +++|*         PJN    ACM13       (IF ECS MODE AND .GT. 2MW)
12619  M01S08638.set     +++| ACM8     LDN    1           SET EXPANDED ADDRESSING MODE
12620  M01S08639.set     +++|          STM    EMAF
12621  M01S08640.set     +++| ACM9     LJM    ACMX        RETURN
12622  M01S08641.set     +++|
12623  M01S08642.set     +++| ACM10    LDM    C9LM
Line S08643 Modification History
M01 (Added by) set
M02 (Updated by) ns2499
Seq #  *Modification Id* Act 
----------------------------+
12624  M02S08643.ns2499  ---|          NJN    ACM13       IF LARGE CYBER 990 MICROCODE PRESENT
12625  M01S00015.ns2499  +++|          NJN    ACM15       IF LARGE CYBER 990
12626  M01S08644.set     +++| ACMD     UJN    ACM9        RETURN
12627  M01S08645.set     +++|*         PSN                (IF .GE. 2MW CM)
12628  M01S08646.set     +++| ACM11    LDD    FL          SUBTRACT UEM FROM CM
12629  M01S08647.set     +++|          SBM    UEMZ
12630  M01S08648.set     +++|          STD    FL
12631  M01S08649.set     +++|          SBM    MCMS        CHECK FOR TOO LITTLE MEMORY AVAILABLE
Line S08650 Modification History
M01 (Added by) set
M02 (Updated by) ns2499
Seq #  *Modification Id* Act 
----------------------------+
12632  M02S08650.ns2499  ---|          MJN    ACM12       IF MORE EM REQUESTED THAN MEMORY AVAILABLE
12633  M01S00016.ns2499  +++|          MJN    ACM13       IF MORE XM REQUESTED THAN AVAILABLE
12634  M01S08651.set     +++|          LDD    FL
12635  M01S08652.set     +++|          SHN    14
12636  M01S08653.set     +++|          ADD    FL+1
12637  M01S08654.set     +++|          SBM    UEMZ+1
12638  M01S08655.set     +++|          STD    FL+1
12639  M01S08656.set     +++|          SHN    -14
12640  M01S08657.set     +++|          STD    FL
12641  M01S08658.set     +++|          SHN    14
12642  M01S08659.set     +++|          ADD    FL+1
12643  M01S08660.set     +++|          SBM    MCMS+1      CHECK FOR TOO LITTLE MEMORY AVAILABLE
Line S08661 Modification History
M01 (Added by) set
M02 (Updated by) ns2499
Seq #  *Modification Id* Act 
----------------------------+
12644  M02S08661.ns2499  ---|          PJN    ACM9        IF VALID CM VALUE REMAINS
Line S08662 Modification History
M01 (Added by) set
M02 (Updated by) ns2499
Seq #  *Modification Id* Act 
----------------------------+
12645  M02S08662.ns2499  ---| ACM12    LDC    2RXM
12646  M01S00017.ns2499  +++| ACM12    PJN    ACM9        IF VALID MEMORY SIZE REMAINING
12647  M01S00018.ns2499  +++| ACM13    LDC    2RXM
12648  M01S08663.set     +++|          STM    CMSA
12649  M01S08664.set     +++|          LDC    CMSA
Line S08665 Modification History
M01 (Added by) set
M02 (Updated by) ns2499
Seq #  *Modification Id* Act 
----------------------------+
12650  M02S08665.ns2499  ---|          LJM    DDE         DISPLAY *XM ALLOCATION ERROR*
Line S08666 Modification History
M01 (Added by) set
M02 (Updated by) ns2499
Seq #  *Modification Id* Act 
----------------------------+
12651  M02S08666.ns2499  ---|
Line S08667 Modification History
M01 (Added by) set
M02 (Updated by) ns2499
Seq #  *Modification Id* Act 
----------------------------+
12652  M02S08667.ns2499  ---| ACM13    LDM    UEMZ        CHECK FOR UEM PRESENT
Line S08668 Modification History
M01 (Added by) set
M02 (Updated by) ns2499
Seq #  *Modification Id* Act 
----------------------------+
12653  M02S08668.ns2499  ---|          SHN    14
Line S08669 Modification History
M01 (Added by) set
M02 (Updated by) ns2499
Seq #  *Modification Id* Act 
----------------------------+
12654  M02S08669.ns2499  ---|          ADM    UEMZ+1
Line S08670 Modification History
M01 (Added by) set
M02 (Updated by) ns2499
Seq #  *Modification Id* Act 
----------------------------+
12655  M02S08670.ns2499  ---|          ZJN    ACM12       IF NO UEM AVAILABLE
Line S08671 Modification History
M01 (Added by) set
M02 (Updated by) ns2499
Seq #  *Modification Id* Act 
----------------------------+
12656  M02S08671.ns2499  ---|          LJM    ACMX        RETURN
Line S00019 Modification History
M01 (Added by) ns2499
M02 (Updated by) set61
Seq #  *Modification Id* Act 
----------------------------+
12657  M02S00019.set61   ---| ACM14    LJM    DDE         DISPLAY ERROR MESSAGE
12658  M01S00008.set61   +++| ACM14    LJM    DSE         DISPLAY ERROR MESSAGE AND HANG
12659  M01S00020.ns2499  +++|
12660  M01S00021.ns2499  +++| ACM15    LDM    TAXM+2
12661  M01S00022.ns2499  +++|          NJN    ACM12       IF USER XM PRESENT
12662  M01S00023.ns2499  +++|          LDC    ACME
12663  M01S00024.ns2499  +++|          UJN    ACM14       DISPLAY ERROR MESSAGE
12664  M01S00025.ns2499  +++|
12665  M01S00026.ns2499  +++|
12666  M01S00027.ns2499  +++| ACME     DATA   C*USER XM REQUIRED.*
12667  M01S00028.ns2499  +++|
12668  M01S00029.ns2499  +++|          ERRPL  ACM13-ACMC-40  JUMP OUT OF RANGE
12669  M01S02186.274l797 +++|          AODSUB
12670  M01S02187.274l797 +++|          ASDSUB
12671  M01S02188.274l797 +++|          ASNSUB
12672  M01S08672.set     +++| AVS      SPACE  4,10
12673  M01S08673.set     +++|**        AVS - ASSEMBLE AND VALIDATE SIZE PARAMETER.
12674  M01S08674.set     +++|*
12675  M01S08675.set     +++|*         ENTRY  (A) = 0 IF PROCESSING USER EM SIZE.
12676  M01S08676.set     +++|*                    = 1 IF PROCESSING IO BUFFER SIZE.
12677  M01S08677.set     +++|*                (KA) = CURRENT CHARACTER STRING ADDRESS.
12678  M01S08678.set     +++|*
12679  M01S08679.set     +++|*         EXIT   (A) = 0 IF END OF STRING, ELSE ASSEMBLED SIZE/*EMBS*.
12680  M01S08680.set     +++|*                (T5) = USER EM SHIFT COUNT REQUIRED FOR USER EM SIZE
12681  M01S08681.set     +++|*                       TO FIT IN 11 BITS.
12682  M01S08682.set     +++|*
12683  M01S08683.set     +++|*         ERROR  TO *ILL* IF INCORRECT SIZE ENTRY.
12684  M01S08684.set     +++|*
12685  M01S08685.set     +++|*         CALLS  AOD.
12686  M01S08686.set     +++|
12687  M01S08687.set     +++|
12688  M01S08688.set     +++| AVS6     LDD    LD
12689  M01S08689.set     +++|          LPC    777
12690  M01S08690.set     +++|          NJN    AVS7        IF LINK DEVICE DEFINED
12691  M01S08691.set     +++|          LDM    EMSC
12692  M01S08692.set     +++|          STM    LDSH        USE EM DEVICE WITH CPU ACCESS
12693  M01S08693.set     +++| AVS7     LDC    SHNI+3
12694  M01S08694.set     +++|          SBM    EMSC
12695  M01S08695.set     +++|          STM    AVSA
12696  M01S08696.set     +++|          LDD    AB+3        RETURN SIZE PARAMETER VALUE
12697  M01S08697.set     +++|          SHN    14
12698  M01S08698.set     +++|          LMD    AB+4
12699  M01S08699.set     +++| AVSA     SHN    3           ALLOW FOR BLOCKING FACTOR
12700  M01S08700.set     +++|*         SHN    3-EMSC
12701  M01S08701.set     +++|          ADN    7
12702  M01S08702.set     +++|          SHN    -3
12703  M01S08703.set     +++|          STD    T0
12704  M01S08704.set     +++|          SHN    -14
12705  M01S08705.set     +++|          NJN    AVS1        IF VALUE TOO LARGE
12706  M01S08706.set     +++|          LDD    T0
12707  M01S08707.set     +++|
12708  M01S08708.set     +++| AVS      SUBR               ENTRY/EXIT
12709  M01S08709.set     +++|          STD    T5
12710  M01S08710.set     +++|          LDI    KA
12711  M01S08711.set     +++|          SBN    1R.
12712  M01S08712.set     +++|          ZJN    AVSX        IF NO ENTRY
12713  M01S08713.set     +++|          AOD    KA          ADVANCE CHARACTER ADDRESS
12714  M01S08714.set     +++|          RJM    AOD         ASSEMBLE SIZE PARAMETER
12715  M01S08715.set     +++|          LDD    AB+3        VALIDATE SIZE PARAMETER
12716  M01S08716.set     +++|          SCN    7
12717  M01S08717.set     +++|          NJN    AVS1        IF SIZE TOO LARGE
12718  M01S08718.set     +++|          LDD    T5
12719  M01S08719.set     +++|          ZJN    AVS2        IF PROCESSING USER XM SIZE
12720  M01S08720.set     +++|          LDD    AB+3
12721  M01S08721.set     +++|          SHN    14
12722  M01S08722.set     +++|          LMD    AB+4
12723  M01S08723.set     +++|          ZJN    AVSX        IF NO IOB SIZE SPECIFIED
12724  M01S08724.set     +++|          SBN    40
12725  M01S08725.set     +++|          MJN    AVS1        IF IOB SIZE .LT. 16K WORDS
12726  M01S08726.set     +++|          SBK    37771-40
12727  M01S08727.set     +++|          MJN    AVS5        IF IOB SIZE .LT. 8M WORDS
12728  M01S08728.set     +++| AVS1     JMP    ILL         PROCESS INCORRECT ENTRY
12729  M01S08729.set     +++|
12730  M01S08730.set     +++| AVS2     LDD    AB+3
12731  M01S08731.set     +++|          SHN    14
12732  M01S08732.set     +++|          LMD    AB+4
12733  M01S08733.set     +++|          ADC    -77741
12734  M01S08734.set     +++|          PJN    AVS1        IF USER XM SIZE .GT. MAXIMUM
12735  M01S08735.set     +++|          ADC    77741
12736  M01S08736.set     +++|          SHN    -13
12737  M01S08737.set     +++|          ZJN    AVS4        IF .LE. 1M WORDS
12738  M01S08738.set     +++| AVS3     STD    T0
12739  M01S08739.set     +++|          AOD    T5          INCREASE EM SHIFT COUNT
12740  M01S08740.set     +++|          LDD    T0
12741  M01S08741.set     +++|          SHN    -1
12742  M01S08742.set     +++|          NJN    AVS3        IF XM SIZE NOT YET DETERMINED
12743  M01S08743.set     +++| AVS4     LDD    EN
12744  M01S08744.set     +++|          NJN    AVS5        IF XM DEVICE DEFINED
12745  M01S08745.set     +++|          LDD    T5
12746  M01S08746.set     +++|          ZJN    AVS5        IF NO SHIFT REQUIRED
12747  M01S08747.set     +++|          SBN    1
12748  M01S08748.set     +++|          STM    EMSC
12749  M01S08749.set     +++| AVS5     UJP    AVS6        RETURN SIZE PARAMETER VALUE
12750  M01S08750.set     +++| A2C      SPACE  4,10
12751  M01S08751.set     +++|**        A2C - ASSEMBLE TWO CHARACTER VALUE.
12752  M01S08752.set     +++|*
12753  M01S08753.set     +++|*         ENTRY  KA = CURRENT CHARACTER STRING ADDRESS.
12754  M01S08754.set     +++|*
12755  M01S08755.set     +++|*         EXIT   (A) = VALUE ASSEMBLED.
12756  M01S08756.set     +++|*                TO *ILL* IF SEPARATOR NOT *.* OR *,* OR IF
12757  M01S08757.set     +++|*                VALUE LONGER THAN TWO CHARACTERS.
12758  M01S08758.set     +++|*
12759  M01S08759.set     +++|*         CALLS  ASN.
12760  M01S08760.set     +++|
12761  M01S08761.set     +++|
12762  M01S08762.set     +++| A2C1     LDD    CM          RETURN VALUE
12763  M01S08763.set     +++|
12764  M01S08764.set     +++| A2C      SUBR
12765  M01S08765.set     +++|          LDI    KA
12766  M01S08766.set     +++|          SBN    1R.
12767  M01S08767.set     +++|          ZJN    A2CX        IF NOTHING TO ASSEMBLE
12768  M01S08768.set     +++|          LDN    3
12769  M01S08769.set     +++|          RJM    ASN         ASSEMBLE VALUE
12770  M01S08770.set     +++|          ZJN    A2C1        IF .LE. 2 CHARACTERS AND PROPER SEPARATOR
12771  M01S08771.set     +++|          JMP    ILL         PROCESS INCORRECT ENTRY
12772  M01S08772.set     +++| CDD      SPACE  4,10
12773  M01S08773.set     +++|**        CDD - CHECK DEADSTART DISK.
12774  M01S08774.set     +++|*
12775  M01S08775.set     +++|*         ENTRY  (DF) = DEADSTART FUNCTION.
12776  M01S08776.set     +++|*                (DH) = DEADSTART CHANNEL.
12777  M01S08777.set     +++|*
12778  M01S08778.set     +++|*         EXIT   (A) = 0 IF DEADSTART DEVICE.
12779  M01S08779.set     +++|
12780  M01S08780.set     +++|
12781  M01S08781.set     +++| CDD      SUBR               ENTRY/EXIT
12782  M01S08782.set     +++|          LDD    DF
12783  M01S08783.set     +++|          LPC    700
12784  M01S08784.set     +++|          NJN    CDDX        IF NOT DISK DEADSTART
12785  M01S08785.set     +++|          LDI    ES
12786  M01S08786.set     +++|          SHN    -6
12787  M01S08787.set     +++|          LPN    42
12788  M01S08788.set     +++| CDD1     LMN    42
12789  M01S08789.set     +++|          NJN    CDDX        IF NOT MASS STORAGE / *LDAM* DEVICE
12790  M01S08790.set     +++|          LDM    EBUT+1
12791  M01S08791.set     +++|          LMD    DH
12792  M01S08792.set     +++|          LPN    77
12793  M01S08793.set     +++|          ZJN    CDD2        IF MATCH ON PRIMARY CHANNEL
12794  M01S08794.set     +++|          LDM    EBUT+2
12795  M01S08795.set     +++|          ZJN    CDD1        IF NO SECONDARY CHANNEL
12796  M01S08796.set     +++|          LMD    DH
12797  M01S08797.set     +++|          LPN    77
12798  M01S08798.set     +++|          NJN    CDDX        IF NO MATCH ON SECONDARY CHANNEL
12799  M01S08799.set     +++| CDD2     LDD    DF
12800  M01S08800.set     +++|          LPN    77
12801  M01S08801.set     +++|          LMM    TDDB+DVUN+3
12802  M01S08802.set     +++|          UJN    CDDX        RETURN
12803  M01S02189.274l797 +++|          CDRSUB
12804  M01S08803.set     +++| CDT      SPACE  4,10
12805  M01S08804.set     +++|**        CDT - CHECK DEADSTART TAPE.
12806  M01S08805.set     +++|*
12807  M01S08806.set     +++|*         ENTRY  (DF) = DEADSTART FUNCTION.
12808  M01S08807.set     +++|*                (DH) = DEADSTART CHANNEL.
12809  M01S08808.set     +++|*
12810  M01S08809.set     +++|*         EXIT   (A) = 0 IF DEADSTART DEVICE.
12811  M01S08810.set     +++|
12812  M01S08811.set     +++|
12813  M01S08812.set     +++| CDT      SUBR               ENTRY/EXIT
12814  M01S08813.set     +++|          LDM    EBUT+3      CHECK EQUIPMENT TYPE
12815  M01S08814.set     +++|          SHN    14
12816  M01S08815.set     +++|          LMC    1LT+1RN
12817  M01S08816.set     +++|          ZJN    CDT2        IF *NT*
12818  M01S08817.set     +++| CDT1     LMN    1RM&1RN
12819  M01S08818.set     +++|          NJN    CDTX        IF NOT *MT*
12820  M01S08819.set     +++| CDT2     LDM    EBUT+4
12821  M01S08820.set     +++|          LMD    DF          CHECK CONNECT CODE
12822  M01S08821.set     +++|          LPC    7017
12823  M01S08822.set     +++|          NJN    CDTX        IF NO MATCH ON EQUIPMENT AND UNIT
12824  M01S08823.set     +++|          LDM    EBUT+1      CHECK 1ST CHANNEL
12825  M01S08824.set     +++|          LMD    DH
12826  M01S08825.set     +++|          LPN    37
12827  M01S08826.set     +++|          ZJN    CDTX        IF MATCH ON 1ST CHANNEL
12828  M01S08827.set     +++|          LDM    EBUT+2
12829  M01S08828.set     +++|          ZJN    CDT1        IF NO SECOND CHANNEL
12830  M01S08829.set     +++|          LMD    DH
12831  M01S08830.set     +++|          LPN    37
12832  M01S08831.set     +++|          UJN    CDTX        RETURN
12833  M01S08832.set     +++| CEM      SPACE  4,10
12834  M01S08833.set     +++|**        CEM - CHECK FOR MASS STORAGE.
12835  M01S08834.set     +++|*
12836  M01S08835.set     +++|*         EXIT   (A) = (EBUT) WITH BIT 13 SHIFTED TO SIGN POSITION.
12837  M01S08836.set     +++|*                (MS) = *TMSD* TABLE ADDRESS.
12838  M01S08837.set     +++|*                (AB+4) = EST ORDINAL.
12839  M01S08838.set     +++|
12840  M01S08839.set     +++|
12841  M01S08840.set     +++| CEM2     LDD    AB+4        FETCH EQUIPMENT DEFINITION
12842  M01S08841.set     +++|          RJM    STA
Line S08842 Modification History
M01 (Added by) set
M02 (Updated by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
12843  M02S08842.284l847 ---|          LDM    EBUT+3      SET *TMSO* ADDRESS
Line S08843 Modification History
M01 (Added by) set
M02 (Updated by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
12844  M02S08843.284l847 ---|          RJM    SMT
12845  M01S08844.set     +++|          LDI    ES
12846  M01S08845.set     +++|          SHN    21-13
12847  M01S08846.set     +++|          PJN    CEM1        IF NOT MASS STORAGE
12848  M01S08847.set     +++|
12849  M01S08848.set     +++| CEM      SUBR               ENTRY/EXIT
12850  M01S08849.set     +++|          AOD    KA
12851  M01S08850.set     +++|          RJM    AOD         ASSEMBLE EST ORDINAL
12852  M01S08851.set     +++|          SBD    LE
12853  M01S08852.set     +++|          MJN    CEM2        IF VALID EST ORDINAL
12854  M01S08853.set     +++| CEM1     JMP    ILL         PROCESS INCORRECT ENTRY
12855  M01S08854.set     +++| CLD      SPACE  4,10
12856  M01S08855.set     +++|**        CLD - CHECK LINK DEVICE DEFINED FOR MMF OPERATION.
12857  M01S08856.set     +++|*
12858  M01S08857.set     +++|*         EXIT   (A) = 0 IF NO SHARED DEVICES.
12859  M01S08858.set     +++|*
12860  M01S08859.set     +++|*         ERROR  TO *DDE*.
12861  M01S08860.set     +++|*
12862  M01S08861.set     +++|*         NOTES  IF (NS) .NE. 0 AND A LINK DEVICE IS DEFINED
12863  M01S08862.set     +++|*                CORRECTLY, SHARED STATUS WILL BE SET IF THE
12864  M01S08863.set     +++|*                LINK DEVICE IS NOT ALREADY SHARED.
12865  M01S08864.set     +++|*
12866  M01S08865.set     +++|*         CALLS  EEB, STA.
12867  M01S08866.set     +++|
12868  M01S08867.set     +++|
12869  M01S08868.set     +++| CLD      SUBR               ENTRY/EXIT
12870  M01S08869.set     +++|          LDD    LD
12871  M01S08870.set     +++|          LMC    4000
12872  M01S08871.set     +++|          ZJN    CLDX        IF ISD PRESENT
12873  M01S08872.set     +++|          LDD    NS
12874  M01S08873.set     +++|          ZJN    CLDX        IF NO SHARED DEVICES
12875  M01S08874.set     +++|          LDN    LDEQ        CHECK LINK DEVICE TYPE
12876  M01S08875.set     +++|          RJM    STA
12877  M01S08876.set     +++|          ZJN    CLD4        IF NO EQUIPMENT DEFINED
12878  M01S08877.set     +++|          LDM    TDDB+DVED   CHECK EXTENDED MEMORY TYPE
12879  M01S08878.set     +++|          SHN    -6
12880  M01S08879.set     +++|          LPN    7
12881  M01S08880.set     +++|          ZJN    CLD3        IF NOT EXTENDED MEMORY
12882  M01S08881.set     +++|          SBN    3
12883  M01S08882.set     +++|          ZJN    CLD3        IF LCME
12884  M01S08883.set     +++|          LDI    ES
12885  M01S08884.set     +++|          SHN    21-1
12886  M01S08885.set     +++|          MJN    CLD3        IF DEVICE *OFF* OR *DOWN*
12887  M01S08886.set     +++|          SHN    2+21-11
12888  M01S08887.set     +++|          MJN    CLDX        IF SHARED STATUS SET PREVIOUSLY
12889  M01S08888.set     +++|          LDD    TH          SET SHARED STATUS
12890  M01S08889.set     +++|          RAI    ES
12891  M01S08890.set     +++|          RJM    EEB         RETURN EQUIPMENT ENTRY
12892  M01S08891.set     +++|          AOD    NS          ADVANCE SHARED DEVICE COUNT
12893  M01S08892.set     +++|          UJP    CLDX        RETURN
12894  M01S08893.set     +++|
12895  M01S08894.set     +++| CLD3     LDN    CLDB-CLDA   SET ERROR MESSAGE ADDRESS
12896  M01S08895.set     +++| CLD4     ADC    CLDA
12897  M01S08896.set     +++|          LJM    DDE         DISPLAY DEADSTART ERROR
12898  M01S08897.set     +++|
12899  M01S08898.set     +++|
12900  M01S08899.set     +++| CLDA     DATA   C*NO LINK DEVICE DEFINED.*
12901  M01S08900.set     +++| CLDB     DATA   C*LINK DEVICE INCORRECTLY DEFINED.*
12902  M01S08901.set     +++| CME      SPACE  4,10
12903  M01S08902.set     +++|**        CME - CHECK *MMF* ENVIRONMENT.
12904  M01S08903.set     +++|*
12905  M01S08904.set     +++|*         ERROR  TO *DDE*.
12906  M01S08905.set     +++|*
12907  M01S08906.set     +++|*         CALLS  CLD.
12908  M01S08907.set     +++|
12909  M01S08908.set     +++|
12910  M01S08909.set     +++| CME      SUBR               ENTRY/EXIT
12911  M01S08910.set     +++|          RJM    CLD
12912  M01S08911.set     +++|          ZJN    CMEX        IF NOT ECS MMF ENVIRONMENT
12913  M01S08912.set     +++|          LDM    EBUT+4
12914  M01S08913.set     +++|          SCN    17
12915  M01S08914.set     +++|          ZJN    CMEX        IF LINK DEVICE NOT BEING INITIALIZED
Line S08915 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
12916  M02S08915.283l840 ---|          LDM    SETD
12917  M01S00126.283l840 +++|          LDM    PRSF
12918  M01S08916.set     +++|          NJN    CMEX        IF PRESET SPECIFIED
12919  M01S08917.set     +++|          LDC    CMEA
12920  M01S08918.set     +++|          LJM    DDE         DISPLAY DEADSTART ERROR
12921  M01S08919.set     +++|
12922  M01S08920.set     +++|
12923  M01S08921.set     +++| CMEA     DATA   C*INITIALIZE OF LINK DEVICE REQUIRES PRESET.*
12924  M01S08922.set     +++| COD      SPACE  4,10
12925  M01S08923.set     +++|**        COD - CONVERT OCTAL TO DISPLAY CODE.
12926  M01S08924.set     +++|*
12927  M01S08925.set     +++|*         ENTRY  (A) = FWA OF ERROR MESSAGE.
12928  M01S08926.set     +++|*                (EQ) = EST ORDINAL OF INCORRECT EQUIPMENT.
12929  M01S08927.set     +++|*
12930  M01S08928.set     +++|*         EXIT   (KM) = ERROR MESSAGE ADDRESS.
12931  M01S08929.set     +++|
12932  M01S08930.set     +++|
12933  M01S08931.set     +++| COD      SUBR               ENTRY/EXIT
12934  M01S08932.set     +++|          STD    KM
12935  M01S08933.set     +++|          LDD    EQ          UNPACK FIRST TWO DIGITS
12936  M01S08934.set     +++|          SHN    -3
12937  M01S08935.set     +++|          STD    T0
12938  M01S08936.set     +++|          SHN    3
12939  M01S08937.set     +++|          LMD    T0
12940  M01S08938.set     +++|          SCN    70
12941  M01S08939.set     +++|          ADC    2R00        CONVERT DIGIT
12942  M01S08940.set     +++|          STM    1,KM
12943  M01S08941.set     +++|          LDD    EQ          UNPACK THIRD DIGIT
12944  M01S08942.set     +++|          LPN    7
12945  M01S08943.set     +++|          SHN    6
12946  M01S08944.set     +++|          ADC    2R0         CONVERT DIGIT
12947  M01S08945.set     +++|          STM    2,KM
12948  M01S08946.set     +++|          UJN    CODX        RETURN
12949  M01S08947.set     +++| DCM      SPACE  4,10
12950  M01S08948.set     +++|**        DCM - DISPLAY CONVERTED MESSAGE.
12951  M01S08949.set     +++|*
12952  M01S08950.set     +++|*         ENTRY  (A) = ADDRESS OF ERROR MESSAGE.
12953  M01S08951.set     +++|*                (EQ) = EST ORDINAL OF INCORRECT EQUIPMENT.
12954  M01S08952.set     +++|*
12955  M01S08953.set     +++|*         EXIT   TO *DDE*.
12956  M01S08954.set     +++|*
12957  M01S08955.set     +++|*         CALLS  COD.
12958  M01S08956.set     +++|
12959  M01S08957.set     +++|
12960  M01S08958.set     +++| DCM      RJM    COD         CONVERT OCTAL TO DISPLAY
12961  M01S08959.set     +++|          LDD    KM
12962  M01S08960.set     +++|*         UJN    DDE
12963  M01S08961.set     +++|          ERRNZ  DDE-*       IF CODE NOT CONTIGUOUS
12964  M01S08962.set     +++| DDE      SPACE  4,10
12965  M01S08963.set     +++|**        DDE - DISPLAY DEADSTART ERROR.
12966  M01S08964.set     +++|*
12967  M01S08965.set     +++|*         ENTRY  (A) = ADDRESS OF ERROR MESSAGE.
12968  M01S08966.set     +++|*
12969  M01S08967.set     +++|*         EXIT   TO *ATD3*.
12970  M01S08968.set     +++|
12971  M01S08969.set     +++|
12972  M01S08970.set     +++| DDE      STD    KM          SET MESSAGE ADDRESS
12973  M01S08971.set     +++|          LDN    0
12974  M01S08972.set     +++|          STD    DS          FORCE DISPLAY
12975  M01S08973.set     +++|          STD    DP
12976  M01S08974.set     +++|          LJM    ATD3        PROCESS KEYBOARD ASSEMBLY
12977  M01S08975.set     +++| DSC      SPACE  4,10
12978  M01S08976.set     +++|**        DSC - DEVICE STATUS CHECK.
12979  M01S08977.set     +++|*
12980  M01S08978.set     +++|*         ENTRY  (A) = BITS TO SET IN BYTE 0 OF EST ENTRY.
12981  M01S08979.set     +++|*
12982  M01S08980.set     +++|*         EXIT   (MS) = *TMSD* BUFFER ADDRESS IF MASS STORAGE.
12983  M01S08981.set     +++|*                (AB+4) = EST ORDINAL.
12984  M01S08982.set     +++|*
Line S08983 Modification History
M01 (Added by) set
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
12985  M02S08983.ns2783  ---|*         CALLS  CEM, EEB.
12986  M01S00146.ns2783  +++|*         USES   NS, T7.
12987  M01S00147.ns2783  +++|*
12988  M01S00148.ns2783  +++|*         CALLS  GNE, IRE, SPE.
12989  M01S08984.set     +++|
12990  M01S08985.set     +++|
12991  M01S08986.set     +++| DSC      SUBR               ENTRY/EXIT
12992  M01S08987.set     +++|          STD    T7
12993  M01S08988.set     +++| DSC1     RJM    GNE         GET NEXT EST ORDINAL
12994  M01S08989.set     +++|          ZJN    DSCX        IF NO MORE EQUIPMENT
12995  M01S08990.set     +++|          PJN    DSC3        IF NOT MASS STORAGE
12996  M01S08991.set     +++|          SHN    21-11-21+13
12997  M01S08992.set     +++|          MJN    DSC1        IF ALREADY DEFINED AS SHARED
Line S08993 Modification History
M01 (Added by) set
M02 (Updated by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
12998  M02S08993.284l847 ---|          LDI    MS          CHECK FOR VALID DEVICE TYPE
12999  M01S00515.284l847 +++|          LDM    TDDB+DVCT   CHECK FOR VALID DEVICE TYPE
13000  M01S08994.set     +++|          SHN    21-13
13001  M01S08995.set     +++|          PJN    DSC3        IF INCORRECT DEVICE TYPE
13002  M01S08996.set     +++|          LDD    T7
13003  M01S08997.set     +++|          RAI    ES
13004  M01S08998.set     +++|          LPN    20
13005  M01S08999.set     +++|          ZJN    DSC4        IF NOT INDEPENDENT SHARED DEVICE
13006  M01S09000.set     +++|          LDM    EBUT+3
13007  M01S09001.set     +++|          LMC    2RDE
13008  M01S09002.set     +++|          ZJN    DSC3        IF EXTENDED MEMORY
13009  M01S09003.set     +++|          LMK    2RDP&2RDE
13010  M01S09004.set     +++|          NJN    DSC4        IF NOT EXTENDED MEMORY
13011  M01S09005.set     +++| DSC3     RJM    IRE         PROCESS INCORRECT RANGE
13012  M01S09006.set     +++|
Line S09007 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
13013  M02S09007.283l840 ---| DSC4     AOD    NS
Line S09008 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
13014  M02S09008.283l840 ---|          LDM    TDDB+DVFA   CLEAR TEMP - NONSHARED STATUS
13015  M01S00127.283l840 +++| DSC4     AOD    NS          INCREMENT SHARED DEVICE COUNT
13016  M01S00128.283l840 +++|          LDI    ES
13017  M01S00129.283l840 +++|          LPN    40
13018  M01S00130.283l840 +++|          ZJN    DSC5        IF NOT BUFFERED DEVICE
13019  M01S00131.283l840 +++|          AOM    NSBD        INCREMENT SHARED BUFFERED DEVICE COUNT
13020  M01S00132.283l840 +++| DSC5     LDM    TDDB+DVFA   CLEAR TEMP - NONSHARED STATUS
13021  M01S09009.set     +++|          LPC    -4000
13022  M01S09010.set     +++|          STM    TDDB+DVFA
Line S09011 Modification History
M01 (Added by) set
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13023  M02S09011.ns2783  ---|          RJM    EEB         RETURN EQUIPMENT ENTRY
13024  M01S00149.ns2783  +++|          RJM    SPE         SYNCHRONIZE PARTITIONS AND ENTER EQUIPMENT
13025  M01S09012.set     +++|          UJP    DSC1        PROCESS NEXT EQUIPMENT
Line S09013 Modification History
M01 (Added by) set
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
13026  M02S09013.283l840 ---| GNE      SPACE  4,10
13027  M01S00133.283l840 +++| GNE      SPACE  4,15
13028  M01S09014.set     +++|**        GNE - GET NEXT EST ORDINAL.
13029  M01S09015.set     +++|*
13030  M01S09016.set     +++|*         ENTRY  (KA) = ADDRESS OF SEPARATOR.
13031  M01S09017.set     +++|*
13032  M01S09018.set     +++|*         EXIT   (A) = (EBUT) WITH BIT 13 SHIFTED TO SIGN POSITION,
13033  M01S09019.set     +++|*                      IF MASS STORAGE EQUIPMENT.
13034  M01S09020.set     +++|*                    = 1, IF NOT MASS STORAGE EQUIPMENT.
13035  M01S09021.set     +++|*                    = 0, IF NO MORE EQUIPMENTS.
13036  M01S09022.set     +++|*                (EQ) = EST ORDINAL.
13037  M01S09023.set     +++|*
13038  M01S09024.set     +++|*         USES   AB+3, AB+4, EQ, KA.
13039  M01S09025.set     +++|*
Line S09026 Modification History
M01 (Added by) set
M02 (Updated by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
13040  M02S09026.284l847 ---|*         CALLS  AOD, CDR, SMT, STA.
13041  M01S00516.284l847 +++|*         CALLS  AOD, CDR, STA.
13042  M01S09027.set     +++|
13043  M01S09028.set     +++|
13044  M01S09029.set     +++| GNE6     LDD    AB+4
13045  M01S09030.set     +++|          STD    EQ
13046  M01S09031.set     +++|          SBD    LE
13047  M01S09032.set     +++|          MJN    GNE7        IF VALID EST ORDINAL
13048  M01S09033.set     +++|          RJM    IRE         PROCESS INCORRECT RANGE
13049  M01S09034.set     +++|
13050  M01S09035.set     +++| GNE7     LDD    AB+4
13051  M01S09036.set     +++|          RJM    STA
13052  M01S09037.set     +++|          LDM    EBUT+3
13053  M01S09038.set     +++|          NJN    GNE8        IF ENTRY NOT NULL
13054  M01S09039.set     +++|          LDM    GNEA
13055  M01S09040.set     +++|          NJN    GNE1        IF PROCESSING A RANGE OF ORDINALS
13056  M01S09041.set     +++|          JMP    ILL         PROCESS INCORRECT ENTRY
13057  M01S09042.set     +++|
Line S09043 Modification History
M01 (Added by) set
M02 (Updated by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
13058  M02S09043.284l847 ---| GNE8     RJM    SMT
Line S09044 Modification History
M01 (Added by) set
M02 (Updated by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
13059  M02S09044.284l847 ---|          LDI    ES
13060  M01S00517.284l847 +++| GNE8     LDI    ES
13061  M01S09045.set     +++|          SHN    21-13
13062  M01S09046.set     +++|          MJN    GNEX        IF MASS STORAGE
13063  M01S09047.set     +++|          LDN    1
13064  M01S09048.set     +++|
13065  M01S09049.set     +++| GNE      SUBR               ENTRY/EXIT
13066  M01S09050.set     +++|          LDM    GNEA
13067  M01S09051.set     +++|          ZJN    GNE2        IF NOT PROCESSING RANGE
13068  M01S09052.set     +++| GNE1     AOD    AB+4
13069  M01S09053.set     +++|          LDM    GNEA
13070  M01S09054.set     +++|          SBD    AB+4
13071  M01S09055.set     +++|          PJN    GNE3        IF NOT END OF RANGE
13072  M01S09056.set     +++|          LDN    0
13073  M01S09057.set     +++|          STM    GNEA
13074  M01S09058.set     +++| GNE2     LDI    KA
13075  M01S09059.set     +++|          LMN    1R.         CHECK SEPARATOR
13076  M01S09060.set     +++|          ZJN    GNEX        IF *.*
13077  M01S09061.set     +++|          AOD    KA
13078  M01S09062.set     +++|          RJM    CDR         ASSEMBLE EST ORDINAL
13079  M01S09063.set     +++|          LMN    1R,         CHECK SEPARATOR
13080  M01S09064.set     +++|          ZJN    GNE3        IF *,*
13081  M01S09065.set     +++|          LMN    1R.&1R,
13082  M01S09066.set     +++|          ZJN    GNE3        IF *.*
13083  M01S09067.set     +++|          LMN    1R-&1R.
13084  M01S09068.set     +++|          NJN    GNE4        IF NOT *-*
13085  M01S09069.set     +++|          LDD    AB+4        SAVE EST ORDINAL
13086  M01S09070.set     +++|          STD    EQ
13087  M01S09071.set     +++|          AOD    KA
13088  M01S09072.set     +++|          RJM    AOD         ASSEMBLE LAST EST ORDINAL
13089  M01S09073.set     +++|          STM    GNEA        SAVE LAST EST ORDINAL
13090  M01S09074.set     +++|          SBK    ESMX
13091  M01S09075.set     +++|          PJN    GNE4        IF EST ORDINAL EXCEEDS MAXIMUM
13092  M01S09076.set     +++|          LDD    EQ
13093  M01S09077.set     +++|          STD    AB+4        RESTORE CURRENT EST ORDINAL
13094  M01S09078.set     +++|          SBM    GNEA
13095  M01S09079.set     +++|          PJN    GNE4        IF INCORRECT RANGE
13096  M01S09080.set     +++| GNE3     LJM    GNE6        READ EST ENTRY
13097  M01S09081.set     +++|
13098  M01S09082.set     +++| GNE4     JMP    ILL         PROCESS INCORRECT ENTRY
13099  M01S09083.set     +++|
13100  M01S09084.set     +++| GNEA     CON    0           LAST EST ORDINAL IN RANGE
13101  M01S09085.set     +++| IRE      SPACE  4,10
13102  M01S09086.set     +++|**        IRE - INCORRECT RANGE ERROR.
13103  M01S09087.set     +++|*
13104  M01S09088.set     +++|*         ENTRY  (EQ) = EST ORDINAL OF INCORRECT EQUIPMENT.
13105  M01S09089.set     +++|*
13106  M01S09090.set     +++|*         EXIT   TO *ERR*.
13107  M01S09091.set     +++|*
13108  M01S09092.set     +++|*         CALLS  COD.
13109  M01S09093.set     +++|
13110  M01S09094.set     +++|
13111  M01S09095.set     +++| IRE      EQU    *-1
13112  M01S09096.set     +++|          LDC    IREA
13113  M01S09097.set     +++|          RJM    COD
13114  M01S09098.set     +++|          JMP    ERR
13115  M01S09099.set     +++|
13116  M01S09100.set     +++|
13117  M01S09101.set     +++| IREA     DATA   C*EQXXX - INCORRECT ENTRY*
13118  M01S09102.set     +++| SDF      SPACE  4,10
13119  M01S09103.set     +++|**        SDF - SET DEFAULT MASS STORAGE DEVICE.
13120  M01S09104.set     +++|*
13121  M01S09105.set     +++|*         EXIT   (DFMS) = FIRST NONREMOVABLE MASS STORAGE DEVICE.
13122  M01S09106.set     +++|*
13123  M01S09107.set     +++|*         ERROR  TO *DDE*.
13124  M01S09108.set     +++|*
13125  M01S09109.set     +++|*         USES   EQ.
13126  M01S09110.set     +++|*
13127  M01S09111.set     +++|*         CALLS  STA.
13128  M01S09112.set     +++|
13129  M01S09113.set     +++|
13130  M01S09114.set     +++| SDF3     LPC    402S6
13131  M01S09115.set     +++|          NJN    SDF2        IF OFF/DOWN/REMOVABLE
13132  M01S09116.set     +++|          LDM    EBUT+3
13133  M01S09117.set     +++|          LMC    2RDE
13134  M01S09118.set     +++|          ZJN    SDF2        IF EXTENDED MEMORY
13135  M01S09119.set     +++|          LMK    2RDP&2RDE
13136  M01S09120.set     +++|          ZJN    SDF2        IF EXTENDED MEMORY
13137  M01S09121.set     +++|          LDD    EQ
13138  M01S09122.set     +++|          SBN    40
13139  M01S09123.set     +++|          PJN    SDF2        IF ORDINAL OUT OF RANGE
13140  M01S09124.set     +++|          ADN    40
13141  M01S09125.set     +++|          STM    DFMS        SET DEFAULT DEVICE
13142  M01S09126.set     +++|
13143  M01S09127.set     +++| SDF      SUBR               ENTRY/EXIT
13144  M01S09128.set     +++|          LDN    NOPE
13145  M01S09129.set     +++|          STD    EQ
13146  M01S09130.set     +++| SDF1     LDD    EQ          FETCH EQUIPMENT ENTRY
13147  M01S09131.set     +++|          RJM    STA
13148  M01S09132.set     +++|          LDI    ES
13149  M01S09133.set     +++|          SHN    21-13
13150  M01S09134.set     +++|          MJN    SDF3        IF MASS STORAGE
13151  M01S09135.set     +++| SDF2     AOD    EQ          INCREMENT ORDINAL
13152  M01S09136.set     +++|          LMD    LE
13153  M01S09137.set     +++|          NJN    SDF1        IF NOT END OF EST
13154  M01S09138.set     +++|          LDC    SDFA
13155  M01S09139.set     +++|          LJM    DDE         DISPLAY DEADSTART ERROR
13156  M01S09140.set     +++|
13157  M01S09141.set     +++|
13158  M01S09142.set     +++| SDFA     DATA   C*NO SYSTEM DEVICE DEFINED.*
13159  M01S09143.set     +++| SDS      SPACE  4,10
13160  M01S09144.set     +++|**        SDS - SEARCH FOR DEADSTART DEVICE.
13161  M01S09145.set     +++|*
13162  M01S09146.set     +++|*         EXIT   (AB+4) = EST ORDINAL OF DEADSTART DEVICE.
13163  M01S09147.set     +++|*
13164  M01S09148.set     +++|*         ERROR  TO *DDE*.
13165  M01S09149.set     +++|*
13166  M01S09150.set     +++|*         USES   AB+4.
13167  M01S09151.set     +++|*
13168  M01S09152.set     +++|*         CALLS  CDD, CDT, STA.
13169  M01S09153.set     +++|
13170  M01S09154.set     +++|
13171  M01S09155.set     +++| SDS      SUBR               ENTRY/EXIT
13172  M01S09156.set     +++|          LDN    NOPE
13173  M01S09157.set     +++|          STD    AB+4
13174  M01S09158.set     +++| SDS1     LDD    AB+4        READ EQUIPMENT ENTRY
13175  M01S09159.set     +++|          RJM    STA
13176  M01S09160.set     +++|          LDI    ES
13177  M01S09161.set     +++|          LPN    3
13178  M01S09162.set     +++|          LMN    3
13179  M01S09163.set     +++|          ZJN    SDS2        IF DEVICE *DOWN*
13180  M01S09164.set     +++|          RJM    CDD         CHECK DEADSTART DISK
13181  M01S09165.set     +++|          ZJN    SDSX        IF MS DEVICE IDENTIFIED
13182  M01S09166.set     +++|          RJM    CDT         CHECK DEADSTART TAPE
13183  M01S09167.set     +++|          ZJN    SDSX        IF TAPE UNIT FOUND
13184  M01S09168.set     +++| SDS2     AOD    AB+4        ADVANCE EST ORDINAL
13185  M01S09169.set     +++|          LMD    LE
13186  M01S09170.set     +++|          NJN    SDS1        IF NOT END OF EST
13187  M01S09171.set     +++|          LDC    SDSA
13188  M01S09172.set     +++|          LJM    DDE         DISPLAY DEADSTART ERROR
13189  M01S09173.set     +++|
13190  M01S09174.set     +++|
13191  M01S09175.set     +++| SDSA     DATA   C*DEADSTART DEVICE UNDEFINED.*
13192  M01S09176.set     +++| SOT      SPACE  4,15
13193  M01S09177.set     +++|**        SOT - SEARCH OPTION TABLE.
13194  M01S09178.set     +++|*
13195  M01S09179.set     +++|*         ENTRY  (A) = FWA OF PARAMETER TABLE.
13196  M01S09180.set     +++|*                ((KA - KA+1)) = PARAMETER NAME.
13197  M01S09181.set     +++|*
13198  M01S09182.set     +++|*         EXIT   (A) = INDEX OF ENTRY FOUND.
13199  M01S09183.set     +++|*                (T2) = TABLE ADDRESS OF ENTRY FOUND.
13200  M01S09184.set     +++|*                (T1) = ((T2)) = PARAMETER NAME.
13201  M01S09185.set     +++|*                (KA) = KEYBOARD BUFFER ADDRESS ADVANCED.
13202  M01S09186.set     +++|*
13203  M01S09187.set     +++|*         USES   T3.
13204  M01S09188.set     +++|
13205  M01S09189.set     +++|
13206  M01S09190.set     +++| SOT2     LDN    2           ADVANCE BUFFER ADDRESS
13207  M01S09191.set     +++|          RAD    KA
13208  M01S09192.set     +++|          LDD    T2          RETURN WITH INDEX
13209  M01S09193.set     +++|          SBD    T3
13210  M01S09194.set     +++|
13211  M01S09195.set     +++| SOT      SUBR               ENTRY/EXIT
13212  M01S09196.set     +++|          STD    T2
13213  M01S09197.set     +++|          STD    T3          SAVE FWA OF TABLE
13214  M01S09198.set     +++|          LDI    KA
13215  M01S09199.set     +++|          SHN    6
13216  M01S09200.set     +++|          LMM    1,KA        ASSEMBLE PARAMETER NAME
13217  M01S09201.set     +++|          STD    T1
13218  M01S09202.set     +++|          LDI    T2
13219  M01S09203.set     +++| SOT1     LMD    T1
13220  M01S09204.set     +++|          ZJN    SOT2        IF MATCH FOUND
13221  M01S09205.set     +++|          AOD    T2
13222  M01S09206.set     +++|          LDI    T2
13223  M01S09207.set     +++|          NJN    SOT1        IF NOT END OF TABLE
13224  M01S09208.set     +++|          JMP    ILL         INCORRECT ENTRY
Line S00518 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13225  M02S00518.ns2783  ---| SPE      SPACE  4,20
Line S00519 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13226  M02S00519.ns2783  ---|**        SPE - SYNCHRONIZE PARTITIONS AND ENTER EQUIPMENT.
Line S00520 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13227  M02S00520.ns2783  ---|*
Line S00521 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13228  M02S00521.ns2783  ---|*         ENTRY  (EBUT) = EQUIPMENT EST ENTRY.
Line S00522 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13229  M02S00522.ns2783  ---|*                (TDDB) = MST ENTRY IF MASS STORAGE.
Line S00523 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13230  M02S00523.ns2783  ---|*                (EB) = EBUF ADDRESS.
Line S00524 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13231  M02S00524.ns2783  ---|*                (EQ) = DEVICE ENTRY TABLE NUMBER.
Line S00525 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13232  M02S00525.ns2783  ---|*                (ET) = TDDE ADDRESS.
Line S00526 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13233  M02S00526.ns2783  ---|*
Line S00527 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13234  M02S00527.ns2783  ---|*         EXIT   (EBUT) ENTRY IN EBUF.
Line S00528 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13235  M02S00528.ns2783  ---|*                (TDDB) ENTRY IN TDDE IF MASS STORAGE.
Line S00529 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13236  M02S00529.ns2783  ---|*
Line S00530 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13237  M02S00530.ns2783  ---|*         USES   CM, T1.
Line S00531 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13238  M02S00531.ns2783  ---|*
Line S00532 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13239  M02S00532.ns2783  ---|*         CALLS  EEB.
Line S00533 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13240  M02S00533.ns2783  ---|
Line S00534 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13241  M02S00534.ns2783  ---|
Line S00535 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13242  M02S00535.ns2783  ---| SPE8     RJM    EEB         ENTER EQUIPMENT INTO BUFFER
Line S00536 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13243  M02S00536.ns2783  ---|
Line S00537 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13244  M02S00537.ns2783  ---| SPE      SUBR               ENTRY/EXIT
Line S00538 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13245  M02S00538.ns2783  ---|          LDI    ES
Line S00539 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13246  M02S00539.ns2783  ---|          SHN    21-13
Line S00540 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13247  M02S00540.ns2783  ---|          PJN    SPE8        IF NOT MASS STORAGE
Line S00541 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13248  M02S00541.ns2783  ---|          SHN    21-5-21+13
Line S00542 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13249  M02S00542.ns2783  ---|          PJN    SPE8        IF NOT A BUFFERED DEVICE
Line S00543 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13250  M02S00543.ns2783  ---|          LDM    EBUT+10
Line S00544 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13251  M02S00544.ns2783  ---|          SHN    21-13
Line S00545 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13252  M02S00545.ns2783  ---|          PJN    SPE8        IF NOT A PARTITIONED DEVICE
Line S00546 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13253  M02S00546.ns2783  ---|          LDD    LE
Line S00547 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13254  M02S00547.ns2783  ---|          STD    T1
Line S00548 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13255  M02S00548.ns2783  ---| SPE1     SOD    T1
Line S00549 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13256  M02S00549.ns2783  ---|          ZJN    SPE8        IF SEARCH COMPLETED
Line S00550 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13257  M02S00550.ns2783  ---|          SHN    22-5
Line S00551 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13258  M02S00551.ns2783  ---|          ADD    EB          (EBUF ADDRESS)
Line S00552 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13259  M02S00552.ns2783  ---|          SHN    6
Line S00553 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13260  M02S00553.ns2783  ---|          CRM    SPEA,ON     READ EQUIPMENT ENTRY
Line S00554 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13261  M02S00554.ns2783  ---|          LDM    EBUT+3
Line S00555 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13262  M02S00555.ns2783  ---|          LMM    SPEA+3
Line S00556 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13263  M02S00556.ns2783  ---|          NJN    SPE1        IF NOT THE SAME DEVICE TYPE
Line S00557 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13264  M02S00557.ns2783  ---|          LDM    EBUT+4
Line S00558 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13265  M02S00558.ns2783  ---|          LMM    SPEA+4
Line S00559 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13266  M02S00559.ns2783  ---|          LPC    MLFPR
Line S00560 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13267  M02S00560.ns2783  ---|          ZJN    SPE1        IF *INITIALIZE,FP* FLAGS ARE THE SAME
Line S00561 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13268  M02S00561.ns2783  ---|          LDC    SPEA        COMPARE CHANNEL ENTRIES
Line S00562 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13269  M02S00562.ns2783  ---|          STD    CM
Line S00563 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13270  M02S00563.ns2783  ---| SPE3     AOD    CM
Line S00564 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13271  M02S00564.ns2783  ---|          LMC    SPEA+3
Line S00565 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13272  M02S00565.ns2783  ---|          ZJN    SPE1        IF ALL OTHER DEVICE CHANNELS CHECKED
Line S00566 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13273  M02S00566.ns2783  ---|          LDD    ES
Line S00567 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13274  M02S00567.ns2783  ---|          STD    T0
Line S00568 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13275  M02S00568.ns2783  ---| SPE4     AOD    T0
Line S00569 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13276  M02S00569.ns2783  ---|          LMC    EBUT+3
Line S00570 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13277  M02S00570.ns2783  ---|          ZJN    SPE3        IF ALL CURRENT DEVICE CHANNELS CHECKED
Line S00571 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13278  M02S00571.ns2783  ---|          LDI    T0          CURRENT CHANNEL
Line S00572 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13279  M02S00572.ns2783  ---|          ZJN    SPE4        IF NO CHANNEL ENTRY
Line S00573 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13280  M02S00573.ns2783  ---|          LMI    CM          OTHER DEVICE CHANNEL
Line S00574 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13281  M02S00574.ns2783  ---|          LPC    4277
Line S00575 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13282  M02S00575.ns2783  ---|          NJN    SPE4        IF CHANNELS ARE NOT THE SAME
Line S00576 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13283  M02S00576.ns2783  ---|          LDD    ET          READ *TDDB* ENTRY
Line S00577 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13284  M02S00577.ns2783  ---|          SHN    4
Line S00578 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13285  M02S00578.ns2783  ---|          ADD    T1
Line S00579 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13286  M02S00579.ns2783  ---|          SHN    2
Line S00580 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13287  M02S00580.ns2783  ---|          ADD    T1
Line S00581 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13288  M02S00581.ns2783  ---|          CRM    SPEB,DV
Line S00582 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13289  M02S00582.ns2783  ---|          LDM    TDDB+DVPR   COMPARE EQUIPMENT NUMBER
Line S00583 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13290  M02S00583.ns2783  ---|          LMM    SPEB+DVPR
Line S00584 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13291  M02S00584.ns2783  ---|          SHN    -11
Line S00585 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13292  M02S00585.ns2783  ---|          ZJN    SPE6        IF EQUIPMENT NUMBERS MATCH
Line S00586 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13293  M02S00586.ns2783  ---|          LDM    TDDB+DVPR
Line S00587 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13294  M02S00587.ns2783  ---|          SHN    21-5
Line S00588 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13295  M02S00588.ns2783  ---|          PJN    SPE5        IF NO SECOND EQUIPMENT
Line S00589 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13296  M02S00589.ns2783  ---|          SHN    11
Line S00590 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13297  M02S00590.ns2783  ---|          LMM    SPEB+DVPR
Line S00591 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13298  M02S00591.ns2783  ---|          SHN    -11
Line S00592 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13299  M02S00592.ns2783  ---|          ZJN    SPE6        IF EQUIPMENT NUMBERS MATCH
Line S00593 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13300  M02S00593.ns2783  ---| SPE5     LDM    SPEB+DVPR
Line S00594 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13301  M02S00594.ns2783  ---|          SHN    21-5
Line S00595 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13302  M02S00595.ns2783  ---|          PJN    SPE7        IF NO SECOND EQUIPMENT
Line S00596 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13303  M02S00596.ns2783  ---|          SHN    11
Line S00597 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13304  M02S00597.ns2783  ---|          LMM    TDDB+DVPR
Line S00598 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13305  M02S00598.ns2783  ---|          SHN    -11
Line S00599 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13306  M02S00599.ns2783  ---|          NJN    SPE7        IF NO MATCH
Line S00600 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13307  M02S00600.ns2783  ---| SPE6     LDM    TDDB+DVUN+3 COMPARE UNIT NUMBER
Line S00601 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13308  M02S00601.ns2783  ---|          LMM    SPEB+DVUN+3
Line S00602 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13309  M02S00602.ns2783  ---|          NJN    SPE7        IF NO MATCH
Line S00603 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13310  M02S00603.ns2783  ---|          LDM    EBUT+4
Line S00604 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13311  M02S00604.ns2783  ---|          LPN    17
Line S00605 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13312  M02S00605.ns2783  ---|          LMC    MLFPR+MLIAL
Line S00606 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13313  M02S00606.ns2783  ---|          STM    EBUT+4
Line S00607 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13314  M02S00607.ns2783  ---|          LDM    SPEA+4
Line S00608 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13315  M02S00608.ns2783  ---|          LPN    17
Line S00609 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13316  M02S00609.ns2783  ---|          LMC    MLFPR+MLIAL
Line S00610 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13317  M02S00610.ns2783  ---|          STM    SPEA+4
Line S00611 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13318  M02S00611.ns2783  ---|          LDD    T1
Line S00612 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13319  M02S00612.ns2783  ---|          SHN    22-5
Line S00613 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13320  M02S00613.ns2783  ---|          ADD    EB          (EBUF ADDRESS)
Line S00614 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13321  M02S00614.ns2783  ---|          SHN    6
Line S00615 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13322  M02S00615.ns2783  ---|          CWM    SPEA,ON
Line S00616 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13323  M02S00616.ns2783  ---| SPE7     UJP    SPE1        CHECK FOR MORE ENTRIES
Line S00617 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13324  M02S00617.ns2783  ---|
Line S00618 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13325  M02S00618.ns2783  ---| SPEA     BSS    5           TEMPORARY EBUF ENTRY
Line S00619 Modification History
M01 (Added by) 284l847
M02 (Updated by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
13326  M02S00619.ns2783  ---| SPEB     BSS    TDDCL*5     TEMPORARY TDDE ENTRY
13327  M01S09209.set     +++|          TITLE  MISCELLANEOUS ENTRIES.
13328  M01S09210.set     +++| AUT      SPACE  4,10
13329  M01S09211.set     +++|***       AUTOLOAD.
13330  M01S09212.set     +++|*         TOGGLE SELECTION OF AUTOLOADING OF MASS STORAGE CONTROLLERS.
13331  M01S09213.set     +++|*         INITIALLY AUTOLOADING IS SELECTED FOR ALL LEVELS OF
13332  M01S09214.set     +++|*         DEADSTART.
13333  M01S09215.set     +++|*
13334  M01S09216.set     +++|*         THIS ENTRY IS ONLY ALLOWED FROM THE KEYBOARD.
13335  M01S09217.set     +++|
13336  M01S09218.set     +++|
13337  M01S09219.set     +++| AUT      DATA   C*AUTOLOAD.*
13338  M01S09220.set     +++|          LDN    2
13339  M01S09221.set     +++|          UJN    GRN1        TOGGLE AUTOLOAD STATUS
13340  M01S09222.set     +++| GRN      SPACE  4,10
13341  M01S09223.set     +++|***       GRENADE.
13342  M01S09224.set     +++|*         TOGGLE SELECTION OF THE GRENADE OPERATION FOR MASS STORAGE
13343  M01S09225.set     +++|*         CONTROLLERS THAT ARE AUTOLOADED.  INITIALLY THE GRENADE
13344  M01S09226.set     +++|*         OPERATION IS NOT SELECTED.
13345  M01S09227.set     +++|*
13346  M01S09228.set     +++|*         THIS ENTRY IS ONLY ALLOWED FROM THE KEYBOARD.
13347  M01S09229.set     +++|*
13348  M01S09230.set     +++|*         THE GRENADE OPERATION CAN INTERRUPT ACTIVITY ON A DRIVE
13349  M01S09231.set     +++|*         WHICH IS BEING ACCESSED FROM ANOTHER CONTROLLER.
13350  M01S09232.set     +++|
13351  M01S09233.set     +++|
13352  M01S09234.set     +++| GRN      DATA   C*GRENADE.*
13353  M01S09235.set     +++|          LDN    1           TOGGLE GRENADE OPTION BIT
13354  M01S09236.set     +++| GRN1     LMM    DSTO
13355  M01S09237.set     +++|          STM    DSTO
Line S09238 Modification History
M01 (Added by) set
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13356  M02S09238.274l797 ---| GRN2     JMP    KBR         RETURN
13357  M01S02190.274l797 +++|          JMP    KBR         RETURN
13358  M01S09239.set     +++| LBC      SPACE  4,10
13359  M01S09240.set     +++|***       LBC,AA,C1,C2,...,CN.
13360  M01S09241.set     +++|*
13361  M01S09242.set     +++|*         LOAD CONTROLWARE RECORD TYPE *AA* ON CHANNELS C1 TO CN.
13362  M01S09243.set     +++|
13363  M01S09244.set     +++|
13364  M01S09245.set     +++| LBC      DATA   C*LBC,*
13365  M01S09246.set     +++|          LDC    TLBC
13366  M01S09247.set     +++|          RJM    SOT         SEARCH TABLE FOR CONTROLWARE OPTION
13367  M01S09248.set     +++|          STD    T6
13368  M01S09249.set     +++|          LDI    KA          CHECK SEPARATOR
13369  M01S09250.set     +++|          LMN    1R,
13370  M01S09251.set     +++|          ZJN    LBC3        IF VALID SYNTAX
13371  M01S09252.set     +++| LBC2     JMP    ILL         PROCESS INCORRECT ENTRY
13372  M01S09253.set     +++|
13373  M01S09254.set     +++| LBC3     STD    T3          CLEAR CONCURRENT CHANNEL FLAG
13374  M01S09255.set     +++|          AOD    KA
13375  M01S09256.set     +++|          LDI    KA          CHECK FOR *C* PREFIX
13376  M01S09257.set     +++|          SBN    1RC
13377  M01S09258.set     +++|          NJN    LBC4        IF NOT A CONCURRENT CHANNEL
13378  M01S09259.set     +++|          LDN    40          SET CONCURRENT CHANNEL FLAG
13379  M01S09260.set     +++|          STD    T3
13380  M01S09261.set     +++|          AOD    KA          ADVANCE PAST *C*
13381  M01S09262.set     +++| LBC4     RJM    AOD         CONVERT DIGITS
13382  M01S09263.set     +++|          SBN    TCHSL
13383  M01S09264.set     +++|          PJN    LBC2        IF INCORRECT CHANNEL
13384  M01S09265.set     +++|          LDD    T3          MERGE CCH FLAG WITH CHANNEL NUMBER
13385  M01S09266.set     +++|          RAD    AB+4
13386  M01S09267.set     +++|          LDD    T6
13387  M01S09268.set     +++|          ZJN    LBC5        IF NULL CONTROLWARE
Line S09269 Modification History
M01 (Added by) set
M02 (Updated by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
13388  M02S09269.ns2776  ---|          LMD    HN
13389  M01S00004.ns2776  +++|          SBK    CNSD
13390  M01S00005.ns2776  +++|          ZJN    LBC4.1      IF SUPPRESSED CONTROLWARE
13391  M01S00006.ns2776  +++|          ADK    CNSD
13392  M01S00007.ns2776  +++| LBC4.1   LMD    HN
13393  M01S09270.set     +++| LBC5     STM    TCHS,AB+4
13394  M01S09271.set     +++|          LDI    KA          CHECK SEPARATOR
13395  M01S09272.set     +++|          LMN    1R,
13396  M01S09273.set     +++|          ZJN    LBC3        IF NOT END OF CHANNELS
13397  M01S09274.set     +++|          RJM    SCC         SET CONTROLWARE TABLE IN CM
13398  M01S09275.set     +++|          JMP    KBR         RETURN
13399  M01S09276.set     +++|          SPACE  4,10
13400  M01S09277.set     +++|**        TLBC - TABLE OF CONTROLWARE RECORD TYPES TO LOAD.
13401  M01S09278.set     +++|
13402  M01S09279.set     +++|
13403  M01S09280.set     +++| TLBC     BSS    0
13404  M01S09281.set     +++|          DUP    MXCLO,1
13405  M01S09282.set     +++|          CON    6060
13406  M01S09283.set     +++|          ORG    TLBC
13407  M01S09284.set     +++| TLBC     INDEX
13408  M01S09285.set     +++|          INDEX  CNNC,2RNC   NULL CONTROLWARE
13409  M01S09286.set     +++|          INDEX  CLHT,2RHT   LOAD HALF TRACK CONTROLWARE
13410  M01S09287.set     +++|          INDEX  CNHT,2RNH   NO LOAD HALF TRACK CONTROLWARE
13411  M01S09288.set     +++|          INDEX  CLFT,2RFT   LOAD FULL TRACK CONTROLWARE
13412  M01S09289.set     +++|          INDEX  CNFT,2RNF   NO LOAD FULL TRACK CONTROLWARE
13413  M01S09290.set     +++|          INDEX  CLFM,2RFM   LOAD FMD CONTROLWARE
13414  M01S09291.set     +++|          INDEX  CNFM,2RNM   NO LOAD FMD CONTROLWARE
13415  M01S09292.set     +++|          INDEX  CLAD,2RAD   LOAD FSC ADAPTOR CONTROLWARE
13416  M01S09293.set     +++|          INDEX  CNAD,2RNA   NO LOAD FSC ADAPTOR CONTROLWARE
13417  M01S09294.set     +++|          INDEX  CLPH,2RPH   LOAD DEMA/PFMD CONTROLWARE
13418  M01S09295.set     +++|          INDEX  CNPH,2RNP   NO LOAD DEMA/PFMD CONTROLWARE
13419  M01S09296.set     +++|          INDEX  CLID,2RID   LOAD 7255 ADAPTOR CONTROLWARE
13420  M01S09297.set     +++|          INDEX  CNID,2RNI   NO LOAD 7255 ADAPTOR CONTROLWARE
13421  M01S09298.set     +++|          INDEX  CLCC,2RCC   LOAD 7165 ADAPTOR CONTROLWARE
13422  M01S09299.set     +++|          INDEX  CNCC,2RCN   NO LOAD 7165 ADAPTOR CONTROLWARE
13423  M01S09300.set     +++|          INDEX  CNND,2RNN   NO LOAD NAD CONTROLWARE
13424  M01S09301.set     +++|          INDEX  CLM8,2RM8   LOAD M860 FSC CONTROLWARE
13425  M01S09302.set     +++|          INDEX  CNM8,2RN8   NO LOAD M860 FSC CONTROLWARE
13426  M01S09303.set     +++|          INDEX  CNCX,2RNX   NO LOAD CCC/NIP CONTROLWARE
13427  M01S09304.set     +++|          INDEX  CNCT,2RNT   NO LOAD CCC/698 CONTROLWARE
13428  M01S00008.ns2776  +++|          INDEX  CNSD,2RSD   SUPPRESS DEFAULT CONTROLWARE
13429  M01S09305.set     +++|          INDEX  MXCLO
13430  M01S09306.set     +++|          CON    0           END OF TABLE
13431  M01S09307.set     +++| RST      SPACE  4,10
13432  M01S09308.set     +++|***       RESET=X1,X2,...,XN.
13433  M01S09309.set     +++|*
13434  M01S09310.set     +++|*         RESET CHARACTERISTICS FOR EQUIPMENTS X1, X2, ... ,XN.
13435  M01S09311.set     +++|*         ONLY THE INFORMATION ENTERED VIA THE *EQXXX=* COMMAND
13436  M01S09312.set     +++|*         WILL BE RETAINED.
13437  M01S09313.set     +++|*
13438  M01S09314.set     +++|*         THIS ENTRY IS ONLY ALLOWED FROM THE KEYBOARD.
13439  M01S09315.set     +++|
13440  M01S09316.set     +++|
13441  M01S09317.set     +++| RST      DATA   C*RESET=*
13442  M01S09318.set     +++|          SOD    KA
13443  M01S09319.set     +++| RST1     AOD    KA
13444  M01S09320.set     +++|          RJM    AOD         ASSEMBLE EST ORDINAL
13445  M01S09321.set     +++|          ZJN    RST2        IF EQUIPMENT ZERO
13446  M01S09322.set     +++|          SBD    LE
13447  M01S09323.set     +++|          PJN    RST2        IF INCORRECT EST ORDINAL
13448  M01S09324.set     +++|          LDD    AB+4
13449  M01S09325.set     +++|          RJM    STA         SET TABLE ADDRESS
13450  M01S09326.set     +++|          LDM    EBUT+3
13451  M01S09327.set     +++|          ZJN    RST2        IF NULL ENTRY
13452  M01S09328.set     +++|          LDI    ES
13453  M01S09329.set     +++|          SHN    21-3
13454  M01S09330.set     +++|          PJN    RST3        IF NOT PSEUDO EQUIPMENT
13455  M01S09331.set     +++| RST2     JMP    ILL         PROCESS INCORRECT ENTRY
13456  M01S09332.set     +++|
Line S09333 Modification History
M01 (Added by) set
M02 (Updated by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
13457  M02S09333.284l847 ---| RST3     LDM    EBUT+3
Line S09334 Modification History
M01 (Added by) set
M02 (Updated by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
13458  M02S09334.284l847 ---|          RJM    SMT
Line S09335 Modification History
M01 (Added by) set
M02 (Updated by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
13459  M02S09335.284l847 ---|          ZJN    RST4        IF NOT MASS STORAGE DEVICE
13460  M01S00620.284l847 +++| RST3     SHN    22+21-13+3-21
13461  M01S00621.284l847 +++|          PJN    RST4        IF NOT MASS STORAGE DEVICE
13462  M01S09336.set     +++|          RJM    RMD         RESET MASS STORAGE DEVICE
13463  M01S09337.set     +++|          LDN    0           CLEAR *TDDB* INFORMATION
13464  M01S09338.set     +++|          STM    TDDB+DVFA
13465  M01S09339.set     +++|          STM    TDDB+DVDN
13466  M01S09340.set     +++|          CRM    TDDB+DVPF,ON
13467  M01S09341.set     +++|          LDM    TDDB+DVPR
13468  M01S09342.set     +++|          SCN    3
13469  M01S09343.set     +++|          STM    TDDB+DVPR
13470  M01S09344.set     +++|          LDM    EBUT+4      CLEAR EST INFORMATION
13471  M01S09345.set     +++|          LPN    7
13472  M01S09346.set     +++|          STM    EBUT+4
13473  M01S09347.set     +++|          LDI    ES
13474  M01S09348.set     +++|          LPC    4352
Proceed to Part 11