User Tools

Site Tools


cdc:nos2.source:opl.opl871:deck:1xd.003

Deck 1XD Part 003

12 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
Line S02285 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
03311  M02S02285.ns2769  ---|          RAD    WB+4
Line S02286 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
03312  M02S02286.ns2769  ---| IDM6     SOD    WB+4        CLEAR *EMB* INTERLOCK
Line S02287 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
03313  M02S02287.ns2769  ---|          EMBE   *
Line S02288 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
03314  M02S02288.ns2769  ---|          LDC    0           UPDATE *EMB* INFORMATION
Line S02289 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
03315  M02S02289.ns2769  ---|          CWD    WB
03316  M01S00008.ns2769  +++|          RJM    IMB         ISSUE MESSAGE TO BUFFER
03317  M01S02290.1xd     +++|          RJM    UEC         UPDATE MST ERROR COUNT
03318  M01S02291.1xd     +++|          LDC    MSGP
03319  M01S02292.1xd     +++|          STML   MAD1        RESTORE BML ERROR MESSAGE ADDRESS
03320  M01S02293.1xd     +++|          LDN    0
03321  M01S02294.1xd     +++|          STM    MISC        CLEAR UNRECOVERED ERROR STATUS
03322  M01S02295.1xd     +++|*         LDN    0
03323  M01S02296.1xd     +++|          LJM    IDMX        RETURN
03324  M01S00009.ns2769  +++|
03325  M01S00010.ns2769  +++|
03326  M01S00011.ns2769  +++| MAD1     CONL   MSGP        MESSAGE ADDRESS (MAY BE SET BY CALLER)
Line S02297 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
03327  M02S02297.ns2769  ---|
Line S02298 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
03328  M02S02298.ns2769  ---|
Line S02299 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
03329  M02S02299.ns2769  ---| IDMC     VFD    18/3L1MD,42/1    *1MD* CALL
03330  M01S02300.1xd     +++| IDU      SPACE  4,15
03331  M01S02301.1xd     +++|**        IDU - INTERLOCK DISK UNIT.
03332  M01S02302.1xd     +++|*
03333  M01S02303.1xd     +++|*         ENTRY  (CB) = *CBT* ORDINAL IF I/O REQUEST.
03334  M01S02304.1xd     +++|*                (EO) = EST ORDINAL.
03335  M01S02305.1xd     +++|*
03336  M01S02306.1xd     +++|*         EXIT   (A) = 0 IF UNIT INTERLOCKED.
03337  M01S02307.1xd     +++|*
Line S02308 Modification History
M01 (Added by) 1xd
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
03338  M02S02308.272l774 ---|*         USES   T2, T7, CM - CM+4.
03339  M01S00094.272l774 +++|*         USES   T2, CM - CM+4, T7 - T7+4.
03340  M01S02309.1xd     +++|*
03341  M01S02310.1xd     +++|*         CALLS  SUI.
03342  M01S02311.1xd     +++|*
03343  M01S02312.1xd     +++|*         MACROS CBTE, SFA.
03344  M01S02313.1xd     +++|
03345  M01S02314.1xd     +++|
03346  M01S02315.1xd     +++| IDU6     RJM    SUI         SET UNIT INTERLOCK
03347  M01S02316.1xd     +++|
03348  M01S02317.1xd     +++| IDU      SUBR               ENTRY/EXIT
Line S00138 Modification History
M01 (Added by) ns2714
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
03349  M02S00138.272l774 ---|          LDM    RQLN
03350  M01S00095.272l774 +++|          LDM    RQLN,DI
03351  M01S00139.ns2714  +++|          SHN    0-13        CHECK UNIT RESERVED
03352  M01S00140.ns2714  +++|          LMN    1
03353  M01S00141.ns2714  +++|          ZJN    IDUX        IF UNIT INTERLOCKED
03354  M01S02318.1xd     +++|          LDC    0
03355  M01S02319.1xd     +++| CHRQ     EQU    *-1
03356  M01S02320.1xd     +++|          NJN    IDUX        IF CHANNEL REQUESTED
Line S02321 Modification History
M01 (Added by) 1xd
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
03357  M02S02321.272l774 ---|          STM    LCMD
03358  M01S00096.272l774 +++|          STM    LCMD,DI
03359  M01S02322.1xd     +++|          SFA    EST,EO      CALCULATE EST ADDRESS
03360  M01S02323.1xd     +++|          ADK    EQDE
03361  M01S02324.1xd     +++|          CRD    CM          READ *EQDE* WORD
03362  M01S02325.1xd     +++|
03363  M01S02326.1xd     +++|*         CHECK EST ENTRY FOR CHANNEL DOWN.
03364  M01S02327.1xd     +++|
03365  M01S02328.1xd     +++|          LDD    CM+1        EXTRACT CHANNEL
03366  M01S02329.1xd     +++|          LMD    IR+4
03367  M01S02330.1xd     +++|          LPN    77
03368  M01S02331.1xd     +++|          ZJN    IDU1        IF PATH SERVICED BY THIS DRIVER
03369  M01S02332.1xd     +++|          LDN    1
03370  M01S02333.1xd     +++| IDU1     ADN    CM+1        SET CHANNEL BYTE ADDRESS
03371  M01S02334.1xd     +++|          STD    T2
03372  M01S02335.1xd     +++|          LDI    T2          CHECK CHANNEL STATE
03373  M01S02336.1xd     +++|          SHN    -11
03374  M01S02337.1xd     +++|          LMN    4
03375  M01S02338.1xd     +++| IDU2     ZJN    IDU6        IF CHANNEL UP AND AVAILABLE
03376  M01S02339.1xd     +++|          SCN    1
03377  M01S02340.1xd     +++| IDU3     NJN    IDUX        IF CHANNEL DOWN OR NOT ENABLED
03378  M01S02341.1xd     +++|          LDD    CB
Line S02342 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
03379  M02S02342.1xd5    ---|          ZJN    IDU4        IF NOT I/O REQUEST
03380  M01S00499.1xd5    +++|          ZJP    IDU6        IF NOT I/O REQUEST
03381  M01S02343.1xd     +++|          SHN    CBTLS
03382  M01S02344.1xd     +++|          CBTE   *
03383  M01S02345.1xd     +++|          ADC    PAD4        GET CHANNEL FROM CBT ENTRY
03384  M01S02346.1xd     +++|          CRD    T7
03385  M01S02347.1xd     +++|          ADN    HSLK-PAD4   GET CHANNEL SELECT STATUS
03386  M01S02348.1xd     +++|          CRD    CM
03387  M01S02349.1xd     +++|          LDD    CM          CHECK ERROR FLAGS
03388  M01S02350.1xd     +++|          SHN    0-12
03389  M01S02351.1xd     +++|          ZJN    IDU4        IF NOT CHANNEL SPECIFIC REQUEST
03390  M01S02352.1xd     +++|          LDD    T7
03391  M01S02353.1xd     +++|          SHN    -6          CHECK CHANNEL
03392  M01S02354.1xd     +++|          LMD    IR+4
03393  M01S02355.1xd     +++|          ZJN    IDU2        IF REQUEST FOR THIS DRIVER
03394  M01S02356.1xd     +++| IDU4     LDN    1
03395  M01S02357.1xd     +++|          UJN    IDU3        RETURN
03396  M01S02358.1xd     +++| IIO      SPACE  4,15
03397  M01S02359.1xd     +++|**        IIO - INITIATE I/O.
03398  M01S02360.1xd     +++|*
03399  M01S02361.1xd     +++|*         ENTRY  (A) = (CB) = *CBT* ORDINAL.
03400  M01S02362.1xd     +++|*
03401  M01S02363.1xd     +++|*         EXIT   (A) = 0 IF I/O DISABLED ON THIS CHANNEL.
03402  M01S02364.1xd     +++|*                (RW) = READ / WRITE STATUS.
03403  M01S02365.1xd     +++|*                (PA) = PROCESSOR ADDRESS.
03404  M01S02366.1xd     +++|*                (NR - NR+4) = PHYSICAL ADDRESS OF REQUEST.
03405  M01S02367.1xd     +++|*
Line S02368 Modification History
M01 (Added by) 1xd
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
03406  M02S02368.272l774 ---|*         USES   T1 - T7.
03407  M01S00097.272l774 +++|*         USES   PA, RW, NR - NR+4, T1 - T7.
03408  M01S02369.1xd     +++|*
03409  M01S02370.1xd     +++|*         CALLS  PEF.
03410  M01S02371.1xd     +++|*
03411  M01S02372.1xd     +++|*         MACROS CBTE.
03412  M01S02373.1xd     +++|
03413  M01S02374.1xd     +++|
Line S02375 Modification History
M01 (Added by) 1xd
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
03414  M02S02375.272l774 ---| IIO3     STD    PA
03415  M01S00098.272l774 +++| IIO4     STD    PA
03416  M01S02376.1xd     +++|          SCN    77          SET I/O DISABLED STATUS
03417  M01S02377.1xd     +++|
03418  M01S02378.1xd     +++| IIO      SUBR               ENTRY/EXIT
03419  M01S02379.1xd     +++|          SHN    CBTLS
03420  M01S02380.1xd     +++|          CBTE   *
03421  M01S02381.1xd     +++|          ADC    PAD1        FETCH SEEK PARAMETERS FROM *CBT*
03422  M01S02382.1xd     +++|          CRD    NR
03423  M01S02383.1xd     +++|          ADN    PAD4-PAD1   GET CHANNEL FROM CBT ENTRY
03424  M01S02384.1xd     +++|          CRD    T1
03425  M01S02385.1xd     +++|          ADN    HSLK-PAD4   GET CHANNEL SELECT STATUS
03426  M01S02386.1xd     +++|          CRD    T2
03427  M01S02387.1xd     +++|          SBN    HSLK-IOLK   GET READ / WRITE FLAG
03428  M01S02388.1xd     +++|          CRD    T3
03429  M01S02389.1xd     +++|          LDD    T2          CHECK ERROR FLAGS
03430  M01S02390.1xd     +++|          SHN    0-12
Line S02391 Modification History
M01 (Added by) 1xd
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
03431  M02S02391.272l774 ---|          ZJN    IIO2        IF NO FLAGS
03432  M01S00099.272l774 +++|          ZJN    IIO1        IF NO FLAGS
03433  M01S02392.1xd     +++|          SHN    -1
03434  M01S02393.1xd     +++|          STD    RW          PROCESS ERROR FLAGS
03435  M01S02394.1xd     +++|          RJM    PEF
Line S02395 Modification History
M01 (Added by) 1xd
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
03436  M02S02395.272l774 ---| IIO1     NJN    IIO3        IF I/O PREPROCESSING INDICATED
Line S02396 Modification History
M01 (Added by) 1xd
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
03437  M02S02396.272l774 ---| IIO2     LDD    NR+1
03438  M01S00100.272l774 +++|          NJN    IIO4        IF I/O PREPROCESSING INDICATED
03439  M01S00101.272l774 +++| IIO1     LDD    NR+1
03440  M01S02397.1xd     +++|          STM    CPBF+FCP+3  SET CYLINDER IN COMMAND PACKET
Line S02398 Modification History
M01 (Added by) 1xd
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
03441  M02S02398.272l774 ---|          STM    CYLN
03442  M01S00102.272l774 +++|          STM    CYLN,DI
03443  M01S00103.272l774 +++|          ADN    2
03444  M01S00104.272l774 +++|          SBK    CYUN
03445  M01S00105.272l774 +++|          PJN    IIO2        IF WITHIN LAST TWO CYLINDERS OF DEVICE
03446  M01S00106.272l774 +++|          LDK    MXSS        MAXIMUM SECTOR COUNT TO STREAM
03447  M01S00107.272l774 +++|          UJN    IIO3        SET SECTOR COUNT
03448  M01S00108.272l774 +++|
03449  M01S00109.272l774 +++| IIO2     LDK    MNSS        MINIMUM SECTOR COUNT TO STREAM
03450  M01S00110.272l774 +++| IIO3     STML   CPBF+FCP+2  SECTOR COUNT / STREAM LIMIT
03451  M01S02399.1xd     +++|          LDD    NR+2
Line S02400 Modification History
M01 (Added by) 1xd
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
03452  M02S02400.272l774 ---|          STM    TKSN        TRACK + SECTOR
03453  M01S00111.272l774 +++|          STM    TKSN,DI     TRACK + SECTOR
03454  M01S02401.1xd     +++|          SCN    77
03455  M01S02402.1xd     +++|          SHN    2
03456  M01S02403.1xd     +++|          LMD    NR+2        SEPARATE INTO 8 BIT FIELDS
03457  M01S02404.1xd     +++|          SCN    77
03458  M01S02405.1xd     +++|          LMD    NR+2        SET IN COMMAND PACKET
03459  M01S02406.1xd     +++|          STML   CPBF+FCP+4
03460  M01S02407.1xd     +++|          LDD    T3
03461  M01S02408.1xd     +++|          SHN    22-11       EXTRACT WRITE DATA FLAG
03462  M01S02409.1xd     +++|          LPN    1
Line S02410 Modification History
M01 (Added by) 1xd
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
03463  M02S02410.272l774 ---|          STM    RWST        SET READ / WRITE STATUS
03464  M01S00112.272l774 +++|          STM    RWST,DI     SET READ / WRITE STATUS
03465  M01S02411.1xd     +++|          STD    RW
03466  M01S02412.1xd     +++|          LDC    PIO
Line S02413 Modification History
M01 (Added by) 1xd
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
03467  M02S02413.272l774 ---|          UJN    IIO1        SET PROCESSOR ADDRESS
03468  M01S00113.272l774 +++|          LJM    IIO4        SET PROCESSOR ADDRESS
03469  M01S00142.ns2714  +++| IMF      SPACE  4,10
03470  M01S00143.ns2714  +++|**        IMF - ISSUE MONITOR FUNCTION.
03471  M01S00144.ns2714  +++|*
03472  M01S00145.ns2714  +++|*         ENTRY  (A) = FUNCTION.
03473  M01S00146.ns2714  +++|*
03474  M01S00147.ns2714  +++|*         EXIT   (A) = 0.
03475  M01S00148.ns2714  +++|*
03476  M01S00149.ns2714  +++|*         USES   CM.
03477  M01S00150.ns2714  +++|*
03478  M01S00151.ns2714  +++|*         CALLS  CMC, FTN.
03479  M01S00152.ns2714  +++|
03480  M01S00153.ns2714  +++|
03481  M01S00154.ns2714  +++| IMF1     RJM    CMC         WAIT MONITOR COMPLETE
03482  M01S00155.ns2714  +++|          LDD    CM
03483  M01S00156.ns2714  +++|          RJM    FTN         ISSUE MONITOR FUNCTION
03484  M01S00157.ns2714  +++|
03485  M01S00158.ns2714  +++| IMF      SUBR               ENTRY/EXIT
03486  M01S00159.ns2714  +++|          STD    CM
03487  M01S00160.ns2714  +++|          UJN    IMF1        CHECK OUTPUT REGISTER
03488  M01S02414.1xd     +++| IMR      SPACE  4,15
03489  M01S02415.1xd     +++|**        IMR - INITIATE MONITOR REQUEST.
03490  M01S02416.1xd     +++|*
03491  M01S02417.1xd     +++|*         ENTRY  (A) = *BIOM* SUBFUNCTION.
03492  M01S02418.1xd     +++|*                (WB+3 - WB+4) = *BIOM* PARAMETERS.
03493  M01S02419.1xd     +++|*
03494  M01S02420.1xd     +++|*         EXIT   (A) = 0.
03495  M01S02421.1xd     +++|*
03496  M01S02422.1xd     +++|*         USES   WB - WB+2.
03497  M01S02423.1xd     +++|*
03498  M01S02424.1xd     +++|*         CALLS  AME, CMC.
03499  M01S02425.1xd     +++|
03500  M01S02426.1xd     +++|
03501  M01S02427.1xd     +++| IMR2     RJM    AME         ATTEMPT MONITOR EXCHANGE
03502  M01S02428.1xd     +++|*         LDN    0
03503  M01S02429.1xd     +++|
03504  M01S02430.1xd     +++| IMR      SUBR               ENTRY/EXIT
03505  M01S02431.1xd     +++|          STD    WB+1
03506  M01S02432.1xd     +++|          LDI    DI          SET *PUT* ORDINAL
03507  M01S02433.1xd     +++|          ERRNZ  PUTO        CODE DEPENDS ON VALUE
03508  M01S02434.1xd     +++|          STD    WB+2
03509  M01S02435.1xd     +++|          LDN    BIOM        SET MONITOR FUNCTION
03510  M01S02436.1xd     +++|          STD    WB
03511  M01S02437.1xd     +++|          RJM    CMC         CHECK MONITOR COMPLETE
03512  M01S02438.1xd     +++|          LDD    OA
03513  M01S02439.1xd     +++|          CWD    WB
03514  M01S02440.1xd     +++|          UJN    IMR2        ATTEMPT EXCHANGE
03515  M01S02441.1xd     +++|IOM       SPACE  4,10
03516  M01S02442.1xd     +++|**        IOM - ISSUE OPERATOR MESSAGE.
03517  M01S02443.1xd     +++|*
03518  M01S02444.1xd     +++|*         ENTRY  (A) = ADDRESS OF MESSAGE.
03519  M01S02445.1xd     +++|*                    = 0 TO CLEAR MESSAGE.
03520  M01S02446.1xd     +++|*                    = - TO REFRESH MESSAGE.
03521  M01S02447.1xd     +++|*                (EO) = EST ORDINAL.
03522  M01S02448.1xd     +++|*
03523  M01S02449.1xd     +++|*         USES   T1.
03524  M01S02450.1xd     +++|*
03525  M01S02451.1xd     +++|*         CALLS  C2D.
03526  M01S02452.1xd     +++|
03527  M01S02453.1xd     +++|
03528  M01S02454.1xd     +++| IOM2     LDD    CP          SYSTEM CP ADDRESS
03529  M01S02455.1xd     +++|          ADN    MS2W
03530  M01S02456.1xd     +++|          CWD    T1          CLEAR THE MESSAGE
03531  M01S02457.1xd     +++| IOM3     LDM    IOMA
03532  M01S02458.1xd     +++|          NJN    IOM1        IF MESSAGE PRESENT
03533  M01S02459.1xd     +++|
03534  M01S02460.1xd     +++| IOM      SUBR               ENTRY/EXIT
03535  M01S02461.1xd     +++|          STD    T1
03536  M01S02462.1xd     +++|          MJN    IOM3        IF MESSAGE REFRESH
03537  M01S02463.1xd     +++|          STM    IOMA
03538  M01S02464.1xd     +++|          ZJN    IOM2        IF CLEAR MESSAGE CALL
03539  M01S02465.1xd     +++|          LDD    EO
03540  M01S02466.1xd     +++|          RJM    C2D         CONVERT EST ORDINAL
03541  M01S02467.1xd     +++|          STM    2,T1
03542  M01S02468.1xd     +++|          LDD    EO
03543  M01S02469.1xd     +++|          SHN    -6          SET ORDINAL IN MESSAGE
03544  M01S02470.1xd     +++|          ADC    2RQ0
03545  M01S02471.1xd     +++|          STM    1,T1
03546  M01S02472.1xd     +++| IOM1     LDD    CP          SYSTEM CP ADDRESS
03547  M01S02473.1xd     +++|          ADN    MS2W
03548  M01S02474.1xd     +++|          CWM    **,TR       STORE OPERATOR MESSAGE
03549  M01S02475.1xd     +++| IOMA     EQU    *-1
03550  M01S02476.1xd     +++|          UJN    IOMX        RETURN
Line S02477 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03551  M02S02477.ns2750  ---| ISR      SPACE  4,10
Line S02478 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03552  M02S02478.ns2750  ---|**        ISR - IDENTIFY SPECIAL REQUEST.
03553  M01S00114.ns2750  +++| ISR      SPACE  4,25
03554  M01S00115.ns2750  +++|**        ISR - IDENTIFY AND PROCESS SPECIAL REQUEST.
03555  M01S02479.1xd     +++|*
Line S02480 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03556  M02S02480.ns2750  ---|*         ENTRY  (A) = SPECIAL REQUEST FLAGS.
03557  M01S00116.ns2750  +++|*         ENTRY  (CM+3) = SPECIAL REQUEST FLAGS.
03558  M01S00117.ns2750  +++|*                (DI) = DEVICE STATUS BLOCK ADDRESS.
03559  M01S00118.ns2750  +++|*                (EO) = EST ORDINAL.
03560  M01S02481.1xd     +++|*
Line S02482 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03561  M02S02482.ns2750  ---|*         EXIT   (PA) = PROCESSOR ADDRESS.
Line S02483 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03562  M02S02483.ns2750  ---|*                (RW) = INDEX FOR DIAGNOSTICS.
Line S02484 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03563  M02S02484.ns2750  ---|*                (CB) = 0.
03564  M01S00119.ns2750  +++|*         EXIT   (CM+3) UPDATED - BITS FOR *ECAF* AND/OR *LMLF* CLEARED
03565  M01S00120.ns2750  +++|*                   IF REQUEST IS FOR THE ALTERNATE CHANNEL.
03566  M01S00121.ns2750  +++|*                TO *XMD2* IF UNIT INTERLOCK NOT OBTAINED.
03567  M01S00122.ns2750  +++|*                TO *ERR* IF CONTROLLER FAILURE.
03568  M01S00123.ns2750  +++|*                TO *ECA* IF ENABLE CONTROLLER ACTIVITY AND *BDLL*
03569  M01S00124.ns2750  +++|*                   BIT NOT CLEAR.
03570  M01S00125.ns2750  +++|*                TO SPECIAL REQUEST PROCESSOR (ADDRESS IN TABLE *ISRA*)
03571  M01S00126.ns2750  +++|*                   IF SPECIAL REQUEST FOUND WITH -
03572  M01S00127.ns2750  +++|*                    (RW) = INDEX FOR SPECIAL REQUEST.
03573  M01S00114.272l774 +++|*
Line S00115 Modification History
M01 (Added by) 272l774
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03574  M02S00115.ns2750  ---|*         USES   CB, PA, RW.
03575  M01S00128.ns2750  +++|*         USES   CM, CM+3, PA, RW, T1 - T7.
03576  M01S00129.ns2750  +++|*
03577  M01S00130.ns2750  +++|*         CALLS  CPF, IDU.
03578  M01S00131.ns2750  +++|*
03579  M01S00132.ns2750  +++|*         MACROS SFA.
03580  M01S02485.1xd     +++|
03581  M01S02486.1xd     +++|
Line S02487 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03582  M02S02487.ns2750  ---| ISR2     LPN    77          ISOLATE CHANNEL NUMBER
03583  M01S00133.ns2750  +++| ISR      SUBR               ENTRY/EXIT
03584  M01S00134.ns2750  +++|
03585  M01S00135.ns2750  +++|*         CHECK FOR *ENABLE CONTROLLER ACTIVITY* (*ECAF*) REQUEST.
03586  M01S00136.ns2750  +++|*         IF REQUEST IS FOR OTHER CHANNEL, LOOK FOR DIFFERENT REQUEST.
03587  M01S00137.ns2750  +++|*         IF ALREADY ENABLED ON BOTH CHANNELS, EXIT TO *CSR*.
03588  M01S00138.ns2750  +++|
03589  M01S00139.ns2750  +++|          LDD    CM+3
03590  M01S00140.ns2750  +++|          SHN    21-ECAF+ECAF/12D*12D
03591  M01S00141.ns2750  +++|          PJN    ISR3        IF *ECAF* REQUEST NOT SET
03592  M01S00142.ns2750  +++|          SFA    EST,EO      CHECK EST ENTRY
03593  M01S00143.ns2750  +++|          ADK    EQDE
03594  M01S00144.ns2750  +++|          CRD    T1
03595  M01S00145.ns2750  +++|          LDD    T1+4
03596  M01S00146.ns2750  +++|          SHN    3
03597  M01S00147.ns2750  +++|          ADK    BDLL        CHECK WHICH CHANNEL TO ENABLE
03598  M01S00148.ns2750  +++|          CRD    T4
03599  M01S00149.ns2750  +++|          LDD    T4
03600  M01S00150.ns2750  +++|          SHN    -1
03601  M01S00151.ns2750  +++|          LPN    3
03602  M01S00152.ns2750  +++|          STD    T4
03603  M01S00153.ns2750  +++|          ZJN    ISR3        IF ALREADY ENABLED ON BOTH CHANNELS
03604  M01S00154.ns2750  +++|          SBN    3
03605  M01S00155.ns2750  +++|          PJN    ISR1        IF NEITHER CHANNEL IS ALREADY ENABLED
03606  M01S00156.ns2750  +++|          LDM    T1,T4
03607  M01S02488.1xd     +++|          LMD    IR+4
Line S02489 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03608  M02S02489.ns2750  ---|          NJP    XMD2        IF REQUEST NOT FOR THIS DRIVER
Line S02490 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03609  M02S02490.ns2750  ---|          LDC    6S6+LMLF
Line S02491 Modification History
M01 (Added by) 1xd
M02 (Updated by) 272l774
M03 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03610  M03S02491.ns2750  ---| ISR3     STM    SREQ        SET SPECIAL REQUEST FLAG
Line S00116 Modification History
M01 (Added by) 272l774
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03611  M02S00116.ns2750  ---| ISR3     STM    SREQ,DI     SET SPECIAL REQUEST FLAG
03612  M01S02492.1xd     +++|          LPN    77
Line S02493 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03613  M02S02493.ns2750  ---|          SBN    SPDF        CALCULATE INDEX
03614  M01S00157.ns2750  +++|          NJN    ISR2        IF THIS CHANNEL ALREADY ENABLED
03615  M01S00158.ns2750  +++| ISR1     LJM    ECA         ENABLE CONTROLLER ACTIVITY
03616  M01S00159.ns2750  +++|
03617  M01S00160.ns2750  +++| ISR2     LDD    CM+3        LOOK FOR A DIFFERENT REQUEST TO PROCESS
03618  M01S00161.ns2750  +++|          SCN    1
03619  M01S00162.ns2750  +++|          ERRNZ  ECAF-12D    CODE DEPENDS ON VALUE
03620  M01S00163.ns2750  +++|          STD    CM+3
03621  M01S00164.ns2750  +++|
03622  M01S00165.ns2750  +++|*         CHECK FOR *LIST FIRMWARE REVISION* (*LMLF*) REQUEST.
03623  M01S00166.ns2750  +++|*         IF REQUEST IS FOR OTHER CHANNEL, LOOK FOR DIFFERENT REQUEST.
03624  M01S00167.ns2750  +++|
03625  M01S00168.ns2750  +++| ISR3     LDD    CM+3
03626  M01S00169.ns2750  +++|          SHN    21-LMLF+LMLF/12D*12D
03627  M01S00170.ns2750  +++|          PJN    ISR4        IF *LMLF* REQUEST NOT SET
03628  M01S00171.ns2750  +++|          LPN    77          ISOLATE CHANNEL NUMBER
03629  M01S00172.ns2750  +++|          LMD    IR+4
03630  M01S00173.ns2750  +++|          ZJN    ISR6        IF REQUEST FOR THIS DRIVER
03631  M01S00174.ns2750  +++|          LDD    CM+3        LOOK FOR A DIFFERENT REQUEST TO PROCESS
03632  M01S00175.ns2750  +++|          LPN    37
03633  M01S00176.ns2750  +++|          ERRNZ  LMLF-17D    CODE DEPENDS ON VALUE
03634  M01S00177.ns2750  +++|          STD    CM+3
03635  M01S00178.ns2750  +++|
03636  M01S00179.ns2750  +++|*         SEARCH FOR OTHER SPECIAL REQUEST.
03637  M01S00180.ns2750  +++|
03638  M01S00181.ns2750  +++| ISR4     LDD    CM+3        ISOLATE SPECIAL REQUEST FLAGS
03639  M01S00182.ns2750  +++|          STD    T0
03640  M01S00183.ns2750  +++|          ZJP    ISRX        IF NO SPECIAL REQUEST TO PROCESS
03641  M01S00184.ns2750  +++|          LDN    ECAF-1
03642  M01S02494.1xd     +++|          STD    RW
Line S02495 Modification History
M01 (Added by) 1xd
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
03643  M02S02495.272l774 ---|          STM    RWST        SAVE INDEX
Line S00117 Modification History
M01 (Added by) 272l774
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03644  M02S00117.ns2750  ---|          STM    RWST,DI     SAVE INDEX
Line S02496 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03645  M02S02496.ns2750  ---|          LDN    0
Line S02497 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03646  M02S02497.ns2750  ---|          STD    CB          CLEAR *CBT* ORDINAL
Line S02498 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03647  M02S02498.ns2750  ---|          LDM    ISRA,RW
Line S02499 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03648  M02S02499.ns2750  ---|          STD    PA          SET PROCESSOR ADDRESS
Line S02500 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03649  M02S02500.ns2750  ---|
Line S02501 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03650  M02S02501.ns2750  ---| ISR      SUBR               ENTRY/EXIT
Line S02502 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03651  M02S02502.ns2750  ---|          SHN    -1
Line S02503 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03652  M02S02503.ns2750  ---|          STD    T0          SAVE FLAGS
Line S02504 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03653  M02S02504.ns2750  ---|          SHN    1+21-LMLF+LMLF/12D*12D
Line S02505 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03654  M02S02505.ns2750  ---|          MJN    ISR2        IF CHANNEL SPECIFIC REQUEST
Line S02506 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03655  M02S02506.ns2750  ---|          LDN    DUNF
Line S02507 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03656  M02S02507.ns2750  ---|          ERRNZ  DUNF+1-SPDF CODE DEPENDS ON VALUE
Line S02508 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03657  M02S02508.ns2750  ---|          STD    RW
Line S02509 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03658  M02S02509.ns2750  ---| ISR1     AOD    RW          ADVANCE INDEX
03659  M01S00185.ns2750  +++| ISR5     AOD    RW          ADVANCE INDEX
03660  M01S02510.1xd     +++|          LDD    T0
03661  M01S02511.1xd     +++|          SHN    21-0        CHECK NEXT FLAG
03662  M01S02512.1xd     +++|          STD    T0
Line S02513 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03663  M02S02513.ns2750  ---|          PJN    ISR1        IF NOT SET
03664  M01S00186.ns2750  +++|          PJN    ISR5        IF NOT SET
03665  M01S02514.1xd     +++|          LDD    RW
Line S02515 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03666  M02S02515.ns2750  ---|          UJN    ISR3        SET SPECIAL REQUEST FLAG
03667  M01S00187.ns2750  +++|          UJN    ISR7        SET SPECIAL REQUEST FLAG
03668  M01S02516.1xd     +++|
03669  M01S00188.ns2750  +++|*         PROCESS SPECIAL REQUEST.
03670  M01S02517.1xd     +++|
03671  M01S00189.ns2750  +++| ISR6     LDC    6S6+LMLF    BITS - 1 TO CLEAR / STARTING BIT
03672  M01S00190.ns2750  +++| ISR7     STM    SREQ,DI     SET SPECIAL REQUEST FLAG
03673  M01S00191.ns2750  +++|          LPN    77
03674  M01S00192.ns2750  +++|          SBN    ECAF        CALCULATE INDEX
03675  M01S00193.ns2750  +++|          STD    RW
03676  M01S00194.ns2750  +++|          STM    RWST,DI     SAVE INDEX
03677  M01S00195.ns2750  +++|          LDML   ISRA,RW
03678  M01S00196.ns2750  +++|          STDL   PA          SET PROCESSOR ADDRESS
03679  M01S00197.ns2750  +++|          RJM    IDU         INTERLOCK DISK UNIT
03680  M01S00198.ns2750  +++|          MJN    ISR8        IF CHANNEL DOWN OR NOT ENABLED
03681  M01S00199.ns2750  +++|          NJN    ISR9        IF INTERLOCK NOT AVAILABLE
03682  M01S00200.ns2750  +++|          LDM    ENAD,DI
03683  M01S00201.ns2750  +++|          NJN    ISR10       IF CONTROLLER FAILURE
03684  M01S00202.ns2750  +++|          LJM    0,PA        EXIT TO SPECIAL REQUEST
03685  M01S00203.ns2750  +++|
03686  M01S00204.ns2750  +++|*         CHANNEL DOWN OR NOT ENABLED.
03687  M01S00205.ns2750  +++|
03688  M01S00206.ns2750  +++| ISR8     LDM    SREQ,DI
03689  M01S00207.ns2750  +++|          LMC    6S6+LMLF
03690  M01S00208.ns2750  +++|          NJN    ISR9        IF NOT LIST MICROCODE REVISION
03691  M01S00209.ns2750  +++|          LDC    6S6+LMLF    BITS - 1 TO CLEAR / STARTING BIT
03692  M01S00210.ns2750  +++|          RJM    CPF         CLEAR SPECIAL REQUEST BIT IN *PUT*
03693  M01S00211.ns2750  +++|
03694  M01S00212.ns2750  +++|*         INTERLOCK NOT AVAILABLE.
03695  M01S00213.ns2750  +++|
03696  M01S00214.ns2750  +++| ISR9     LDN    0
03697  M01S00215.ns2750  +++|          STM    SREQ,DI
03698  M01S00216.ns2750  +++|          LJM    XMD2        RETURN TO MAIN LOOP
03699  M01S00217.ns2750  +++|
03700  M01S00218.ns2750  +++|*         CONTROLLER FAILURE.
03701  M01S00219.ns2750  +++|
03702  M01S00220.ns2750  +++| ISR10    LDN    ECMD
03703  M01S00221.ns2750  +++|          RJM    ERR         PROCESS ERROR
03704  M01S00222.ns2750  +++|
03705  M01S00223.ns2750  +++|
03706  M01S02518.1xd     +++| ISRA     BSS    0           SPECIAL REQUEST PROCESSORS
Line S02519 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03707  M02S02519.ns2750  ---|          CON    SPD         SPIN-DOWN DRIVE
Line S02520 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03708  M02S02520.ns2750  ---|          CON    SPD         SPIN-UP DRIVE
03709  M01S00224.ns2750  +++|          CON    CSR         CLEAR FLAG (ENABLE CONTROLLER ACTIVITY)
03710  M01S00225.ns2750  +++|          CON    CSR         CLEAR FLAG (RESERVED)
03711  M01S00226.ns2750  +++|          CON    CSR         CLEAR FLAG (RESERVED)
03712  M01S02521.1xd     +++|          CON    LDA         LIST DRIVE SERIAL NUMBER
Line S02522 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03713  M02S02522.ns2750  ---|          CON    CSR         CLEAR FLAG (UNDEFINED FUNCTION)
03714  M01S00227.ns2750  +++|          CON    CSR         CLEAR FLAG (RESERVED)
03715  M01S02523.1xd     +++|          CON    LDA         LIST MICROCODE REVISION LEVEL
Line S00500 Modification History
M01 (Added by) 1xd5
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03716  M02S00500.ns2750  ---| ISRB     CON    BOR         BREAK OPPOSITE RESERVE (INTERNAL REQUEST)
03717  M01S00228.ns2750  +++| ISRB     BSS    0           INTERNAL SPECIAL REQUEST PROCESSORS
03718  M01S00229.ns2750  +++|          CON    BOR         BREAK OPPOSITE RESERVE (INTERNAL REQUEST)
03719  M01S00501.1xd5    +++|          CON    SDA         SET DRIVE ATTRIBUTES (INTERNAL REQUEST)
Line S02524 Modification History
M01 (Added by) 1xd
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
03720  M02S02524.272l774 ---| LDP      SPACE  4,15
03721  M01S00118.272l774 +++| LDP      SPACE  4,20
03722  M01S02525.1xd     +++|**        LDP - LOAD DEVICE PARAMETERS.
03723  M01S02526.1xd     +++|*
03724  M01S02527.1xd     +++|*         ENTRY  (DI) = DEVICE STATUS BLOCK ADDRESS.
03725  M01S02528.1xd     +++|*
03726  M01S02529.1xd     +++|*         EXIT   (A) = (EO) = EST ORDINAL.
03727  M01S02530.1xd     +++|*                (CB) = *CBT* ORDINAL.
Line S02531 Modification History
M01 (Added by) 1xd
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
03728  M02S02531.272l774 ---|*                (RW) = READ / WRITE FLAG.
03729  M01S02532.1xd     +++|*                (CN) = CONTROLLER NUMBER.
03730  M01S02533.1xd     +++|*                (DN) = DRIVE NUMBER.
03731  M01S00119.272l774 +++|*                (EO) = EST ORDINAL.
03732  M01S02534.1xd     +++|*                (PA) = REQUEST IN PROGRESS ADDRESS.
03733  M01S00120.272l774 +++|*                (RW) = READ / WRITE FLAG.
03734  M01S02535.1xd     +++|*                (CM - CM+4) = *PILL* WORD OF *PUT* ENTRY.
03735  M01S02536.1xd     +++|*                (WB - WB+4) = *UNCT* WORD OF *PUT* ENTRY.
03736  M01S00121.272l774 +++|*
03737  M01S00122.272l774 +++|*         USES   CB, CN, DN, EO, PA, RW, CM - CM+4, WB - WB+4.
03738  M01S02537.1xd     +++|*
03739  M01S02538.1xd     +++|*         MACROS PUTE.
03740  M01S02539.1xd     +++|
03741  M01S02540.1xd     +++|
03742  M01S02541.1xd     +++| LDP      SUBR               ENTRY/EXIT
03743  M01S02542.1xd     +++|          LDI    DI
03744  M01S02543.1xd     +++|          ERRNZ  PUTO        CODE DEPENDS ON VALUE
03745  M01S02544.1xd     +++|          SHN    PUTLS
03746  M01S02545.1xd     +++|          PUTE   *
Line S02546 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2703
Seq #  *Modification Id* Act 
----------------------------+
03747  M02S02546.ns2703  ---|          ADC    UNCT        FETCH UNIT CONTROL WORD
03748  M01S00001.ns2703  +++|          ADC    PILL        GET INTERLOCK STATUS
03749  M01S00002.ns2703  +++|          CRD    CM
03750  M01S00003.ns2703  +++|          SBN    PILL-UNCT   FETCH UNIT CONTROL WORD
03751  M01S02547.1xd     +++|          CRD    WB
Line S02548 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2703
Seq #  *Modification Id* Act 
----------------------------+
03752  M02S02548.ns2703  ---|          ADN    PILL-UNCT   GET SPECIAL REQUEST DATA
Line S02549 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2703
Seq #  *Modification Id* Act 
----------------------------+
03753  M02S02549.ns2703  ---|          CRD    CM
Line S02550 Modification History
M01 (Added by) 1xd
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
03754  M02S02550.272l774 ---|          LDD    WB          UNIT NUMBER
Line S02551 Modification History
M01 (Added by) 1xd
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
03755  M02S02551.272l774 ---|          LPN    77
Line S02552 Modification History
M01 (Added by) 1xd
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
03756  M02S02552.272l774 ---|          SHN    21-2        EXTRACT CONTROLLER NUMBER
03757  M01S00123.272l774 +++|          LDD    WB          GET CONTROLLER AND UNIT NUMBERS
03758  M01S00124.272l774 +++|          LPC    777
03759  M01S00125.272l774 +++|          SHN    21-5        EXTRACT CONTROLLER NUMBER
03760  M01S02553.1xd     +++|          STD    CN
Line S02554 Modification History
M01 (Added by) 1xd
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
03761  M02S02554.272l774 ---|          SHN    2-21        ISOLATE DRIVE NUMBER
03762  M01S00126.272l774 +++|          SHN    5-21        ISOLATE DRIVE NUMBER
03763  M01S02555.1xd     +++|          STD    DN
03764  M01S02556.1xd     +++|          LDD    WB+3        *CBT* ORDINAL
03765  M01S02557.1xd     +++|          STD    CB
Line S02558 Modification History
M01 (Added by) 1xd
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
03766  M02S02558.272l774 ---|          LDM    RWST        RESTORE READ / WRITE STATUS
03767  M01S00127.272l774 +++|          LDM    RWST,DI     RESTORE READ / WRITE STATUS
03768  M01S02559.1xd     +++|          STD    RW
Line S02560 Modification History
M01 (Added by) 1xd
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
03769  M02S02560.272l774 ---|          LDM    ADDR        CURRENT PROCESSING ADDRESS
03770  M01S00128.272l774 +++|          LDM    ADDR,DI     CURRENT PROCESSING ADDRESS
03771  M01S02561.1xd     +++|          STD    PA
03772  M01S02562.1xd     +++|          LDD    WB+1        SET EST ORDINAL
03773  M01S02563.1xd     +++|          STD    EO
03774  M01S02564.1xd     +++|          UJN    LDPX        RETURN
03775  M01S02565.1xd     +++| LND      SPACE  4,10
03776  M01S02566.1xd     +++|**        LND - LOCATE NEXT DRIVE (ON SPECIFIED CONTROLLER).
03777  M01S02567.1xd     +++|*
Line S02568 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03778  M02S02568.ns2714  ---|*         ENTRY  (T5) = CONTROLLER STATUS BLOCK INDEX.
03779  M01S00161.ns2714  +++|*         ENTRY  (A) = 0 TO LOCATE FIRST DRIVE OF STRING.
03780  M01S00230.ns2750  +++|*                (DI) = DEVICE STATE TABLE ADDRESS.
03781  M01S00231.ns2750  +++|*                (T5) = CONTROLLER STATUS BLOCK INDEX, IF (A) = 0.
03782  M01S00232.ns2750  +++|*                (T7) = CURRENT DEVICE STATE TABLE ADDRESS.
03783  M01S00233.ns2750  +++|*
03784  M01S00234.ns2750  +++|*         EXIT   (A) = (T7) = STATE TABLE ADDRESS OF NEXT DRIVE.
03785  M01S00235.ns2750  +++|*                (A) = 0 IF NO MORE DRIVES (ON CONTROLLER).
03786  M01S00162.ns2714  +++|*                (T5) = CONTROLLER STATUS BLOCK INDEX.
Line S02569 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03787  M02S02569.ns2750  ---|*                (T7) = CURRENT DEVICE STATE TABLE ADDRESS.
Line S02570 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03788  M02S02570.ns2750  ---|*
Line S02571 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03789  M02S02571.ns2750  ---|*         EXIT   (A) = 0 IF NO MORE DRIVES (ON CONTROLLER).
Line S02572 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03790  M02S02572.ns2750  ---|*                    = (T7) = STATE TABLE ADDRESS OF NEXT DRIVE.
03791  M01S00163.ns2714  +++|*
03792  M01S00164.ns2714  +++|*         USES   T5, T7.
03793  M01S02573.1xd     +++|
03794  M01S02574.1xd     +++|
Line S02575 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03795  M02S02575.ns2714  ---| LND2     LDM    PNUN,T7     FORM *CSTB* INDEX
Line S00165 Modification History
M01 (Added by) ns2714
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
03796  M02S00165.272l774 ---| LND2     LDM    PNUN        EXTRACT CONTROLLER BLOCK INDEX
Line S00166 Modification History
M01 (Added by) ns2714
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
03797  M02S00166.272l774 ---|          SHN    -3
03798  M01S00129.272l774 +++| LND2     LDM    PNUN,DI     EXTRACT CONTROLLER BLOCK INDEX
03799  M01S00130.272l774 +++|          SHN    -6
03800  M01S00167.ns2714  +++|          STD    T5
03801  M01S00168.ns2714  +++|          LDM    CSTB,T5     ADDRESS OF FIRST DRIVE IN STRING
03802  M01S00169.ns2714  +++|          STD    T7
03803  M01S00170.ns2714  +++| LND3     LDM    PNUN,T7     FORM *CSTB* INDEX
Line S02576 Modification History
M01 (Added by) 1xd
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
03804  M02S02576.272l774 ---|          SHN    -3
03805  M01S00131.272l774 +++|          SHN    -6
03806  M01S02577.1xd     +++|          LMD    T5
03807  M01S02578.1xd     +++|          NJN    LND1        IF NOT SPECIFIED CONTROLLER
03808  M01S02579.1xd     +++|          LDD    T7
03809  M01S02580.1xd     +++|
03810  M01S02581.1xd     +++| LND      SUBR               ENTRY/EXIT
03811  M01S00171.ns2714  +++|          ZJN    LND2        IF INITIAL CALL
03812  M01S02582.1xd     +++| LND1     LDN    DSTBE
Line S02583 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03813  M02S02583.ns2750  ---|          RAD    T7          ADVANCE DEVICE STATUS BLOCK ADDRESS
03814  M01S00236.ns2750  +++|          RAD    T7          ADVANCE DEVICE STATE TABLE ADDRESS
03815  M01S02584.1xd     +++|          LMM    XMDA
Line S02585 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03816  M02S02585.ns2714  ---|          NJN    LND2        IF NOT END OF BLOCK
03817  M01S00172.ns2714  +++|          NJN    LND3        IF NOT END OF BLOCK
03818  M01S02586.1xd     +++|*         LDN    0
03819  M01S02587.1xd     +++|          UJN    LNDX        RETURN
03820  M01S02588.1xd     +++| LSD      SPACE  4,15
03821  M01S02589.1xd     +++|**        LSD - LOCATE SELECTED DRIVE IN *DSTB*.
03822  M01S02590.1xd     +++|*
Line S02591 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03823  M02S02591.ns2714  ---|*         ENTRY  (A) = CONTROLLER STATUS BLOCK INDEX.
Line S02592 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03824  M02S02592.ns2714  ---|*                (T4) = DRIVE NUMBER.
03825  M01S00173.ns2714  +++|*         ENTRY  (T4) = DRIVE NUMBER.
03826  M01S02593.1xd     +++|*
03827  M01S02594.1xd     +++|*         EXIT   (A) = 0 IF UNKNOWN DRIVE ON SPECIFIED CONTROLLER.
03828  M01S02595.1xd     +++|*                    = DEVICE STATE TABLE ADDRESS FOR DRIVE.
03829  M01S02596.1xd     +++|*
Line S02597 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03830  M02S02597.ns2714  ---|*         USES   T5, T7.
Line S02598 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03831  M02S02598.ns2714  ---|*
03832  M01S02599.1xd     +++|*         CALLS  LND.
03833  M01S02600.1xd     +++|
03834  M01S02601.1xd     +++|
Line S02602 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03835  M02S02602.ns2714  ---| LSD1     RJM    LND         LOCATE NEXT DRIVE
Line S02603 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03836  M02S02603.ns2714  ---|          ZJN    LSDX        IF END OF TABLE
Line S02604 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03837  M02S02604.ns2714  ---| LSD2     LDM    PNUN,T7
03838  M01S00174.ns2714  +++| LSD1     LDN    0           LOCATE FIRST DRIVE
03839  M01S00175.ns2714  +++| LSD2     RJM    LND
03840  M01S00176.ns2714  +++|          ZJN    LSDX        IF END OF DRIVE STRING
03841  M01S00177.ns2714  +++|          LDM    PNUN,T7
Line S02605 Modification History
M01 (Added by) 1xd
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
03842  M02S02605.272l774 ---|          LPN    7           CHECK DRIVE NUMBER
03843  M01S00132.272l774 +++|          LPN    77          CHECK DRIVE NUMBER
03844  M01S02606.1xd     +++|          LMD    T4
Line S02607 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03845  M02S02607.ns2714  ---|          NJN    LSD1        IF NOT SPECIFIED DRIVE
03846  M01S00178.ns2714  +++|          NJN    LSD2        IF NOT SPECIFIED DRIVE
03847  M01S02608.1xd     +++|          LDM    ADDR,T7
03848  M01S02609.1xd     +++|          ZJN    LSDX        IF DRIVE NOT ACTIVE
03849  M01S02610.1xd     +++|          LDD    T7
03850  M01S02611.1xd     +++|
03851  M01S02612.1xd     +++| LSD      SUBR               ENTRY/EXIT
Line S02613 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03852  M02S02613.ns2714  ---|          STD    T5
Line S02614 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03853  M02S02614.ns2714  ---|          LDM    CSTB,T5     *DSTB* ADDRESS OF FIRST DRIVE
Line S02615 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03854  M02S02615.ns2714  ---|          STD    T7
Line S02616 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03855  M02S02616.ns2714  ---|          LDD    T4          CHECK DRIVE NUMBER
03856  M01S00179.ns2714  +++|          LDD    T4
03857  M01S02617.1xd     +++|          SBN    10
Line S02618 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03858  M02S02618.ns2714  ---|          MJN    LSD2        IF VALID NUMBER
03859  M01S00180.ns2714  +++|          MJN    LSD1        IF VALID DRIVE NUMBER
03860  M01S02619.1xd     +++|          LDN    0
03861  M01S02620.1xd     +++|          UJN    LSDX        RETURN
03862  M01S02621.1xd     +++| PEF      SPACE  4,15
03863  M01S02622.1xd     +++|**        PEF - PROCESS ERROR FLAGS.
03864  M01S02623.1xd     +++|*
03865  M01S02624.1xd     +++|*         ENTRY  (RW) = ERROR INDEX.
03866  M01S02625.1xd     +++|*                (CB) = *CBT* ORDINAL.
03867  M01S02626.1xd     +++|*                (T1) = BYTE 0 OF *PAD4* WORD OF CBT ENTRY.
03868  M01S00181.ns2714  +++|*                (T2) = BYTE 0 OF *HSLK* WORD OF CBT ENTRY.
03869  M01S02627.1xd     +++|*                (NR - NR+4) = *PAD1* WORD OF *CBT* ENTRY.
03870  M01S02628.1xd     +++|*
03871  M01S02629.1xd     +++|*         EXIT   (A) = 0 IF OK TO INITIATE I/O.
Line S02630 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
03872  M02S02630.1xd5    ---|*                    = I/O PREPROCESSOR ADDRESS.
03873  M01S00502.1xd5    +++|*                TO PROCESSOR IF I/O INITIATED.
03874  M01S02631.1xd     +++|*
Line S02632 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03875  M02S02632.ns2714  ---|*         USES   PA.
Line S02633 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03876  M02S02633.ns2714  ---|*
Line S02634 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03877  M02S02634.ns2714  ---|*         CALLS  IIO.
Line S00182 Modification History
M01 (Added by) ns2714
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
03878  M02S00182.1xd5    ---|*         CALLS  IDU, IIO, RND1.
03879  M01S00503.1xd5    +++|*         CALLS  IDU, IIO.
03880  M01S02635.1xd     +++|
03881  M01S02636.1xd     +++|
Line S00183 Modification History
M01 (Added by) ns2714
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
03882  M02S00183.1xd5    ---| PEF6     LDC    RTC.NR/2*10000  SET INITIAL ERROR COUNT
Line S00184 Modification History
M01 (Added by) ns2714
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
03883  M02S00184.1xd5    ---|          STML   ERCT
03884  M01S02637.1xd     +++| PEF7     LDN    0           INDICATE I/O IN ORDER
03885  M01S02638.1xd     +++|
03886  M01S02639.1xd     +++| PEF      SUBR               ENTRY/EXIT
03887  M01S02640.1xd     +++|          LDD    T1
03888  M01S02641.1xd     +++|          SHN    -6          CHECK CHANNEL NUMBER
03889  M01S02642.1xd     +++|          LMD    IR+4
03890  M01S02643.1xd     +++| PEF1     NJN    PEFX        IF I/O DISABLED ON THIS ACCESS
Line S02644 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03891  M02S02644.ns2714  ---|          LDM    ERCT
Line S02645 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03892  M02S02645.ns2714  ---|          NJN    PEF2        IF PATH VERIFICATION INITIATED
Line S02646 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03893  M02S02646.ns2714  ---|          LDM    PEFA,RW
03894  M01S00185.ns2714  +++|          LDD    RW
03895  M01S00186.ns2714  +++|          ZJN    PEFX        IF *1MV* DEVICE VERIFICATION
Line S00187 Modification History
M01 (Added by) ns2714
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
03896  M02S00187.1xd5    ---|          LDM    ENAD
Line S00188 Modification History
M01 (Added by) ns2714
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
03897  M02S00188.1xd5    ---|          NJN    PEF7        IF CONTROLLER DEAD
Line S00189 Modification History
M01 (Added by) ns2714
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
03898  M02S00189.272l774 ---|          LDML   ERCT
03899  M01S00133.272l774 +++|          LDML   ERCT,DI
03900  M01S00190.ns2714  +++|          NJN    PEF7        IF I/O INITIATED
Line S00191 Modification History
M01 (Added by) ns2714
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03901  M02S00191.ns2750  ---|          RJM    IDU
Line S00192 Modification History
M01 (Added by) ns2714
M02 (Updated by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03902  M02S00192.ns2750  ---|          NJN    PEFX        IF UNIT INTERLOCK UNAVAILABLE
03903  M01S00237.ns2750  +++|          RJM    IDU         INTERLOCK DISK UNIT
03904  M01S00238.ns2750  +++|          NJN    PEFX        IF INTERLOCK NOT AVAILABLE
Line S00193 Modification History
M01 (Added by) ns2714
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
03905  M02S00193.1xd5    ---|          LDD    T2
Line S00194 Modification History
M01 (Added by) ns2714
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
03906  M02S00194.1xd5    ---|          LPN    77          CHECK PREVIOUS ERROR
Line S00195 Modification History
M01 (Added by) ns2714
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
03907  M02S00195.1xd5    ---|          LMN    NRDE
Line S00196 Modification History
M01 (Added by) ns2714
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
03908  M02S00196.1xd5    ---|          ZJN    PEF6        IF PREVIOUS ERROR NOT READY
03909  M01S00197.ns2714  +++|          LDN    CSRC
Line S02647 Modification History
M01 (Added by) 1xd
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
03910  M02S02647.272l774 ---|          STM    ERCT        SET INITIAL ERROR COUNT
03911  M01S00134.272l774 +++|          STM    ERCT,DI     SET INITIAL ERROR COUNT
Line S02648 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03912  M02S02648.ns2714  ---| PEF2     LDM    IPPS
Line S02649 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03913  M02S02649.ns2714  ---|          NJN    PEF7        IF I/O PREPROCESSING COMPLETE
Line S02650 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03914  M02S02650.ns2714  ---|          LDD    RW
Line S02651 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03915  M02S02651.ns2714  ---|          SHN    14-0
Line S02652 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03916  M02S02652.ns2714  ---|          ZJN    PEFX        IF *1MV* DEVICE VERIFICATION
Line S02653 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03917  M02S02653.ns2714  ---| PEF5     LDC    PEF6
Line S00198 Modification History
M01 (Added by) ns2714
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
03918  M02S00198.1xd5    ---|          LDC    PEF3
Line S02654 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
03919  M02S02654.1xd5    ---|          LJM    RND1        EXIT TO PREPROCESSOR
Line S02655 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
03920  M02S02655.1xd5    ---|
Line S02656 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
M03 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
03921  M03S02656.1xd5    ---| PEF6     LDD    CB          INITIATE I/O
Line S02657 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
M03 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
03922  M03S02657.1xd5    ---|          STM    IPPS
Line S00199 Modification History
M01 (Added by) ns2714
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
03923  M02S00199.1xd5    ---| PEF3     LDD    CB          INITIATE I/O
03924  M01S00504.1xd5    +++|          LDM    ENAD,DI
03925  M01S00505.1xd5    +++|          NJN    PEF7        IF CONTROLLER DEAD
03926  M01S00506.1xd5    +++|          LDD    CB          INITIATE I/O
03927  M01S02658.1xd     +++|          RJM    IIO
03928  M01S02659.1xd     +++|          LJM    0,PA        EXIT TO PROCESSOR
Line S02660 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03929  M02S02660.ns2714  ---|
Line S02661 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03930  M02S02661.ns2714  ---|
Line S02662 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03931  M02S02662.ns2714  ---| PEFA     BSS    0           INITIAL ERROR COUNT
Line S02663 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03932  M02S02663.ns2714  ---|          CON    0
Line S02664 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
03933  M02S02664.ns2714  ---|          CON    CSRC
03934  M01S02665.1xd     +++| RCS      SPACE  4,10
03935  M01S02666.1xd     +++|**        RCS - REMOVE CHANNEL FROM SYSTEM USE.
03936  M01S02667.1xd     +++|*
03937  M01S02668.1xd     +++|*         ENTRY  (A) = EST ORDINAL IF CHANNEL TO BE DOWNED ON DEVICE.
03938  M01S02669.1xd     +++|*                    = 0 IF CHANNEL TO BE GLOBALLY DOWNED.
03939  M01S02670.1xd     +++|*
03940  M01S02671.1xd     +++|*         USES   CM - CM+4.
03941  M01S02672.1xd     +++|*
03942  M01S02673.1xd     +++|*         MACROS DELAY, EXECUTE, MONITOR.
03943  M01S02674.1xd     +++|
03944  M01S02675.1xd     +++|
03945  M01S02676.1xd     +++| RCS      SUBR               ENTRY/EXIT
03946  M01S02677.1xd     +++|          LMC    4000
03947  M01S02678.1xd     +++|          STM    RCSA+4      SET DRIVER CALL FLAG, EST ORDINAL
03948  M01S02679.1xd     +++|          LDD    MA
03949  M01S02680.1xd     +++|          CWM    RCSA,ON     STORE *1DS* CALL IN MESSAGE BUFFER
03950  M01S02681.1xd     +++| RCS1     LDN    0
03951  M01S02682.1xd     +++|          STD    CM+1        SET NON-PRIORITY REQUEST
03952  M01S02683.1xd     +++|          EXECUTE  1DS,=
03953  M01S02684.1xd     +++|          MONITOR  RPPM      REQUEST PP
03954  M01S02685.1xd     +++|          LDD    CM+1
03955  M01S02686.1xd     +++|          NJN    RCSX        IF *1DS* STARTED
03956  M01S02687.1xd     +++|          DELAY
03957  M01S02688.1xd     +++|          UJN    RCS1        RETRY CALL
03958  M01S02689.1xd     +++|
03959  M01S02690.1xd     +++|
03960  M01S02691.1xd     +++| RCSA     VFD    18/3L1DS,6/,12/DWNF,12/0,12/4000
03961  M01S02692.1xd     +++| RCT      SPACE  4,10
03962  M01S02693.1xd     +++|**        RCT - READ CHANNEL TABLE.
03963  M01S02694.1xd     +++|*
03964  M01S02695.1xd     +++|*         EXIT   (A) = CHANNEL TABLE STATUS BYTE.
03965  M01S02696.1xd     +++|*
03966  M01S02697.1xd     +++|*         USES   NR - NR+4.
03967  M01S02698.1xd     +++|*
03968  M01S02699.1xd     +++|*         MACROS CHTE.
03969  M01S02700.1xd     +++|
03970  M01S02701.1xd     +++|
03971  M01S02702.1xd     +++| RCT      SUBR               ENTRY/EXIT
03972  M01S02703.1xd     +++|          CHTE   *
03973  M01S02704.1xd     +++|          LDC    0           READ CHANNEL TABLE ENTRY
03974  M01S02705.1xd     +++|          CRD    NR
03975  M01S02706.1xd     +++| RCTA     LDD    NR+0
03976  M01S02707.1xd     +++|          UJN    RCTX        RETURN
03977  M01S02708.1xd     +++| RLB      SPACE  4,15
03978  M01S02709.1xd     +++|**        RLB - READ LINKAGE BITS.
03979  M01S02710.1xd     +++|*
03980  M01S02711.1xd     +++|*         ENTRY  (A) = (T6) = ADDRESS FOR LINKAGE IN (CM - CM+4).
03981  M01S02712.1xd     +++|*                (PB) = CONTROL BUFFER ORDINAL.
03982  M01S02713.1xd     +++|*                (T1) = DATA BUFFER ADDRESS.
03983  M01S02714.1xd     +++|*                (T2) = CONTROL BUFFER WORD NUMBER.
03984  M01S02715.1xd     +++|*                (CM - CM+4) = *PAD* WORD OF *CBT* ENTRY.
03985  M01S02716.1xd     +++|*
03986  M01S02717.1xd     +++|*         EXIT   SECTOR LINKAGE SET IN *CBT* ENTRY.
03987  M01S02718.1xd     +++|*
Line S02719 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
03988  M02S02719.1xd5    ---|*         USES   T6.
03989  M01S00507.1xd5    +++|*         USES   T1, T6.
03990  M01S02720.1xd     +++|*
03991  M01S02721.1xd     +++|*         MACROS CBTE.
03992  M01S02722.1xd     +++|
03993  M01S02723.1xd     +++|
03994  M01S02724.1xd     +++| RLB1     LDN    10+4        ADVANCE BUFFER ADDRESS
Line S02725 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
03995  M02S02725.1xd5    ---|          RAD    T1
03996  M01S00508.1xd5    +++|          RADL   T1
03997  M01S02726.1xd     +++|          LDIL   T1          EXTRACT LINKAGE FROM BUFFER
03998  M01S02727.1xd     +++| RLB2     SHN    -14
03999  M01S02728.1xd     +++|          SHN    10          POSITION FOR *CBT* ENTRY
04000  M01S02729.1xd     +++|          STI    T6
04001  M01S02730.1xd     +++|          LDML   4,T1        EXTRACT LINKAGE FROM BUFFER
04002  M01S02731.1xd     +++|          SHN    -14
04003  M01S02732.1xd     +++|          SHN    4           POSITION FOR *CBT* ENTRY
04004  M01S02733.1xd     +++|          RAI    T6
04005  M01S02734.1xd     +++|          LDML   10,T1       EXTRACT LINKAGE FROM BUFFER
04006  M01S02735.1xd     +++|          SHN    -14
04007  M01S02736.1xd     +++|*         SHN    0           POSITION FOR *CBT* ENTRY
04008  M01S02737.1xd     +++|          RAI    T6
04009  M01S02738.1xd     +++|          AOD    T6          ADVANCE *CBT* WORD ADDRESS
04010  M01S02739.1xd     +++|          LMN    CM+5
04011  M01S02740.1xd     +++|          NJN    RLB1        IF MORE LINKAGE
04012  M01S02741.1xd     +++|          LDD    PB
04013  M01S02742.1xd     +++|          SHN    CBTLS
04014  M01S02743.1xd     +++|          CBTE   *
04015  M01S02744.1xd     +++|          ADC    0           FWA OF *CBT*
04016  M01S02745.1xd     +++|          ADD    T2
04017  M01S02746.1xd     +++|          CWD    CM          UPDATE CONTROL BUFFER ENTRY
04018  M01S02747.1xd     +++|
04019  M01S02748.1xd     +++| RLB      SUBR               ENTRY/EXIT
04020  M01S02749.1xd     +++|*         LDD    T6
04021  M01S02750.1xd     +++|          UJN    RLB2        MOVE SECTOR LINKAGE
04022  M01S02751.1xd     +++| RMR      SPACE  4,10
04023  M01S02752.1xd     +++|**        RMR - READ CHANNEL STATUS REGISTER.
04024  M01S02753.1xd     +++|*
04025  M01S02754.1xd     +++|*         EXIT   (A) = 0 IF NO CHANNEL ERROR.
04026  M01S02755.1xd     +++|*                (RBUF) = REGISTER CONTENTS.
04027  M01S02756.1xd     +++|*
04028  M01S02757.1xd     +++|*         CALLS  WMC.
04029  M01S02758.1xd     +++|
04030  M01S02759.1xd     +++|
04031  M01S02760.1xd     +++| RMR      SUBR               ENTRY/EXIT
04032  M01S02761.1xd     +++|          FNC.   IOUC,MR
04033  M01S02762.1xd     +++|          ACN.   MR          ACTIVATE MAINTENANCE CHANNEL
04034  M01S02763.1xd     +++|          LDN    0
04035  M01S02764.1xd     +++|          OAN.   MR          OUTPUT NULL PARAMETER
04036  M01S02765.1xd     +++|          CON    LDCI
04037  M01S02766.1xd     +++|          IAN    CH          (FORCE CHANNEL TABLE ENTRY)
04038  M01S02767.1xd     +++|          ORG    *-1
04039  M01S02768.1xd     +++|          CON    RCSR+CH     TRANSMIT REGISTER NUMBER
04040  M01S02769.1xd     +++|          OAN.   MR
04041  M01S02770.1xd     +++|          RJM    WMC         WAIT CHANNEL EMPTY
04042  M01S02771.1xd     +++|          DCN.   MR+40
04043  M01S02772.1xd     +++|          NJN    RMRX        IF CHANNEL HUNG FULL
04044  M01S02773.1xd     +++|          ACN.   MR
04045  M01S02774.1xd     +++|          LDN    RBUFL       READ CHANNEL STATUS REGISTER
04046  M01S02775.1xd     +++|          IAM.   RBUF,MR
04047  M01S02776.1xd     +++|          UJN    RMRX        RETURN
04048  M01S02777.1xd     +++| SCD      SPACE  4,15
04049  M01S02778.1xd     +++|**        SCD - STORE *CPD* DATA.
04050  M01S02779.1xd     +++|*
04051  M01S02780.1xd     +++|*         ENTRY  (A) = 0 TO INDICATE CHANNEL INACTIVE.
04052  M01S02781.1xd     +++|*                    = 1 TO INDICATE CHANNEL ACTIVE.
04053  M01S02782.1xd     +++|*                (UC) = UNIT ACTIVITY COUNT.
04054  M01S02783.1xd     +++|*
04055  M01S02784.1xd     +++|*         EXIT   (T7) = 0.
04056  M01S02785.1xd     +++|*
04057  M01S02786.1xd     +++|*         USES   T5, T6, CM - CM+2.
04058  M01S02787.1xd     +++|*
04059  M01S02788.1xd     +++|*         MACROS CCTE.
04060  M01S02789.1xd     +++|
04061  M01S02790.1xd     +++|
04062  M01S02791.1xd     +++| SCD      SUBR               ENTRY/EXIT
04063  M01S02792.1xd     +++|          STD    T5
04064  M01S02793.1xd     +++|          LDN    ZERL        CLEAR UNUSED BYTES
04065  M01S02794.1xd     +++|          CRD    T6
04066  M01S02795.1xd     +++|          LDD    UC          INSERT UNIT COUNT
04067  M01S02796.1xd     +++|          STD    T6
04068  M01S02797.1xd     +++|          CCTE   *
04069  M01S02798.1xd     +++|          LDC    CREQ        STORE *CPD* DATA
04070  M01S02799.1xd     +++|          CWD    T5
04071  M01S02800.1xd     +++|          UJN    SCDX        RETURN
Line S02801 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
04072  M02S02801.ns2714  ---| SEC      SPACE  4,10
04073  M01S00200.ns2714  +++| SEC      SPACE  4,15
04074  M01S02802.1xd     +++|**        SEC - SET ERROR CODE.
04075  M01S02803.1xd     +++|*
04076  M01S02804.1xd     +++|*         ENTRY  (EO) = EST ORDINAL.
04077  M01S02805.1xd     +++|*
Line S02806 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
04078  M02S02806.ns2714  ---|*         USES   T5, WB+3 - WB+4.
04079  M01S00201.ns2714  +++|*         EXIT   TO *CSR* IF PROCESSING SPECIAL REQUEST.
04080  M01S02807.1xd     +++|*
Line S02808 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
04081  M02S02808.ns2714  ---|*         CALLS  CSR, IMR, RCS, SES.
Line S00202 Modification History
M01 (Added by) ns2714
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04082  M02S00202.1xd5    ---|*         USES   T5, CW - CW+4, WB+3 - WB+4.
04083  M01S00509.1xd5    +++|*         USES   T5, UC, CW - CW+4, WB+3 - WB+4.
04084  M01S00203.ns2714  +++|*
04085  M01S00204.ns2714  +++|*         CALLS  DCM, IMR, IOM, LDP, RCS, SES.
04086  M01S00205.ns2714  +++|*
04087  M01S00206.ns2714  +++|*         MACROS CBTE.
04088  M01S02809.1xd     +++|
04089  M01S02810.1xd     +++|
Line S02811 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
04090  M02S02811.ns2714  ---| SEC1     LDN    1           *CBT* COUNT TO BE DELINKED
04091  M01S00207.ns2714  +++| SEC5     LDN    1           BUFFER COUNT TO BE DELINKED
04092  M01S02812.1xd     +++|          STD    WB+3
04093  M01S00510.1xd5    +++|
04094  M01S00511.1xd5    +++|*         THE *SETS* MONITOR REQUEST IS USED TO MOVE THE I/O REQUEST
04095  M01S00512.1xd5    +++|*         TO AN ALTERNATE CHANNEL.  THE I/O BUFFER IS ONLY DELINKED
04096  M01S00513.1xd5    +++|*         IF THE REQUEST IS CHANNEL SPECIFIC.
04097  M01S00514.1xd5    +++|
Line S02813 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
04098  M02S02813.ns2714  ---|          LDML   EDBF+FALT
Line S02814 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
04099  M02S02814.ns2714  ---|          SHN    -2          CREATE INDEX FROM FAULT CODE
Line S02815 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
04100  M02S02815.ns2714  ---|          STD    T5
Line S02816 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
04101  M02S02816.ns2714  ---|          LDM    TMSE,T5     SET MASS STORAGE ERROR CODE
Line S02817 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
04102  M02S02817.ns2714  ---|          STD    WB+4
04103  M01S02818.1xd     +++|          LDN    SETS        INSERT CODE IN *CBT*
04104  M01S02819.1xd     +++|          RJM    IMR
04105  M01S02820.1xd     +++|*         LDN    0           SET INTERLOCK RELEASED (FOR *CMP*)
Line S02821 Modification History
M01 (Added by) 1xd
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
04106  M02S02821.272l774 ---|          STM    RQLN
04107  M01S00135.272l774 +++|          STM    RQLN,DI
04108  M01S02822.1xd     +++|          SOD    UC          DECREMENT UNIT ACTIVITY COUNT
04109  M01S02823.1xd     +++|
04110  M01S02824.1xd     +++| SEC      SUBR               ENTRY/EXIT
Line S02825 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
04111  M02S02825.ns2714  ---|          LDN    STDE
04112  M01S00208.ns2714  +++|          LDN    0
04113  M01S00209.ns2714  +++|          RJM    IOM
04114  M01S00210.ns2714  +++|          RJM    DCM         ENSURE CONTROLLER DESELECTED
04115  M01S00211.ns2714  +++|          RJM    LDP
Line S00212 Modification History
M01 (Added by) ns2714
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04116  M02S00212.1xd5    ---|          LDML   IPPS        CHECK DIAGNOSTIC FLAG
Line S00213 Modification History
M01 (Added by) ns2714
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04117  M02S00213.1xd5    ---|          SHN    -14
04118  M01S00515.1xd5    +++|          LDML   IPPS,DI     CHECK DIAGNOSTIC FLAG
04119  M01S00516.1xd5    +++|          SHN    -17
04120  M01S00214.ns2714  +++|          ZJN    SEC1        IF NOT ERROR FROM DIAGNOSTIC
04121  M01S00215.ns2714  +++|          LDD    CB
04122  M01S00216.ns2714  +++|          SHN    CBTLS       CONVERT CBT ORDINAL
04123  M01S00217.ns2714  +++|          CBTE   *
04124  M01S00218.ns2714  +++|          ADC    HSLK        FETCH ERROR STATUS
04125  M01S00219.ns2714  +++|          CRD    CW
04126  M01S00220.ns2714  +++|          LDD    CW          CHECK PREVIOUS ERROR
04127  M01S00221.ns2714  +++|          LPN    77
04128  M01S00222.ns2714  +++|          NJN    SEC2        IF PREVIOUS ERROR
04129  M01S00223.ns2714  +++| SEC1     LDML   EDBF+FALT
04130  M01S00224.ns2714  +++|          SHN    -2          CREATE INDEX FROM FAULT CODE
04131  M01S00225.ns2714  +++|          STD    T5
04132  M01S00226.ns2714  +++|          LDM    TMSE,T5
04133  M01S00227.ns2714  +++| SEC2     STD    WB+4        SET MASS STORAGE ERROR CODE
04134  M01S00517.1xd5    +++|          LDML   IPPS,DI     CLEAR *RND*, *SDA* AND *BOR* FLAGS
04135  M01S00518.1xd5    +++|          LPC    -1S15-1S14-1S13
04136  M01S00519.1xd5    +++|          STML   IPPS,DI
04137  M01S00520.1xd5    +++|          LDD    WB+4        CHECK ERROR CODE
04138  M01S00228.ns2714  +++|          LMN    NRDE
04139  M01S00229.ns2714  +++|          ZJN    SEC3        IF NOT-READY CONDITION
04140  M01S00230.ns2714  +++|          LDN    STDE&STNR
04141  M01S00231.ns2714  +++| SEC3     LMN    STNR
04142  M01S02826.1xd     +++|          RJM    SES         SET ERROR STATUS IN MST
04143  M01S00232.ns2714  +++|          LDD    CB
04144  M01S00233.ns2714  +++|          ZJN    SEC4        IF SPECIAL REQUEST OR NO BUFFER
Line S02827 Modification History
M01 (Added by) 1xd
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
04145  M02S02827.272l774 ---|          LDM    SREQ
04146  M01S00136.272l774 +++|          LDM    SREQ,DI
Line S02828 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
04147  M02S02828.ns2714  ---|          ZJN    SEC1        IF I/O PROCESSING
Line S02829 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
04148  M02S02829.ns2714  ---|          LDD    EO          DOWN CHANNEL ON THIS DEVICE
04149  M01S00234.ns2714  +++|          ZJP    SEC5        IF I/O PROCESSING
04150  M01S00235.ns2714  +++| SEC4     LDD    EO          DOWN CHANNEL ON THIS DEVICE
04151  M01S02830.1xd     +++|          RJM    RCS
04152  M01S00108.273l780 +++|          AOM    MISC        MARK ERROR UNRECOVERED
04153  M01S02831.1xd     +++|          LJM    CSR         CLEAR SPECIAL REQUEST
04154  M01S02832.1xd     +++| SFR      SPACE  4,15
04155  M01S02833.1xd     +++|**        SFR - SEARCH FOR CONSECUTIVE REQUEST.
04156  M01S02834.1xd     +++|*
04157  M01S02835.1xd     +++|*         ENTRY  (A) = CURRENT *CBT* ORDINAL.
04158  M01S02836.1xd     +++|*
04159  M01S02837.1xd     +++|*         EXIT   (A) = (NB) = 0 IF NO CONSECUTIVE REQUEST FOUND.
04160  M01S02838.1xd     +++|*                           = *CBT* ORDINAL OF NEXT REQUEST.
04161  M01S02839.1xd     +++|*                (NR - NR+4) = PHYSICAL ADDRESS OF NEXT REQUEST.
04162  M01S02840.1xd     +++|*
Line S02841 Modification History
M01 (Added by) 1xd
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
04163  M02S02841.272l774 ---|*         USES   CM - CM+4, T1 - T6.
04164  M01S00137.272l774 +++|*         USES   NB, CM - CM+4, NR - NR+4, T1 - T6.
04165  M01S02842.1xd     +++|*
04166  M01S02843.1xd     +++|*         MACROS CBTE.
04167  M01S02844.1xd     +++|
04168  M01S02845.1xd     +++|
04169  M01S02846.1xd     +++| SFR      SUBR               ENTRY/EXIT
04170  M01S02847.1xd     +++|          SHN    CBTLS
04171  M01S02848.1xd     +++|          CBTE   *
04172  M01S02849.1xd     +++|          ADC    PAD1        FETCH SEEK PARAMETERS FROM *CBT*
04173  M01S02850.1xd     +++|          CRD    CM
04174  M01S02851.1xd     +++|          ADN    IOLK-PAD1   (T1) = I/O LINK-UP FLAGS
04175  M01S02852.1xd     +++|          CRD    T1
04176  M01S02853.1xd     +++|          LDD    T1          CHECK STREAMING ENABLED
04177  M01S02854.1xd     +++|          LPN    40
04178  M01S02855.1xd     +++|          NJN    SFR1        IF DATA STREAMING DISABLED
Line S02856 Modification History
M01 (Added by) 1xd
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
04179  M02S02856.272l774 ---|          LDM    CBCT
Line S02857 Modification History
M01 (Added by) 1xd
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
04180  M02S02857.272l774 ---|          LMK    MXBS
04181  M01S00138.272l774 +++|          LDM    CYLN,DI
04182  M01S00139.272l774 +++|          ADN    2
04183  M01S00140.272l774 +++|          SBK    CYUN
04184  M01S00141.272l774 +++|          PJN    SFR0        IF WITHIN LAST TWO CYLINDERS OF DEVICE
04185  M01S00142.272l774 +++|          LDK    MXBS        MAXIMUM BUFFER COUNT TO STREAM
04186  M01S00143.272l774 +++|          UJN    SFR0.1      CHECK BUFFER COUNT
04187  M01S00144.272l774 +++|
04188  M01S00145.272l774 +++| SFR0     LDK    MNBS        MINIMUM BUFFER COUNT TO STREAM
04189  M01S00146.272l774 +++| SFR0.1   SBM    CBCT,DI
04190  M01S02858.1xd     +++|          ZJN    SFR2        IF TIME TO CURTAIL STREAMING
04191  M01S02859.1xd     +++|          LDD    T1+2
04192  M01S02860.1xd     +++|          STD    NB
04193  M01S02861.1xd     +++|          ZJN    SFRX        IF NO REQUEST AVAILABLE
04194  M01S02862.1xd     +++|          SHN    CBTLS
04195  M01S02863.1xd     +++|          CBTE   *
04196  M01S02864.1xd     +++|          ADC    PAD1        PHYSICAL ADDRESS OF NEXT REQUEST
04197  M01S02865.1xd     +++|          CRD    NR
04198  M01S02866.1xd     +++|          ADN    IOLK-PAD1   I/O LINK-UP WORD OF NEXT REQUEST
04199  M01S02867.1xd     +++|          CRD    T2
04200  M01S02868.1xd     +++|          LDD    T2          COMPARE LINK-UP FLAGS
04201  M01S02869.1xd     +++|          LMD    T1
04202  M01S02870.1xd     +++|          LPC    DRFM+ILFM
04203  M01S02871.1xd     +++|          ZJN    SFR4        IF SAME DIRECTION AND INTERLOCKED
04204  M01S02872.1xd     +++| SFR1     LDN    0
04205  M01S02873.1xd     +++| SFR2     STD    NB
04206  M01S02874.1xd     +++| SFR3     UJP    SFRX        RETURN
04207  M01S02875.1xd     +++|
04208  M01S02876.1xd     +++| SFR4     LDD    NR+1        CHECK SEEK PARAMETERS
04209  M01S02877.1xd     +++|          SBD    CM+1
04210  M01S02878.1xd     +++|          ZJN    SFR5        IF SAME CYLINDER
04211  M01S02879.1xd     +++|          SBN    1
04212  M01S02880.1xd     +++|          NJN    SFR1        IF NOT NEXT CYLINDER
04213  M01S02881.1xd     +++|          LDD    CM+2
04214  M01S02882.1xd     +++|          SBK    PTCY*100
04215  M01S02883.1xd     +++|          UJN    SFR6        CHECK NEXT TRACK / SECTOR
04216  M01S02884.1xd     +++|
04217  M01S02885.1xd     +++| SFR5     LDD    CM+2        CHECK NEXT SECTOR
04218  M01S02886.1xd     +++|          ADN    PSBFDN
04219  M01S02887.1xd     +++|          LMD    NR+2
04220  M01S02888.1xd     +++|          ZJN    SFR7        IF NEXT SECTOR ON SAME TRACK
04221  M01S02889.1xd     +++|          LDD    CM+2
04222  M01S02890.1xd     +++| SFR6     ADD    HN          SET NEXT TRACK
04223  M01S02891.1xd     +++|          SBK    PSPT-PSBF
04224  M01S02892.1xd     +++|          LMD    NR+2
04225  M01S02893.1xd     +++|          NJN    SFR1        IF NOT NEXT SECTOR ON CONSECUTIVE TRACKS
04226  M01S02894.1xd     +++| SFR7     LDD    NB
04227  M01S02895.1xd     +++|          UJN    SFR3        RETURN
04228  M01S02896.1xd     +++| SLB      SPACE  4,15
04229  M01S02897.1xd     +++|**        SLB - SET LINKAGE BITS.
04230  M01S02898.1xd     +++|*
04231  M01S02899.1xd     +++|*         ENTRY  (A) = *CBT* ORDINAL.
04232  M01S02900.1xd     +++|*                (RW) = READ / WRITE STATUS.
04233  M01S02901.1xd     +++|*
04234  M01S02902.1xd     +++|*         EXIT   LINKAGE BITS SET IN *CBT* ENTRY / UEM BUFFER.
04235  M01S02903.1xd     +++|*
Line S02904 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04236  M02S02904.1xd5    ---|*         USES   PB, CM - CM+4, T0 - T6, UA - UA+1.
04237  M01S00521.1xd5    +++|*         USES   PB, CM - CM+4, T1 - T6, UA - UA+1.
04238  M01S02905.1xd     +++|*
04239  M01S02906.1xd     +++|*         CALLS  RLB, SUA, WLB.
04240  M01S02907.1xd     +++|*
04241  M01S02908.1xd     +++|*         MACROS CBTE.
04242  M01S02909.1xd     +++|
04243  M01S02910.1xd     +++|
04244  M01S02911.1xd     +++| SLB      SUBR               ENTRY/EXIT
04245  M01S02912.1xd     +++|          STD    PB
04246  M01S02913.1xd     +++|          RJM    SUA         SET UEM ADDRESS
04247  M01S02914.1xd     +++|          LDN    PAD1
04248  M01S02915.1xd     +++|          STD    T2
04249  M01S02916.1xd     +++|          SRD    T3
04250  M01S02917.1xd     +++|          LDN    5           UEM WORD COUNT
04251  M01S02918.1xd     +++|          STD    T5
04252  M01S02919.1xd     +++|          LDM    SLBB,RW     SET PROCESSOR ADDRESS
04253  M01S02920.1xd     +++|          STM    SLBA
04254  M01S02921.1xd     +++| SLB1     LRD    UA          LOAD *R* REGISTER
04255  M01S02922.1xd     +++|          LDD    PB
04256  M01S02923.1xd     +++|          SHN    CBTLS       READ CONTROL BUFFER WORD
04257  M01S02924.1xd     +++|          CBTE   *
04258  M01S02925.1xd     +++|          ADC    0           FWA OF *CBT*
04259  M01S02926.1xd     +++|          ADD    T2
04260  M01S02927.1xd     +++|          CRD    CM
04261  M01S02928.1xd     +++|          LDC    SBUF-4      SET BUFFER ADDRESS
Line S02929 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04262  M02S02929.1xd5    ---|          STD    T1
04263  M01S00522.1xd5    +++|          STDL   T1
04264  M01S02930.1xd     +++|          LDC    1S17        READ START OF BUFFER SEGMENT
04265  M01S02931.1xd     +++|          CRML   SBUF,T5
04266  M01S02932.1xd     +++|          LDN    CM+3        SET *CBT* ENTRY ADDRESS
04267  M01S02933.1xd     +++|          STD    T6
04268  M01S02934.1xd     +++|          RJM    0           MOVE LINKAGE BITS
04269  M01S02935.1xd     +++| SLBA     EQU    *-1
04270  M01S02936.1xd     +++|          LDN    10          ADVANCE *R* REGISTER IMAGE
04271  M01S02937.1xd     +++|          RAD    UA+1
04272  M01S02938.1xd     +++|          SHN    -14
04273  M01S02939.1xd     +++|          RAD    UA
04274  M01S02940.1xd     +++|          AOD    T2          ADVANCE CONTROL BUFFER WORD
04275  M01S02941.1xd     +++|          LMN    PAD4+1
04276  M01S02942.1xd     +++|          NJN    SLB1        IF NOT COMPLETE
04277  M01S02943.1xd     +++|          LRD    T3
04278  M01S02944.1xd     +++|          UJP    SLBX        RETURN
04279  M01S02945.1xd     +++|
04280  M01S02946.1xd     +++|
Line S02947 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04281  M02S02947.1xd5    ---| SLBB     CON    RLB
Line S02948 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04282  M02S02948.1xd5    ---|          CON    WLB
04283  M01S00523.1xd5    +++| SLBB     CON    RLB         READ LINKAGE BITS
04284  M01S00524.1xd5    +++|          CON    WLB         WRITE LINKAGE BITS
04285  M01S02949.1xd     +++| SMC      SPACE  4,10
04286  M01S02950.1xd     +++|**        SMC - SEARCH FOR MAJOR CATEGORY SUBSTATUS.
04287  M01S02951.1xd     +++|*
04288  M01S02952.1xd     +++|*         ENTRY  (A) = MAJOR STATUS CATEGORY.
04289  M01S02953.1xd     +++|*
04290  M01S02954.1xd     +++|*         EXIT   (A) = FIRST TWO OCTETS OF SUBSTATUS.
04291  M01S02955.1xd     +++|*                    .LT. 0 IF SUBSTATUS NOT PRESENT.
04292  M01S02956.1xd     +++|*                (T4) = SUBSTATUS PARAMETER ID CODE.
04293  M01S02957.1xd     +++|*
04294  M01S02958.1xd     +++|*         CALLS  SRP.
04295  M01S02959.1xd     +++|
04296  M01S02960.1xd     +++|
04297  M01S02961.1xd     +++| SMC1     LDML   RPBF+6,T3   RETURN FIRST BYTE OF SUBSTATUS
04298  M01S02962.1xd     +++|
04299  M01S02963.1xd     +++| SMC      SUBR               ENTRY/EXIT
04300  M01S02964.1xd     +++|          LMN    0#10
04301  M01S02965.1xd     +++|          STD    T4          SEARCH FOR CONTROLLER SUBSTATUS
04302  M01S02966.1xd     +++|          RJM    SRP
04303  M01S02967.1xd     +++|          ZJN    SMC1        IF SUBSTATUS FOUND
04304  M01S02968.1xd     +++|          LDN    0#20-0#10
04305  M01S02969.1xd     +++|          RAD    T4          SEARCH FOR DRIVE SUBSTATUS
04306  M01S02970.1xd     +++|          RJM    SRP
04307  M01S02971.1xd     +++|          ZJN    SMC1        IF SUBSTATUS FOUND
04308  M01S02972.1xd     +++|*         LCN    0
04309  M01S02973.1xd     +++|          UJN    SMCX        RETURN
04310  M01S02974.1xd     +++| SRF      SPACE  4,10
04311  M01S02975.1xd     +++|**        SRF - SET DRIVER RELOAD FLAG.
04312  M01S02976.1xd     +++|*
04313  M01S02977.1xd     +++|*         EXIT   (A) = 0.
04314  M01S02978.1xd     +++|*
04315  M01S02979.1xd     +++|*         USES   CM - CM+4.
04316  M01S02980.1xd     +++|*
Line S02981 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
04317  M02S02981.ns2714  ---|*         CALLS  CMC, DCR.
04318  M01S00236.ns2714  +++|*         CALLS  DCR.
04319  M01S02982.1xd     +++|*
Line S02983 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
04320  M02S02983.ns2714  ---|*         MACROS CHTE, MONITOR.
04321  M01S00237.ns2714  +++|*         MACROS MONITOR.
04322  M01S02984.1xd     +++|
04323  M01S02985.1xd     +++|
04324  M01S02986.1xd     +++| SRF      SUBR               ENTRY/EXIT
Line S02987 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
04325  M02S02987.ns2714  ---|          RJM    CMC
04326  M01S02988.1xd     +++|          RJM    DCR         DROP CHANNEL RESERVATION
04327  M01S02989.1xd     +++|*         LDN    0
04328  M01S02990.1xd     +++|          STD    CM+2        CLEAR UNUSED BYTE
04329  M01S02991.1xd     +++|          CHTE   *
04330  M01S02992.1xd     +++|          LDC    CTALL*2     ADDRESS OF CHANNEL CONTROLWARE TABLE ENTRY
04331  M01S02993.1xd     +++|          STD    CM+4
04332  M01S02994.1xd     +++|          SHN    -14
04333  M01S02995.1xd     +++|          STD    CM+3
04334  M01S02996.1xd     +++|          LDN    1           SET NUMBER OF REQUESTS
04335  M01S02997.1xd     +++|          STD    CM+1
04336  M01S02998.1xd     +++|          LDD    MA          STORE REQUEST IN MESSAGE BUFFER
04337  M01S02999.1xd     +++|          CWM    SRFA,CM+1
04338  M01S03000.1xd     +++|          MONITOR  UTEM      SET RELOAD FLAG
04339  M01S03001.1xd     +++|*         LDN    0
04340  M01S03002.1xd     +++|          UJN    SRFX        RETURN
04341  M01S03003.1xd     +++|
04342  M01S03004.1xd     +++|
04343  M01S03005.1xd     +++| SRFA     VFD    1/0,5/0,6/1,6/,42/1
Line S03006 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04344  M02S03006.1xd5    ---| SRI      SPACE  4,15
Line S03007 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04345  M02S03007.1xd5    ---|**        SRI - SET/CLEAR SELECTIVE RESET INTERLOCK.
Line S03008 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04346  M02S03008.1xd5    ---|*
Line S03009 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04347  M02S03009.1xd5    ---|*         ENTRY  (A) = 0 TO CLEAR INTERLOCK.
Line S03010 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04348  M02S03010.1xd5    ---|*                    = 1 TO SET INTERLOCK.
Line S03011 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04349  M02S03011.1xd5    ---|*
Line S03012 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04350  M02S03012.1xd5    ---|*         EXIT   (A) = 0 IF REQUEST COMPLETED.
Line S03013 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04351  M02S03013.1xd5    ---|*
Line S03014 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04352  M02S03014.1xd5    ---|*         USES   CM - CM+6.
Line S03015 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04353  M02S03015.1xd5    ---|*
Line S03016 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
M03 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04354  M03S03016.1xd5    ---|*         CALLS  CMC.
Line S03017 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
M03 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04355  M03S03017.1xd5    ---|*
Line S03018 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04356  M02S03018.1xd5    ---|*         MACROS MONITOR.
Line S03019 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04357  M02S03019.1xd5    ---|
Line S03020 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04358  M02S03020.1xd5    ---|
Line S03021 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04359  M02S03021.1xd5    ---| SRI      SUBR               ENTRY/EXIT
Line S03022 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04360  M02S03022.1xd5    ---|          STM    SRIA+1*5+4
Line S03023 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04361  M02S03023.1xd5    ---|          LMN    1           COMPLEMENT FOR VERIFY OPTION
Line S03024 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04362  M02S03024.1xd5    ---|          STM    SRIA+4
Line S03025 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
M03 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04363  M03S03025.1xd5    ---|          RJM    CMC         CHECK MONITOR COMPLETE
Line S03026 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04364  M02S03026.1xd5    ---|          LDC    BIOL
Line S03027 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04365  M02S03027.1xd5    ---|          CRD    CM+2        SET FWA OF BUFFERED DEVICE TABLES
Line S03028 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04366  M02S03028.1xd5    ---|          LDN    0
Line S03029 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04367  M02S03029.1xd5    ---|          STD    CM+2
Line S03030 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04368  M02S03030.1xd5    ---|          LDN    2           SET REQUEST COUNT
Line S03031 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04369  M02S03031.1xd5    ---|          STD    CM+1
Line S03032 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04370  M02S03032.1xd5    ---|          LDD    MA          STORE MESSAGE BUFFER PARAMETERS
Line S03033 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04371  M02S03033.1xd5    ---|          CWM    SRIA,CM+1
Line S03034 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04372  M02S03034.1xd5    ---|          MONITOR  UTEM      ISSUE MONITOR FUNCTION
Line S03035 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04373  M02S03035.1xd5    ---|          LDD    CM+1
Line S03036 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04374  M02S03036.1xd5    ---|          UJN    SRIX        RETURN WITH STATUS
Line S03037 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04375  M02S03037.1xd5    ---|
Line S03038 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04376  M02S03038.1xd5    ---|
Line S03039 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04377  M02S03039.1xd5    ---| SRIA     VFD    1/1,5/PUTP,6/1,6/XDSR,42/0
Line S03040 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04378  M02S03040.1xd5    ---|          VFD    1/0,5/PUTP,6/1,6/XDSR,42/1
04379  M01S03041.1xd     +++| SRP      SPACE  4,10
04380  M01S03042.1xd     +++|**        SRP - SEARCH RESPONSE PACKET.
04381  M01S03043.1xd     +++|*
04382  M01S03044.1xd     +++|*         ENTRY  (A) = PARAMETER ID TO SEARCH FOR.
04383  M01S03045.1xd     +++|*
04384  M01S03046.1xd     +++|*         EXIT   (A) = 0 IF ID FOUND.
04385  M01S03047.1xd     +++|*                    .LT. 0 IF ID NOT FOUND.
04386  M01S03048.1xd     +++|*                (T3) = *RPBF* INDEX - 5 OF PARAMETER BLOCK.
04387  M01S03049.1xd     +++|*
04388  M01S03050.1xd     +++|*         USES   T1, T2.
04389  M01S03051.1xd     +++|
04390  M01S03052.1xd     +++|
04391  M01S03053.1xd     +++| SRP1     LDML   RPBF+5,T3   EXTRACT PARAMETER BLOCK LENGTH
04392  M01S03054.1xd     +++|          SHN    -10-1
04393  M01S03055.1xd     +++|          ADN    1           CONVERT OCTET COUNT TO BYTE COUNT
04394  M01S03056.1xd     +++|          STD    T0
04395  M01S03057.1xd     +++|          RAD    T3          ADVANCE BUFFER INDEX
04396  M01S03058.1xd     +++|          LDD    T2
04397  M01S03059.1xd     +++|          SBD    T0
04398  M01S03060.1xd     +++| SRP2     MJN    SRPX        IF END OF RESPONSE PACKET
04399  M01S03061.1xd     +++|          STD    T2
04400  M01S03062.1xd     +++|          LDM    RPBF+5,T3   CHECK NEXT PARAMETER BLOCK
04401  M01S03063.1xd     +++|          LMD    T1
04402  M01S03064.1xd     +++|          LPC    377
04403  M01S03065.1xd     +++|          NJN    SRP1        IF NOT REQUESTED ID
04404  M01S03066.1xd     +++|
04405  M01S03067.1xd     +++| SRP      SUBR               ENTRY/EXIT
04406  M01S03068.1xd     +++|          STD    T1
04407  M01S03069.1xd     +++|          LDN    0           INITIALIZE INDEX
04408  M01S03070.1xd     +++|          STD    T3
04409  M01S03071.1xd     +++|          LDM    RPBF+PLN    PACKET LENGTH
04410  M01S03072.1xd     +++|          ADN    1
04411  M01S03073.1xd     +++|          SHN    -1          CONVERT TO PP WORD COUNT
04412  M01S03074.1xd     +++|          SBN    5
04413  M01S03075.1xd     +++|          UJN    SRP2        CHECK MINIMUM PACKET LENGTH
04414  M01S03076.1xd     +++| STF      SPACE  4,15
Line S03077 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04415  M02S03077.1xd5    ---|**        STF - REQUEST TRACK FLAW.
04416  M01S00525.1xd5    +++|**        STF - SET TRACK FLAW, IF TRACK WITHIN USER AREA.
04417  M01S03078.1xd     +++|*
04418  M01S03079.1xd     +++|*         ENTRY  (CB) = CURRENT *CBT* ORDINAL.
04419  M01S03080.1xd     +++|*                (EO) = EST ORDINAL.
04420  M01S03081.1xd     +++|*                (T3+1) = CYLINDER NUMBER.
04421  M01S03082.1xd     +++|*                (T3+2) = PHYSICAL TRACK + SECTOR.
04422  M01S03083.1xd     +++|*
Line S03084 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
04423  M02S03084.ns2714  ---|*         USES   CM - CM+4.
Line S00238 Modification History
M01 (Added by) ns2714
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04424  M02S00238.1xd5    ---|*         USES   CM+1.
04425  M01S00526.1xd5    +++|*         USES   CM+1 - CM+3.
04426  M01S03085.1xd     +++|*
Line S03086 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
04427  M02S03086.ns2714  ---|*         CALLS  CDA, CMC, C2D, IDM.
04428  M01S00239.ns2714  +++|*         CALLS  CDA, C2D, IDM.
04429  M01S03087.1xd     +++|*
04430  M01S03088.1xd     +++|*         MACROS MONITOR.
04431  M01S03089.1xd     +++|
04432  M01S03090.1xd     +++|
04433  M01S03091.1xd     +++| STF      SUBR               ENTRY/EXIT
Line S03092 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
04434  M02S03092.ns2714  ---|          RJM    CMC
Line S03093 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
04435  M02S03093.ns2714  ---|          LDD    EO          CONVERT EST ORDINAL
Line S03094 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
04436  M02S03094.ns2714  ---|          SHN    -3
04437  M01S00240.ns2714  +++|          LDD    EO
04438  M01S00241.ns2714  +++|          SHN    -3          CONVERT EST ORDINAL
04439  M01S03095.1xd     +++|          RJM    C2D
04440  M01S03096.1xd     +++|          STM    STFB+1      SET ORDINAL IN MESSAGE
04441  M01S03097.1xd     +++|          LDD    EO
04442  M01S03098.1xd     +++|          STD    CM+1
04443  M01S03099.1xd     +++|          LPN    7
04444  M01S03100.1xd     +++|          SHN    6           CONVERT LOW ORDER DIGIT
04445  M01S03101.1xd     +++|          ADC    2R0,
04446  M01S03102.1xd     +++|          STM    STFB+2
04447  M01S03103.1xd     +++|          RJM    CDA         CONVERT DISK ADDRESS
04448  M01S00527.1xd5    +++|          LDD    T6          SET TRACK TO FLAW
04449  M01S00528.1xd5    +++|          STD    CM+2
04450  M01S00529.1xd5    +++|          SBK    MCLT
04451  M01S00530.1xd5    +++|          PJN    STFX        IF TRACK NOT WITHIN USER AREA
04452  M01S03104.1xd     +++|          LDD    T6
04453  M01S03105.1xd     +++|          RJM    C2D         SET TRACK NUMBER IN MESSAGE
04454  M01S03106.1xd     +++|          STM    STFB+5
04455  M01S03107.1xd     +++|          LDD    T6
04456  M01S03108.1xd     +++|          SHN    -6
04457  M01S03109.1xd     +++|          RJM    C2D         SET TRACK NUMBER IN MESSAGE
04458  M01S03110.1xd     +++|          STM    STFB+4
04459  M01S03111.1xd     +++|          LDK    SFTS        INSERT SUBFUNCTION
04460  M01S03112.1xd     +++|          STD    CM+3
04461  M01S03113.1xd     +++|          MONITOR  SMDM      SET TRACK FLAW REQUEST IN MST
04462  M01S03114.1xd     +++|          LDD    CM+1
04463  M01S03115.1xd     +++|          NJN    STF2        IF THIS FLAW ALREADY REQUESTED
04464  M01S03116.1xd     +++|          LDC    STFA
Line S03117 Modification History
M01 (Added by) 1xd
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
04465  M02S03117.ns2769  ---|          STM    MAD1        ISSUE ERROR LOG MESSAGE
04466  M01S00012.ns2769  +++|          STML   MAD1        ISSUE ERROR LOG MESSAGE
04467  M01S03118.1xd     +++|          RJM    IDM
04468  M01S03119.1xd     +++| STF2     LJM    STFX        RETURN
04469  M01S03120.1xd     +++|
04470  M01S03121.1xd     +++|
04471  M01S03122.1xd     +++| STFA     VFD    24/0        RESERVED
04472  M01S03123.1xd     +++|          VFD    12/1        ERRLOG ALERT FLAG
04473  M01S03124.1xd     +++|          VFD    12/STFAL    MESSAGE LENGTH
04474  M01S03125.1xd     +++|          VFD    12/ELDY     ERRLOG DAYFILE
04475  M01S03126.1xd     +++|
04476  M01S03127.1xd     +++| STFB     DATA   C*EQXXX,TKNNNN, MEDIA DEFECT ENCOUNTERED.*
04477  M01S03128.1xd     +++|
04478  M01S03129.1xd     +++| .1       SET    *-STFA+4
04479  M01S03130.1xd     +++| STFAL    EQU    .1/5
04480  M01S03131.1xd     +++| STO      SPACE  4,10
04481  M01S03132.1xd     +++|**        STO - SET TIMEOUT.
04482  M01S03133.1xd     +++|*
04483  M01S03134.1xd     +++|*         ENTRY  (A) = TIMEOUT VALUE (IN SECONDS).
04484  M01S03135.1xd     +++|*
Line S03136 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04485  M02S03136.1xd5    ---|*         USES   T5, T6, T7, CM - CM+4.
Line S03137 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04486  M02S03137.1xd5    ---|*
Line S03138 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04487  M02S03138.1xd5    ---|*         MACROS FTTE.
04488  M01S00531.1xd5    +++|*         USES   T6, CM - CM+4.
04489  M01S03139.1xd     +++|
04490  M01S03140.1xd     +++|
04491  M01S03141.1xd     +++| STO      SUBR               ENTRY/EXIT
04492  M01S03142.1xd     +++|          STD    T6
04493  M01S03143.1xd     +++|          LDC    RTCL        FETCH CURRENT TIME
04494  M01S03144.1xd     +++|          CRD    CM
04495  M01S03145.1xd     +++|          LDD    T6
Line S03146 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04496  M02S03146.1xd5    ---|          RAD    CM+1        SET TIME LIMIT
04497  M01S00532.1xd5    +++|          ADD    CM+1        SET TIME LIMIT
04498  M01S00533.1xd5    +++|          STM    FTOC+1,DI
04499  M01S03147.1xd     +++|          SHN    -14
Line S03148 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04500  M02S03148.1xd5    ---|          RAD    CM
Line S03149 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04501  M02S03149.1xd5    ---|          LDM    STO         SET CALLERS ADDRESS
Line S03150 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04502  M02S03150.1xd5    ---|          STD    T7
Line S03151 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04503  M02S03151.1xd5    ---|          LDN    0
Line S03152 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04504  M02S03152.1xd5    ---|          STD    T5
Line S03153 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04505  M02S03153.1xd5    ---|          LDI    DI
Line S03154 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04506  M02S03154.1xd5    ---|          ERRNZ  PUTO        CODE DEPENDS ON VALUE
Line S03155 Modification History
M01 (Added by) 1xd
M02 (Updated by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
04507  M02S03155.1xd5    ---|          SHK    FTTLS
Proceed to Part 4
cdc/nos2.source/opl.opl871/deck/1xd.003.txt ยท Last modified: by 127.0.0.1