User Tools

Site Tools


Action unknown: copypageplugin__copy
cdc:nos2.source:opl.opl871:deck:dsd.020

Deck DSD Part 020

169 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
27108  M02S00122.ns2767  ---|
27109  M02S00123.ns2767  ---| TCMS     BSS    0           DEVICES ALLOWED FOR SPINUP/SPINDOWN
27110  M02S00124.ns2767  ---|          CON    2RDD        834
27111  M02S00125.ns2767  ---|          CON    2RDG        836
27112  M02S00126.ns2767  ---|          CON    2RDF        887 (4KB SECTOR)
27113  M02S00127.ns2767  ---|          CON    2RDH        887 (16KB SECTOR)
Line S00128 Modification History
M01 (Added by) 272l774
M02 (Removed by) ns2750
M03 (Removed by) ns2767
Seq #  *Modification Id* Act 
----------------------------+
27114  M03S00128.ns2767  ---|          CON    2RDN        9853
27115  M03S00129.ns2767  ---|          CON    2REA        5832 (1X SSD)
27116  M03S00130.ns2767  ---|          CON    2REB        5832 (2X SSD)
27117  M03S00131.ns2767  ---|          CON    2REC        5833 (1X SABRE)
27118  M03S00132.ns2767  ---|          CON    2RED        5833 (1XP SABRE)
27119  M03S00133.ns2767  ---|          CON    2REE        5833 (2X SABRE)
27120  M03S00134.ns2767  ---|          CON    2REF        5833 (2XP SABRE)
Line S00135 Modification History
M01 (Added by) 272l774
M02 (Removed by) ns2767
Seq #  *Modification Id* Act 
----------------------------+
27121  M02S00135.ns2767  ---|
27122  M02S00136.ns2767  ---| TCMSL    EQU    *-TCMS      LENGTH OF TABLE
27123  M00S16809.dsd     +++|          SPACE  4,10
Line S16810 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
27124  M01S16810.274l797 ---|          USE    END         DUMP LITERALS BLOCK
Line S00913 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
27125  M01S00913.274l797 +++|          CMDEND
Line S16811 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
27126  M01S16811.242l642 ---|          COMMAND  (UP/DOWN CHANNEL COMMANDS.)
Line S00744 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
27127  M01S00744.242l642 +++|          COMMAND  (UP/DOWN CHANNEL COMMANDS.),CMR
27128  M00S16812.dsd     +++| UPC      SPACE  4,10
Line S16813 Modification History
M01 (Removed by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
27129  M01S16813.251l664 ---|***       UP,CHXX.
27130  M01S16814.251l664 ---|*         UP,CHXX,EQYYY.
Line S00966 Modification History
M01 (Added by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
27131  M01S00966.251l664 +++|***       UP,CH=XX.
27132  M01S00967.251l664 +++|*         UP,CH=XX,EQ=YYY.
27133  M00S16815.dsd     +++|*
27134  M00S16816.dsd     +++|*         UP CHANNEL XX ON EST ORDINAL YYY OR ALL EST ORDINALS.
27135  M00S16817.dsd     +++|
27136  M00S16818.dsd     +++|
27137  M00S16819.dsd     +++|          ENTRY  UPC
Line S16820 Modification History
M01 (Removed by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
27138  M01S16820.251l664 ---|          LDN    40          SET *UP* FLAG
Line S00968 Modification History
M01 (Added by) 251l664
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27139  M02S00968.252l678 ---|          LDN    44          SET *UP* AND *LDAM* FLAGS
Line S00405 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27140  M01S00405.252l678 +++|          LDN    1           SET *UP* FLAG
27141  M00S16821.dsd     +++|          UJN    DWN1        PROCESS COMMAND
27142  M00S16822.dsd     +++| MUP      SPACE  4,10
Line S16823 Modification History
M01 (Removed by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
27143  M01S16823.251l664 ---|***       UP,MCHXX.
27144  M01S16824.251l664 ---|*         UP,MCHXX,EQYYY.
Line S00969 Modification History
M01 (Added by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
27145  M01S00969.251l664 +++|***       UP,MCH=XX.
27146  M01S00970.251l664 +++|*         UP,MCH=XX,EQ=YYY.
27147  M00S16825.dsd     +++|*
27148  M00S16826.dsd     +++|*         UP MUX CHANNEL XX ON EST ORDINAL YYY OR ALL EST ORDINALS.
27149  M00S16827.dsd     +++|
27150  M00S16828.dsd     +++|
27151  M00S16829.dsd     +++|          ENTRY  MUP
27152  M00S16830.dsd     +++|          AOD    CA          INCREMENT KEYBOARD INDEX
Line S16831 Modification History
M01 (Removed by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
27153  M01S16831.251l664 ---|          LDN    41          SET *UP* FLAG AND MUX FLAG
Line S00971 Modification History
M01 (Added by) 251l664
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27154  M02S00971.252l678 ---|          LDN    42          SET *UP* FLAG AND MUX FLAG
Line S00406 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27155  M01S00406.252l678 +++|          LDN    3           SET *UP* AND MUX FLAGS
27156  M00S16832.dsd     +++|          UJN    DWN1        PROCESS COMMAND
27157  M00S16833.dsd     +++| MDN      SPACE  4,10
Line S16834 Modification History
M01 (Removed by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
27158  M01S16834.251l664 ---|***       DOWN,MCHXX.
27159  M01S16835.251l664 ---|*         DOWN,MCHXX,EQYYY.
Line S00972 Modification History
M01 (Added by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
27160  M01S00972.251l664 +++|***       DOWN,MCH=XX.
27161  M01S00973.251l664 +++|*         DOWN,MCH=XX,EQ=YYY.
27162  M00S16836.dsd     +++|*
27163  M00S16837.dsd     +++|*         DOWN MUX CHANNEL XX ON EST ORDINAL YYY OR ALL EST ORDINALS.
27164  M00S16838.dsd     +++|
27165  M00S16839.dsd     +++|
27166  M00S16840.dsd     +++|          ENTRY  MDN
27167  M00S16841.dsd     +++|          AOD    CA          INCREMENT KEYBOARD INDEX
Line S16842 Modification History
M01 (Removed by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
27168  M01S16842.251l664 ---|          LDN    1           SET *DOWN* FLAG AND MUX FLAG
Line S00974 Modification History
M01 (Added by) 251l664
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27169  M02S00974.252l678 ---|          LDN    2           SET *DOWN* FLAG AND MUX FLAG
Line S00407 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27170  M01S00407.252l678 +++|          LDN    2           SET MUX FLAG
27171  M00S16843.dsd     +++|          UJN    DWN1        PROCESS COMMAND
Line S00975 Modification History
M01 (Added by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
27172  M01S00975.251l664 +++| CUP      SPACE  4,10
27173  M01S00976.251l664 +++|***       UP,CCH=XX.
27174  M01S00977.251l664 +++|*         UP,CCH=XX,EQ=YYY.
27175  M01S00978.251l664 +++|*
27176  M01S00979.251l664 +++|*         UP CONCURRENT CHANNEL XX ON ESTO YYY OR ALL EST ORDINALS.
27177  M01S00980.251l664 +++|
27178  M01S00981.251l664 +++|
27179  M01S00982.251l664 +++|          ENTRY  CUP
27180  M01S00983.251l664 +++|          AOD    CA          INCREMENT KEYBOARD INDEX
27181  M01S00984.251l664 +++|          LDN    41          SET *UP* FLAG AND CCH FLAG
27182  M01S00985.251l664 +++|          UJN    DWN1        PROCESS COMMAND
27183  M01S00986.251l664 +++| CDN      SPACE  4,10
27184  M01S00987.251l664 +++|***       DOWN,CCH=XX.
27185  M01S00988.251l664 +++|*         DOWN,CCH=XX,EQ=YYY.
27186  M01S00989.251l664 +++|*
27187  M01S00990.251l664 +++|*         DOWN CONCURRENT CHANNEL XX ON ESTO YYY OR ALL EST ORDINALS.
27188  M01S00991.251l664 +++|
27189  M01S00992.251l664 +++|
27190  M01S00993.251l664 +++|          ENTRY  CDN
27191  M01S00994.251l664 +++|          AOD    CA          INCREMENT KEYBOARD INDEX
Line S00995 Modification History
M01 (Added by) 251l664
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27192  M02S00995.252l678 ---|          LDN    1           SET *DOWN* FLAG AND CCH FLAG
Line S00408 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27193  M01S00408.252l678 +++|          LDN    40          SET CCH FLAG
Line S00996 Modification History
M01 (Added by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
27194  M01S00996.251l664 +++|          UJN    DWN1        PROCESS COMMAND
27195  M00S16844.dsd     +++| DWN      SPACE  4,10
Line S16845 Modification History
M01 (Removed by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
27196  M01S16845.251l664 ---|***       DOWN,CHXX.
27197  M01S16846.251l664 ---|*         DOWN,CHXX,EQYYY.
Line S00997 Modification History
M01 (Added by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
27198  M01S00997.251l664 +++|***       DOWN,CH=XX.
27199  M01S00998.251l664 +++|*         DOWN,CH=XX,EQ=YYY.
27200  M00S16847.dsd     +++|*
27201  M00S16848.dsd     +++|*         DOWN CHANNEL XX ON EST ORDINAL YYY OR ALL EST ORDINALS.
27202  M00S16849.dsd     +++|
27203  M00S16850.dsd     +++|
27204  M00S16851.dsd     +++|          ENTRY  DWN
Line S16852 Modification History
M01 (Removed by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
27205  M01S16852.251l664 ---|          LDN    0           SET *DOWN* FLAG
Line S00999 Modification History
M01 (Added by) 251l664
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27206  M02S00999.252l678 ---|          LDN    4           SET *DOWN* AND *LDAM* FLAGS
Line S00409 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27207  M01S00409.252l678 +++|          LDN    0           CLEAR *UP* AND MUX FLAGS
27208  M00S16853.dsd     +++| DWN1     STD    SR
Line S16854 Modification History
M01 (Removed by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
27209  M01S16854.251l664 ---|          LDN    2           SET KEYBOARD INDEX
Line S01000 Modification History
M01 (Added by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
27210  M01S01000.251l664 +++|          LDN    3           SET KEYBOARD INDEX
27211  M00S16855.dsd     +++|          RAD    CA
27212  M00S16856.dsd     +++|          LDN    ESTP        READ EST POINTERS
27213  M00S16857.dsd     +++|          CRD    T4
27214  M00S16858.dsd     +++|          RJM    ASD         ASSEMBLE CHANNEL NUMBER
27215  M00S16859.dsd     +++|          LDD    AB+4
Line S16860 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27216  M01S16860.252l678 ---|          STD    SR+1
27217  M00S16861.dsd     +++|          SBN    40
Line S16862 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27218  M01S16862.252l678 ---|          PJN    DWN3        IF INCORRECT CHANNEL
Line S00410 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27219  M01S00410.252l678 +++|          PJN    DWN2        IF INCORRECT CHANNEL
27220  M01S00411.252l678 +++|          LDD    SR
27221  M01S00412.252l678 +++|          LPN    40
27222  M01S00413.252l678 +++|          LMD    AB+4
Line S00414 Modification History
M01 (Added by) 252l678
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27223  M02S00414.282l826 ---|          STD    SR+1
Line S00622 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27224  M01S00622.282l826 +++|          STD    SR+1        SET CHANNEL NUMBER AND CONCURRENT STATUS
27225  M00S16863.dsd     +++|          LDI    CA
27226  M00S16864.dsd     +++|          LMN    1R.
Line S00001 Modification History
M01 (Added by) dsd92
Seq #  *Modification Id* Act 
----------------------------+
27227  M01S00001.dsd92   +++|          STM    DWNA
Line S16865 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27228  M01S16865.252l678 ---|          NJN    DWN2        IF EQUIPMENT ENTERED
Line S00415 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27229  M01S00415.252l678 +++|          NJN    DWN3        IF EST ORDINAL ENTERED
27230  M01S00416.252l678 +++|          STD    AB+4
Line S16866 Modification History
M01 (Removed by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
27231  M01S16866.251l664 ---|          LCN    1           SET EST INDEX
Line S01001 Modification History
M01 (Added by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
27232  M01S01001.251l664 +++|          LDN    NOPE-1      SET EST INDEX
27233  M00S16867.dsd     +++|          STD    T7
Line S16868 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27234  M01S16868.252l678 ---|          LDC    4000        SET NO EQUIPMENT FLAG
27235  M01S16869.252l678 ---|          STD    T3
27236  M01S16870.252l678 ---|          STD    AB+4
27237  M00S16871.dsd     +++|          UJN    DWN4        READ EST
Line S00417 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27238  M01S00417.252l678 +++|
27239  M01S00418.252l678 +++| DWN2     JMP    KIE         *INCORRECT ENTRY*
27240  M00S16872.dsd     +++|
Line S16873 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27241  M01S16873.252l678 ---| DWN2     LDN    0
27242  M01S16874.252l678 ---|          STD    T3
Line S16875 Modification History
M01 (Removed by) 251l664
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27243  M02S16875.252l678 ---|          LDN    3
Line S01002 Modification History
M01 (Added by) 251l664
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27244  M02S01002.252l678 ---|          LDN    4
Line S00419 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27245  M01S00419.252l678 +++| DWN3     LDN    4
27246  M00S16876.dsd     +++|          RAD    CA
27247  M00S16877.dsd     +++|          RJM    ASD         ASSEMBLE EQUIPMENT
27248  M00S16878.dsd     +++|          LDD    AB+4
27249  M00S16879.dsd     +++|          SBD    T6
Line S16880 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27250  M01S16880.252l678 ---| DWN3     PJN    DWN5        IF ILLEGAL EQUIPMENT
Line S00420 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27251  M01S00420.252l678 +++|          PJN    DWN2        IF INCORRECT EST ORDINAL
27252  M00S16881.dsd     +++|          LDD    AB+4
27253  M00S16882.dsd     +++|          SBN    1
27254  M00S16883.dsd     +++|          STD    T7          SAVE EST INDEX
27255  M00S16884.dsd     +++|          ADN    2           SET END OF SEARCH
27256  M00S16885.dsd     +++|          STD    T6
27257  M00S16886.dsd     +++| DWN4     AOD    T7
27258  M00S16887.dsd     +++|          LMD    T6
Line S16888 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27259  M01S16888.252l678 ---|          ZJN    DWN5        IF END OF EST
Line S00421 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27260  M01S00421.252l678 +++|          ZJN    DWN2        IF END OF EST
27261  M00S16889.dsd     +++|          SFA    EST,T7      READ EST ENTRY
27262  M00S16890.dsd     +++|          ADK    EQDE
27263  M00S16891.dsd     +++|          CRD    CM
Line S00272 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
27264  M01S00272.241l630 +++|          ADK    EQAE-EQDE
27265  M01S00273.241l630 +++|          CRD    SH
Line S16892 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27266  M01S16892.252l678 ---|          UJN    DWN6        CHECK CHANNELS
27267  M01S16893.252l678 ---|
27268  M01S16894.252l678 ---| DWN5     JMP    KIE         *INCORRECT ENTRY*
27269  M01S16895.252l678 ---|
27270  M01S16896.252l678 ---| DWN6     RJM    CCH         CHECK FOR CHANNEL MATCH
Line S00422 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27271  M01S00422.252l678 +++|          RJM    CCH         CHECK FOR CHANNEL MATCH
27272  M00S16897.dsd     +++|          NJN    DWN4        IF NO MATCH
Line S16898 Modification History
M01 (Removed by) dsd92
Seq #  *Modification Id* Act 
----------------------------+
27273  M01S16898.dsd92   ---|          LDD    SR          FORM *1DS* PARAMETER
Line S00002 Modification History
M01 (Added by) dsd92
Seq #  *Modification Id* Act 
----------------------------+
27274  M01S00002.dsd92   +++|          LDD    CM+3
27275  M01S00003.dsd92   +++|          LMC    2RMT
27276  M01S00004.dsd92   +++|          ZJN    DWN5        IF *MT*
27277  M01S00005.dsd92   +++|          LMC    2RNT&2RMT
Line S00006 Modification History
M01 (Added by) dsd92
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
27278  M02S00006.274l797 ---|          NJN    DWN6        IF NOT *NT*
Line S00914 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
27279  M01S00914.274l797 +++|          ZJN    DWN5        IF *NT*
27280  M01S00915.274l797 +++|          LMC    2RCT&2RNT
27281  M01S00916.274l797 +++|          ZJN    DWN5        IF *CT*
27282  M01S00917.274l797 +++|          LMC    2RAT&2RCT
27283  M01S00918.274l797 +++|          NJN    DWN6        IF NOT *AT*
Line S00007 Modification History
M01 (Added by) dsd92
Seq #  *Modification Id* Act 
----------------------------+
27284  M01S00007.dsd92   +++| DWN5     LDM    DWNA
27285  M01S00008.dsd92   +++|          NJP    DWN2        IF EST ORDINAL ENTERED
27286  M01S00009.dsd92   +++| DWN6     LDD    SR          FORM *1DS* PARAMETER
Line S16899 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27287  M01S16899.252l678 ---|          LPN    40
Line S00423 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27288  M01S00423.252l678 +++|          LPN    2
27289  M01S00424.252l678 +++|          SHN    6-1
Line S16900 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27290  M01S16900.282l826 ---|          RAD    SR+1
27291  M01S16901.282l826 ---|          LDC    MTSI        GET *MAGNET* CP NUMBER
27292  M01S16902.282l826 ---|          RJM    FSS
Line S16903 Modification History
M01 (Removed by) 252l678
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27293  M02S16903.282l826 ---|          SHN    6
27294  M02S16904.282l826 ---|          ADD    SR+1        ADD CHANNEL NUMBER
Line S00425 Modification History
M01 (Added by) 252l678
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27295  M02S00425.282l826 ---|          SHN    7
27296  M02S00426.282l826 ---|          LMD    SR+1        ADD CHANNEL, CONCURRENCY AND MUX FLAGS
Line S16905 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27297  M01S16905.282l826 ---|          STD    AB+3
Line S00623 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27298  M01S00623.282l826 +++|          ADD    SR+1
27299  M01S00624.282l826 +++|          STD    AB+3        SET CHANNEL, CONCURRENCY, AND MUX FLAGS
Line S16906 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27300  M01S16906.252l678 ---|          LDD    SR
Line S16907 Modification History
M01 (Removed by) 251l664
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27301  M02S16907.252l678 ---|          LPN    1
27302  M02S16908.252l678 ---|          SHN    12-0
Line S01003 Modification History
M01 (Added by) 251l664
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27303  M02S01003.252l678 ---|          LPN    3
27304  M02S01004.252l678 ---|          SHN    12-1
Line S16909 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27305  M01S16909.252l678 ---|          RAD    AB+4
27306  M01S16910.252l678 ---|          LDN    /1DS/DWNF
Line S00427 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27307  M01S00427.252l678 +++|          LDD    SR
27308  M01S00428.252l678 +++|          LPN    1
27309  M01S00429.252l678 +++|          ADK    /1DS/DWNF
27310  M01S00430.252l678 +++|          ERRNZ  /1DS/UPCF-/1DS/DWNF-1  CODE DEPENDS ON VALUE
27311  M00S16911.dsd     +++|          JMP    KAR         PROCESS *1DS* CALL
Line S00010 Modification History
M01 (Added by) dsd92
Seq #  *Modification Id* Act 
----------------------------+
27312  M01S00010.dsd92   +++|
27313  M01S00011.dsd92   +++|
27314  M01S00012.dsd92   +++| DWNA     BSSZ   1           FLAG INDICATING EST ORDINAL ENTERED
27315  M00S16912.dsd     +++| CCH      SPACE  4,10
27316  M00S16913.dsd     +++|**        CCH - CHECK FOR VALID CHANNEL.
27317  M00S16914.dsd     +++|*
Line S16915 Modification History
M01 (Removed by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
27318  M01S16915.251l664 ---|*         ENTRY  (SR) = 6/0, 1/U, 4/0, 1/M.
Line S01005 Modification History
M01 (Added by) 251l664
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27319  M02S01005.252l678 ---|*         ENTRY  (SR) = 6/0, 1/U, 2/0, 1/L, 1/M, 1/C.
Line S16916 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27320  M01S16916.252l678 ---|*                       U = UP/DOWN CHANNEL FLAG (1 = UP).
Line S01006 Modification History
M01 (Added by) 251l664
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27321  M02S01006.252l678 ---|*                       L = *LDAM* DEVICE FLAG.
Line S16917 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27322  M01S16917.252l678 ---|*                       M = MUX FLAG (1 = 819 MUX CHANNEL).
Line S01007 Modification History
M01 (Added by) 251l664
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27323  M02S01007.252l678 ---|*                       C = CCH FLAG (1 = CONCURRENT CHANNEL).
Line S16918 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27324  M01S16918.252l678 ---|*                (SR+1) = CHANNEL.
27325  M01S16919.252l678 ---|*                (CM - CM+4) = EST ENTRY.
Line S00274 Modification History
M01 (Added by) 241l630
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27326  M02S00274.252l678 ---|*                (T3) = 4000 IF EST ORDINAL NOT SPECIFIED.
Line S00431 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27327  M01S00431.252l678 +++|*         ENTRY  (SR) = 10/0, 1/M, 1/U.
27328  M01S00432.252l678 +++|*                       M = 1 IF MUX CHANNEL.
27329  M01S00433.252l678 +++|*                       U = 1 IF *UP* REQUEST.
27330  M01S00434.252l678 +++|*                (SR+1) = CHANNEL NUMBER (AND CONCURRENCY FLAG).
27331  M01S00435.252l678 +++|*                (CM - CM+4) = WORD *EQDE* OF EST ENTRY.
27332  M01S00436.252l678 +++|*                (SH - SH+4) = WORD *EQAE* OF EST ENTRY.
27333  M00S16920.dsd     +++|*
27334  M00S16921.dsd     +++|*         EXIT   (A) = 0  IF MATCH.
Line S16922 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
27335  M01S16922.241l630 ---|*                (A) = 1  IF NO MATCH.
Line S00275 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
27336  M01S00275.241l630 +++|*                (A) .NE. 0  IF NO MATCH.
Line S00013 Modification History
M01 (Added by) dsd92
Seq #  *Modification Id* Act 
----------------------------+
27337  M01S00013.dsd92   +++|*                (CM - CM+4) = ENTRY VALUE.
27338  M00S16923.dsd     +++|*
Line S16924 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27339  M01S16924.252l678 ---|*         USES   CM - CM+4, T0 - T4.
Line S00437 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27340  M01S00437.252l678 +++|*         USES   T1.
27341  M00S16925.dsd     +++|
27342  M00S16926.dsd     +++|
Line S00276 Modification History
M01 (Added by) 241l630
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27343  M02S00276.252l678 ---| CCH8     LDD    SH+4
27344  M02S00277.252l678 ---|          ZJN    CCH2        IF NOT CURRENTLY ASSIGNED
Line S00438 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27345  M01S00438.252l678 +++| CCH6     LDD    SH+4
Line S00439 Modification History
M01 (Added by) 252l678
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
27346  M02S00439.274l797 ---|          ZJN    CCH1        IF DEVICE NOT CURRENTLY ASSIGNED
Line S00919 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
27347  M01S00919.274l797 +++|          ZJP    CCH1        IF DEVICE NOT CURRENTLY ASSIGNED
Line S00278 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
27348  M01S00278.241l630 +++|
27349  M00S16927.dsd     +++| CCH      SUBR               ENTRY/EXIT
27350  M00S16928.dsd     +++|          LDD    CM
27351  M00S16929.dsd     +++|          SHN    21-13
Line S16930 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
27352  M01S16930.241l630 ---|          MJN    CCH1        IF MASS STORAGE
Line S00279 Modification History
M01 (Added by) 241l630
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27353  M02S00279.252l678 ---|          MJN    CCH2        IF MASS STORAGE
Line S16931 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27354  M01S16931.252l678 ---|          LDD    T3
Line S16932 Modification History
M01 (Removed by) 251l664
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27355  M02S16932.252l678 ---|          SHN    21-13
Line S16933 Modification History
M01 (Removed by) 241l630
M02 (Removed by) 251l664
M03 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27356  M03S16933.252l678 ---|          PJN    CCH2        IF EST ORDINAL ENTERED
Line S00280 Modification History
M01 (Added by) 241l630
M02 (Removed by) 251l664
M03 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27357  M03S00280.252l678 ---|          PJN    CCH3        IF EST ORDINAL ENTERED
Line S16934 Modification History
M01 (Removed by) 251l664
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27358  M02S16934.252l678 ---|          LDD    CM+3
Line S00281 Modification History
M01 (Added by) 241l630
M02 (Removed by) 251l664
M03 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27359  M03S00281.252l678 ---|          LMC    2RLX+4000
Line S01008 Modification History
M01 (Added by) 251l664
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27360  M02S01008.252l678 ---|          SHN    0-13
27361  M02S01009.252l678 ---|          LMN    1
27362  M02S01010.252l678 ---|          NJN    CCHX        IF EST ORDINAL ENTERED
Line S00440 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27363  M01S00440.252l678 +++|          MJN    CCH1        IF MASS STORAGE
Line S01011 Modification History
M01 (Added by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
27364  M01S01011.251l664 +++|          LDD    CM          GET DOWN/OFF BIT
27365  M01S01012.251l664 +++|          LPN    2
27366  M01S01013.251l664 +++|          SHN    14
27367  M01S01014.251l664 +++|          LMD    CM+3        GET DEVICE TYPE
Line S01015 Modification History
M01 (Added by) 251l664
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27368  M02S01015.252l678 ---|          LPC    -4000       CLEAR OLD DOWN/OFF BIT
Line S01016 Modification History
M01 (Added by) 251l664
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
27369  M02S01016.274l797 ---|          LMC    2RLX+20000
Line S00282 Modification History
M01 (Added by) 241l630
M02 (Removed by) 252l678
M03 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
27370  M03S00282.274l797 ---|          ZJN    CCH8        IF *LX* AND OFF
Line S00441 Modification History
M01 (Added by) 252l678
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
27371  M02S00441.274l797 ---|          ZJN    CCH6        IF *LX* AND OFF/DOWN
Line S00283 Modification History
M01 (Added by) 241l630
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
27372  M02S00283.274l797 ---|          LMN    2RLY&2RLX
Line S00284 Modification History
M01 (Added by) 241l630
M02 (Removed by) 252l678
M03 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
27373  M03S00284.274l797 ---|          ZJN    CCH8        IF *LY* AND OFF
Line S00442 Modification History
M01 (Added by) 252l678
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
27374  M02S00442.274l797 ---|          ZJN    CCH6        IF *LY* AND OFF/DOWN
Line S16935 Modification History
M01 (Removed by) 252l678
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
27375  M02S16935.274l797 ---|          LPC    3777
Line S00443 Modification History
M01 (Added by) 252l678
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
27376  M02S00443.274l797 ---|          LPC    7777        IGNORE DOWN/OFF STATUS
Line S16936 Modification History
M01 (Removed by) 241l630
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
27377  M02S16936.274l797 ---|          LMC    2RNT
27378  M02S16937.274l797 ---|          ZJN    CCH1        IF TYPE *NT*
Line S00285 Modification History
M01 (Added by) 241l630
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
27379  M02S00285.274l797 ---|          LMC    2RNT&2RLY
Line S00920 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
27380  M01S00920.274l797 +++|          LMC    2RLX+20000
27381  M01S00921.274l797 +++|          ZJN    CCH6        IF *LX* AND OFF/DOWN
27382  M01S00922.274l797 +++|          LMN    2RLY&2RLX
27383  M01S00923.274l797 +++|          ZJN    CCH6        IF *LY* AND OFF/DOWN
27384  M01S00924.274l797 +++|          LPC    7777        IGNORE DOWN/OFF STATUS
27385  M01S00925.274l797 +++|          LMC    2RNT&2RLY
Line S00286 Modification History
M01 (Added by) 241l630
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27386  M02S00286.252l678 ---|          ZJN    CCH2        IF TYPE *NT*
Line S00444 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27387  M01S00444.252l678 +++|          ZJN    CCH1        IF TYPE *NT*
27388  M00S16938.dsd     +++|          LMC    2RMT&2RNT
Line S16939 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
27389  M01S16939.241l630 ---|          NJN    CCH2        IF NOT TYPE *MT*
27390  M01S16940.241l630 ---| CCH1     LDD    SR          FORM CHANNEL + UP/DOWN
Line S00287 Modification History
M01 (Added by) 241l630
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27391  M02S00287.252l678 ---| CCH1     NJN    CCHX        IF NO MATCH FOUND, RETURN
Line S00288 Modification History
M01 (Added by) 241l630
M02 (Removed by) 251l664
M03 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27392  M03S00288.252l678 ---| CCH2     LDD    SR          FORM CHANNEL + UP/DOWN
Line S01017 Modification History
M01 (Added by) 251l664
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27393  M02S01017.252l678 ---| CCH2     LDD    CM          CHECK CHANNEL TYPE MATCH (NCH OR CCH)
27394  M02S01018.252l678 ---|          SHN    0-5
27395  M02S01019.252l678 ---|          LMD    SR
27396  M02S01020.252l678 ---|          LPN    1
27397  M02S01021.252l678 ---|          NJN    CCH1        IF NOT THE SAME TYPE OF CHANNEL
27398  M02S01022.252l678 ---|          LDD    SR          FORM CHANNEL + UP/DOWN
Line S16941 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27399  M01S16941.252l678 ---|          LPN    40
27400  M01S16942.252l678 ---|          ADD    SR+1
27401  M01S16943.252l678 ---|          STD    T4
27402  M01S16944.252l678 ---|          LMD    CM+1
27403  M01S16945.252l678 ---|          LPN    77
27404  M01S16946.252l678 ---|          ZJN    CCH4        IF MATCH
27405  M01S16947.252l678 ---|          LDD    CM+1
27406  M01S16948.252l678 ---|          SHN    -6
Line S16949 Modification History
M01 (Removed by) 241l630
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27407  M02S16949.252l678 ---|          ZJN    CCH2        IF NO SECONDARY CHANNEL
Line S00289 Modification History
M01 (Added by) 241l630
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27408  M02S00289.252l678 ---|          ZJN    CCH3        IF NO SECONDARY CHANNEL
Line S16950 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27409  M01S16950.252l678 ---|          LMD    T4
27410  M01S16951.252l678 ---|          ZJN    CCH4        IF MATCH
Line S16952 Modification History
M01 (Removed by) 241l630
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27411  M02S16952.252l678 ---| CCH2     LDN    1           SET NO MATCH FOUND
27412  M02S16953.252l678 ---| CCH3     UJN    CCHX        EXIT
Line S00290 Modification History
M01 (Added by) 241l630
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27413  M02S00290.252l678 ---| CCH3     LDN    1           SET NO MATCH FOUND
27414  M02S00291.252l678 ---|          UJN    CCH1        RETURN
Line S16954 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27415  M01S16954.252l678 ---|
27416  M01S16955.252l678 ---| CCH4     LDD    CM
27417  M01S16956.252l678 ---|          SHN    0-13
Line S16957 Modification History
M01 (Removed by) 241l630
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27418  M02S16957.252l678 ---|          ZJN    CCH7        IF TAPE EQUIPMENT
Line S00292 Modification History
M01 (Added by) 241l630
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27419  M02S00292.252l678 ---|          ZJN    CCH7        IF TAPE OR NIP EQUIPMENT
Line S16958 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27420  M01S16958.252l678 ---|
27421  M01S16959.252l678 ---|*         INSURE ONE CHANNEL LEFT UP AFTER COMMAND
27422  M01S16960.252l678 ---|*         FOR ACTIVE MASS STORAGE DEVICES.
27423  M01S16961.252l678 ---|
27424  M01S16962.252l678 ---|          LDD    SR
27425  M01S16963.252l678 ---|          LPN    40
27426  M01S16964.252l678 ---|          NJN    CCH6        IF *UP* COMMAND
27427  M01S16965.252l678 ---|          LDD    CM+1
27428  M01S16966.252l678 ---|          SHN    -6
27429  M01S16967.252l678 ---|          ZJN    CCH5        IF ONLY 1 CHANNEL
27430  M01S16968.252l678 ---|          LDD    CM+1
27431  M01S16969.252l678 ---|          LPC    4040
27432  M01S16970.252l678 ---|          ZJN    CCH6        IF BOTH ARE UP
Line S16971 Modification History
M01 (Removed by) 242l642
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27433  M02S16971.252l678 ---| CCH5     LDD    CM+4        CHECK IF DEVICE UNLOADED
27434  M02S16972.252l678 ---|          SHN    3
27435  M02S16973.252l678 ---|          ADN    ACGL
27436  M02S16974.252l678 ---|          CRD    T0
27437  M02S16975.252l678 ---|          LDD    T0+4
27438  M02S16976.252l678 ---|          LPN    MGUNL
Line S16977 Modification History
M01 (Removed by) 241l630
M02 (Removed by) 242l642
M03 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27439  M03S16977.252l678 ---|          ZJN    CCH2        IF DEVICE NOT UNLOADED
Line S00293 Modification History
M01 (Added by) 241l630
M02 (Removed by) 242l642
M03 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27440  M03S00293.252l678 ---|          ZJN    CCH3        IF DEVICE NOT UNLOADED
Line S00745 Modification History
M01 (Added by) 242l642
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27441  M02S00745.252l678 ---| CCH5     LDD    CM
27442  M02S00746.252l678 ---|          LPN    3
27443  M02S00747.252l678 ---|          LMN    3
27444  M02S00748.252l678 ---|          NJN    CCH3        IF DEVICE NOT DOWN
Line S16978 Modification History
M01 (Removed by) 251l664
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27445  M02S16978.252l678 ---| CCH6     LDD    CM          CHECK CHANNEL TYPE MATCH (MUX OR PPS)
27446  M02S16979.252l678 ---|          SHN    0-7
27447  M02S16980.252l678 ---|          LMN    1
27448  M02S16981.252l678 ---| CCH7     LMD    SR
27449  M02S16982.252l678 ---|          LPN    1
Line S16983 Modification History
M01 (Removed by) 241l630
M02 (Removed by) 251l664
M03 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27450  M03S16983.252l678 ---|          UJN    CCH3        RETURN
Line S00294 Modification History
M01 (Added by) 241l630
M02 (Removed by) 251l664
M03 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27451  M03S00294.252l678 ---|          LJM    CCHX        RETURN
Line S01023 Modification History
M01 (Added by) 251l664
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27452  M02S01023.252l678 ---| CCH6     LDD    CM          CHECK CHANNEL TYPE MATCH (*LDAM* OR NOT)
27453  M02S01024.252l678 ---|          SHN    2-7
27454  M02S01025.252l678 ---|          LMD    SR
27455  M02S01026.252l678 ---|          LPN    4
27456  M02S01027.252l678 ---| CCH7     LJM    CCHX        RETURN
Line S00445 Modification History
M01 (Added by) 252l678
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
27457  M02S00445.274l797 ---|          NJN    CCHX        IF WRONG DEVICE TYPE
Line S00926 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
27458  M01S00926.274l797 +++|          ZJN    CCH1        IF TYPE *MT*
27459  M01S00927.274l797 +++|          LMC    2RCT&2RMT
27460  M01S00928.274l797 +++|          ZJN    CCH1        IF TYPE *CT*
27461  M01S00929.274l797 +++|          LMC    2RAT&2RCT
27462  M01S00930.274l797 +++|          ZJN    CCH1        IF TYPE *AT*
27463  M01S00931.274l797 +++|          LMC    2ROD&2RAT
27464  M01S00932.274l797 +++|          NJP    CCHX        IF NOT TYPE *OD*
Line S00446 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
27465  M01S00446.252l678 +++| CCH1     LDN    1           SET CHANNEL BYTE INDEX
27466  M01S00447.252l678 +++|          STD    T1
27467  M01S00448.252l678 +++| CCH2     LDD    SR
27468  M01S00449.252l678 +++|          LPN    1
27469  M01S00450.252l678 +++|          SHN    12-0
27470  M01S00451.252l678 +++|          LMM    CM+1,T1
27471  M01S00452.252l678 +++|          LMD    SR+1
27472  M01S00453.252l678 +++|          LPC    6077
27473  M01S00454.252l678 +++|          SHN    21-13
27474  M01S00455.252l678 +++|          PJN    CCH3        IF CHANNEL NOT PRESENT OR DISABLED
27475  M01S00456.252l678 +++|          LPC    207700
27476  M01S00457.252l678 +++|          ZJN    CCH4        IF CHANNEL, TYPE, STATE MATCH
27477  M01S00458.252l678 +++| CCH3     SOD    T1
27478  M01S00459.252l678 +++|          PJN    CCH2        IF CHANNEL 1 NOT YET CHECKED
27479  M01S00460.252l678 +++|          UJN    CCH5        RETURN
27480  M01S00461.252l678 +++|
27481  M01S00462.252l678 +++| CCH4     LDD    SR
27482  M01S00463.252l678 +++|          LPN    2
27483  M01S00464.252l678 +++|          ZJN    CCH5        IF NOT A MUX CHANNEL
27484  M01S00465.252l678 +++|          LDD    CM
27485  M01S00466.252l678 +++|          SHN    0-13
27486  M01S00467.252l678 +++|          ZJN    CCH5        IF NOT MASS STORAGE
27487  M01S00468.252l678 +++|          LDD    CM
27488  M01S00469.252l678 +++|          LPC    200
27489  M01S00470.252l678 +++| CCH5     LJM    CCHX        RETURN WITH (A) = REPLY STATUS
27490  M00S16984.dsd     +++|          SPACE  4,10
Line S16985 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
27491  M01S16985.274l797 ---|          USE    END         DUMP LITERALS BLOCK
Line S00933 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
27492  M01S00933.274l797 +++|          CMDEND
Line S16986 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
27493  M01S16986.242l642 ---|          COMMAND (DOWN/OFF EQUIPMENT COMMANDS.)
27494  M01S16987.242l642 ---|          SPACE  4,5
27495  M01S16988.242l642 ---|***       DOWN,EQXXX.
27496  M01S16989.242l642 ---|*
27497  M01S16990.242l642 ---|*         SET *DOWN* (AND *OFF*) STATUS ON EST ORDINAL XXX.
27498  M01S16991.242l642 ---|
27499  M01S16992.242l642 ---|
27500  M01S16993.242l642 ---|          ENTRY  DWE
27501  M01S16994.242l642 ---|          LDN    2           POSITION KEYBOARD INDEX
27502  M01S16995.242l642 ---|          RAD    CA
27503  M01S16996.242l642 ---|          RJM    CEN         CHECK EST ORDINAL
27504  M01S16997.242l642 ---|          SHN    21-5
27505  M01S16998.242l642 ---|          PJN    DWE2        IF EQUIPMENT NOT DOWN
27506  M01S16999.242l642 ---| DWE1     JMP    KIE         *INCORRECT ENTRY*
27507  M01S17000.242l642 ---|
27508  M01S17001.242l642 ---| DWE2     SHN    21-13-21+5+22
27509  M01S17002.242l642 ---|          PJN    DWE3        IF NOT MASS STORAGE
27510  M01S17003.242l642 ---|          SHN    21-4-21+13
27511  M01S17004.242l642 ---|          MJN    DWE1        IF INDEPENDENT SHARED DEVICE
27512  M01S17005.242l642 ---|          RJM    CDS         CHECK DEVICE STATUS
27513  M01S17006.242l642 ---|          PJN    DWE1        IF NOT GLOBALLY UNLOADED
27514  M01S17007.242l642 ---|          LDD    T3
27515  M01S17008.242l642 ---|          SHN    21-GDDV+GDDV/12D*12D
27516  M01S17009.242l642 ---|          MJN    DWE1        IF GLOBAL DOWN BIT SET
27517  M01S17010.242l642 ---|          LDN    GDDV        SET GLOBAL DOWN BIT IN *ACGL*
27518  M01S17011.242l642 ---|          STD    AB+3
27519  M01S17012.242l642 ---|          LJM    OFE3        CALL *1DS*
27520  M01S17013.242l642 ---|
27521  M01S17014.242l642 ---| DWE3     LDD    AB+4
27522  M01S17015.242l642 ---|          ZJN    DWE1        IF EQUIPMENT ZERO
27523  M01S17016.242l642 ---|          LDD    SR+4
27524  M01S17017.242l642 ---|          NJN    DWE1        IF DEVICE ASSIGNED TO A JOB
27525  M01S17018.242l642 ---|          LDC    0           (EQUIPMENT TYPE)
27526  M01S17019.242l642 ---| DWEA     EQU    *-1         SET BY *CEN*
27527  M01S17020.242l642 ---|          LMC    2RCM
27528  M01S17021.242l642 ---|          ZJP    C1R         IF A CONTROL MODULE
27529  M01S17022.242l642 ---|          LDN    40          SET DOWN BIT IN EST
27530  M01S17023.242l642 ---|          RJM    SCB
27531  M01S17024.242l642 ---|          UJN    OFE1        TURN *OFF* NON-RMS EQUIPMENT
27532  M01S17025.242l642 ---| OFE      SPACE  4,10
27533  M01S17026.242l642 ---|***       OFF,XXX.
27534  M01S17027.242l642 ---|*
27535  M01S17028.242l642 ---|*         TURN EST ORDINAL XXX *OFF*.
27536  M01S17029.242l642 ---|
27537  M01S17030.242l642 ---|
27538  M01S17031.242l642 ---|          ENTRY  OFE
27539  M01S17032.242l642 ---|          RJM    CEN         CHECK EST ORDINAL
27540  M01S17033.242l642 ---|          LDM    DWEA
27541  M01S17034.242l642 ---|          LMC    2RCM
27542  M01S17035.242l642 ---|          ZJN    CEN1        IF A CONTROL MODULE
27543  M01S17036.242l642 ---| OFE1     LDD    AB+4
27544  M01S17037.242l642 ---|          STD    CM+1
27545  M01S17038.242l642 ---|          LDC    4000        INDICATE *OFF* REQUEST TO *1DS*
27546  M01S17039.242l642 ---|          RAD    AB+4
27547  M01S17040.242l642 ---|          LDN    OFES
27548  M01S17041.242l642 ---| OFE2     STD    CM+2
27549  M01S17042.242l642 ---|          MONITOR SEQM
27550  M01S17043.242l642 ---|          LDC    0
27551  M01S17044.242l642 ---| OFEA     EQU    *-1         (MASS STORAGE FLAG)
27552  M01S17045.242l642 ---|          SHN    21-13
27553  M01S17046.242l642 ---|          MJN    OFE3        IF MASS STORAGE
27554  M01S17047.242l642 ---|          LJM    AMT         ALERT MAGNET
27555  M01S17048.242l642 ---|
27556  M01S17049.242l642 ---| OFE3     LDN    /1DS/SCDF   INITIATE *CMS* CALL
27557  M01S17050.242l642 ---|          JMP    KAR         PROCESS *1DS* CALL
27558  M01S17051.242l642 ---| CEN      SPACE  4,10
27559  M01S17052.242l642 ---|**        CEN - CHECK EST ORDINAL.
27560  M01S17053.242l642 ---|*
27561  M01S17054.242l642 ---|*         EXIT   (A) = EST BYTE 0 OF EST ORDINAL XXX.
27562  M01S17055.242l642 ---|*                (AB+4) = (AMTA) = EST ORDINAL.
27563  M01S17056.242l642 ---|*                (SR+4) = EJTO OF OWNER, IF ANY.
27564  M01S17057.242l642 ---|*
27565  M01S17058.242l642 ---|*         USES   CM - CM+4, SR - SR+4, T3 - T7.
27566  M01S17059.242l642 ---|*
27567  M01S17060.242l642 ---|*         CALLS  ASD.
27568  M01S17061.242l642 ---|
27569  M01S17062.242l642 ---|
27570  M01S17063.242l642 ---| CEN1     JMP    KIE         INCORRECT ENTRY
27571  M01S17064.242l642 ---|
27572  M01S17065.242l642 ---| CEN      SUBR               ENTRY/EXIT
27573  M01S17066.242l642 ---|          RJM    ASD         ASSEMBLE EST ORDINAL
27574  M01S17067.242l642 ---|          LDN    ESTP        READ EST POINTER
27575  M01S17068.242l642 ---|          CRD    T3
27576  M01S17069.242l642 ---|          LDD    AB+4        READ EST ENTRY
27577  M01S17070.242l642 ---|          STM    AMTA
27578  M01S17071.242l642 ---|          SBD    T3+2
27579  M01S17072.242l642 ---|          PJN    CEN1        IF BEYOND EST
27580  M01S17073.242l642 ---|          SFA    EST,AB+4    READ EST ENTRY
27581  M01S17074.242l642 ---|          ADK    EQDE
27582  M01S17075.242l642 ---|          CRD    CM
27583  M01S17076.242l642 ---|          ADK    EQAE-EQDE   READ EQUIPMENT ASSIGNMENT
27584  M01S17077.242l642 ---|          CRD    SR
27585  M01S17078.242l642 ---|          LDD    CM+3
27586  M01S17079.242l642 ---|          ZJN    CEN1        IF NOT DEFINED
27587  M01S17080.242l642 ---|          LPC    3777        CHECK FOR A CONTROL MODULE
27588  M01S17081.242l642 ---|          STM    DWEA
27589  M01S17082.242l642 ---|          LDD    CM
27590  M01S17083.242l642 ---|          STM    OFEA        SAVE MASS STORAGE FLAG
27591  M01S17084.242l642 ---|          UJN    CENX        EXIT
27592  M01S17085.242l642 ---| CDS      SPACE  4,10
27593  M01S17086.242l642 ---|**        CDS - CHECK DEVICE STATUS.
27594  M01S17087.242l642 ---|*
27595  M01S17088.242l642 ---|*         ENTRY  (CM - CM+4) = EST ENTRY.
27596  M01S17089.242l642 ---|*
27597  M01S17090.242l642 ---|*         EXIT   (A) .LT. 0, IF DEVICE GLOBALLY UNLOADED.
27598  M01S17091.242l642 ---|*                    .GE. 0, IF DEVICE NOT GLOBALLY UNLOADED.
27599  M01S17092.242l642 ---|*                (T3 - T7) = MST WORD *ACGL* OF EST ORDINAL XXX.
27600  M01S17093.242l642 ---|*
27601  M01S17094.242l642 ---|*         USES   T3 - T7.
27602  M01S17095.242l642 ---|
27603  M01S17096.242l642 ---|
27604  M01S17097.242l642 ---| CDS      SUBR               ENTRY/EXIT
27605  M01S17098.242l642 ---|          LDD    CM+4        FETCH MST WORD *ACGL*
27606  M01S17099.242l642 ---|          SHN    3
27607  M01S17100.242l642 ---|          ADN    ACGL
27608  M01S17101.242l642 ---|          CRD    T3
27609  M01S17102.242l642 ---|          LDD    T3+4
27610  M01S17103.242l642 ---|          SHN    21-GUNL
27611  M01S17104.242l642 ---|          UJN    CDSX        EXIT WITH GLOBAL UNLOAD STATUS
27612  M01S17105.242l642 ---| C1R      SPACE  4,10
27613  M01S17106.242l642 ---|**        C1R - CALL *1DS* AND REENTER.
27614  M01S17107.242l642 ---|*
27615  M01S17108.242l642 ---|*         USES   CM - CM+4.
27616  M01S17109.242l642 ---|*
27617  M01S17110.242l642 ---|*         CALLS  C1D.
27618  M01S17111.242l642 ---|
27619  M01S17112.242l642 ---|
27620  M01S17113.242l642 ---| C1R      LDC    /1DS/DCMF&/1DS/LOCK
27621  M01S17114.242l642 ---|          RJM    C1D         PROCESS *1DS* CALL
27622  M01S17115.242l642 ---|          LDC    C1R1        SET REENTRY ADDRESS
27623  M01S17116.242l642 ---|          STM    /KEYBOARD/KCRB
27624  M01S17117.242l642 ---| C1R1     LDC    /1DS/DSDL
27625  M01S17118.242l642 ---|          CRD    CM
27626  M01S17119.242l642 ---|          LDD    CM
27627  M01S17120.242l642 ---|          NJP    CLP1        IF *1DS* NOT COMPLETE
27628  M01S17121.242l642 ---|          LDC    /1DS/DSDL+1
27629  M01S17122.242l642 ---|          CRD    CM
27630  M01S17123.242l642 ---|          LDD    CM
27631  M01S17124.242l642 ---|          NJP    KIE         IF ILLEGAL ENTRY
27632  M01S17125.242l642 ---|          JMP    KBR         RETURN
27633  M01S17126.242l642 ---| SCB      SPACE  4,10
27634  M01S17127.242l642 ---|**        SCB - SET/CLEAR DOWN BIT IN EST.
27635  M01S17128.242l642 ---|*
27636  M01S17129.242l642 ---|*         ENTRY  (A) = SETTING/CLEARING BIT MASK.
27637  M01S17130.242l642 ---|*
27638  M01S17131.242l642 ---|*         EXIT   DOWN BIT SET/CLEARED IN EST.
27639  M01S17132.242l642 ---|*
27640  M01S17133.242l642 ---|*         USES   CM - CM+4.
27641  M01S17134.242l642 ---|*
27642  M01S17135.242l642 ---|*         MACROS MONITOR.
27643  M01S17136.242l642 ---|
27644  M01S17137.242l642 ---|
27645  M01S17138.242l642 ---| SCB      SUBR               ENTRY/EXIT
27646  M01S17139.242l642 ---|          STD    CM+4        SAVE SETTING/CLEARING BIT MASK
27647  M01S17140.242l642 ---|          LCN    40          SET DOWN BIT CLEARING MASK
27648  M01S17141.242l642 ---|          STD    CM+3
27649  M01S17142.242l642 ---|          LDN    SB0S        SET BYTE 0 IN EST
27650  M01S17143.242l642 ---|          STD    CM+2
27651  M01S17144.242l642 ---|          LDD    AB+4        SET EST ORDINAL
27652  M01S17145.242l642 ---|          STD    CM+1
27653  M01S17146.242l642 ---|          MONITOR  SEQM
27654  M01S17147.242l642 ---|          UJN    SCBX        EXIT
27655  M01S17148.242l642 ---| AMT      SPACE  4,10
27656  M01S17149.242l642 ---|**        AMT - ALERT *MAGNET*.
27657  M01S17150.242l642 ---|*
27658  M01S17151.242l642 ---|*         ENTRY  (AB+4) = 1/F, 1/0, 10/EQ.
27659  M01S17152.242l642 ---|*                            F = *OFF* FLAG.
27660  M01S17153.242l642 ---|*                            EQ = EST ORDINAL.
27661  M01S17154.242l642 ---|*                (DWEA) = EQUIPMENT MNEUMONIC.
27662  M01S17155.242l642 ---|*
27663  M01S17156.242l642 ---|*         USES   CM - CM+4.
27664  M01S17157.242l642 ---|*
27665  M01S17158.242l642 ---|*         CALLS  CMT.
27666  M01S17159.242l642 ---|
27667  M01S17160.242l642 ---|
27668  M01S17161.242l642 ---| AMT      LDM    DWEA
27669  M01S17162.242l642 ---|          LMC    2RMT
27670  M01S17163.242l642 ---|          ZJN    AMT2        IF *MT*
27671  M01S17164.242l642 ---|          LMC    2RNT&2RMT
27672  M01S17165.242l642 ---|          ZJN    AMT2        IF *NT*
27673  M01S17166.242l642 ---| AMT1     JMP    KBR         RETURN
27674  M01S17167.242l642 ---|
27675  M01S17168.242l642 ---| AMT2     RJM    CMT         CHECK *MAGNET*
27676  M01S17169.242l642 ---|          ZJN    AMT1        IF *MAGNET* NOT ACTIVE
27677  M01S17170.242l642 ---| AMT3     LDD    T7          FIND UNIT IN UDT
27678  M01S17171.242l642 ---|          SHN    6
27679  M01S17172.242l642 ---|          ADD    T6
27680  M01S17173.242l642 ---|          ADN    /MTX/UST4
27681  M01S17174.242l642 ---|          CRD    AB          READ UST4
27682  M01S17175.242l642 ---|          LDD    AB+2        CHECK EST ORDINAL IN UDT
27683  M01S17176.242l642 ---|          LMC    **
27684  M01S17177.242l642 ---| AMTA     EQU    *-1         (UNIT NUMBER - SET BY CEN)
27685  M01S17178.242l642 ---|          ZJN    AMT4        IF UNIT FOUND
27686  M01S17179.242l642 ---|          LDN    /MTX/UNITL  ADVANCE UDT ADDRESS
27687  M01S17180.242l642 ---|          RAD    T6
27688  M01S17181.242l642 ---|          SBD    T4
27689  M01S17182.242l642 ---|          MJN    AMT3        IF NOT END OF UNITS
27690  M01S17183.242l642 ---|          JMP    KIE         *INCORRECT ENTRY*
27691  M01S17184.242l642 ---|
27692  M01S17185.242l642 ---| AMT4     LDK    OFES
27693  M01S17186.242l642 ---|          STD    AB+4
27694  M01S17187.242l642 ---|          LDD    T6          SET UDT ADDRESS
27695  M01S17188.242l642 ---|          STD    AB+1
27696  M01S17189.242l642 ---|          LDK    /MTX/XOF    ENTER OFF TAPE UNIT FUNCTION
27697  M01S17190.242l642 ---|          STD    AB
27698  M01S17191.242l642 ---|          LDD    MA
27699  M01S17192.242l642 ---|          CWD    AB
27700  M01S17193.242l642 ---|          CRD    SP
27701  M01S17194.242l642 ---|          LDC    /1DS/EUFF+/1DS/LOCK
27702  M01S17195.242l642 ---|          JMP    KAR         PROCESS *1DS* CALL
27703  M01S17196.242l642 ---|          SPACE  4,10
27704  M01S17197.242l642 ---|          USE    END         DUMP LITERALS BLOCK
27705  M01S17198.242l642 ---|          COMMAND (UP/ON EQUIPMENT COMMANDS.)
27706  M01S17199.242l642 ---| ONE      SPACE  4,10
27707  M01S17200.242l642 ---|***       ON,XXX.
27708  M01S17201.242l642 ---|*
27709  M01S17202.242l642 ---|*         TURN EST ORDINAL XXX *ON*.
27710  M01S17203.242l642 ---|
27711  M01S17204.242l642 ---|
27712  M01S17205.242l642 ---|          ENTRY  ONE
27713  M01S17206.242l642 ---| ONE1     RJM    CEN         CHECK EST ORDINAL
27714  M01S17207.242l642 ---|          SHN    21-5
27715  M01S17208.242l642 ---|          MJN    ONE2        IF DOWN BIT SET
27716  M01S17209.242l642 ---|          LDM    UPEA
27717  M01S17210.242l642 ---|          LMC    2RDD
27718  M01S17211.242l642 ---|          NJN    ONE3        IF NOT *DD* DEVICE
27719  M01S17212.242l642 ---|          LDD    CM+1        CHECK IF CHANNEL AVAILABLE
27720  M01S17213.242l642 ---|          SHN    21-5
27721  M01S17214.242l642 ---|          PJN    ONE3        IF CHANNEL 1 UP
27722  M01S17215.242l642 ---|          LPN    77
27723  M01S17216.242l642 ---|          ZJN    ONE5        IF NO SECOND CHANNEL
27724  M01S17217.242l642 ---|          SHN    21-5
27725  M01S17218.242l642 ---| ONE2     MJN    ONE5        IF CHANNEL 2 DOWN
27726  M01S17219.242l642 ---| ONE3     LDD    AB+4        SET EQUIPMENT
27727  M01S17220.242l642 ---|          STD    CM+1
27728  M01S17221.242l642 ---|          LDC    2000        INDICATE *ON* REQUEST TO *1DS*
27729  M01S17222.242l642 ---|          RAD    AB+4
27730  M01S17223.242l642 ---|          LDN    ONES
27731  M01S17224.242l642 ---|          STD    CM+2
27732  M01S17225.242l642 ---|          MONITOR SEQM
27733  M01S17226.242l642 ---|          LDC    0
27734  M01S17227.242l642 ---| ONEA     EQU    *-1         (MASS STORAGE FLAG)
27735  M01S17228.242l642 ---|          SHN    21-13
27736  M01S17229.242l642 ---|          MJN    ONE4        IF MASS STORAGE
27737  M01S17230.242l642 ---|          LJM    AMT         ALERT MAGNET
27738  M01S17231.242l642 ---|
27739  M01S17232.242l642 ---| ONE4     LDN    /1DS/SCDF   INITIATE *CMS* CALL
27740  M01S17233.242l642 ---|          JMP    KAR         PROCESS *1DS* CALL
27741  M01S17234.242l642 ---|
27742  M01S17235.242l642 ---| ONE5     JMP    KIE         ILLEGAL ENTRY
27743  M01S17236.242l642 ---| UPE      SPACE  4,5
27744  M01S17237.242l642 ---|***       UP,EQXXX.
27745  M01S17238.242l642 ---|*
27746  M01S17239.242l642 ---|*         CLEAR *DOWN* STATUS ON EST ORDINAL XXX.
27747  M01S17240.242l642 ---|
27748  M01S17241.242l642 ---|
27749  M01S17242.242l642 ---|          ENTRY  UPE
27750  M01S17243.242l642 ---|          LDN    2           POSITION KEYBOARD INDEX
27751  M01S17244.242l642 ---|          RAD    CA
27752  M01S17245.242l642 ---|          RJM    CEN         CHECK EST ORDINAL
27753  M01S17246.242l642 ---|          LPN    40
27754  M01S17247.242l642 ---|          LMN    40
27755  M01S17248.242l642 ---|          ADD    SR+4
27756  M01S17249.242l642 ---|          NJN    ONE5        IF DEVICE NOT DOWN OR ASSIGNED
27757  M01S17250.242l642 ---|          LDD    CM          CHECK EQUIPMENT
27758  M01S17251.242l642 ---|          SHN    0-13
27759  M01S17252.242l642 ---|          ZJN    UPE1        IF NOT MASS STORAGE
27760  M01S17253.242l642 ---|          LDC    0           (EQUIPMENT TYPE)
27761  M01S17254.242l642 ---| UPEA     EQU    *-1
27762  M01S17255.242l642 ---|          LMC    2RDD
27763  M01S17256.242l642 ---|          ZJP    C1R         IF A *DD* DEVICE
27764  M01S17257.242l642 ---|          RJM    CDS
27765  M01S17258.242l642 ---|          LDD    T3          CHECK MST STATUS
27766  M01S17259.242l642 ---|          LPN    MGDDV
27767  M01S17260.242l642 ---|          NJN    UPE2        IF GLOBAL DOWN SET
27768  M01S17261.242l642 ---| UPE1     RJM    SCB         CLEAR DOWN STATUS IN EST
27769  M01S17262.242l642 ---|          LDM    UPEA
27770  M01S17263.242l642 ---|          LMC    2RCM
27771  M01S17264.242l642 ---|          NJP    AMT1        IF NOT A CONTROL MODULE
27772  M01S17265.242l642 ---|          LDC    7077        CLEAR CONTROLWARE LOAD COUNT
27773  M01S17266.242l642 ---|          STD    CM+3
27774  M01S17267.242l642 ---|          LDN    SB2S        SET BYTE 2 IN EST
27775  M01S17268.242l642 ---|          STD    CM+2
27776  M01S17269.242l642 ---|          MONITOR  SEQM
27777  M01S17270.242l642 ---|          LCN    2
27778  M01S17271.242l642 ---|          RAD    CA
27779  M01S17272.242l642 ---|          LJM    ONE1        TURN ON THE CONTROL MODULE
27780  M01S17273.242l642 ---|
27781  M01S17274.242l642 ---| UPE2     LDD    T3+4
27782  M01S17275.242l642 ---|          LPN    MGUNL
27783  M01S17276.242l642 ---|          ZJN    UPE3        IF DEVICE NOT GLOBALLY UNLOADED
27784  M01S17277.242l642 ---|          LDC    4000+GDDV
27785  M01S17278.242l642 ---|          STD    AB+3        SET/CLEAR GLOBAL DOWN STATUS IN MST
27786  M01S17279.242l642 ---|          LDN    /1DS/SCDF
27787  M01S17280.242l642 ---|          JMP    KAR         PROCESS *1DS* REQUEST
27788  M01S17281.242l642 ---|
27789  M01S17282.242l642 ---| UPE3     JMP    KIE         *ILLEGAL ENTRY*
Line S00749 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
27790  M01S00749.242l642 +++|          COMMAND (DOWN/OFF/IDLE/ON EQUIPMENT COMMANDS.),CMR
Line S01028 Modification History
M01 (Added by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
27791  M01S01028.251l664 +++| DWM      SPACE  4,10
27792  M01S01029.251l664 +++|***       DOWN,MID=XX.
27793  M01S01030.251l664 +++|*
27794  M01S01031.251l664 +++|*         CONFIRM MACHINE ID XX IS IN THE *DOWN* STATE.
27795  M01S01032.251l664 +++|
27796  M01S01033.251l664 +++|
27797  M01S01034.251l664 +++|          ENTRY  DWM
27798  M01S01035.251l664 +++|          LDN    4
27799  M01S01036.251l664 +++|          RAD    CA
27800  M01S01037.251l664 +++|          LDK    EFRL        READ MAINFRAME STATE TABLE
27801  M01S01038.251l664 +++|          CRD    CM
27802  M01S01039.251l664 +++|          LDN    0
27803  M01S01040.251l664 +++|          STD    CM+2
27804  M01S01041.251l664 +++| DWM1     LDD    CM
27805  M01S01042.251l664 +++|          SHN    14
27806  M01S01043.251l664 +++|          LMD    CM+1
27807  M01S01044.251l664 +++|          ZJN    DWM2        IF NOT MMF MODE
27808  M01S01045.251l664 +++|          ADD    CM+2
27809  M01S01046.251l664 +++|          CRD    AB
27810  M01S01047.251l664 +++|          LDI    CA
27811  M01S01048.251l664 +++|          SHN    6
27812  M01S01049.251l664 +++|          ADM    1,CA
27813  M01S01050.251l664 +++|          LMD    AB
27814  M01S01051.251l664 +++|          ZJN    DWM3        IF MACHINE ID FOUND
27815  M01S01052.251l664 +++|          AOD    CM+2
27816  M01S01053.251l664 +++|          SBN    MXMF
27817  M01S01054.251l664 +++|          MJN    DWM1        IF NOT ALL MACHINES CHECKED
27818  M01S01055.251l664 +++| DWM2     JMP    KIE         *INCORRECT ENTRY*
27819  M01S01056.251l664 +++|
27820  M01S01057.251l664 +++| DWM3     LDD    AB+4
27821  M01S01058.251l664 +++|          LMN    MFD2
27822  M01S01059.251l664 +++|          NJN    DWM2        IF NOT IN PROPER *DOWN* STATE
27823  M01S01060.251l664 +++|          LDM    2,CA
27824  M01S01061.251l664 +++|          LMN    1R.
27825  M01S01062.251l664 +++|          NJN    DWM2        IF INCORRECT TERMINATOR
27826  M01S01063.251l664 +++|          LDN    MFDA        SET *DOWN ACKNOWLEGED* STATE
27827  M01S01064.251l664 +++|          STD    AB+4
27828  M01S01065.251l664 +++|          LDD    CM
27829  M01S01066.251l664 +++|          SHN    14
27830  M01S01067.251l664 +++|          LMD    CM+1
27831  M01S01068.251l664 +++|          ADD    CM+2
27832  M01S01069.251l664 +++|          CWD    AB
27833  M01S01070.251l664 +++|          LJM    KBR         SET COMMAND COMPLETE
Line S00750 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
27834  M01S00750.242l642 +++| DWE      SPACE  4,10
27835  M01S00751.242l642 +++|***       DOWN,EQ=XXX.
27836  M01S00752.242l642 +++|*
27837  M01S00753.242l642 +++|*         SET EST ORDINAL XXX TO THE *DOWN* STATE.
27838  M01S00754.242l642 +++|
27839  M01S00755.242l642 +++|
27840  M01S00756.242l642 +++|          ENTRY  DWE
27841  M01S00757.242l642 +++|          LDN    DWES        CHECK EST ENTRY
27842  M01S00758.242l642 +++|          RJM    CEN
Line S00759 Modification History
M01 (Added by) 242l642
M02 (Removed by) dsd43
Seq #  *Modification Id* Act 
----------------------------+
27843  M02S00759.dsd43   ---|          MJN    OFE1        IF MASS STORAGE DEVICE
Line S00001 Modification History
M01 (Added by) dsd43
Seq #  *Modification Id* Act 
----------------------------+
27844  M01S00001.dsd43   +++|          MJN    DWE1        IF MASS STORAGE DEVICE
Line S00760 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
27845  M01S00760.242l642 +++|          LDD    AB+4
Line S00761 Modification History
M01 (Added by) 242l642
M02 (Removed by) ns2424
Seq #  *Modification Id* Act 
----------------------------+
27846  M02S00761.ns2424  ---|          ZJN    OFE2        IF EQUIPMENT ZERO
Line S00001 Modification History
M01 (Added by) ns2424
Seq #  *Modification Id* Act 
----------------------------+
27847  M01S00001.ns2424  +++|          ZJN    OFE3        IF EQUIPMENT ZERO
Line S00762 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
27848  M01S00762.242l642 +++|          LDD    SR+4
Line S00763 Modification History
M01 (Added by) 242l642
M02 (Removed by) ns2424
Seq #  *Modification Id* Act 
----------------------------+
27849  M02S00763.ns2424  ---|          NJN    OFE2        IF DEVICE ASSIGNED
Line S00002 Modification History
M01 (Added by) ns2424
Seq #  *Modification Id* Act 
----------------------------+
27850  M01S00002.ns2424  +++|          NJN    OFE3        IF DEVICE ASSIGNED
Line S00764 Modification History
M01 (Added by) 242l642
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27851  M02S00764.282l826 ---|          LDM    AMTA
Line S00625 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27852  M01S00625.282l826 +++|          LDM    CENA
Line S00765 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
27853  M01S00765.242l642 +++|          LMC    2RCM
Line S00766 Modification History
M01 (Added by) 242l642
M02 (Removed by) ns2424
Seq #  *Modification Id* Act 
----------------------------+
27854  M02S00766.ns2424  ---|          NJN    IDE1        IF NOT CONTROL MODULE
Line S00003 Modification History
M01 (Added by) ns2424
Seq #  *Modification Id* Act 
----------------------------+
27855  M01S00003.ns2424  +++|          NJN    OFE2        IF NOT CONTROL MODULE
Line S00767 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
27856  M01S00767.242l642 +++|          LDC    /1DS/DCMF+/1DS/LOCK
27857  M01S00768.242l642 +++|          LJM    C1R1        CALL *1DS*
Line S00002 Modification History
M01 (Added by) dsd43
Seq #  *Modification Id* Act 
----------------------------+
27858  M01S00002.dsd43   +++|
Line S00003 Modification History
M01 (Added by) dsd43
M02 (Removed by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
27859  M02S00003.251l664 ---| DWE1     LDD    CM+4        DETERMINE IF BUFFERED DEVICE
27860  M02S00004.251l664 ---|          SHN    3
27861  M02S00005.251l664 ---|          ADN    DILL
27862  M02S00006.251l664 ---|          CRD    T1
27863  M02S00007.251l664 ---|          LDD    T1+3
27864  M02S00008.251l664 ---|          SHN    21-13
27865  M02S00009.251l664 ---|          MJN    OFE2        IF BUFFERED DEVICE
27866  M02S00010.251l664 ---|          UJN    IDE2        CALL *1DS*
Line S01071 Modification History
M01 (Added by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
27867  M01S01071.251l664 +++| DWE1     UJN    IDE2        CALL *1DS*
Line S00769 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
27868  M01S00769.242l642 +++| OFE      SPACE  4,10
27869  M01S00770.242l642 +++|***       OFF,EQ=XXX.
27870  M01S00771.242l642 +++|*
27871  M01S00772.242l642 +++|*         SET EST ORDINAL XXX TO THE *OFF* STATE.
27872  M01S00773.242l642 +++|
27873  M01S00774.242l642 +++|
27874  M01S00775.242l642 +++|          ENTRY  OFE
27875  M01S00776.242l642 +++|          LDN    OFES        CHECK EST ENTRY
27876  M01S00777.242l642 +++|          RJM    CEN
27877  M01S00778.242l642 +++| OFE1     MJN    IDE2        IF MASS STORAGE DEVICE
Line S00779 Modification History
M01 (Added by) 242l642
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27878  M02S00779.282l826 ---|          LDM    AMTA
Line S00626 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27879  M01S00626.282l826 +++|          LDM    CENA
Line S00780 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
27880  M01S00780.242l642 +++|          LMC    2RCM
Line S00781 Modification History
M01 (Added by) 242l642
M02 (Removed by) ns2424
Seq #  *Modification Id* Act 
----------------------------+
27881  M02S00781.ns2424  ---|          NJN    ONE1        IF NOT CONTROL MODULE
27882  M02S00782.ns2424  ---| OFE2     JMP    KIE         *INCORRECT ENTRY*
Line S00004 Modification History
M01 (Added by) ns2424
Seq #  *Modification Id* Act 
----------------------------+
27883  M01S00004.ns2424  +++| OFE2     NJN    ONE1        IF NOT CONTROL MODULE
27884  M01S00005.ns2424  +++| OFE3     JMP    KIE         *INCORRECT ENTRY*
Line S00783 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
27885  M01S00783.242l642 +++| IDE      SPACE  4,10
27886  M01S00784.242l642 +++|***       IDLE,EQ=XXX.
27887  M01S00785.242l642 +++|*
27888  M01S00786.242l642 +++|*         SET EST ORDINAL XXX TO THE *IDLE* STATE.
27889  M01S00787.242l642 +++|
27890  M01S00788.242l642 +++|
27891  M01S00789.242l642 +++|          ENTRY  IDE
27892  M01S00790.242l642 +++|          LDN    IDES        CHECK EST ENTRY
27893  M01S00791.242l642 +++|          RJM    CEN
Line S00792 Modification History
M01 (Added by) 242l642
M02 (Removed by) ns2424
Seq #  *Modification Id* Act 
----------------------------+
27894  M02S00792.ns2424  ---| IDE1     PJN    ONE1        IF NOT MASS STORAGE DEVICE
Line S00006 Modification History
M01 (Added by) ns2424
Seq #  *Modification Id* Act 
----------------------------+
27895  M01S00006.ns2424  +++|          PJN    OFE3        IF NOT MASS STORAGE DEVICE
Line S00793 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
27896  M01S00793.242l642 +++|          LDD    CM
27897  M01S00794.242l642 +++|          LPN    3           CHECK CURRENT STATE
27898  M01S00795.242l642 +++|*         LMN    0
27899  M01S00796.242l642 +++|          ZJN    ONE1        IF DEVICE *ON*
27900  M01S00797.242l642 +++| IDE2     LJM    C1R         CALL *1DS*
27901  M01S00798.242l642 +++| ONE      SPACE  4,10
27902  M01S00799.242l642 +++|***       ON,EQ=XXX.
27903  M01S00800.242l642 +++|*
27904  M01S00801.242l642 +++|*         SET EST ORDINAL XXX TO THE *ON* STATE.
27905  M01S00802.242l642 +++|
27906  M01S00803.242l642 +++|
27907  M01S00804.242l642 +++|          ENTRY  ONE
27908  M01S00805.242l642 +++|          LDN    ONES        CHECK EST ENTRY
27909  M01S00806.242l642 +++|          RJM    CEN
27910  M01S00807.242l642 +++|          PJN    ONE1        IF NOT MASS STORAGE DEVICE
27911  M01S00808.242l642 +++|          LDD    CM
27912  M01S00809.242l642 +++|          LPN    3           CHECK CURRENT STATE
27913  M01S00810.242l642 +++|          LMN    1
27914  M01S00811.242l642 +++|          NJN    IDE2        IF DEVICE NOT *IDLE*
Line S00812 Modification History
M01 (Added by) 242l642
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
27915  M02S00812.253l688 ---| ONE1     LDD    AB+3
Line S00975 Modification History
M01 (Added by) 253l688
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27916  M02S00975.282l826 ---| ONE1     LDM    AMTA
Line S00627 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27917  M01S00627.282l826 +++| ONE1     LDM    CENA
Line S00976 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
27918  M01S00976.253l688 +++|          LMC    2RCM
27919  M01S00977.253l688 +++|          NJN    ONE2        IF NOT CONTROL MODULE
27920  M01S00978.253l688 +++|          LDK    /1DS/OCMF
27921  M01S00979.253l688 +++|          LJM    C1R1        CALL *1DS*
27922  M01S00980.253l688 +++|
27923  M01S00981.253l688 +++| ONE2     LDD    AB+3
Line S00813 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
27924  M01S00813.242l642 +++|          STD    CM+2
27925  M01S00814.242l642 +++|          LDD    AB+4        CHANGE DEVICE STATE
27926  M01S00815.242l642 +++|          STD    CM+1
27927  M01S00816.242l642 +++|          MONITOR  SEQM
Line S00817 Modification History
M01 (Added by) 242l642
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27928  M02S00817.282l826 ---|*         LJM    AMT         ALERT MAGNET
Line S17283 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27929  M01S17283.282l826 ---| AMT      SPACE  4,10
27930  M01S17284.282l826 ---|**        AMT - ALERT *MAGNET*.
27931  M01S17285.282l826 ---|*
Line S17286 Modification History
M01 (Removed by) 242l642
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27932  M02S17286.282l826 ---|*         ENTRY  (AB+4) = 1/0, 1/N, 10/EQ.
27933  M02S17287.282l826 ---|*                            N = *ON* FLAG.
27934  M02S17288.282l826 ---|*                            EQ = EST ORDINAL.
27935  M02S17289.282l826 ---|*                (UPEA) = EQUIPMENT MNEUMONIC.
Line S00818 Modification History
M01 (Added by) 242l642
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27936  M02S00818.282l826 ---|*         ENTRY  (AMTA) = DEVICE MNEMONIC.
27937  M02S00819.282l826 ---|*                (AMTB) = EQUIPMENT / UNIT NUMBER (NON MS DEVICE).
Line S17290 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27938  M01S17290.282l826 ---|*
27939  M01S17291.282l826 ---|*         USES   CM - CM+4.
27940  M01S17292.282l826 ---|*
27941  M01S17293.282l826 ---|*         CALLS  CMT.
27942  M01S17294.282l826 ---|
27943  M01S17295.282l826 ---|
Line S17296 Modification History
M01 (Removed by) 242l642
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27944  M02S17296.282l826 ---| AMT      LDM    UPEA        CHECK EQUIPMENT TYPE
Line S00820 Modification History
M01 (Added by) 242l642
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27945  M02S00820.282l826 ---| AMT      LDC    *           CHECK DEVICE TYPE
27946  M02S00821.282l826 ---| AMTA     EQU    *-1
Line S17297 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27947  M01S17297.282l826 ---|          LMC    2RMT
27948  M01S17298.282l826 ---|          ZJN    AMT2        IF *MT*
27949  M01S17299.282l826 ---|          LMC    2RNT&2RMT
27950  M01S17300.282l826 ---|          ZJN    AMT2        IF *NT*
Line S00934 Modification History
M01 (Added by) 274l797
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27951  M02S00934.282l826 ---|          LMC    2RCT&2RNT
27952  M02S00935.282l826 ---|          ZJN    AMT2        IF *CT*
27953  M02S00936.282l826 ---|          LMC    2RAT&2RCT
27954  M02S00937.282l826 ---|          ZJN    AMT2        IF *AT*
Line S17301 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27955  M01S17301.282l826 ---| AMT1     JMP    KBR         RETURN
27956  M01S17302.282l826 ---|
27957  M01S17303.282l826 ---| AMT2     RJM    CMT         CHECK *MAGNET*
27958  M01S17304.282l826 ---|          ZJN    AMT1        IF *MAGNET* NOT ACTIVE
27959  M01S17305.282l826 ---| AMT3     LDD    T7          FIND UNIT IN UDT
27960  M01S17306.282l826 ---|          SHN    6
27961  M01S17307.282l826 ---|          ADD    T6
27962  M01S17308.282l826 ---|          ADN    /MTX/UST4
27963  M01S17309.282l826 ---|          CRD    AB          READ UST4
27964  M01S17310.282l826 ---|          LDD    AB+2        CHECK EST ORDINAL IN UDT
27965  M01S17311.282l826 ---|          LMC    **
Line S17312 Modification History
M01 (Removed by) 242l642
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27966  M02S17312.282l826 ---| AMTA     EQU    *-1         (UNIT NUMBER - SET BY CEN)
Line S00822 Modification History
M01 (Added by) 242l642
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27967  M02S00822.282l826 ---| AMTB     EQU    *-1
Line S17313 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27968  M01S17313.282l826 ---|          ZJN    AMT4        IF UNIT FOUND
27969  M01S17314.282l826 ---|          LDN    /MTX/UNITL  ADVANCE UDT ADDRESS
27970  M01S17315.282l826 ---|          RAD    T6
27971  M01S17316.282l826 ---|          SBD    T4
27972  M01S17317.282l826 ---|          MJN    AMT3        IF NOT END OF UNITS
27973  M01S17318.282l826 ---|          JMP    KIE         *ILLEGAL ENTRY*
27974  M01S17319.282l826 ---|
Line S17320 Modification History
M01 (Removed by) ns2424
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27975  M02S17320.282l826 ---| AMT4     LDK    ONES
27976  M02S17321.282l826 ---|          STD    AB+4
27977  M02S17322.282l826 ---|          LDD    T6          SET UDT ADDRESS
Line S00007 Modification History
M01 (Added by) ns2424
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27978  M02S00007.282l826 ---| AMT4     LDD    T6          SET UDT ADDRESS
Line S17323 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27979  M01S17323.282l826 ---|          STD    AB+1
Line S17324 Modification History
M01 (Removed by) ns2424
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27980  M02S17324.282l826 ---|          LDN    /MTX/XOF    ENTER ON TAPE UNIT FUNCTION
Line S00008 Modification History
M01 (Added by) ns2424
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27981  M02S00008.282l826 ---|          LDN    /MTX/XOF    ENTER ON/OFF/DOWN TAPE UNIT FUNCTION
Line S17325 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27982  M01S17325.282l826 ---|          STD    AB
27983  M01S17326.282l826 ---|          LDD    MA
27984  M01S17327.282l826 ---|          CWD    AB
27985  M01S17328.282l826 ---|          CRD    SP
27986  M01S17329.282l826 ---|          LDC    /1DS/EUFF+/1DS/LOCK
27987  M01S17330.282l826 ---|          JMP    KAR         PROCESS *1DS* CALL
Line S00628 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
27988  M01S00628.282l826 +++|          JMP    KBR         RETURN
Line S17331 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
27989  M01S17331.242l642 ---| CDS      SPACE  4,10
27990  M01S17332.242l642 ---|**        CDS - CHECK DEVICE STATUS.
27991  M01S17333.242l642 ---|*
27992  M01S17334.242l642 ---|*         ENTRY  (CM - CM+4) = EST ENTRY.
27993  M01S17335.242l642 ---|*
27994  M01S17336.242l642 ---|*         EXIT   (A) .LT. 0, IF DEVICE GLOBALLY UNLOADED.
27995  M01S17337.242l642 ---|*                    .GE. 0, IF DEVICE NOT GLOBALLY UNLOADED.
27996  M01S17338.242l642 ---|*                (T3 - T7) = MST WORD *ACGL* OF EST ORDINAL XXX.
27997  M01S17339.242l642 ---|*
27998  M01S17340.242l642 ---|*         USES   T3 - T7.
27999  M01S17341.242l642 ---|
28000  M01S17342.242l642 ---|
28001  M01S17343.242l642 ---| CDS      SUBR               ENTRY/EXIT
28002  M01S17344.242l642 ---|          LDD    CM+4        FETCH MST WORD *ACGL*
28003  M01S17345.242l642 ---|          SHN    3
28004  M01S17346.242l642 ---|          ADN    ACGL
28005  M01S17347.242l642 ---|          CRD    T3
28006  M01S17348.242l642 ---|          LDD    T3+4
28007  M01S17349.242l642 ---|          SHN    21-GUNL
28008  M01S17350.242l642 ---|          UJN    CDSX        EXIT WITH GLOBAL UNLOAD STATUS
Line S17351 Modification History
M01 (Removed by) dsd99
Seq #  *Modification Id* Act 
----------------------------+
28009  M01S17351.dsd99   ---| CEN      SPACE  4,10
Line S00001 Modification History
M01 (Added by) dsd99
Seq #  *Modification Id* Act 
----------------------------+
28010  M01S00001.dsd99   +++| CEN      SPACE  4,20
28011  M00S17352.dsd     +++|**        CEN - CHECK EST ORDINAL.
28012  M00S17353.dsd     +++|*
Line S17354 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
28013  M01S17354.242l642 ---|*         EXIT   (A) = (ONEA) = EST BYTE 0 OF EST ORDINAL XXX.
Line S00823 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
28014  M01S00823.242l642 +++|*         ENTRY  (A) = NEW DEVICE STATE.
28015  M01S00824.242l642 +++|*
28016  M01S00825.242l642 +++|*         EXIT   (A) = BYTE 0 OF EST ENTRY SHIFTED 21-13.
28017  M01S00826.242l642 +++|*                (AB+3) = *SCAF* SUBFUNCTION TO *1DS*.
Line S17355 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
28018  M01S17355.282l826 ---|*                (AB+4) = (AMTA) = EST ORDINAL.
Line S00629 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
28019  M01S00629.282l826 +++|*                (AB+4) = (CENA) = EST ORDINAL.
28020  M00S17356.dsd     +++|*                (CM - CM+4) = EST ENTRY.
Line S17357 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
28021  M01S17357.242l642 ---|*                (SR+4) = EJTO OF OWNER, IF ANY.
28022  M01S17358.242l642 ---|*                (UPEA) = EQUIPMENT MNEUMONIC.
28023  M01S17359.242l642 ---|*
28024  M01S17360.242l642 ---|*         USES   SR - SR+4, T3 - T7.
Line S00827 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
28025  M01S00827.242l642 +++|*                (SR - SR+4) = *EQAE* WORD OF EST ENTRY.
Line S00828 Modification History
M01 (Added by) 242l642
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
28026  M02S00828.282l826 ---|*                (AMTA) = DEVICE MNEMONIC.
28027  M02S00829.282l826 ---|*                (AMTB) = EQUIPMENT / UNIT NUMBER.
Line S00630 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
28028  M01S00630.282l826 +++|*                (CENA) = DEVICE MNEMONIC.
Line S00002 Modification History
M01 (Added by) dsd99
Seq #  *Modification Id* Act 
----------------------------+
28029  M01S00002.dsd99   +++|*                TO *KIE* IF ERROR.
Line S00830 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
28030  M01S00830.242l642 +++|*
Line S00831 Modification History
M01 (Added by) 242l642
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
28031  M02S00831.282l826 ---|*         USES   T7.
Line S00631 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
28032  M01S00631.282l826 +++|*         USES   CA, T7, AB+3, CM - CM+4, SR - SR+4.
28033  M00S17361.dsd     +++|*
28034  M00S17362.dsd     +++|*         CALLS  ASD.
28035  M00S17363.dsd     +++|*
28036  M00S17364.dsd     +++|*         MACROS SFA.
28037  M00S17365.dsd     +++|
28038  M00S17366.dsd     +++|
Line S17367 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
28039  M01S17367.242l642 ---| CEN1     JMP    KIE         ILLEGAL ENTRY
28040  M01S17368.242l642 ---|
28041  M01S17369.242l642 ---| CEN      SUBR               ENTRY/EXIT
Line S00832 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
28042  M01S00832.242l642 +++| CEN      SUBR               ENTRY/EXIT
28043  M01S00833.242l642 +++|          STD    T7
28044  M01S00834.242l642 +++|          LDN    3           ADVANCE KEYBOARD INDEX
28045  M01S00835.242l642 +++|          RAD    CA
28046  M00S17370.dsd     +++|          RJM    ASD         ASSEMBLE EST ORDINAL
28047  M00S17371.dsd     +++|          LDK    ESTP        READ EST POINTER
Line S17372 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
28048  M01S17372.242l642 ---|          CRD    T3
28049  M01S17373.242l642 ---|          LDD    AB+4        READ EST ENTRY
28050  M01S17374.242l642 ---|          STM    AMTA
28051  M01S17375.242l642 ---|          SBD    T3+2
Line S00836 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
28052  M01S00836.242l642 +++|          CRD    CM
28053  M01S00837.242l642 +++|          LDD    AB+4        CHECK ORDINAL
Line S00838 Modification History
M01 (Added by) 242l642
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
28054  M02S00838.282l826 ---|          STM    AMTB
Line S00003 Modification History
M01 (Added by) dsd99
Seq #  *Modification Id* Act 
----------------------------+
28055  M01S00003.dsd99   +++|          SBN    NOPE
28056  M01S00004.dsd99   +++|          MJN    CEN1        IF PSEUDO-EQUIPMENT
28057  M01S00005.dsd99   +++|          ADN    NOPE
Line S00839 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
28058  M01S00839.242l642 +++|          SBD    CM+2
28059  M00S17376.dsd     +++|          PJN    CEN1        IF ORDINAL BEYOND EST MAXIMUM
28060  M00S17377.dsd     +++|          SFA    EST,AB+4    READ EST ENTRY
28061  M00S17378.dsd     +++|          ADK    EQDE
28062  M00S17379.dsd     +++|          CRD    CM
28063  M00S17380.dsd     +++|          ADK    EQAE-EQDE   READ EQUIPMENT ASSIGNMENT
28064  M00S17381.dsd     +++|          CRD    SR
28065  M00S17382.dsd     +++|          LDD    CM+3
Line S17383 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
28066  M01S17383.242l642 ---|          ZJN    CEN1        IF NOT DEFINED
28067  M01S17384.242l642 ---|          LPC    3777
28068  M01S17385.242l642 ---|          STM    UPEA        SAVE EQUIPMENT TYPE
28069  M01S17386.242l642 ---|          LDD    CM
28070  M01S17387.242l642 ---|          STM    ONEA        SAVE MASS STORAGE FLAG
28071  M01S17388.242l642 ---|          UJN    CENX        EXIT
Line S00840 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
28072  M01S00840.242l642 +++|          NJN    CEN2        IF EQUIPMENT DEFINED
28073  M01S00841.242l642 +++| CEN1     JMP    KIE         *INCORRECT ENTRY*
28074  M01S00842.242l642 +++|
Line S00843 Modification History
M01 (Added by) 242l642
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
28075  M02S00843.252l678 ---| CEN2     LPC    3777        SAVE DEVICE MNEMONIC
28076  M02S00844.252l678 ---|          STM    AMTA
Line S00471 Modification History
M01 (Added by) 252l678
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
28077  M02S00471.282l826 ---| CEN2     STM    AMTA        SAVE DEVICE MNEMONIC
Line S00632 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
28078  M01S00632.282l826 +++| CEN2     STM    CENA        SAVE DEVICE MNEMONIC
Line S00845 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
28079  M01S00845.242l642 +++|          LDD    T7          CHECK CURRENT DEVICE STATE
28080  M01S00846.242l642 +++|          STD    AB+3
28081  M01S00847.242l642 +++|          LMD    CM
28082  M01S00848.242l642 +++|          ERRNZ  ONES-0      CODE DEPENDS ON VALUE
28083  M01S00849.242l642 +++|          ERRNZ  IDES-1      CODE DEPENDS ON VALUE
28084  M01S00850.242l642 +++|          ERRNZ  OFES-2      CODE DEPENDS ON VALUE
28085  M01S00851.242l642 +++|          ERRNZ  DWES-3      CODE DEPENDS ON VALUE
28086  M01S00852.242l642 +++|          LPN    3
28087  M01S00853.242l642 +++|          ZJN    CEN1        IF NO STATE CHANGE
28088  M01S00854.242l642 +++|          LMD    T7
28089  M01S00855.242l642 +++|          LMN    3
Line S00856 Modification History
M01 (Added by) 242l642
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
28090  M02S00856.252l678 ---|          NJN    CEN3        IF DEVICE NOT DOWN
Line S00472 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
28091  M01S00472.252l678 +++|          NJN    CEN4        IF DEVICE NOT DOWN
Line S00857 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
28092  M01S00857.242l642 +++|          LDD    SR+4
28093  M01S00858.242l642 +++|          NJN    CEN1        IF ASSIGNED
Line S00001 Modification History
M01 (Added by) dsd87
M02 (Removed by) dsd99
Seq #  *Modification Id* Act 
----------------------------+
28094  M02S00001.dsd99   ---|          LDD    AB+4
28095  M02S00002.dsd99   ---|          SBN    NOPE
28096  M02S00003.dsd99   ---|          MJN    CEN4        IF DEVICE WITH NO CHANNEL FIELDS DEFINED
Line S00859 Modification History
M01 (Added by) 242l642
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
28097  M02S00859.252l678 ---|          LDD    CM+1
28098  M02S00860.252l678 ---|          SHN    21-5
28099  M02S00861.252l678 ---|          PJN    CEN3        IF PRIMARY CHANNEL UP
28100  M02S00862.252l678 ---|          LPN    77
28101  M02S00863.252l678 ---|          ZJN    CEN1        IF NO SECOND CHANNEL
28102  M02S00864.252l678 ---|          SHN    21-5
28103  M02S00865.252l678 ---|          MJN    CEN1        IF SECOND CHANNEL DOWN
28104  M02S00866.252l678 ---| CEN3     LDD    CM
Line S00473 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
28105  M01S00473.252l678 +++|          LDN    CM
28106  M01S00474.252l678 +++|          STD    T0
28107  M01S00475.252l678 +++| CEN3     AOD    T0          ADVANCE CHANNEL BYTE INDEX
28108  M01S00476.252l678 +++|          LMN    CM+3
28109  M01S00477.252l678 +++|          ZJN    CEN1        IF BOTH POSSIBLE CHANNELS CHECKED
28110  M01S00478.252l678 +++|          LDI    T0
28111  M01S00479.252l678 +++|          SHN    -11         POSITION CHANNEL STATUS
28112  M01S00480.252l678 +++|          LMN    4
28113  M01S00481.252l678 +++|          NJN    CEN3        IF NOT UP AND ACCESSIBLE
28114  M01S00482.252l678 +++| CEN4     LDD    CM
Line S00867 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
28115  M01S00867.242l642 +++|          SHN    21-13
28116  M01S00868.242l642 +++|          LJM    CENX        RETURN
Line S00633 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
28117  M01S00633.282l826 +++|
28118  M01S00634.282l826 +++|
28119  M01S00635.282l826 +++| CENA     CON    0           DEVICE MNEMONIC
28120  M00S17389.dsd     +++| C1R      SPACE  4,10
28121  M00S17390.dsd     +++|**        C1R - CALL *1DS* AND REENTER.
28122  M00S17391.dsd     +++|*
28123  M00S17392.dsd     +++|*         USES   CM - CM+4.
28124  M00S17393.dsd     +++|*
28125  M00S17394.dsd     +++|*         CALLS  C1D.
28126  M00S17395.dsd     +++|
28127  M00S17396.dsd     +++|
Line S17397 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
28128  M01S17397.242l642 ---| C1R2     JMP    KIE         ILLEGAL ENTRY
28129  M01S17398.242l642 ---|
28130  M01S17399.242l642 ---| C1R      LDC    /1DS/UDDF&/1DS/LOCK
28131  M01S17400.242l642 ---|          RJM    C1D         PROCESS *1DS* CALL
28132  M01S17401.242l642 ---|          LDC    C1R1        SET REENTRY ADDRESS
28133  M01S17402.242l642 ---|          STM    /KEYBOARD/KCRB
28134  M01S17403.242l642 ---| C1R1     LDC    /1DS/DSDL
Line S00869 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
28135  M01S00869.242l642 +++| C1R3     JMP    KIE         INCORRECT ENTRY
28136  M01S00870.242l642 +++|
28137  M01S00871.242l642 +++| C1R      LDC    /1DS/SCDF+/1DS/LOCK  PROCESS *1DS* CALL
28138  M01S00872.242l642 +++| C1R1     RJM    C1D
28139  M01S00873.242l642 +++|          LDC    C1R2        SET REENTRY ADDRESS
28140  M01S00874.242l642 +++|          STM    /KEYBOARD/KCRB
28141  M01S00875.242l642 +++| C1R2     LDC    /1DS/DSDL
28142  M00S17404.dsd     +++|          CRD    CM
28143  M00S17405.dsd     +++|          LDD    CM
28144  M00S17406.dsd     +++|          NJP    CLP1        IF *1DS* NOT COMPLETE
28145  M00S17407.dsd     +++|          LDC    /1DS/DSDL+1
28146  M00S17408.dsd     +++|          CRD    CM
28147  M00S17409.dsd     +++|          LDD    CM
Line S17410 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
28148  M01S17410.242l642 ---|          NJN    C1R2        IF NOT SUCCESSFUL
28149  M01S17411.242l642 ---|          JMP    KBR         RETURN
28150  M01S17412.242l642 ---| SCB      SPACE  4,10
28151  M01S17413.242l642 ---|**        SCB - SET/CLEAR DOWN BIT IN EST.
28152  M01S17414.242l642 ---|*
28153  M01S17415.242l642 ---|*         ENTRY  (A) = SETTING/CLEARING BIT MASK.
28154  M01S17416.242l642 ---|*
28155  M01S17417.242l642 ---|*         EXIT   DOWN BIT SET/CLEARED IN EST.
28156  M01S17418.242l642 ---|*
28157  M01S17419.242l642 ---|*         USES   CM - CM+4.
28158  M01S17420.242l642 ---|*
28159  M01S17421.242l642 ---|*         MACROS MONITOR.
28160  M01S17422.242l642 ---|
28161  M01S17423.242l642 ---|
28162  M01S17424.242l642 ---| SCB      SUBR               ENTRY/EXIT
28163  M01S17425.242l642 ---|          STD    CM+4        SAVE SETTING/CLEARING BIT MASK
28164  M01S17426.242l642 ---|          LCN    40          SET DOWN BIT CLEARING MASK
28165  M01S17427.242l642 ---|          STD    CM+3
28166  M01S17428.242l642 ---|          LDN    SB0S        SET BYTE 0 IN EST
28167  M01S17429.242l642 ---|          STD    CM+2
28168  M01S17430.242l642 ---|          LDD    AB+4        SET EST ORDINAL
28169  M01S17431.242l642 ---|          STD    CM+1
28170  M01S17432.242l642 ---|          MONITOR  SEQM
28171  M01S17433.242l642 ---|          UJN    SCBX        EXIT
Line S00876 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
28172  M01S00876.242l642 +++|          NJN    C1R3        IF INVALID CALL
28173  M01S00877.242l642 +++|          JMP    KBR         RETURN
28174  M00S17434.dsd     +++|          SPACE  4,10
Line S17435 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
28175  M01S17435.274l797 ---|          USE    END         DUMP LITERALS BLOCK
Line S00938 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
28176  M01S00938.274l797 +++|          CMDEND
Line S17436 Modification History
M01 (Removed by) dsd38
Seq #  *Modification Id* Act 
----------------------------+
28177  M01S17436.dsd38   ---|          COMMAND (ENTER TIME.)
Line S00008 Modification History
M01 (Added by) dsd38
Seq #  *Modification Id* Act 
----------------------------+
28178  M01S00008.dsd38   +++|          COMMAND  (ENTER TIME.),CMR
28179  M00S17437.dsd     +++| TIM      SPACE  4,10
28180  M00S17438.dsd     +++|**        SYNTAX TABLE.
28181  M00S17439.dsd     +++|
28182  M00S17440.dsd     +++|
28183  M00S17441.dsd     +++|          ENTRY  TIM
28184  M00S17442.dsd     +++|
Line S17443 Modification History
M01 (Removed by) dsd110
Seq #  *Modification Id* Act 
----------------------------+
28185  M01S17443.dsd110  ---| TME      ENTER  (TIME. <02<09.<05<09.<05<09.)
Line S00205 Modification History
M01 (Added by) dsd110
Seq #  *Modification Id* Act 
----------------------------+
28186  M01S00205.dsd110  +++| TME      ENTER  (TIME. <02<09.<05<09.<05<09.),,SDF,ERL
28187  M00S17444.dsd     +++|
28188  M00S17445.dsd     +++|          ENTRY  DAT
28189  M00S17446.dsd     +++|
Line S17447 Modification History
M01 (Removed by) dsd110
Seq #  *Modification Id* Act 
----------------------------+
28190  M01S17447.dsd110  ---| DTE      ENTER  (DATE. <09<09/<01<09/<03<09.)
Line S00206 Modification History
M01 (Added by) dsd110
Seq #  *Modification Id* Act 
----------------------------+
28191  M01S00206.dsd110  +++| DTE      ENTER  (DATE. <09<09/<01<09/<03<09.),,SDF,ERL
28192  M00S17448.dsd     +++|
28193  M00S17449.dsd     +++|          CON    0           END OF TABLE
28194  M00S17450.dsd     +++| PD       SPACE  4,10
28195  M00S17451.dsd     +++|**        DIRECT CELLS.
28196  M00S17452.dsd     +++|
28197  M00S17453.dsd     +++|
28198  M00S17454.dsd     +++| PD       EQU    SR          PACKED DATE AND TIME
28199  M00S17455.dsd     +++| TME      SPACE  4,10
28200  M00S17456.dsd     +++|***       TIME. HH.MM.SS.
28201  M00S17457.dsd     +++|*
28202  M00S17458.dsd     +++|*         ENTER SYSTEM TIME.
28203  M00S17459.dsd     +++|
28204  M00S17460.dsd     +++|
28205  M00S17461.dsd     +++|          ENTRY  TME
28206  M00S17462.dsd     +++|          LDK    JDAL        READ DATE
28207  M00S17463.dsd     +++|          CRM    JDAT,ON
28208  M00S17464.dsd     +++|          LDM    KBUF+6      CHECK LEADING HOUR
28209  M00S17465.dsd     +++|          LMN    1R2
28210  M00S17466.dsd     +++|          NJN    TME1        IF NOT *2*
28211  M00S17467.dsd     +++|          LDM    KBUF+7      CHECK NEXT HOUR
28212  M00S17468.dsd     +++|          SBN    1R4
28213  M00S17469.dsd     +++|          MJN    TME1        IF .LE. 3
28214  M00S17470.dsd     +++|          JMP    KIE         *INCORRECT ENTRY*
28215  M00S17471.dsd     +++|
28216  M00S17472.dsd     +++| TME1     LDN    4           SET ACCOUNT LOGGING BIT
28217  M00S17473.dsd     +++|          RAM    /KEYBOARD/LKBA
28218  M00S17474.dsd     +++|          LDN    0
28219  M00S17475.dsd     +++|          RJM    C1D         CHECK FOR COMMAND LOGGING
28220  M00S17476.dsd     +++|          LDC    TME1.1      SET REENTRY ADDRESS
28221  M00S17477.dsd     +++|          STM    /KEYBOARD/KCRB
28222  M00S17478.dsd     +++| TME1.1   LDC    /1DS/DSDL
28223  M00S17479.dsd     +++|          CRD    CM
28224  M00S17480.dsd     +++|          LDD    CM
28225  M00S17481.dsd     +++|          ZJN    TME1.2      IF *1DS* COMPLETE
28226  M00S17482.dsd     +++|          LJM    CLP1        REENTER
28227  M00S17483.dsd     +++|
28228  M00S17484.dsd     +++| TME1.2   LDN    PDTL        READ PACKED DATE AND TIME
28229  M00S17485.dsd     +++|          CRD    PD
28230  M00S17486.dsd     +++|          LDK    DTEL        READ DATE
28231  M00S17487.dsd     +++|          CRD    DT
28232  M00S17488.dsd     +++|          LDC    TMEA        ASSEMBLE TIME
28233  M00S17489.dsd     +++|          STD    T1          SET ASSEMBLY
28234  M00S17490.dsd     +++|          LDC    KBUF+5      SET CHARACTER ADDRESS
28235  M00S17491.dsd     +++|          STD    T2
28236  M00S17492.dsd     +++|          STD    CA
28237  M00S17493.dsd     +++| TME2     LDI    T2
28238  M00S17494.dsd     +++|          SHN    6
28239  M00S17495.dsd     +++|          LMM    1,T2
28240  M00S17496.dsd     +++|          STI    T1
28241  M00S17497.dsd     +++|          AOD    T1
28242  M00S17498.dsd     +++|          LDN    2
28243  M00S17499.dsd     +++|          RAD    T2
28244  M00S17500.dsd     +++|          LMC    KBUF+5+2*5
28245  M00S17501.dsd     +++|          NJN    TME2        IF MORE CHARACTERS
28246  M00S17502.dsd     +++|          LDD    PD+3        CLEAR HOURS
28247  M00S17503.dsd     +++|          SCN    77
28248  M00S17504.dsd     +++|          STD    PD+3
28249  M00S17505.dsd     +++|          RJM    ADD         ASSEMBLE HOURS
28250  M00S17506.dsd     +++|          RAD    PD+3
28251  M00S17507.dsd     +++|          AOD    CA          ASSEMBLE MINUTES
28252  M00S17508.dsd     +++|          RJM    ADD
28253  M00S17509.dsd     +++|          SHN    6
28254  M00S17510.dsd     +++|          STD    PD+4
28255  M00S17511.dsd     +++|          AOD    CA          ASSEMBLE SECONDS
28256  M00S17512.dsd     +++|          RJM    ADD
28257  M00S17513.dsd     +++|          RAD    PD+4
28258  M00S17514.dsd     +++|          LDN    ZERL
28259  M00S17515.dsd     +++|          CRD    AB
28260  M00S17516.dsd     +++|          CRD    CM
28261  M00S17517.dsd     +++|          LDD    MA
28262  M00S17518.dsd     +++|          ADN    1
28263  M00S17519.dsd     +++|          STD    CM+2
28264  M00S17520.dsd     +++|          CWM    JDAT,ON     WRITE DATE AND TIME WORDS TO BUFFER
28265  M00S17521.dsd     +++|          CWD    PD
28266  M00S17522.dsd     +++|          ADN    1
28267  M00S17523.dsd     +++|          CWM    TMEA,ON
28268  M00S17524.dsd     +++|          CWD    DT
28269  M00S17525.dsd     +++|          ADN    1           WRITE DAY LIMIT (UNCHANGED)
28270  M00S17526.dsd     +++|          CWD    AB
Line S17527 Modification History
M01 (Removed by) ns2418
Seq #  *Modification Id* Act 
----------------------------+
28271  M01S17527.ns2418  ---|          LDN    CFGL        DETERMINE IF WALL CLOCK CHIP PRESENT
28272  M01S17528.ns2418  ---|          CRD    AB
28273  M01S17529.ns2418  ---|          LDD    AB+3
28274  M01S17530.ns2418  ---|          SHN    0-13
28275  M01S17531.ns2418  ---|          ZJN    TME3        IF WALL CLOCK CHIP NOT PRESENT
28276  M01S17532.ns2418  ---|          LDN    UWCF        SET UPDATE WALL CLOCK FLAG
28277  M01S17533.ns2418  ---| TME3     STD    CM+4
Line S00030 Modification History
M01 (Added by) ns2418
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
28278  M02S00030.253l688 ---|          LDK    MABL        CHECK MAINFRAME TYPE
28279  M02S00031.253l688 ---|          CRD    AB
28280  M02S00032.253l688 ---|          LDD    AB+1
28281  M02S00033.253l688 ---|          LPC    4100
28282  M02S00034.253l688 ---|          LMD    HN
28283  M02S00035.253l688 ---|          ZJN    TME3        IF CYBER 180
28284  M02S00036.253l688 ---|          LCN    UCCF
28285  M02S00037.253l688 ---| TME3     ADN    UCCF        SET FLAG TO UPDATE CTI CLOCK
28286  M02S00038.253l688 ---|          STD    CM+4
Line S17534 Modification History
M01 (Removed by) ns2726
Seq #  *Modification Id* Act 
----------------------------+
28287  M01S17534.ns2726  ---|          LDN    2           SET SUBFUNCTION
Line S00023 Modification History
M01 (Added by) ns2726
Seq #  *Modification Id* Act 
----------------------------+
28288  M01S00023.ns2726  +++|          LDN    EDTS        SET SUBFUNCTION
28289  M00S17535.dsd     +++|          STD    CM+1
28290  M00S17536.dsd     +++|          MONITOR DSRM       ENTER DATE/TIME
28291  M00S17537.dsd     +++|          JMP    KBR         RETURN
28292  M00S17538.dsd     +++|
28293  M00S17539.dsd     +++| TMEA     BSS    5           ASSEMBLY BUFFER FOR TIME
28294  M00S17540.dsd     +++| ADD      SPACE  4,10
28295  M00S17541.dsd     +++|**        ADD - ASSEMBLE DECIMAL DIGITS.
28296  M00S17542.dsd     +++|*
28297  M00S17543.dsd     +++|*         ENTRY  (CA) = CHARACTER ADDRESS.
28298  M00S17544.dsd     +++|*
28299  M00S17545.dsd     +++|*         EXIT   (A) = ASSEMBLY.
28300  M00S17546.dsd     +++|*                (CA) ADVANCED.
28301  M00S17547.dsd     +++|*
28302  M00S17548.dsd     +++|*         USES   CA, T0.
28303  M00S17549.dsd     +++|
28304  M00S17550.dsd     +++|
28305  M00S17551.dsd     +++| ADD      SUBR               ENTRY/EXIT
28306  M00S17552.dsd     +++|          AOD    CA
28307  M00S17553.dsd     +++|          LDI    CA          UPPER DIGIT * 10
28308  M00S17554.dsd     +++|          SBN    1R0
28309  M00S17555.dsd     +++|          STD    T0
28310  M00S17556.dsd     +++|          SHN    2
28311  M00S17557.dsd     +++|          ADD    T0
28312  M00S17558.dsd     +++|          SHN    1
28313  M00S17559.dsd     +++|          STD    T0
28314  M00S17560.dsd     +++|          AOD    CA          ADD LOWER DIGIT
28315  M00S17561.dsd     +++|          LDI    CA
28316  M00S17562.dsd     +++|          SBN    1R0
28317  M00S17563.dsd     +++|          ADD    T0
28318  M00S17564.dsd     +++|          UJN    ADDX        RETURN
Line S00939 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
28319  M01S00939.274l797 +++|          SPACE  4,10
28320  M01S00940.274l797 +++|          CMDEND
Line S17565 Modification History
M01 (Removed by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
28321  M01S17565.251l664 ---|          COMMAND  (JOB CONTROL REQUESTS.),CMR
Proceed to Part 21
cdc/nos2.source/opl.opl871/deck/dsd.020.txt ยท Last modified: by 127.0.0.1