User Tools

Site Tools


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

Deck 1XD

Library Member Format: MODIFY

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
00001  M00S00001.1xd     +++|          IDENT  1XD,CM3D
00002  M00S00002.1xd     +++|          TITLE  1XD - NOS XMD (9853) DRIVER.
00003  M00S00003.1xd     +++|          CIPPU  ,S
00004  M00S00004.1xd     +++|          MEMSEL 8
00005  M00S00005.1xd     +++|          BASE   M
00006  M00S00006.1xd     +++|          SST
00007  M00S00007.1xd     +++|*COMMENT  1XD - CM3/XMD3 (9853) DRIVER.
Line S00008 Modification History
M01 (Removed by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00008  M01S00008.281l803 ---|          COMMENT  COPYRIGHT CONTROL DATA CORPORATION, 1988.
Line S00001 Modification History
M01 (Added by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00009  M01S00001.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
00010  M00S00009.1xd     +++|          SPACE  4,10
00011  M00S00010.1xd     +++|***       1XD - CM3/XMD3 (9853) DRIVER.
00012  M00S00011.1xd     +++|*
00013  M00S00012.1xd     +++|*         P. D. HAAS.        88/02/26.
00014  M00S00013.1xd     +++|          SPACE  4,10
Line S00014 Modification History
M01 (Removed by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
00015  M01S00014.272l774 ---|***       *1XD* IS THE DRIVER FOR THE CM3/XMD3 DISK STORAGE SUBSYSTEM.
Line S00001 Modification History
M01 (Added by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
00016  M01S00001.272l774 +++|***       *1XD* IS THE DRIVER FOR THE XMD (9853) DISK STORAGE SUBSYSTEM.
00017  M00S00015.1xd     +++|*
00018  M00S00016.1xd     +++|*         THE XMD DISK DRIVES ARE SUPPORTED AS BUFFERED I/O
00019  M00S00017.1xd     +++|*         DEVICES.  REQUESTS TO BE PROCESSED BY *1XD* ARE POSTED
00020  M00S00018.1xd     +++|*         BY *CPUMTR* IN THE BUFFERED I/O TABLES IN *CMR*.
00021  M00S00019.1xd     +++|*         *1XD* INTERLOCKS UNITS, DELINKS BUFFERS, AND COMPLETES
00022  M00S00020.1xd     +++|*         SAID REQUESTS BY ISSUING APPROPRIATE *BIOM* FUNCTIONS.
00023  M00S00021.1xd     +++|*
00024  M00S00022.1xd     +++|*         EACH COPY OF *1XD* WILL SUPPORT ONE CONCURRENT CHANNEL
00025  M00S00023.1xd     +++|*         CONFIGURED WITH THE INTELLIGENT PERIPHERAL INTERFACE (IPI)
00026  M00S00024.1xd     +++|*         AND IS THE SOLE DRIVER FOR ALL XMD DISKS ON THAT CHANNEL.
00027  M00S00025.1xd     +++|*         *1XD* MUST BE LOADED INTO A CONCURRENT PP, IN THE SAME
00028  M00S00026.1xd     +++|*         BANK AS THE CHANNEL IT IS TO SERVICE.
00029  M00S00027.1xd     +++|*
00030  M00S00028.1xd     +++|*         EACH COPY OF THE DRIVER CAN SERVICE UP TO SIXTEEN XMD
00031  M00S00029.1xd     +++|*         UNITS IN ANY CONFIGURATION MIX OF CONTROL MODULES AND
00032  M00S00030.1xd     +++|*         DRIVES COUPLED TO EITHER PORT OF THE IPI ADAPTOR.
00033  M00S00031.1xd     +++|*
00034  M00S00032.1xd     +++|*         *1XD* SCANS THROUGH THE *PUT* ENTRIES IN A CIRCULAR FASHION
00035  M00S00033.1xd     +++|*         LOOKING FOR REQUESTS TO PROCESS.  ONCE A REQUEST IS FOUND,
00036  M00S00034.1xd     +++|*         *1XD* USES THE PHYSICAL DISK AND UEM ADDRESSES IN THE
00037  M00S00035.1xd     +++|*         CORRESPONDING *CBT* ENTRY TO DETERMINE THE ACTION TO BE
00038  M00S00036.1xd     +++|*         TAKEN.  *1XD* WILL ATTEMPT TO PROCESS CONSECUTIVE REQUESTS
00039  M00S00037.1xd     +++|*         ON THE CURRENT UNIT UNTIL THE END OF THE UNIT I/O QUEUE,
00040  M00S00038.1xd     +++|*         OR A CONSECUTIVE REQUEST WAS NOT FOUND.  AT THIS POINT
00041  M00S00039.1xd     +++|*         *1XD* WILL RESUME ITS SEARCH THROUGH THE *PUT* WITH THE
00042  M00S00040.1xd     +++|*         *PUT* ENTRY IMMEDIATELY FOLLOWING THE ONE JUST PROCESSED.
00043  M00S00041.1xd     +++|          SPACE  4,10
00044  M00S00042.1xd     +++|***       ORGANIZATION OF THE 9853 (MEASUREMENTS IN DECIMAL).
00045  M00S00043.1xd     +++|*
00046  M00S00044.1xd     +++|*         EQUIPMENT TYPE                    *DN*
00047  M00S00045.1xd     +++|*
00048  M00S00046.1xd     +++|*         UNITS/LOGICAL DEVICE                 1
00049  M00S00047.1xd     +++|*
00050  M00S00048.1xd     +++|*         PHYSICAL ORGANIZATION:
00051  M00S00049.1xd     +++|*
00052  M00S00050.1xd     +++|*           WORDS/PHYSICAL SECTOR            256
00053  M00S00051.1xd     +++|*           PHYSICAL SECTORS/TRACK            21
00054  M00S00052.1xd     +++|*           PHYSICAL TRACKS/CYLINDER          19
00055  M00S00053.1xd     +++|*           CYLINDERS/DEVICE                1409
00056  M00S00054.1xd     +++|*           WORDS/DEVICE             143,861,760
00057  M00S00055.1xd     +++|*
00058  M00S00056.1xd     +++|*         LOGICAL ORGANIZATION:
00059  M00S00057.1xd     +++|*
00060  M00S00058.1xd     +++|*           WORDS/LOGICAL SECTOR              64
00061  M00S00059.1xd     +++|*           LOGICAL SECTORS/PHYSICAL SECTOR    4
00062  M00S00060.1xd     +++|*           LOGICAL SECTORS/LOGICAL TRACK   1120
00063  M00S00061.1xd     +++|*           LOGICAL TRACKS/DEVICE           2007
00064  M00S00062.1xd     +++|*
00065  M00S00063.1xd     +++|*         MAXIMUM SUSTAINED DATA RATE        312 K WORDS/SECOND
00066  M00S00064.1xd     +++|          SPACE  4,10
00067  M00S00065.1xd     +++|***       CALL.
00068  M00S00066.1xd     +++|*
00069  M00S00067.1xd     +++|*T        18/ DRN, 6/ CP, 6/ CO, 18/, 7/ 1, 5/ CH
Figure

045111229 CH 1303536414259 CO CP DRN

00070  M00S00068.1xd     +++|*
00071  M00S00069.1xd     +++|*         DRN    DRIVER NAME.
00072  M00S00070.1xd     +++|*         CP     CONTROL POINT NUMBER (MUST BE SYSTEM CP).
00073  M00S00071.1xd     +++|*         CO     CHANNEL TABLE ORDINAL (SET BY *CPUMTR*).
00074  M00S00072.1xd     +++|*         CH     CHANNEL NUMBER BEING SERVICED BY THIS PP.
00075  M00S00073.1xd     +++|          SPACE  4,10
00076  M00S00074.1xd     +++|***       DAYFILE MESSAGES.
00077  M00S00075.1xd     +++|*
00078  M00S00076.1xd     +++|*         DRN - UNAUTHORIZED CALL.
00079  M00S00077.1xd     +++|*
00080  M00S00078.1xd     +++|*         THE DRIVER (NAMED *DRN*) WILL ISSUE THIS MESSAGE AND ABORT
00081  M00S00079.1xd     +++|*         IF NOT ASSIGNED TO THE SYSTEM CONTROL POINT.
00082  M00S00080.1xd     +++|          SPACE  4,10
00083  M00S00081.1xd     +++|***       ERRLOG MESSAGES.
00084  M00S00082.1xd     +++|*
00085  M00S00083.1xd     +++|*         EQORD,TKNNNN, MEDIA DEFECT ENCOUNTERED.
00086  M00S00084.1xd     +++|*
00087  M00S00085.1xd     +++|*         A MEDIA DEFECT HAS BEEN ENCOUNTERED ON EQUIPMENT WITH EST
00088  M00S00086.1xd     +++|*         ORDINAL ORD, LOGICAL TRACK NNNN.  A REQUEST HAS BEEN ISSUED
00089  M00S00087.1xd     +++|*         TO AUTOMATICALLY FLAW THIS TRACK WHEN IT IS DROPPED.
00090  M01S00002.272l774 +++|*
00091  M01S00003.272l774 +++|*
00092  M01S00004.272l774 +++|*         CHCC MH426-DXX,CMN.
00093  M01S00005.272l774 +++|*
00094  M01S00006.272l774 +++|*         CONTROL MODULE N ON CHANNEL CC IS RUNNING MICROCODE REVISION
00095  M01S00007.272l774 +++|*         LEVEL XX.
00096  M01S00008.272l774 +++|*
00097  M01S00009.272l774 +++|*
00098  M01S00010.272l774 +++|*         DNEEE, UNN,PS=XXXXXX.
00099  M01S00011.272l774 +++|*
00100  M01S00012.272l774 +++|*         UNIT NN OF THE 9853 DEVICE WITH EST ORDINAL EEE HAS THE PACK
00101  M01S00013.272l774 +++|*         SERIAL NUMBER XXXXXX.
00102  M00S00088.1xd     +++|          SPACE  4,10
00103  M00S00089.1xd     +++|***       OPERATOR MESSAGES.
00104  M00S00090.1xd     +++|*
00105  M00S00091.1xd     +++|*         EQORD, DIAGNOSTICS RUNNING.
00106  M00S00092.1xd     +++|*
00107  M00S00093.1xd     +++|*         EQORD, SPIN UP PENDING.
00108  M00S00094.1xd     +++|*
00109  M00S00095.1xd     +++|*         CM3 BEING RESET ON CCHNN.
00110  M00S00096.1xd     +++|*
00111  M00S00097.1xd     +++|*         CM3 RESET FAILURE ON CCHNN.
00112  M00S00098.1xd     +++|*
00113  M00S00099.1xd     +++|*         MR ERROR.
00114  M00S00100.1xd     +++|          SPACE  4,10
00115  M00S00101.1xd     +++|***       DISK ERROR PROCESSING.
00116  M00S00102.1xd     +++|*
00117  M00S00103.1xd     +++|*         THE DRIVER MAINTAINS A COUNTER OF THE NUMBER OF RETRIES
00118  M00S00104.1xd     +++|*         NECESSARY TO SUCCESSFULLY PROCESS A REQUEST.  IF THE
00119  M00S00105.1xd     +++|*         ERROR COUNT IS NON-ZERO WHEN A REQUEST IS COMPLETED, THE
00120  M00S00106.1xd     +++|*         DRIVER WILL LOG A BML MESSAGE AND INCREMENT THE RECOVERED
00121  M00S00107.1xd     +++|*         ERROR COUNT IN THE MST.
00122  M00S00108.1xd     +++|*
00123  M00S00109.1xd     +++|*         IF THE ERROR COUNT REACHES *MERC* BEFORE THE REQUEST IS
00124  M00S00110.1xd     +++|*         SUCCESSFULLY COMPLETED, THE DRIVER WILL SET AN ERROR CODE
00125  M00S00111.1xd     +++|*         IN THE *CBT*, LOG A FATAL ERROR IN THE BML, AND INCREMENT
00126  M00S00112.1xd     +++|*         THE UNRECOVERED ERROR COUNT IN THE MST.
00127  M00S00113.1xd     +++|          SPACE  4,10
00128  M00S00114.1xd     +++|***       CONFIGURATION NOTES.
00129  M00S00115.1xd     +++|*
00130  M00S00116.1xd     +++|*         IN A DUAL ACCESS ENVIRONMENT, THE SAME EQUIPMENT NUMBER MUST
00131  M00S00117.1xd     +++|*         BE DIALED INTO THE PORT IN USE ON EACH CONTROL MODULE.
00132  M00S00118.1xd     +++|          SPACE  4,10
00133  M00S00119.1xd     +++|***       SPECIAL PROGRAMMING NOTES.
00134  M00S00120.1xd     +++|*
00135  M00S00121.1xd     +++|*         THE FOLLOWING IS A LIST OF SPECIAL NOTES THAT SHOULD BE
00136  M00S00122.1xd     +++|*         READ AND UNDERSTOOD BEFORE ANY MODIFICATIONS ARE MADE TO
00137  M00S00123.1xd     +++|*         THIS PROGRAM.
00138  M00S00124.1xd     +++|*
00139  M00S00125.1xd     +++|*
00140  M00S00126.1xd     +++|*         1)  WHERE POSSIBLE, *CMR* POINTERS HAVE BEEN PLUGGED BY THE
00141  M00S00127.1xd     +++|*             PRESET ROUTINE TO IMPROVE THE EXECUTION SPEED OF THE
00142  M00S00128.1xd     +++|*             PROGRAM AND TO MINIMIZE THE AMOUNT OF CODE.
00143  M00S00129.1xd     +++|*
00144  M00S00130.1xd     +++|*         2)  THIS PROGRAM EXCHANGES *CPUMTR* WITHOUT WAITING FOR
00145  M00S00131.1xd     +++|*             THE REQUEST TO COMPLETE.  ROUTINE *CMC* SHOULD BE CALLED
00146  M00S00132.1xd     +++|*             IF THE *MONITOR* MACRO IS TO BE USED WHILE THERE IS A
00147  M00S00133.1xd     +++|*             POSSIBILITY OF AN OUTSTANDING MONITOR REQUEST.
00148  M00S00134.1xd     +++|*
00149  M00S00135.1xd     +++|*         3)  THE DEVICE STATE TABLE IS BUILT AT LOCATION *EXR* IN
00150  M00S00136.1xd     +++|*             PP RESIDENT, THEREFORE IT IS NOT POSSIBLE TO USE THE
00151  M00S00137.1xd     +++|*             *EXR* AND *SMS* ROUTINES.
00152  M00S00138.1xd     +++|          SPACE  4,10
00153  M00S00139.1xd     +++|
00154  M00S00140.1xd     +++|**        COMMON DECKS.
00155  M00S00141.1xd     +++|
00156  M00S00142.1xd     +++|
00157  M00S00143.1xd     +++|*CALL     COMPMAC
00158  M00S00144.1xd     +++| RICHI$   EQU    1           SELECT DEFERRED INSTRUCTION MODIFICATION
Line S00001 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
00159  M01S00001.273l780 +++| LCHI$    EQU    1           SELECT *CONL* FOR CHANNEL ADDRESS TABLE
00160  M00S00145.1xd     +++|*CALL     COMPCHI
00161  M00S00146.1xd     +++|*CALL     COMSCPS
00162  M00S00147.1xd     +++| QUAL$S   SET    0           REMOVE QUALIFICATION OF COMSDFS CONSTANTS
00163  M00S00148.1xd     +++|*CALL     COMSDFS
00164  M01S00002.273l780 +++|*CALL     COMSEVT
00165  M00S00149.1xd     +++|          LIST   X
00166  M00S00150.1xd     +++|*CALL     COMSHIO
00167  M00S00151.1xd     +++|          LIST   *
00168  M00S00152.1xd     +++|          QUAL   IOU
00169  M00S00153.1xd     +++|*CALL     COMSIOU
00170  M00S00154.1xd     +++|          QUAL   *
00171  M00S00155.1xd     +++|*CALL     COMSLSD
00172  M00S00156.1xd     +++|*CALL     COMSMSC
00173  M00S00157.1xd     +++|*CALL     COMSMSP
00174  M00S00158.1xd     +++|*CALL     COMSPIM
00175  M00S00159.1xd     +++|*CALL     COMS1DS
00176  M00S00160.1xd     +++|          SPACE  4,10
00177  M00S00161.1xd     +++|**        INTERFACE SPECIFICATIONS.
00178  M00S00162.1xd     +++|
00179  M00S00163.1xd     +++|
00180  M00S00164.1xd     +++|          IF     -MIC,DM,2
00181  M00S00165.1xd     +++| DM       MICRO  1,2,*DN*    DEFAULT DEVICE MNEMONIC
00182  M00S00166.1xd     +++| DN       MICRO  1,3,*1XD*   DEFAULT DRIVER NAME
00183  M00S00167.1xd     +++|
00184  M00S00168.1xd     +++| .1       SET    0
Line S00169 Modification History
M01 (Removed by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
00185  M01S00169.ns2750  ---| .A       ECHO   ,TY=(DN),MI=(RM0124),ET=(UXSS)
Line S00001 Modification History
M01 (Added by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
00186  M01S00001.ns2750  +++| .A       ECHO   ,TY=(DN),MI=(RM0124)
00187  M00S00170.1xd     +++| .B       IFC    EQ,*TY*"DM"*
00188  M00S00171.1xd     +++| .1       SET    1
00189  M00S00172.1xd     +++| BMID     EQU    MI          BML ERROR MESSAGE ID
Line S00173 Modification History
M01 (Removed by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
00190  M01S00173.ns2750  ---| UDST     EQU    ET          DEVICE SPIN-UP EVENT TIME
00191  M00S00174.1xd     ---|          STOPDUP
00192  M00S00175.1xd     ---| .B       ENDIF
00193  M00S00176.1xd     ---| .A       ENDD
00194  M00S00177.1xd     ---|          IFEQ   .1,0,1
00195  M00S00178.1xd     ---|          ERR    UNKNOWN DEVICE TYPE - "DM"
00196  M00S00179.1xd     ---|
Line S00014 Modification History
M01 (Added by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
00197  M01S00014.272l774 +++| CYUN     EQU    CYUN"DM"    CYLINDERS / UNIT
00198  M00S00180.1xd     +++| PSBF     EQU    PSBF"DM"    PHYSICAL SECTORS / CONTROL BUFFER
00199  M00S00181.1xd     +++| PTCY     EQU    PTCY"DM"    PHYSICAL TRACKS / CYLINDER
00200  M00S00182.1xd     +++| PSPT     EQU    PSPT"DM"    PHYSICAL SECTORS / PHYSICAL TRACK
Line S00183 Modification History
M01 (Removed by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
00201  M01S00183.272l774 ---| CFLP     EQU    CF"DM"      LOGICAL - PHYSICAL CONVERSION FACTOR
Line S00015 Modification History
M01 (Added by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
00202  M01S00015.272l774 +++| CFLP     EQU    CFS"DM"     LOGICAL - PHYSICAL CONVERSION FACTOR
00203  M00S00184.1xd     +++| LSCY     EQU    PSPT*PTCY*LSPS"DM"  LOGICAL SECTORS / CYLINDER
00204  M00S00185.1xd     +++| LSLT     EQU    SL"DM"+GS"DM"  LOGICAL SECTORS / LOGICAL TRACK
00205  M00S00186.1xd     +++| LSPT     EQU    LSPT"DM"    LOGICAL SECTORS / PHYSICAL TRACK
Line S00001 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
00206  M01S00001.1xd5    +++| MCLT     EQU    MCLT"DM"    MAINTENANCE CYLINDER LOGICAL TRACK
00207  M00S00187.1xd     +++|          TITLE  CONSTANTS AND DEFINITIONS.
00208  M00S00188.1xd     +++|          SPACE  4,10
00209  M00S00189.1xd     +++|****      DIRECT CELL ALLOCATION.
00210  M00S00190.1xd     +++|
00211  M00S00191.1xd     +++|
00212  M00S00192.1xd     +++| NR       EQU    15 - 21     NEXT REQUEST
00213  M00S00193.1xd     +++| WB       EQU    22 - 26     CM WORD BUFFER
00214  M00S00194.1xd     +++|
00215  M00S00195.1xd     +++|*         THE NEXT FIVE LOCATIONS ARE ORDER DEPENDENT.
00216  M00S00196.1xd     +++|
00217  M00S00197.1xd     +++| PB       EQU    27          PREVIOUS CONTROL BUFFER ORDINAL
00218  M00S00198.1xd     +++| CB       EQU    30          CURRENT CONTROL BUFFER ORDINAL
00219  M00S00199.1xd     +++| NB       EQU    31          NEXT CONTROL BUFFER ORDINAL
00220  M00S00200.1xd     +++| UA       EQU    32 - 33     UEM ADDRESS / 100
00221  M00S00201.1xd     +++|
00222  M00S00202.1xd     +++| EO       EQU    34          EST ORDINAL
00223  M00S00203.1xd     +++| DN       EQU    35          DRIVE NUMBER
00224  M00S00204.1xd     +++| RC       EQU    36          REQUEST COUNT
00225  M00S00205.1xd     +++| CN       EQU    37          CONTROLLER NUMBER
00226  M00S00206.1xd     +++| MS       EQU    40          MAJOR STATUS (RESPONSE PACKET)
00227  M00S00207.1xd     +++| RT       EQU    41          STATUS RESPONSE TYPE
00228  M00S00208.1xd     +++| TO       EQU    42          COMMAND TIMEOUT
00229  M00S00209.1xd     +++| SF       EQU    43          DEVICE SELECTED FLAG
00230  M00S00210.1xd     +++| UC       EQU    44          UNIT ACTIVITY COUNT
00231  M00S00211.1xd     +++|          ERRNZ  SF+1-UC     CODE DEPENDS ON VALUE
00232  M00S00212.1xd     +++| RW       EQU    45          READ / WRITE FLAG
00233  M00S00213.1xd     +++| PA       EQU    46          PROCESSOR ADDRESS
00234  M00S00214.1xd     +++| DI       EQU    47          DEVICE INDEX
00235  M00S00215.1xd     +++| CR       EQU    57          CHANNEL RESERVED STATUS
00236  M00S00216.1xd     +++| RF       EQU    60          RESET IN PROGRESS FLAG
00237  M00S00217.1xd     +++| LF       EQU    61          LAST FUNCTION
00238  M00S00218.1xd     +++| TA       EQU    62          DEVICE STATE TABLE ADDRESS
Line S00001 Modification History
M01 (Added by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
00239  M01S00001.ns2714  +++| CW       EQU    63 - 67     CM WORD BUFFER
00240  M00S00219.1xd     +++|
00241  M00S00220.1xd     +++|****
00242  M00S00221.1xd     +++|          SPACE  4,10
00243  M00S00222.1xd     +++|**        IPI ADAPTOR FUNCTION CODES.
00244  M00S00223.1xd     +++|
00245  M00S00224.1xd     +++|
00246  M00S00225.1xd     +++| F0000    EQU    0#0000      MASTER CLEAR
00247  M00S00226.1xd     +++| F0200    EQU    0#0200      READ CONTROL REGISTER
00248  M00S00227.1xd     +++| F0300    EQU    0#0300      WRITE CONTROL REGISTER
00249  M00S00228.1xd     +++| F0600    EQU    0#0600      READ ERROR REGISTER
00250  M00S00229.1xd     +++| F0700    EQU    0#0700      READ OPERATIONAL STATUS
00251  M00S00230.1xd     +++| F0800    EQU    0#0800      DMA TERMINATE
00252  M00S00231.1xd     +++| F0A00    EQU    0#0A00      READ *T* REGISTER
00253  M00S00232.1xd     +++| F0B00    EQU    0#0B00      WRITE *T* PRIME REGISTER
00254  M00S00233.1xd     +++| F0C00    EQU    0#0C00      DMA READ FROM ADAPTOR
00255  M00S00234.1xd     +++| F0D00    EQU    0#0D00      DMA WRITE TO ADAPTOR
00256  M00S00235.1xd     +++| F0E00    EQU    0#0E00      CLEAR *T* REGISTERS
00257  M00S00236.1xd     +++|
00258  M00S00237.1xd     +++| F0062    EQU    0#0062      PORT A SELECT
00259  M00S00238.1xd     +++| F0862    EQU    0#0862      PORT B SELECT
00260  M00S00239.1xd     +++| F7E42    EQU    0#7E42      CHANNEL TRANSFER RATE
00261  M00S00240.1xd     +++|          SPACE  4,10
00262  M00S00241.1xd     +++|**        IPI CHANNEL FUNCTION CODES.
00263  M00S00242.1xd     +++|
00264  M00S00243.1xd     +++|
00265  M00S00244.1xd     +++| F00F1    EQU    0#00F1      READ ERROR REGISTER
00266  M00S00245.1xd     +++|
00267  M00S00246.1xd     +++|*         BUS CONTROL FUNCTIONS.
00268  M00S00247.1xd     +++|
00269  M00S00248.1xd     +++| F0029    EQU    0#0029      SELECT CONTROLLER (SET SELECT OUT)
00270  M00S00249.1xd     +++| F005B    EQU    0#005B      DEFINE INFORMATION TRANSFER (SET SYNC OUT)
00271  M00S00250.1xd     +++| F0071    EQU    0#0071      DESELECT CONTROLLER (CLEAR SELECT OUT)
00272  M00S00251.1xd     +++| F0711    EQU    0#0711      CLEAR MASTER OUT
00273  M00S00252.1xd     +++| F0715    EQU    0#0715      ENABLE INTERRUPTS (SET MASTER OUT)
00274  M00S00253.1xd     +++| F8025    EQU    0#8025      REQUEST TRANSFER MODE (SET MASTER OUT)
00275  M00S00254.1xd     +++| F8039    EQU    0#8039      MASTER STATUS (CLEAR MASTER OUT)
00276  M00S00255.1xd     +++| F8215    EQU    0#8215      RESET LOGICAL INTERFACE (SET MASTER OUT)
00277  M00S00256.1xd     +++| F8415    EQU    0#8415      RESET SLAVE (SET MASTER OUT)
00278  M00S00257.1xd     +++| F9213    EQU    0#9213      MASTER RESET SLAVES (SET SYNC OUT)
00279  M00S00258.1xd     +++|
00280  M00S00259.1xd     +++|*         DATA TRANSFER FUNCTIONS.
00281  M00S00260.1xd     +++|
00282  M00S00261.1xd     +++| F0081    EQU    0#0081      READ INTERLOCKED
00283  M00S00262.1xd     +++| F0181    EQU    0#0181      WRITE INTERLOCKED
00284  M00S00263.1xd     +++| F0281    EQU    0#0281      READ STREAMING
00285  M00S00264.1xd     +++| F0381    EQU    0#0381      WRITE STREAMING
00286  M00S00265.1xd     +++|          SPACE  4,10
00287  M00S00266.1xd     +++|**        COMMAND / RESPONSE PACKET DEFINITIONS.
00288  M00S00267.1xd     +++|
00289  M00S00268.1xd     +++|
00290  M00S00269.1xd     +++| PLN      EQU    0           PACKET LENGTH
00291  M00S00270.1xd     +++| CRN      EQU    1           COMMAND REFERENCE NUMBER
00292  M00S00271.1xd     +++| OPC      EQU    2           OPERATION CODE
00293  M00S00272.1xd     +++| CUN      EQU    3           CONTROLLER + UNIT NUMBER
00294  M00S00273.1xd     +++| FCP      EQU    4           FIRST COMMAND PARAMETER
00295  M00S00274.1xd     +++|
00296  M00S00275.1xd     +++| MST      EQU    4           MAJOR STATUS
00297  M00S00276.1xd     +++|
00298  M00S00277.1xd     +++|*         MAJOR STATUS RESPONSE TYPES.
00299  M00S00278.1xd     +++|
00300  M00S00279.1xd     +++| CMCT     EQU    1           COMMAND COMPLETE
00301  M00S00280.1xd     +++| ASRT     EQU    4           ASYNCHRONOUS RESPONSE
00302  M00S00281.1xd     +++| XFNT     EQU    5           TRANSFER NOTIFICATION
00303  M00S00282.1xd     +++|
00304  M00S00283.1xd     +++|*         MAJOR STATUS CODES.
00305  M00S00284.1xd     +++|
00306  M00S00285.1xd     +++| CMCS     EQU    0#12        COMMAND COMPLETE (CONDITIONAL SUCCESS)
00307  M00S00286.1xd     +++| CMSS     EQU    0#18        COMMAND COMPLETE (SUCCESSFUL)
00308  M00S00287.1xd     +++| ASRS     EQU    0#40        ASYNCHRONOUS RESPONSE
00309  M00S00288.1xd     +++| XFNS     EQU    0#50        TRANSFER NOTIFICATION
00310  M00S00289.1xd     +++|
00311  M00S00290.1xd     +++| BCPL     EQU    06          BASIC COMMAND PACKET LENGTH
00312  M00S00291.1xd     +++| BRPL     EQU    10          BASIC RESPONSE PACKET LENGTH
00313  M00S00292.1xd     +++| IOPL     EQU    20          I/O COMMAND PACKET LENGTH
00314  M00S00293.1xd     +++|
00315  M00S00294.1xd     +++| CPBFL    EQU    32          COMMAND PACKET BUFFER LENGTH
00316  M00S00295.1xd     +++| RPBFL    EQU    77          RESPONSE PACKET BUFFER LENGTH
00317  M00S00296.1xd     +++|          SPACE  4,10
00318  M00S00297.1xd     +++|**        COMMAND PACKET OPERATION CODES.
00319  M00S00298.1xd     +++|
00320  M00S00299.1xd     +++|
00321  M00S00300.1xd     +++| C0200    EQU    0#0200      REPORT ATTRIBUTES
00322  M00S00301.1xd     +++| C0209    EQU    0#0209      LOAD ATTRIBUTES
00323  M00S00302.1xd     +++| C020A    EQU    0#020A      SAVE ATTRIBUTES
00324  M00S00303.1xd     +++| C0301    EQU    0#0301      REPORT ADDRESSEE STATUS
00325  M00S00304.1xd     +++| C0401    EQU    0#0401      RELEASE RESERVE
00326  M00S00305.1xd     +++| C0402    EQU    0#0402      PRIORITY RESERVE
00327  M00S00306.1xd     +++| C0700    EQU    0#0700      SET OPERATING MODE
00328  M00S00307.1xd     +++| C0800    EQU    0#0800      ABORT COMMAND
00329  M00S00308.1xd     +++| C1005    EQU    0#1005      BLOCK READ
00330  M00S00309.1xd     +++| C2005    EQU    0#2005      BLOCK WRITE
00331  M00S00310.1xd     +++| C8100    EQU    0#8100      DRIVE DIAGNOSTICS
00332  M00S00311.1xd     +++|          SPACE  4,10
00333  M00S00312.1xd     +++|**        COMMAND PACKET PARAMETER ID-S.
00334  M00S00313.1xd     +++|
00335  M00S00314.1xd     +++|
00336  M00S00315.1xd     +++| P01D1    EQU    0#01D1      PERFORMANCE LOG
00337  M00S00316.1xd     +++| P0254    EQU    0#0254      DRIVE RESET
00338  M00S00317.1xd     +++| P02D2    EQU    0#02D2      MASTER TERMINATE
00339  M00S00318.1xd     +++| P02D3    EQU    0#02D3      EXTENT RESPONSE
00340  M00S00319.1xd     +++| P0351    EQU    0#0351      DISK MODES
00341  M00S00320.1xd     +++| P036C    EQU    0#036C      REQUEST ATTRIBUTE
00342  M00S00321.1xd     +++| P0551    EQU    0#0551      DISK DATA BLOCK SIZE
00343  M00S00322.1xd     +++| P0931    EQU    0#0931      COMMAND EXTENT
00344  M00S00323.1xd     +++| P0951    EQU    0#0951      TRANSFER SIZE OVERRIDE
00345  M00S00324.1xd     +++|          SPACE  4,10
00346  M00S00325.1xd     +++|**        SUBSTATUS PARAMETER ID CODES.
00347  M00S00326.1xd     +++|
00348  M00S00327.1xd     +++|
00349  M00S00328.1xd     +++| ID16     EQU    0#16        MACHINE EXCEPTION FOR CONTROLLER
00350  M00S00329.1xd     +++| ID17     EQU    0#17        COMMAND EXCEPTION FOR CONTROLLER
Line S00002 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
00351  M01S00002.1xd5    +++| ID19     EQU    0#19        CONDITIONAL SUCCESS FOR CONTROLLER
00352  M00S00330.1xd     +++| ID24     EQU    0#24        INTERVENTION REQUIRED FOR DRIVE
00353  M00S00331.1xd     +++| ID26     EQU    0#26        MACHINE EXCEPTION FOR DRIVE
00354  M00S00332.1xd     +++| ID32     EQU    0#32        RESPONSE EXTENT (COMMON)
00355  M00S00333.1xd     +++|          SPACE  4,10
00356  M00S00334.1xd     +++|**        INFORMATION TRANSFER DEFINITIONS.
00357  M00S00335.1xd     +++|
00358  M00S00336.1xd     +++|
00359  M00S00337.1xd     +++| CIOT     EQU    0           COMMAND - INFORMATION OUT
00360  M00S00338.1xd     +++| RIIN     EQU    1           RESPONSE - INFORMATION IN
00361  M00S00339.1xd     +++| DAOT     EQU    2           DATA - INFORMATION OUT
00362  M00S00340.1xd     +++| DAIN     EQU    3           DATA - INFORMATION IN
00363  M00S00341.1xd     +++|          SPACE  4,10
00364  M00S00342.1xd     +++|**        MAINTENANCE REGISTER REQUEST CODE SYMBOLS.
00365  M00S00343.1xd     +++|
00366  M00S00344.1xd     +++|
00367  M00S00345.1xd     +++| MR       EQU    /IOU/MR     MAINTENANCE CHANNEL
00368  M00S00346.1xd     +++| IOUC     EQU    /IOU/IOUC+/IOU/MRRD   READ CONNECT CODE
00369  M00S00347.1xd     +++| RMRF     EQU    /IOU/MRRD-/IOU/MRRD   READ REGISTER
00370  M00S00348.1xd     +++| WMRF     EQU    /IOU/MRWT-/IOU/MRRD   WRITE REGISTER
00371  M00S00349.1xd     +++|
00372  M00S00350.1xd     +++| RFMR     EQU    RMRF*10000+/IOU/FMCR  READ FAULT MASK REGISTER
00373  M00S00351.1xd     +++| RCSR     EQU    RMRF*10000+/IOU/C0CR  READ CHANNEL STATUS REGISTER
00374  M00S00352.1xd     +++| WFMR     EQU    WMRF*10000+/IOU/FMCR  WRITE FAULT MASK REGISTER
00375  M00S00353.1xd     +++|          SPACE  4,10
00376  M00S00354.1xd     +++|**        FAULT ANALYSIS CODES.
00377  M00S00355.1xd     +++|
00378  M00S00356.1xd     +++|
00379  M00S00357.1xd     +++| ECPE     EQU    1           CHANNEL PARITY ERROR          (CHPE)
00380  M00S00358.1xd     +++| ECIE     EQU    2           IPI CHANNEL ERROR
00381  M00S00359.1xd     +++|
00382  M00S00360.1xd     +++| ECER     EQU    4           CHANNEL DETECTED ERROR        (CHFE)
00383  M00S00361.1xd     +++| ECCM     EQU    5           CHANNEL DETECTED CM ERROR
00384  M00S00362.1xd     +++| ECHF     EQU    7           CHANNEL HUNG FULL
00385  M00S00363.1xd     +++|
00386  M00S00364.1xd     +++| ETIT     EQU    10          INTERRUPT TIMEOUT             (FTOE)
00387  M00S00365.1xd     +++| ETFN     EQU    11          CHANNEL FUNCTION TIMEOUT
00388  M00S00366.1xd     +++|
00389  M00S00367.1xd     +++| EDPE     EQU    14          DATA PARITY ERROR             (PARE)
00390  M00S00368.1xd     +++|
00391  M00S00369.1xd     +++| EDNR     EQU    20          DEVICE NOT READY              (NRDE)
00392  M00S00370.1xd     +++|
00393  M00S00371.1xd     +++| EIDT     EQU    24          INCOMPLETE DATA TRANSFER      (IDTE)
00394  M00S00372.1xd     +++|
00395  M00S00373.1xd     +++| ERSS     EQU    30          RESERVED SUBSTATUS            (DSTE)
00396  M00S00374.1xd     +++| EDFM     EQU    31          DEFECT MANAGEMENT ERROR
00397  M00S00375.1xd     +++| EMME     EQU    32          MESSAGE/MICROCODE EXCEPTION
00398  M00S00376.1xd     +++| ETSL     EQU    33          SELECT TIMEOUT
00399  M00S00377.1xd     +++|
00400  M00S00378.1xd     +++| ESUF     EQU    34          SPIN-UP FAILURE               (DSTE)
00401  M00S00379.1xd     +++| ESDF     EQU    35          SPIN-DOWN FAILURE
00402  M00S00380.1xd     +++| ETTC     EQU    36          TRANSFER COMPLETE TIMEOUT
00403  M00S00381.1xd     +++| EIVR     EQU    37          INTERVENTION REQUIRED
00404  M00S00382.1xd     +++|
00405  M00S00383.1xd     +++| EAPR     EQU    40          ALTERNATE PORT EXCEPTION      (DSTE)
00406  M00S00384.1xd     +++| EMEX     EQU    41          MACHINE EXCEPTION ERROR
00407  M00S00385.1xd     +++| ECEX     EQU    42          COMMAND EXCEPTION ERROR
00408  M00S00386.1xd     +++|
00409  M00S00387.1xd     +++| EIOS     EQU    44          I/O INITIATION ERROR          (DSTE)
00410  M00S00388.1xd     +++| ERPE     EQU    45          REGISTER PARITY ERROR
00411  M00S00389.1xd     +++| ERDS     EQU    46          REPORT DRIVE STATUS ERROR
00412  M00S00390.1xd     +++|
00413  M00S00391.1xd     +++| ECMA     EQU    50          COMMAND ABORTED ERROR         (DSTE)
00414  M00S00392.1xd     +++| ECCS     EQU    51          CONDITIONAL SUCCESS
00415  M00S00393.1xd     +++| ECIC     EQU    52          COMMAND INCOMPLETE
00416  M00S00394.1xd     +++| EUST     EQU    53          TRANSFER UNSUCCESSFUL
00417  M00S00395.1xd     +++|
00418  M00S00396.1xd     +++| EDTF     EQU    54          DIAGNOSTIC FAULT              (DDFE)
00419  M00S00397.1xd     +++| EDRS     EQU    55          DRIVE RESET FAILURE
00420  M00S00398.1xd     +++|
00421  M00S00399.1xd     +++| ECNR     EQU    60          SLAVE IN DID NOT DROP         (RAME)
00422  M00S00400.1xd     +++| ELCA     EQU    61          LOAD CONTROLLER ATTRIBUTES FAILURE
00423  M00S00401.1xd     +++| ESRE     EQU    62          SELECTIVE RESET ERROR
00424  M00S00402.1xd     +++| ERDA     EQU    63          REPORT DEVICE ATTRIBUTES ERROR
00425  M00S00403.1xd     +++|
00426  M00S00404.1xd     +++| EBAE     EQU    64          BUS ACKNOWLEDGE ERROR         (CHFE)
Line S00003 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
00427  M01S00003.273l780 +++| ECOT     EQU    65          CONTROLLER OVER TEMPERATURE
00428  M00S00405.1xd     +++|
00429  M00S00406.1xd     +++| EDRE     EQU    70          DRIVE RESERVE ERROR           (DRVE)
Line S00002 Modification History
M01 (Added by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
00430  M01S00002.ns2714  +++|
00431  M01S00003.ns2714  +++| ECRE     EQU    74          CONTROLLER RESET ERROR        (RAME)
00432  M01S00004.ns2714  +++| ECMD     EQU    75          CONTROL MODULE DEAD
00433  M00S00407.1xd     +++|          SPACE  4,10
00434  M00S00408.1xd     +++|**        DEVICE STATE TABLE DEFINITIONS.
00435  M00S00409.1xd     +++|
00436  M00S00410.1xd     +++|
00437  M00S00411.1xd     +++|          LOC    0
00438  M00S00412.1xd     +++| PUTO     BSS    1           *PUT* ORDINAL
Line S00413 Modification History
M01 (Removed by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
00439  M01S00413.272l774 ---| PNUN     BSS    1           PORT NUMBER + UNIT NUMBER
Line S00016 Modification History
M01 (Added by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
00440  M01S00016.272l774 +++| PNUN     BSS    1           PORT/EQUIPMENT/UNIT NUMBERS (3/P,3/E,6/U)
00441  M00S00414.1xd     +++| ADDR     BSS    1           PROCESSOR ADDRESS
00442  M00S00415.1xd     +++| RADD     BSS    1           RETURN ADDRESS
00443  M00S00416.1xd     +++| ATTN     BSS    1           ATTENTION RETURN
00444  M00S00417.1xd     +++| EEST     BSS    1           EXPECTED EXECUTION STATUS
00445  M00S00418.1xd     +++| RWST     BSS    1           READ / WRITE STATUS
00446  M00S00419.1xd     +++| RQLN     BSS    1           REQUEST QUEUE LENGTH
00447  M00S00420.1xd     +++| CBCT     BSS    1           CUMULATIVE BUFFER COUNT
00448  M00S00421.1xd     +++| CYLN     BSS    1           CYLINDER ON SEEK
00449  M00S00422.1xd     +++| TKSN     BSS    1           TRACK + SECTOR ON SEEK
00450  M00S00423.1xd     +++| ERCT     BSS    1           ERROR COUNT
00451  M00S00424.1xd     +++| SREQ     BSS    1           SPECIAL REQUEST
Line S00003 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
00452  M01S00003.1xd5    +++|*         IPPS - I/O PREPROCESSING STATUS.
00453  M01S00004.1xd5    +++|*                BIT 15 = DRIVE DIAGNOSTICS IN PROGRESS.
00454  M01S00005.1xd5    +++|*                BIT 14 = *SET DRIVE ATTRIBUTES* REQUIRED.
00455  M01S00006.1xd5    +++|*                BIT 13 = *BREAK OPPOSITE RESERVE* REQUIRED.
00456  M01S00007.1xd5    +++|*                BITS 11-0 = CBT ORDINAL FOR CURRENT I/O REQUEST.
00457  M00S00425.1xd     +++| IPPS     BSS    1           I/O PREPROCESSING STATUS
00458  M00S00426.1xd     +++| LCMD     BSS    1           LAST COMMAND OP CODE
00459  M00S00427.1xd     +++| ESAD     BSS    1           ERROR STEP ADDRESS
00460  M00S00428.1xd     +++| ENAD     BSS    1           ERROR NEXT ADDRESS
00461  M00S00429.1xd     +++| RPST     BSS    1           RESPONSE PACKET STATUS
00462  M00S00430.1xd     +++| IOST     BSS    1           READ/WRITE STATUS
00463  M00S00431.1xd     +++| ERAD     BSS    1           ERROR RETURN ADDRESS
00464  M01S00008.1xd5    +++| FTOC     BSS    2           FUNCTION TIMEOUT CLOCK VALUE
00465  M00S00432.1xd     +++|
00466  M00S00433.1xd     +++| DSTBE    BSS    0           LENGTH OF STATE TABLE ENTRY
00467  M00S00434.1xd     +++|          LOC    0
00468  M00S00435.1xd     +++|          SPACE  4,15
00469  M00S00436.1xd     +++|****      ASSEMBLY CONSTANTS.
00470  M00S00437.1xd     +++|
00471  M00S00438.1xd     +++|
00472  M00S00439.1xd     +++| CH       EQU    16          CHANNEL NUMBER
00473  M00S00440.1xd     +++| NRAP     EQU    2           NUMBER OF IPI ADAPTOR PORTS
00474  M00S00441.1xd     +++| MXCN     EQU    10          MAXIMUM NUMBER OF CONTROLLERS / PORT
00475  M00S00442.1xd     +++| MXDC     EQU    10          MAXIMUM NUMBER OF DRIVES / CONTROLLER
00476  M00S00443.1xd     +++| MXND     EQU    10*2        MAXIMUM NUMBER OF UNITS / DRIVER
00477  M00S00444.1xd     +++| DSTB     EQU    EXR         START OF DEVICE STATE TABLES
00478  M00S00445.1xd     +++| DSTBL    EQU    DSTB+DSTBE*MXND  LWA+1 OF DEVICE STATE TABLES
00479  M01S00009.1xd5    +++|
00480  M01S00010.1xd5    +++|*         CSTB - CONTROLLER STATUS BLOCK.
00481  M01S00011.1xd5    +++|*         ONE ENTRY PER CONTROLLER NUMBER PER PORT.
00482  M01S00012.1xd5    +++|*
00483  M01S00013.1xd5    +++|*         BIT 15             SLAVE RESET IN PROGRESS
00484  M01S00014.1xd5    +++|*         BIT 14             LOGICAL RESET PENDING
00485  M01S00015.1xd5    +++|*         BITS 0-11          DEVICE INDEX OF FIRST DRIVE ON CONTROLLER
00486  M01S00016.1xd5    +++|
00487  M00S00446.1xd     +++| CSTB     EQU    DSTBL       CONTROLLER STATUS BLOCK
00488  M00S00447.1xd     +++| CSTBS    EQU    10*2        LENGTH OF CONTROLLER STATUS BLOCK
00489  M00S00448.1xd     +++| OCMD     MAX    PPFW,CSTB+CSTBS  DRIVER ORIGIN
00490  M00S00449.1xd     +++|
Line S00017 Modification History
M01 (Added by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
00491  M01S00017.272l774 +++| MNCS     EQU    1           MINIMUM NUMBER OF CYLINDERS / STREAM
00492  M00S00450.1xd     +++| MXCS     EQU    2           MAXIMUM NUMBER OF CYLINDERS / STREAM
00493  M01S00018.272l774 +++| MNSS     EQU    MNCS*PSPT*PTCY  MINIMUM SECTORS / STREAM
00494  M00S00451.1xd     +++| MXSS     EQU    MXCS*PSPT*PTCY  MAXIMUM SECTORS / STREAM
00495  M01S00019.272l774 +++| MNBS     EQU    MNSS/PSBF-1  MINIMUM NUMBER OF BUFFERS / STREAM
00496  M00S00452.1xd     +++| MXBS     EQU    MXSS/PSBF-1  MAXIMUM NUMBER OF BUFFERS / STREAM
00497  M00S00453.1xd     +++| DRFM     EQU    1000        DIRECTION FLAG MASK
00498  M00S00454.1xd     +++| ILFM     EQU    4000        INTERLOCK FLAG MASK
Line S00455 Modification History
M01 (Removed by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
00499  M01S00455.ns2714  ---| MERC     EQU    5           ERROR PROCESSING RETRY COUNT
00500  M01S00456.ns2714  ---| CSRC     EQU    MERC/2+1    CHANNEL SWITCH RETRY COUNT
Line S00005 Modification History
M01 (Added by) ns2714
M02 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
00501  M02S00005.1xd5    ---| CSRC     EQU    3           CHANNEL SWITCH RETRY COUNT
Line S00017 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
00502  M01S00017.1xd5    +++| CSRC     EQU    4           CHANNEL SWITCH RETRY COUNT
Line S00006 Modification History
M01 (Added by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
00503  M01S00006.ns2714  +++| MERC     EQU    CSRC*2      ERROR PROCESSING RETRY COUNT
Line S00457 Modification History
M01 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
00504  M01S00457.1xd5    ---| FTRC     EQU    3           FUNCTION TIMEOUT RETRY COUNT
00505  M00S00458.1xd     ---|
00506  M00S00459.1xd     ---|*         LAYOUT OF ERROR DATA BUFFERS.
00507  M00S00460.1xd     ---|
00508  M00S00461.1xd     ---| BEGIN    BSSN   0           REAL TIME ERROR DATA
00509  M00S00462.1xd     ---| EXST     BSSN   1           ENDING STATUS
00510  M00S00463.1xd     ---|          BSSN   2           RESERVED
00511  M00S00464.1xd     ---| LSCC     BSSN   1           LAST SLAVE COMMAND
00512  M00S00465.1xd     ---| LCFN     BSSN   1           LAST CHANNEL FUNCTION
00513  M00S00466.1xd     ---| CREG     BSSN   4           CHANNEL REGISTER DATA
00514  M00S00467.1xd     ---|          BSSN   3           RESERVED
00515  M00S00468.1xd     ---| TREG     BSSN   3           CONTENTS OF *T* REGISTER
00516  M00S00469.1xd     ---| RTEDL    EQU    *
00517  M00S00470.1xd     ---|
00518  M00S00471.1xd     ---| EMBF     BSSN   0           ERROR MESSAGE BUFFER
00519  M00S00472.1xd     ---|          BSSN   3*5         BML MESSAGE PREFIX AND HEADER
00520  M00S00473.1xd     ---| CODE     BSSN   1           INITIAL FAULT CODE
00521  M00S00474.1xd     ---| FCS1     BSSN   1           FAULT CODE - ERROR STEP 1
00522  M00S00475.1xd     ---| FCS2     BSSN   1           FAULT CODE - ERROR STEP 2
00523  M00S00476.1xd     ---| FCS3     BSSN   1           FAULT CODE - ERROR STEP 3
00524  M00S00477.1xd     ---| FALT     BSSN   1           FINAL FAULT CODE
00525  M00S00478.1xd     ---|          BSSN   1           RESERVED
00526  M00S00479.1xd     ---| RBCT     BSSN   1           RESIDUAL BYTE COUNT
00527  M00S00480.1xd     ---| STCT     BSSN   1           SECTORS TRANSFERED COUNT
00528  M00S00481.1xd     ---| ICYL     BSSN   1           CYLINDER ON INITIAL SEEK
00529  M00S00482.1xd     ---| ITAS     BSSN   1           TRACK + SECTOR ON INITIAL SEEK
00530  M00S00483.1xd     ---| .3       SET    *-EMBF+4
00531  M00S00484.1xd     ---| EMBFS    EQU    .3/5
00532  M00S00485.1xd     ---| EMBF1    EQU    EMBFS*5+EMBF
00533  M00S00486.1xd     ---| .1       SET    RTEDL*4
00534  M00S00487.1xd     ---| .2       SET    .1-.1/3*3+2
00535  M00S00488.1xd     ---| .3       SET    .1/3+.2/3+4
00536  M00S00489.1xd     ---| EMBF2    EQU    .3/5*5+EMBF1
00537  M00S00490.1xd     ---| .1       SET    RPBFL*4
00538  M00S00491.1xd     ---| .2       SET    .1-.1/3*3+2
00539  M00S00492.1xd     ---| .3       SET    .1/3+.2/3+4
00540  M00S00493.1xd     ---| EMBFL    EQU    .3/5*5+EMBF2
00541  M00S00494.1xd     ---|
00542  M00S00495.1xd     ---| END      BSSN
00543  M00S00496.1xd     ---| EDBFL    EQU    RTEDL+EMBFL
00544  M00S00497.1xd     ---|
00545  M00S00498.1xd     ---|****
00546  M01S00499.1xd5    ---|          SPACE  4,10
00547  M01S00500.1xd5    ---|**        CALCULATE PHYSICAL ADDRESS OF MAINTENANCE TRACK.
00548  M01S00501.1xd5    ---|
00549  M01S00502.1xd5    ---|
00550  M01S00503.1xd5    ---| .TN      SET    MCLT"DM"-4000  LOGICAL TRACK NUMBER
00551  M01S00504.1xd5    ---| .C1      BITSET LSLBS
00552  M01S00505.1xd5    ---| .SC      SET    PSPT*PTCY   PHYSICAL SECTORS / CYLINDER
00553  M01S00506.1xd5    ---| .C2      BITSET LSLBS-CFLP
00554  M01S00507.1xd5    ---| .PM      SET    .TN*LSLT/.C1
00555  M01S00508.1xd5    ---| .PM      SET    .PM*.C2     PHYSICAL SECTORS TO MAINTENANCE TRACK
00556  M01S00509.1xd5    ---| .CY      EQU    .PM/.SC     CYLINDER NUMBER OF MAINTENANCE TRACK
00557  M01S00510.1xd5    ---|
00558  M01S00511.1xd5    ---| .RM      SET    .PM-.CY*.SC REMAINDER FROM CYLINDER CALCULATION
00559  M01S00512.1xd5    ---| .PT      SET    .RM/PSPT    PHYSICAL TRACK OF MAINTENANCE TRACK
00560  M01S00513.1xd5    ---| .PS      SET    .RM-.PT*PSPT  PHYSICAL SECTOR OF MAINTENANCE TRACK
00561  M01S00514.1xd5    ---| .TS      EQU    .PT*100B+.PS  PHYSICAL TRACK + SECTOR
00562  M00S00515.1xd     ---|          TITLE  MACROS.
00563  M00S00516.1xd     ---|          SPACE  4,10
00564  M00S00517.1xd     ---|**        MACRO DEFINITIONS.
00565  M00S00518.1xd     ---| TBLM     SPACE  4,10
Line S00519 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00566  M01S00519.ns2769  ---|**        TBLM - CREATE BUFFERED DEVICE TABLE ENTRY MACRO.
Line S00001 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00567  M01S00001.ns2769  +++|**        TBLM - CREATE TABLE ENTRY MACRO.
00568  M00S00520.1xd     +++|*
00569  M00S00521.1xd     +++|*NAM      TBLM
00570  M00S00522.1xd     +++|*
Line S00523 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00571  M01S00523.ns2769  ---|*         ENTRY  NAM = BUFFERED DEVICE TABLE NAME.
Line S00002 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00572  M01S00002.ns2769  +++|*         ENTRY  NAM = TABLE NAME.
00573  M00S00524.1xd     +++|*
00574  M00S00525.1xd     +++|*         EXIT   NAM_E MACRO DEFINED.
00575  M00S00526.1xd     +++|
00576  M00S00527.1xd     +++|
00577  M00S00528.1xd     +++|          PURGMAC  TBLM
00578  M00S00529.1xd     +++|
00579  M00S00530.1xd     +++|          MACRO  TBLM,NAM
00580  M00S00531.1xd     +++|          PURGMAC  NAM_E
00581  M00S00532.1xd     +++| NAM_E    MACRO  ADDR
00582  M00S00533.1xd     +++|          LOCAL  A
00583  M00S00534.1xd     +++|          MACREF NAM_E
00584  M00S00535.1xd     +++|          NOREF  A
00585  M00S00536.1xd     +++| A        EQU    ADDR
00586  M00S00537.1xd     +++| T_NAM    RMT
Line S00538 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00587  M01S00538.ns2769  ---|          CON    A
Line S00003 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00588  M01S00003.ns2769  +++|          CONL   A
00589  M00S00539.1xd     +++|          RMT
00590  M00S00540.1xd     +++| TBLM     ENDM
00591  M00S00541.1xd     +++| CBTE     SPACE  4,10
00592  M00S00542.1xd     +++|**        CBTE - CONTROL BUFFER TABLE ENTRY.
00593  M00S00543.1xd     +++|*
00594  M00S00544.1xd     +++|*         THIS MACRO GENERATES AN ENTRY IN REMOTE LIST *TCBT*
00595  M00S00545.1xd     +++|*         THAT CONTAINS THE ADDRESS OF AN INSTRUCTION WHICH
00596  M00S00546.1xd     +++|*         REQUIRES THE FWA OF THE CONTROL BUFFER TABLE.
00597  M00S00547.1xd     +++|*
00598  M00S00548.1xd     +++|*         CBTE   ADDR
00599  M00S00549.1xd     +++|*
00600  M00S00550.1xd     +++|*         ENTRY  (ADDR) = ADDRESS OF INSTRUCTION.
00601  M00S00551.1xd     +++|*
00602  M00S00552.1xd     +++|*         EXIT   ADDRESS IS ADDED TO THE REMOTE BLOCK *TCBT*.
00603  M00S00553.1xd     +++|
00604  M00S00554.1xd     +++|
00605  M00S00555.1xd     +++| CBT      TBLM
00606  M00S00556.1xd     +++| CCTE     SPACE  4,10
00607  M00S00557.1xd     +++|**        CCTE - CHANNEL CONTROL TABLE ENTRY.
00608  M00S00558.1xd     +++|*
00609  M00S00559.1xd     +++|*         THIS MACRO GENERATES AN ENTRY IN REMOTE LIST *TCCT*
00610  M00S00560.1xd     +++|*         THAT CONTAINS THE ADDRESS OF AN INSTRUCTION WHICH
00611  M00S00561.1xd     +++|*         REQUIRES THE FWA OF THE CHANNEL CONTROL TABLE.
00612  M00S00562.1xd     +++|*
00613  M00S00563.1xd     +++|*         CCTE   ADDR
00614  M00S00564.1xd     +++|*
00615  M00S00565.1xd     +++|*         ENTRY  (ADDR) = ADDRESS OF INSTRUCTION.
00616  M00S00566.1xd     +++|*
00617  M00S00567.1xd     +++|*         EXIT   ADDRESS IS ADDED TO THE REMOTE BLOCK *TCCT*.
00618  M00S00568.1xd     +++|
00619  M00S00569.1xd     +++|
00620  M00S00570.1xd     +++| CCT      TBLM
00621  M00S00571.1xd     +++| CHTE     SPACE  4,10
00622  M00S00572.1xd     +++|**        CHTE - CHANNEL TABLE ENTRY.
00623  M00S00573.1xd     +++|*
00624  M00S00574.1xd     +++|*         THIS MACRO GENERATES AN ENTRY IN REMOTE LIST *TCHT*
00625  M00S00575.1xd     +++|*         THAT CONTAINS THE ADDRESS OF AN INSTRUCTION WHICH
00626  M00S00576.1xd     +++|*         REQUIRES THE FWA OF THE CHANNEL TABLE.
00627  M00S00577.1xd     +++|*
00628  M00S00578.1xd     +++|*         CHTE   ADDR
00629  M00S00579.1xd     +++|*
00630  M00S00580.1xd     +++|*         ENTRY  (ADDR) = ADDRESS OF INSTRUCTION.
00631  M00S00581.1xd     +++|*
00632  M00S00582.1xd     +++|*         EXIT   ADDRESS IS ADDED TO THE REMOTE BLOCK *TCHT*.
00633  M00S00583.1xd     +++|
00634  M00S00584.1xd     +++|
00635  M00S00585.1xd     +++| CHT      TBLM
00636  M00S00586.1xd     +++| EMBE     SPACE  4,10
00637  M00S00587.1xd     +++|**        EMBE - ERROR MESSAGE TABLE ENTRY.
00638  M00S00588.1xd     +++|*
00639  M00S00589.1xd     +++|*         THIS MACRO GENERATES AN ENTRY IN REMOTE LIST *TEMB*
00640  M00S00590.1xd     +++|*         THAT CONTAINS THE ADDRESS OF AN INSTRUCTION WHICH
00641  M00S00591.1xd     +++|*         REQUIRES THE FWA OF THE ERROR MESSAGE TABLE.
00642  M00S00592.1xd     +++|*
00643  M00S00593.1xd     +++|*         EMBE   ADDR
00644  M00S00594.1xd     +++|*
00645  M00S00595.1xd     +++|*         ENTRY  (ADDR) = ADDRESS OF INSTRUCTION.
00646  M00S00596.1xd     +++|*
00647  M00S00597.1xd     +++|*         EXIT   ADDRESS IS ADDED TO THE REMOTE BLOCK *TEMB*.
00648  M00S00598.1xd     +++|
00649  M00S00599.1xd     +++|
00650  M00S00600.1xd     +++| EMB      TBLM
00651  M00S00601.1xd     +++| EXPE     SPACE  4,10
00652  M00S00602.1xd     +++|**        EXPE - EXCHANGE PACKAGE ADDRESS ENTRY.
00653  M00S00603.1xd     +++|*
00654  M00S00604.1xd     +++|*         THIS MACRO GENERATES AN ENTRY IN REMOTE LIST *TEXP*
00655  M00S00605.1xd     +++|*         THAT CONTAINS THE ADDRESS OF AN INSTRUCTION WHICH
00656  M00S00606.1xd     +++|*         REQUIRES THE FWA OF THE PP EXCHANGE PACKAGE.
00657  M00S00607.1xd     +++|*
00658  M00S00608.1xd     +++|*         EXPE   ADDR
00659  M00S00609.1xd     +++|*
00660  M00S00610.1xd     +++|*         ENTRY  (ADDR) = ADDRESS OF INSTRUCTION.
00661  M00S00611.1xd     +++|*
00662  M00S00612.1xd     +++|*         EXIT   ADDRESS IS ADDED TO THE REMOTE BLOCK *TEXP*.
00663  M00S00613.1xd     +++|
00664  M00S00614.1xd     +++|
00665  M00S00615.1xd     +++| EXP      TBLM
Line S00616 Modification History
M01 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
00666  M01S00616.1xd5    ---| FTTE     SPACE  4,10
00667  M01S00617.1xd5    ---|**        FTTE - FUNCTION TIMEOUT TABLE ENTRY.
00668  M01S00618.1xd5    ---|*
00669  M01S00619.1xd5    ---|*         THIS MACRO GENERATES AN ENTRY IN REMOTE LIST *TFTT*
00670  M01S00620.1xd5    ---|*         THAT CONTAINS THE ADDRESS OF AN INSTRUCTION WHICH
00671  M01S00621.1xd5    ---|*         REQUIRES THE FWA OF THE FUNCTION TIMEOUT TABLE.
00672  M01S00622.1xd5    ---|*
00673  M01S00623.1xd5    ---|*         FTTE   ADDR
00674  M01S00624.1xd5    ---|*
00675  M01S00625.1xd5    ---|*         ENTRY  (ADDR) = ADDRESS OF INSTRUCTION.
00676  M01S00626.1xd5    ---|*
00677  M01S00627.1xd5    ---|*         EXIT   ADDRESS IS ADDED TO THE REMOTE BLOCK *TFTT*.
00678  M01S00628.1xd5    ---|
00679  M01S00629.1xd5    ---|
00680  M01S00630.1xd5    ---| FTT      TBLM
00681  M00S00631.1xd     ---| PUTE     SPACE  4,10
00682  M00S00632.1xd     ---|**        PUTE - PHYSICAL UNIT TABLE ENTRY.
00683  M00S00633.1xd     ---|*
00684  M00S00634.1xd     ---|*         THIS MACRO GENERATES AN ENTRY IN REMOTE LIST *TPUT*
00685  M00S00635.1xd     ---|*         THAT CONTAINS THE ADDRESS OF AN INSTRUCTION WHICH
00686  M00S00636.1xd     ---|*         REQUIRES THE FWA OF THE PHYSICAL UNIT TABLE.
00687  M00S00637.1xd     ---|*
00688  M00S00638.1xd     ---|*         PUTE   ADDR
00689  M00S00639.1xd     ---|*
00690  M00S00640.1xd     ---|*         ENTRY  (ADDR) = ADDRESS OF INSTRUCTION.
00691  M00S00641.1xd     ---|*
00692  M00S00642.1xd     ---|*         EXIT   ADDRESS IS ADDED TO THE REMOTE BLOCK *TPUT*.
00693  M00S00643.1xd     ---|
00694  M00S00644.1xd     ---|
00695  M00S00645.1xd     ---| PUT      TBLM
Line S00646 Modification History
M01 (Removed by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
00696  M01S00646.272l774 ---| RELM     SPACE  4,10
00697  M01S00647.272l774 ---|**        RELM - REDEFINE *M* TYPE INSTRUCTIONS.
00698  M01S00648.272l774 ---|*
00699  M01S00649.272l774 ---|*         REDEFINE *M* TYPE INSTRUCTIONS FOR AUTOMATIC BIAS
00700  M01S00650.272l774 ---|*         BY (DI) IF THE *M* ADDRESS FIELD IS .LT. *DSTBE*.
00701  M01S00651.272l774 ---|*         THE ORIGINAL FORM IS AVAILABLE WITH A *.* SUFFIX.
00702  M01S00652.272l774 ---|
00703  M01S00653.272l774 ---|
00704  M01S00654.272l774 ---| XX       EQU    DI
00705  M01S00655.272l774 ---|          NOREF  XX
00706  M01S00656.272l774 ---|
00707  M01S00657.272l774 ---| RELM     MACRO  OPC
00708  M01S00658.272l774 ---| OPC.     OPSYN  OPC
00709  M01S00659.272l774 ---| OPC=     MACRO  M,D
00710  M01S00660.272l774 ---|          IF     DEF,M
00711  M01S00661.272l774 ---|          IFLE   M,DSTBE
00712  M01S00662.272l774 ---|          IFC    EQ,*D**
00713  M01S00663.272l774 ---|          OPC.   M,XX
00714  M01S00664.272l774 ---|          ELSE
00715  M01S00665.272l774 ---|          OPC.   M,D
00716  M01S00666.272l774 ---|          ENDIF
00717  M01S00667.272l774 ---| OPC=     ENDM
00718  M01S00668.272l774 ---| OPC      OPSYN  OPC=
00719  M01S00669.272l774 ---| RELM     ENDM
00720  M01S00670.272l774 ---|
00721  M01S00671.272l774 ---|
00722  M01S00672.272l774 ---|          RELM   LDM
00723  M01S00673.272l774 ---|          RELM   ADM
00724  M01S00674.272l774 ---|          RELM   SBM
00725  M01S00675.272l774 ---|          RELM   LMM
00726  M01S00676.272l774 ---|          RELM   STM
00727  M01S00677.272l774 ---|          RELM   RAM
00728  M01S00678.272l774 ---|          RELM   AOM
00729  M01S00679.272l774 ---|          RELM   SOM
00730  M01S00680.272l774 ---|
00731  M01S00681.272l774 ---|          RELM   LPML
00732  M01S00682.272l774 ---|          RELM   LDML
00733  M01S00683.272l774 ---|          RELM   ADML
00734  M01S00684.272l774 ---|          RELM   SBML
00735  M01S00685.272l774 ---|          RELM   LMML
00736  M01S00686.272l774 ---|          RELM   STML
00737  M01S00687.272l774 ---|          RELM   RAML
00738  M01S00688.272l774 ---|          RELM   AOML
00739  M01S00689.272l774 ---|          RELM   SOML
Line S00007 Modification History
M01 (Added by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
00740  M01S00007.ns2714  +++| MONITOR  SPACE  4,10
00741  M01S00008.ns2714  +++|**        MONITOR - REQUEST MONITOR FUNCTION.
00742  M01S00009.ns2714  +++|*
00743  M01S00010.ns2714  +++|*         MONITOR  F
00744  M01S00011.ns2714  +++|*
00745  M01S00012.ns2714  +++|*         ENTRY  F = MONITOR FUNCTION.
00746  M01S00013.ns2714  +++|*                (CM+1 - CM+4) = PARAMETERS.
00747  M01S00014.ns2714  +++|*
00748  M01S00015.ns2714  +++|*         CALLS  IMF.
00749  M01S00016.ns2714  +++|
00750  M01S00017.ns2714  +++|
00751  M01S00018.ns2714  +++|          PURGMAC MONITOR
00752  M01S00019.ns2714  +++|
00753  M01S00020.ns2714  +++| MONITOR  MACRO  F
00754  M01S00021.ns2714  +++|          MACREF MONITOR
00755  M01S00022.ns2714  +++|          LDK    F
00756  M01S00023.ns2714  +++|          RJM    IMF
00757  M01S00024.ns2714  +++|          ENDM
00758  M00S00690.1xd     +++| WAIT     SPACE  4,10
00759  M00S00691.1xd     +++|**        WAIT - DO NOTHING FOR SPECIFIED TIME.
00760  M00S00692.1xd     +++|*
00761  M00S00693.1xd     +++|*         WAIT   N
00762  M00S00694.1xd     +++|*
00763  M00S00695.1xd     +++|*                N = MICROSECOND COUNT.
00764  M00S00696.1xd     +++|*
00765  M00S00697.1xd     +++|*         EXIT   (A) = 0.
00766  M00S00698.1xd     +++|*
00767  M00S00699.1xd     +++|*         USES   T0.
00768  M00S00700.1xd     +++|
00769  M00S00701.1xd     +++|
00770  M00S00702.1xd     +++|          PURGMAC  WAIT
00771  M00S00703.1xd     +++|
00772  M00S00704.1xd     +++| WAIT     MACRO  N
00773  M00S00705.1xd     +++|          MACREF WAIT
00774  M00S00706.1xd     +++|          NOREF  .2
00775  M00S00707.1xd     +++|          BASE   D
00776  M00S00708.1xd     +++| .2       SET    N 1
00777  M00S00709.1xd     +++|          IFEQ   N,64,2
00778  M00S00710.1xd     +++|          LDD    HN
00779  M00S00711.1xd     +++|          SKIP   4
00780  M00S00712.1xd     +++|          IFEQ   N,512,2
00781  M00S00713.1xd     +++|          LDD    TH
00782  M00S00714.1xd     +++|          SKIP   1
00783  M00S00715.1xd     +++|          LDK    .2
00784  M00S00716.1xd     +++|          BASE   *
00785  M00S00717.1xd     +++|          SBN    1
00786  M00S00718.1xd     +++|          STD    T0
00787  M00S00719.1xd     +++|          NJN    *-2
00788  M00S00720.1xd     +++|          ENDM
00789  M00S00721.1xd     +++|          TITLE  MAIN PROGRAM.
00790  M00S00722.1xd     +++| XMD      SPACE  4,10
00791  M00S00723.1xd     +++|**        XMD - MAIN PROGRAM.
00792  M00S00724.1xd     +++|
00793  M00S00725.1xd     +++|
00794  M00S00726.1xd     +++|          ORG    OCMD
00795  M00S00727.1xd     +++|          RICHI              BEGIN CHANNEL INSTRUCTION MODIFICATION
00796  M00S00728.1xd     +++|
00797  M00S00729.1xd     +++| CM3D     LJM    PRS         PRESET DRIVER
00798  M00S00730.1xd     +++| XMD      EQU    *-1
00799  M00S00731.1xd     +++|          LDM    XMD         PRESERVE RETURN ADDRESS
Line S00732 Modification History
M01 (Removed by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
00800  M01S00732.272l774 ---|          STM    ADDR
Line S00020 Modification History
M01 (Added by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
00801  M01S00020.272l774 +++|          STM    ADDR,DI
Line S00733 Modification History
M01 (Removed by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
00802  M01S00733.ns2714  ---|          RJM    DCM         DESELECT CONTROLLER
Line S00025 Modification History
M01 (Added by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
00803  M01S00025.ns2714  +++| XMD1     RJM    DCM         DESELECT CONTROLLER
00804  M00S00734.1xd     +++| XMD2     LDD    TA
00805  M00S00735.1xd     +++|          LMC    DSTBL       (ADJUSTED BY *IST*)
00806  M00S00736.1xd     +++| XMDA     EQU    *-1
00807  M00S00737.1xd     +++|          NJN    XMD5        IF NOT END OF DEVICE STATE TABLE
00808  M00S00738.1xd     +++|          RJM    CCR
00809  M00S00739.1xd     +++|          ZJN    XMD7        IF CHANNEL DOWN
00810  M00S00740.1xd     +++|          LCN    0
00811  M00S00741.1xd     +++|          RJM    IOM         REFRESH OPERATOR MESSAGE
00812  M00S00742.1xd     +++| XMD4     LDC    DSTB
00813  M00S00743.1xd     +++|          STD    TA          RESTART STATE TABLE SCAN
00814  M00S00744.1xd     +++| XMD5     LDD    TA
00815  M00S00745.1xd     +++|          STD    DI          SET DEVICE INDEX
00816  M00S00746.1xd     +++|          ADN    DSTBE
00817  M00S00747.1xd     +++|          STD    TA          ADVANCE TABLE ADDRESS
00818  M00S00748.1xd     +++|          RJM    CFR
00819  M00S00749.1xd     +++|          UJN    XMD2        CHECK NEXT DEVICE
00820  M00S00750.1xd     +++|
00821  M00S00751.1xd     +++| XMD7     UJN    *+2         FIRST PASS
00822  M00S00752.1xd     +++| XMDB     EQU    XMD7
00823  M00S00753.1xd     +++|          UJN    XMD8        DROP PP ON SECOND PASS
00824  M00S00754.1xd     +++|          SOM    XMDB
00825  M00S00755.1xd     +++|          LDC    CMP8        CHANGE PATH THRU *CFR*
00826  M00S00756.1xd     +++|          STM    CFRA
00827  M00S00757.1xd     +++|          UJN    XMD4        LOOP THRU DEVICE STATE TABLE
00828  M00S00758.1xd     +++|
00829  M00S00759.1xd     +++| XMD8     MONITOR  DPPM      DROP PP
00830  M00S00760.1xd     +++|          LJM    PPR         EXIT TO PPR
Line S00004 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
00831  M01S00004.273l780 +++|
00832  M01S00005.273l780 +++| MSG1     DATA   C* "DN" - UNAUTHORIZED CALL.*
00833  M00S00761.1xd     +++|          TITLE  READ / WRITE PROCESSING.
00834  M00S00762.1xd     +++| PIO      SPACE  4,10
00835  M00S00763.1xd     +++|**        PIO - READ / WRITE PROCESSING.
00836  M00S00764.1xd     +++|
00837  M00S00765.1xd     +++|
00838  M00S00766.1xd     +++| PIO      BSS    0
00839  M00S00767.1xd     +++|          LDML   PIOB,RW     SETUP SEEK COMMAND
00840  M00S00768.1xd     +++|          STML   CPBF+OPC
00841  M00S00769.1xd     +++|          LDD    CN          MERGE CONTROLLER + DRIVE NUMBERS
00842  M00S00770.1xd     +++|          SHN    10
00843  M00S00771.1xd     +++|          LMD    DN          SET FACILITY ADDRESS
00844  M00S00772.1xd     +++|          STM    CPBF+CUN
00845  M00S00773.1xd     +++|          LDC    P0931       COMMAND EXTENT PARAMETER
00846  M00S00774.1xd     +++|          STM    CPBF+FCP
00847  M00S00775.1xd     +++|          LDN    0           UPPER SECTOR COUNT
00848  M00S00776.1xd     +++|          STM    CPBF+FCP+1
Line S00777 Modification History
M01 (Removed by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
00849  M01S00777.272l774 ---|          LDK    MXSS        SECTOR COUNT / STREAM LIMIT
00850  M01S00778.272l774 ---|          STML   CPBF+FCP+2
00851  M01S00779.272l774 ---|*         LDM    CYLN        CYLINDER SET BY *IIO*
00852  M01S00780.272l774 ---|*         STM    CPBF+FCP+3
00853  M01S00781.272l774 ---|*         LDM    TKSN        TRACK + SECTOR SET BY *IIO*
00854  M01S00782.272l774 ---|*         STM    CPBF+FCP+4
Line S00021 Modification History
M01 (Added by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
00855  M01S00021.272l774 +++|
00856  M01S00022.272l774 +++|*         SET UP COMMAND PARAMETERS.
00857  M01S00023.272l774 +++|*         NOTE THAT PARAMETERS CPBF+FCP+2 - CPBF+FCP+4 HAVE ALREADY
00858  M01S00024.272l774 +++|*         BEEN SET BY SUBROUTINE *IIO*.
00859  M01S00025.272l774 +++|
00860  M00S00783.1xd     +++|          LDC    P0951       TRANSFER SIZE OVERRIDE PARAMETER
00861  M00S00784.1xd     +++|          STM    CPBF+FCP+5
00862  M00S00785.1xd     +++|          LDC    40000       CHANGE BURST SIZE
00863  M00S00786.1xd     +++|          STML   CPBF+FCP+11
00864  M00S00787.1xd     +++|          STML   CPBF+FCP+7  CHANGE INTERRUPT SIZE
00865  M00S00788.1xd     +++|          SHN    0-20
00866  M00S00789.1xd     +++|          STM    CPBF+FCP+10 SET LEADING DIGITS
00867  M00S00790.1xd     +++|          STM    CPBF+FCP+6
Line S00791 Modification History
M01 (Removed by) 1xd4
Seq #  *Modification Id* Act 
----------------------------+
00868  M01S00791.1xd4    ---|          LDN    3*10        SEEK TIMEOUT = 24 SECONDS
Line S00001 Modification History
M01 (Added by) 1xd4
Seq #  *Modification Id* Act 
----------------------------+
00869  M01S00001.1xd4    +++|          LDN    40D         SEEK TIMEOUT = 40 SECONDS
00870  M00S00792.1xd     +++|          STD    TO
00871  M00S00793.1xd     +++|          LDN    IOPL+12     WRITE COMMAND BLOCK
00872  M00S00794.1xd     +++|          RJM    WCB
00873  M00S00795.1xd     +++|
00874  M00S00796.1xd     +++|*         WAIT UNTIL CONTROLLER RETURNS TRANSFER NOTIFICATION.
00875  M00S00797.1xd     +++|
00876  M00S00798.1xd     +++| PIO1     LDD    CB          SET I/O IN PROGRESS
Line S00799 Modification History
M01 (Removed by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
00877  M01S00799.272l774 ---|          STM    IPPS
Line S00026 Modification History
M01 (Added by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
00878  M01S00026.272l774 +++|          STM    IPPS,DI
00879  M00S00800.1xd     +++|          LDN    XFNT        PROCESS ATTENTION
00880  M00S00801.1xd     +++|          RJM    ATT
00881  M00S00802.1xd     +++|          ZJN    PIO2        IF EXPECTED STATUS
00882  M00S00803.1xd     +++|          LCN    EIOS
00883  M00S00804.1xd     +++|          RJM    ERR         PROCESS ERROR
00884  M00S00805.1xd     +++|
00885  M00S00806.1xd     +++| PIO2     LDN    1           SET CHANNEL ACTIVE FOR *CPD*
00886  M00S00807.1xd     +++|          RJM    SCD
Line S00808 Modification History
M01 (Removed by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
00887  M01S00808.272l774 ---|          LDM    IPPS        RESTORE CURRENT BUFFER ORDINAL
Line S00027 Modification History
M01 (Added by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
00888  M01S00027.272l774 +++|          LDM    IPPS,DI     RESTORE CURRENT BUFFER ORDINAL
00889  M00S00809.1xd     +++| PIO3     STD    CB
00890  M00S00810.1xd     +++|          LDDL   T7          CHECK ENDING STATUS
00891  M00S00811.1xd     +++|          LPN    0#30
00892  M00S00812.1xd     +++|          NJN    PIO1        IF PAUSE / TIME DEPENDENT OPERATION
00893  M00S00813.1xd     +++|
00894  M00S00814.1xd     +++|*         INITIATE DATA TRANSFER.
00895  M00S00815.1xd     +++|
00896  M00S00816.1xd     +++|          LDN    DAIN        DEFINE TRANSFER DIRECTION
00897  M00S00817.1xd     +++|          SBD    RW
00898  M00S00818.1xd     +++|          ERRNZ  DAOT+1-DAIN CODE DEPENDS ON VALUE
00899  M00S00819.1xd     +++|          RJM    BCS
00900  M00S00820.1xd     +++|          LDML   PIOD,RW     SET DMA MODE
00901  M00S00821.1xd     +++|          RJM    FCN
00902  M00S00822.1xd     +++|          RJM    WTR         WRITE *T* REGISTER
00903  M00S00823.1xd     +++|          LDD    CB
00904  M00S00824.1xd     +++|          RJM    SFR         SEARCH FOR CONSECUTIVE REQUEST
00905  M00S00825.1xd     +++|
00906  M00S00826.1xd     +++|*         WAIT UNTIL ONE BURST DMA TRANSFER COMPLETE.
00907  M00S00827.1xd     +++|
Line S00018 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
00908  M01S00018.1xd5    +++|          LDN    2           TIMEOUT = 2 SECONDS
00909  M01S00019.1xd5    +++|          RJM    STO
00910  M00S00828.1xd     +++|          RJM    CTC         CHECK TRANSFER COMPLETE
00911  M00S00829.1xd     +++|*         LDN    0
00912  M00S00830.1xd     +++|          STD    T1          CLEAR RESIDUAL BYTE COUNT
00913  M00S00831.1xd     +++|          LDD    NB
00914  M00S00832.1xd     +++|          ZJN    PIO5        IF NO MORE CONSECUTIVE REQUESTS
00915  M00S00833.1xd     +++|          LDN    0#A
00916  M00S00834.1xd     +++| PIO5     LMN    0#A         CHECK ENDING STATUS
00917  M00S00835.1xd     +++|          RJM    GSS
00918  M00S00836.1xd     +++|          RJM    EIO         ENTER BUFFER IN I/O REQUEST QUEUE
00919  M00S00837.1xd     +++|          LDD    NB
Line S00838 Modification History
M01 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
00920  M01S00838.1xd5    ---|          NJN    PIO3        IF CONSECUTIVE REQUEST PRESENT
Line S00020 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
00921  M01S00020.1xd5    +++|          NJP    PIO3        IF CONSECUTIVE REQUEST PRESENT
00922  M00S00839.1xd     +++|
00923  M00S00840.1xd     +++|*         COMPLETE READ / WRITE OPERATIONS.
00924  M00S00841.1xd     +++|
00925  M00S00842.1xd     +++|*         LDN    0           CLEAR CHANNEL ACTIVE FOR *CPD*
00926  M00S00843.1xd     +++|          RJM    SCD
00927  M01S00021.1xd5    +++|          LDN    40D         TIMEOUT = 40 SECONDS
00928  M01S00022.1xd5    +++|          RJM    STO
00929  M00S00844.1xd     +++|          LDN    CMSS        WAIT ON INTERRUPT
00930  M00S00845.1xd     +++|          RJM    ATT
Line S00846 Modification History
M01 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
00931  M01S00846.1xd5    ---|          ZJP    CMP         IF OPERATION COMPLETE
00932  M01S00847.1xd5    ---|          LCN    EIOS
Line S00023 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
00933  M01S00023.1xd5    +++|          NJN    PIO7        IF ERROR
00934  M01S00024.1xd5    +++|          LDDL   MS
00935  M01S00025.1xd5    +++|          LMN    CMCS
00936  M01S00026.1xd5    +++|          NJN    PIO6        IF NOT CONDITIONAL SUCCESS
00937  M01S00027.1xd5    +++|          LDML   RPBF+5
00938  M01S00028.1xd5    +++|          LPC    377
00939  M01S00029.1xd5    +++|          LMN    ID19
00940  M01S00030.1xd5    +++|          NJN    PIO7        IF RESPONSE NOT DUE TO MASTER TERMINATE
00941  M01S00031.1xd5    +++|          LDML   RPBF
00942  M01S00032.1xd5    +++|          SBN    17
00943  M01S00033.1xd5    +++|          PJN    PIO7        IF RESPONSE TOO LONG
00944  M01S00034.1xd5    +++|          LDML   RPBF+7
00945  M01S00035.1xd5    +++|          SHN    21-10
00946  M01S00036.1xd5    +++|          PJN    PIO7        IF NOT MASTER TERMINATE
00947  M01S00037.1xd5    +++| PIO6     LJM    CMP         COMPLETE PROCESSING
00948  M01S00038.1xd5    +++|
00949  M01S00039.1xd5    +++| PIO7     LCN    EIOS
00950  M00S00848.1xd     +++|          RJM    ERR         PROCESS ERROR
00951  M00S00849.1xd     +++|
00952  M00S00850.1xd     +++|
00953  M00S00851.1xd     +++| PIOB     BSS    0           COMMAND CODES
00954  M00S00852.1xd     +++|          CONL   C1005
00955  M00S00853.1xd     +++|          CONL   C2005
00956  M00S00854.1xd     +++|
00957  M00S00855.1xd     +++| PIOD     BSS    0           DATA TRANSFER FUNCTIONS
00958  M00S00856.1xd     +++|          CONL   F0281
00959  M00S00857.1xd     +++|          CONL   F0381
00960  M00S00858.1xd     +++|          TITLE  LIST DEVICE ATTRIBUTE.
00961  M00S00859.1xd     +++| LDA      SPACE  4,10
00962  M00S00860.1xd     +++|**        LDA - LIST DEVICE ATTRIBUTE IN DAYFILE.
00963  M00S00861.1xd     +++|
00964  M00S00862.1xd     +++|
00965  M00S00863.1xd     +++| LDA      BSS    0
00966  M00S00864.1xd     +++|          LDC    C0200       SETUP REPORT ATTRIBUTES COMMAND
00967  M00S00865.1xd     +++|          STM    CPBF+OPC
00968  M00S00866.1xd     +++|          LDD    CN          MERGE CONTROLLER + UNIT NUMBERS
00969  M00S00867.1xd     +++|          SHN    10
00970  M00S00868.1xd     +++|          LMD    DN          SET FACILITY ADDRESS
00971  M00S00869.1xd     +++|          STM    CPBF+CUN
00972  M00S00870.1xd     +++|          LDC    P036C       REQUEST ATTRIBUTE PARAMETER
00973  M00S00871.1xd     +++|          STM    CPBF+FCP
00974  M00S00872.1xd     +++|          LDC    0#4050      RETURN ATTRIBUTE ID 50 IN RESPONSE
00975  M00S00873.1xd     +++|          STML   CPBF+FCP+1
00976  M00S00874.1xd     +++|          LDN    2           TIMEOUT = 2 SECONDS
00977  M00S00875.1xd     +++|          STD    TO
00978  M00S00876.1xd     +++|          LDN    BCPL+4      WRITE COMMAND BLOCK
00979  M00S00877.1xd     +++|          RJM    WCB
00980  M00S00878.1xd     +++|
00981  M00S00879.1xd     +++|*         WAIT UNTIL CONTROLLER HAS RETURNED INTERRUPT.
00982  M00S00880.1xd     +++|
00983  M00S00881.1xd     +++|          LDN    CMSS        WAIT ON INTERRUPT
00984  M00S00882.1xd     +++|          RJM    ATT
00985  M00S00883.1xd     +++|          ZJN    LDA1        IF COMMAND COMPLETE
00986  M00S00884.1xd     +++|          LCN    ERDA
00987  M00S00885.1xd     +++|          RJM    ERR         PROCESS ERROR
00988  M00S00886.1xd     +++|
00989  M00S00887.1xd     +++| LDA1     LDD    RW          CHECK REQUEST INDEX
Line S00888 Modification History
M01 (Removed by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
00990  M01S00888.ns2750  ---|          SBN    LDIF-SPDF
Line S00002 Modification History
M01 (Added by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
00991  M01S00002.ns2750  +++|          SBN    LDIF-ECAF
00992  M00S00889.1xd     +++|          ZJN    LDA2        IF FOR DRIVE SERIAL NUMBER
00993  M00S00890.1xd     +++|
00994  M00S00891.1xd     +++|*         GENERATE MICROCODE REVISION ERRLOG MESSAGE.
00995  M00S00892.1xd     +++|
00996  M00S00893.1xd     +++|          LDD    CN          SET CONTROL MODULE NUMBER IN BML MESSAGE
00997  M00S00894.1xd     +++|          STD    NR+3
00998  M00S00895.1xd     +++|          ADC    2RM0        CONVERT FOR ERRLOG MESSAGE
00999  M00S00896.1xd     +++|          STM    LDAB+6
01000  M00S00897.1xd     +++|          LDC    LDAB+4      LOCATION FOR REVISION LEVEL
01001  M00S00898.1xd     +++|          STD    T3
01002  M00S00899.1xd     +++|          SBN    LDAB+4-LDAA SET MESSAGE ADDRESS
Line S00900 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01003  M01S00900.ns2769  ---|          STM    MAD1
Line S00004 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01004  M01S00004.ns2769  +++|          STML   MAD1
01005  M00S00901.1xd     +++|          LDM    RPBF+6+0#1B/2  CONVERT REVISION LEVEL
01006  M00S00902.1xd     +++|          RJM    CHD
01007  M00S00903.1xd     +++|          RJM    IDM         ISSUE MESSAGE TO ERRLOG
01008  M00S00904.1xd     +++|
01009  M00S00905.1xd     +++|*         GENERATE MICROCODE REVISION BML MESSAGE.
01010  M00S00906.1xd     +++|
01011  M00S00907.1xd     +++|          LDD    MA          MOVE MICROCODE REVISION LEVEL
01012  M00S00908.1xd     +++|          CWM    LDAB,ON
01013  M00S00909.1xd     +++|          SBN    1           COPY TO BML MESSAGE
01014  M00S00910.1xd     +++|          CRD    WB
01015  M00S00911.1xd     +++|          LDD    IR+4        SET CHANNEL NUMBER
01016  M00S00912.1xd     +++|          STD    NR+2
01017  M00S00913.1xd     +++|          LDN    HI0104-HI0100
01018  M00S00914.1xd     +++|          LJM    LDA4        COMPLETE BML MESSAGE
01019  M00S00915.1xd     +++|
01020  M00S00916.1xd     +++|*         GENERATE PACK SERIAL NUMBER ERRLOG MESSAGE.
01021  M00S00917.1xd     +++|
Line S00918 Modification History
M01 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01022  M01S00918.1xd5    ---| LDA2     LDC    RPBF+6+0#39/2  LOCATION OF SERIAL NUMBER
Line S00040 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01023  M01S00040.1xd5    +++| LDA2     LDN    0
01024  M00S00919.1xd     +++|          STD    T2
01025  M00S00920.1xd     +++|          LDC    LDAE+2      SET ADDRESS FOR CONVERSION
01026  M00S00921.1xd     +++|          STD    T3
Line S00922 Modification History
M01 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01027  M01S00922.1xd5    ---|          SBN    LDAE+2-LDAD DEFINE MESSAGE ADDRESS
Line S00041 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01028  M01S00041.1xd5    +++|          SBN    -LDAD+LDAE+2  DEFINE MESSAGE ADDRESS
Line S00923 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01029  M01S00923.ns2769  ---|          STM    MAD1
Line S00005 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01030  M01S00005.ns2769  +++|          STML   MAD1
Line S00924 Modification History
M01 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01031  M01S00924.1xd5    ---|          LDI    T2          CONVERT UPPER TWO DIGITS
01032  M01S00925.1xd5    ---|          RJM    CHD
Line S00042 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01033  M01S00042.1xd5    +++|
01034  M01S00043.1xd5    +++|*         CONVERT RIGHTMOST 6 DIGITS OF 8 DIGIT PACK SERIAL NUMBER.
01035  M01S00044.1xd5    +++|
01036  M01S00045.1xd5    +++| LDA3     LDML   RPBF+FCP+1+0#1E,T2
01037  M01S00046.1xd5    +++|          SHN    -10
01038  M01S00047.1xd5    +++|          ZJN    LDA3.1      IF SERIAL NUMBER NOT PRESENT
01039  M01S00048.1xd5    +++|          SBN    60          CONVERT ASCII TO DISPLAY CODE
01040  M01S00049.1xd5    +++| LDA3.1   ADN    1R0
01041  M01S00050.1xd5    +++|          SHN    6
01042  M01S00051.1xd5    +++|          STD    T0          UPPER CHARACTER OF WORD
01043  M01S00052.1xd5    +++|          LDML   RPBF+FCP+1+0#1E,T2
01044  M01S00053.1xd5    +++|          LPN    77
01045  M01S00054.1xd5    +++|          ZJN    LDA3.2      IF SERIAL NUMBER NOT PRESENT
01046  M01S00055.1xd5    +++|          SBN    60          CONVERT ASCII TO DISPLAY CODE
01047  M01S00056.1xd5    +++| LDA3.2   ADN    1R0
01048  M01S00057.1xd5    +++|          LMD    T0
01049  M01S00058.1xd5    +++|          STI    T3          LOWER CHARACTER OF WORD
01050  M00S00926.1xd     +++|          AOD    T2
Line S00927 Modification History
M01 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01051  M01S00927.1xd5    ---|          LDIL   T2          EXTRACT MIDDLE DIGITS
01052  M01S00928.1xd5    ---|          SHN    -10
01053  M01S00929.1xd5    ---|          RJM    CHD         CONVERT HEX DIGITS
01054  M01S00930.1xd5    ---|          LDI    T2
01055  M01S00931.1xd5    ---|          RJM    CHD         CONVERT LOWER TWO DIGITS
Line S00059 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01056  M01S00059.1xd5    +++|          AOD    T3
01057  M01S00060.1xd5    +++|          LMC    LDAE+2+3
01058  M01S00061.1xd5    +++|          NJN    LDA3        IF MORE CHARACTERS TO CONVERT
Line S00932 Modification History
M01 (Removed by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
01059  M01S00932.272l774 ---|          LDM    PNUN
Line S00028 Modification History
M01 (Added by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
01060  M01S00028.272l774 +++|          LDM    PNUN,DI
01061  M00S00933.1xd     +++|          LPN    77          PUT UNIT NUMBER IN BML MESSAGE
01062  M00S00934.1xd     +++|          STD    NR+3
01063  M00S00935.1xd     +++|          RJM    C2D         CONVERT FOR ERRLOG MESSAGE
01064  M00S00936.1xd     +++|          STM    LDAD+11
01065  M00S00937.1xd     +++|          LDD    EO          CONVERT EST ORDINAL
01066  M00S00938.1xd     +++|          SHN    -3
01067  M00S00939.1xd     +++|          RJM    C2D
01068  M00S00940.1xd     +++|          STM    LDAD+6      INSERT IN ERRLOG MESSAGE
01069  M00S00941.1xd     +++|          LDD    EO
01070  M00S00942.1xd     +++|          LPN    7           CONVERT LOWER DIGIT
01071  M00S00943.1xd     +++|          SHN    6
01072  M00S00944.1xd     +++|          ADC    2R0,        ADD TO ERRLOG MESSAGE
01073  M00S00945.1xd     +++|          STM    LDAD+7
01074  M00S00946.1xd     +++|          RJM    IDM         ISSUE MESSAGE TO ERRLOG
01075  M00S00947.1xd     +++|
01076  M00S00948.1xd     +++|*         GENERATE PACK SERIAL NUMBER BML MESSAGE.
01077  M00S00949.1xd     +++|
01078  M00S00950.1xd     +++|          LDD    MA          MOVE DRIVE SERIAL NUMBER
01079  M00S00951.1xd     +++|          CWM    LDAE,ON
01080  M00S00952.1xd     +++|          SBN    1           COPY TO BML MESSAGE
01081  M00S00953.1xd     +++|          CRD    WB
01082  M00S00954.1xd     +++|          LDD    EO          INSERT EST ORDINAL
01083  M00S00955.1xd     +++|          STD    WB
01084  M00S00956.1xd     +++|          LDC    2R"DM"      SET DEVICE MNEMONIC
01085  M00S00957.1xd     +++|          STD    NR+2
01086  M00S00958.1xd     +++|          LDN    0           CLEAR UNUSED FIELD
01087  M00S00959.1xd     +++|          STD    WB+1
01088  M00S00960.1xd     +++| LDA4     ADD    HN          INSERT SYMPTOM CODE
01089  M00S00961.1xd     +++|          ERRNZ  HI0100-100  CODE DEPENDS ON VALUE
01090  M00S00962.1xd     +++|          STD    NR+1
01091  M00S00963.1xd     +++|          LDC    DM0401      DEFINE MESSAGE ID
01092  M00S00964.1xd     +++|          STD    NR
01093  M00S00965.1xd     +++|          LDN    ZERL        CLEAR HEADER WORD
01094  M00S00966.1xd     +++|          CRD    CM
01095  M00S00967.1xd     +++|          LDN    3           WORD COUNT OF MESSAGE
01096  M00S00968.1xd     +++|          STD    CM+3
01097  M00S00969.1xd     +++|          ADK    MLDY-3      DIRECT MESSAGE TO BML
01098  M00S00970.1xd     +++|          STD    CM+4
01099  M00S00971.1xd     +++|          LDC    SBUF        SET MESSAGE ADDRESS
01100  M00S00972.1xd     +++|          STML   MAD1
01101  M00S00973.1xd     +++|          LDD    MA          MOVE MESSAGE DATA
01102  M00S00974.1xd     +++|          CWM    CM,TR
01103  M00S00975.1xd     +++|          ERRNZ  CM+5-NR     CODE DEPENDS ON VALUE
01104  M00S00976.1xd     +++|          SBN    3
01105  M00S00977.1xd     +++|          ERRNZ  NR+5-WB     CODE DEPENDS ON VALUE
01106  M00S00978.1xd     +++|          CRM    SBUF,TR
01107  M00S00979.1xd     +++|          ERRNG  SBUFL-3*5   CODE DEPENDS ON VALUE
01108  M00S00980.1xd     +++|          LDN    0
01109  M00S00981.1xd     +++|          STD    RW          ISSUE BML MESSAGE
01110  M00S00982.1xd     +++|          RJM    IDM
01111  M00S00983.1xd     +++|          LJM    CSR         CLEAR SPECIAL REQUEST FLAG
01112  M00S00984.1xd     +++|
01113  M00S00985.1xd     +++|
Line S00986 Modification History
M01 (Removed by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
01114  M01S00986.272l774 ---| LDAA     CON    0,0,0,4,ELDY
Line S00029 Modification History
M01 (Added by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
01115  M01S00029.272l774 +++| LDAA     CON    0,0,0,4,ELDY    MICROCODE REVSION ERRLOG MESSAGE
01116  M00S00987.1xd     +++|          DATA   4HCH**
01117  M00S00988.1xd     +++| LDAB     DATA   10H MH426-D**
01118  M00S00989.1xd     +++|          DATA   C+,CM0.+
01119  M00S00990.1xd     +++|
Line S00991 Modification History
M01 (Removed by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
01120  M01S00991.272l774 ---| LDAD     CON    0,0,0,4,ELDY
Line S00030 Modification History
M01 (Added by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
01121  M01S00030.272l774 +++| LDAD     CON    0,0,0,4,ELDY    PACK SERIAL NUMBER ERRLOG MESSAGE
01122  M00S00992.1xd     +++|          DATA   10H"DM"***, U**
01123  M00S00993.1xd     +++| LDAE     DATA   C+,PS=******.+
01124  M00S00994.1xd     +++|          TITLE  DIAGNOSTIC PROCESSING.
01125  M00S00995.1xd     +++| RND      SPACE  4,10
01126  M00S00996.1xd     +++|**        RND - RUN DIAGNOSTICS.
01127  M00S00997.1xd     +++|
01128  M00S00998.1xd     +++|
Line S00999 Modification History
M01 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01129  M01S00999.1xd5    ---| RND      BSS    0
01130  M01S01000.1xd5    ---|          LDC    CSR         SET RETURN ADDRESS
01131  M01S01001.1xd5    ---| RND1     STM    ERAD
Line S00062 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01132  M01S00062.1xd5    +++| RND      SUBR               ENTRY/EXIT
01133  M01S00063.1xd5    +++|          LDM    ENAD,DI
01134  M01S00064.1xd5    +++|          NJN    RNDX        IF DRIVE DISABLED (SLAVE RESET FAILURE)
01135  M00S01002.1xd     +++|          LDC    C8100       SETUP DRIVE DIAGNOSTIC COMMAND
01136  M00S01003.1xd     +++|          STML   CPBF+OPC
01137  M00S01004.1xd     +++|          LDD    CN          MERGE CONTROLLER + DRIVE NUMBERS
01138  M00S01005.1xd     +++|          SHN    10
01139  M00S01006.1xd     +++|          LMD    DN          SET FACILITY ADDRESS
01140  M00S01007.1xd     +++|          STM    CPBF+CUN
01141  M00S01008.1xd     +++|          LDN    60D         TIMEOUT VALUE = 1 MINUTE
01142  M00S01009.1xd     +++|          STD    TO
01143  M00S01010.1xd     +++|          LDN    BCPL        WRITE COMMAND BLOCK
01144  M00S01011.1xd     +++|          RJM    WCB
Line S01012 Modification History
M01 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01145  M01S01012.1xd5    ---|          LDC    RNDA        ISSUE OPERATOR MESSAGE
01146  M01S01013.1xd5    ---|          RJM    IOM
Line S00026 Modification History
M01 (Added by) ns2714
M02 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01147  M02S00026.1xd5    ---|          LDC    1S15        FLAG DIAGNOSTICS INITIATED
01148  M02S00027.1xd5    ---|          STML   IPPS
Line S00065 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01149  M01S00065.1xd5    +++|          LDML   IPPS,DI     FLAG DIAGNOSTICS INITIATED
01150  M01S00066.1xd5    +++|          LPC    -1S15
01151  M01S00067.1xd5    +++|          LMC    1S15
01152  M01S00068.1xd5    +++|          STML   IPPS,DI
01153  M00S01014.1xd     +++|
01154  M00S01015.1xd     +++|*         WAIT UNTIL CONTROLLER HAS RETURNED INTERRUPT.
01155  M00S01016.1xd     +++|
01156  M00S01017.1xd     +++|          LDN    CMSS        PROCESS ATTENTION
01157  M00S01018.1xd     +++|          RJM    ATT
Line S01019 Modification History
M01 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01158  M01S01019.1xd5    ---|          ZJP    SPD9        IF DIAGNOSTICS COMPLETED SUCCESSFULLY
Line S00069 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01159  M01S00069.1xd5    +++|          ZJN    RND1        IF DIAGNOSTICS COMPLETED SUCCESSFULLY
01160  M01S00070.1xd5    +++|          LDN    0           CLEAR ERROR STEP ADDRESS
01161  M01S00071.1xd5    +++|          STM    ESAD,DI
01162  M00S01020.1xd     +++|          LCN    EDTF
01163  M00S01021.1xd     +++|          RJM    ERR         PROCESS ERROR
01164  M00S01022.1xd     +++|
Line S01023 Modification History
M01 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01165  M01S01023.1xd5    ---|
01166  M01S01024.1xd5    ---| RNDA     DATA   C* EQ000, DIAGNOSTIC RUNNING.*
Line S00072 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01167  M01S00072.1xd5    +++| RND1     LDML   IPPS,DI     CLEAR DIAGNOSTICS FLAG
01168  M01S00073.1xd5    +++|          LPC    -1S15
01169  M01S00074.1xd5    +++|          STML   IPPS,DI
01170  M01S00075.1xd5    +++|          UJP    RNDX        RETURN
Line S01025 Modification History
M01 (Removed by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
01171  M01S01025.ns2750  ---|          TITLE  SPIN-UP / SPIN-DOWN PROCESSING.
01172  M01S01026.ns2750  ---| SPD      SPACE  4,10
01173  M01S01027.ns2750  ---|**        SPD - SPIN UP / SPIN-DOWN DRIVE.
01174  M01S01028.ns2750  ---|
01175  M01S01029.ns2750  ---|
01176  M01S01030.ns2750  ---| SPD      BSS    0
01177  M01S01031.ns2750  ---|          LDC    CSR         SET RETURN ADDRESS
Line S01032 Modification History
M01 (Removed by) 272l774
M02 (Removed by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
01178  M02S01032.ns2750  ---|          STM    ERAD
Line S00031 Modification History
M01 (Added by) 272l774
M02 (Removed by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
01179  M02S00031.ns2750  ---|          STM    ERAD,DI
Line S01033 Modification History
M01 (Removed by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
01180  M01S01033.ns2750  ---|          LDD    RW
01181  M01S01034.ns2750  ---|          ZJN    SPD2        IF SPIN-DOWN REQUEST
01182  M01S01035.ns2750  ---|          RJM    GDS
01183  M01S01036.ns2750  ---|          SHN    0-15        CHECK DRIVE STATUS
01184  M01S01037.ns2750  ---|          LPN    1
01185  M01S01038.ns2750  ---|          ZJN    SPD3        IF DRIVE NOT READY
01186  M01S01039.ns2750  ---|          LDN    SPD8-SPD6
01187  M01S01040.ns2750  ---| SPD2     ADN    SPD6-SPD5   SET TRANSFER ADDRESS
01188  M01S01041.ns2750  ---| SPD3     ADC    SPD5
01189  M01S01042.ns2750  ---|          STD    PA
01190  M01S01043.ns2750  ---|          LJM    0,PA        GO TO PROCESSOR
01191  M01S01044.ns2750  ---|
01192  M01S01045.ns2750  ---| SPD4     RJM    XMD         RETURN TO MAIN LOOP
Line S00076 Modification History
M01 (Added by) 1xd5
M02 (Removed by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
01193  M02S00076.ns2750  ---|          LDN    0           CLEAR REENTRY ADDRESS
01194  M02S00077.ns2750  ---|          STM    ADDR,DI
Line S01046 Modification History
M01 (Removed by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
01195  M01S01046.ns2750  ---|
01196  M01S01047.ns2750  ---|*         CHECK TIME INTERVAL SINCE LAST SPIN-UP.
01197  M01S01048.ns2750  ---|
Line S01049 Modification History
M01 (Removed by) ns2714
M02 (Removed by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
01198  M02S01049.ns2750  ---| SPD5     RJM    CMC         CHECK MONITOR COMPLETE
01199  M02S01050.ns2750  ---|          LDK    XSUEI
Line S00028 Modification History
M01 (Added by) ns2714
M02 (Removed by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
01200  M02S00028.ns2750  ---| SPD5     LDK    XSUEI
Line S01051 Modification History
M01 (Removed by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
01201  M01S01051.ns2750  ---|          STD    CM+4        SET SPIN-UP INTERVAL
01202  M01S01052.ns2750  ---|          SHN    -14
01203  M01S01053.ns2750  ---|          STD    CM+3
01204  M01S01054.ns2750  ---|          LDN    UDST        UPDATE EVENT TIME
01205  M01S01055.ns2750  ---|          STD    CM+1
01206  M01S01056.ns2750  ---|          MONITOR  EATM      CHECK EVENT TIME
01207  M01S01057.ns2750  ---|          LDD    CM+1
01208  M01S01058.ns2750  ---|          NJN    SPD4        IF EVENT INTERVAL NOT ELAPSED
01209  M01S01059.ns2750  ---|
01210  M01S01060.ns2750  ---|*         GENERATE COMMAND PACKET TO SPIN-UP / SPIN-DOWN DRIVE.
01211  M01S01061.ns2750  ---|
01212  M01S01062.ns2750  ---| SPD6     LDC    C0700       INSERT OP CODE
01213  M01S01063.ns2750  ---|          STM    CPBF+OPC
01214  M01S01064.ns2750  ---|          LDD    CN          MERGE CONTROLLER + DRIVE NUMBERS
01215  M01S01065.ns2750  ---|          SHN    10
01216  M01S01066.ns2750  ---|          LMD    DN          SET FACILITY ADDRESS
01217  M01S01067.ns2750  ---|          STM    CPBF+CUN
01218  M01S01068.ns2750  ---|          LDC    P0351       PARAMETER ID = DISK MODES
01219  M01S01069.ns2750  ---|          STM    CPBF+FCP
01220  M01S01070.ns2750  ---|          LDML   SPDB,RW     SET DISK MODE
01221  M01S01071.ns2750  ---|          STML   CPBF+FCP+1
01222  M01S01072.ns2750  ---|          LDM    SPDC,RW     DEFINE TIMEOUT VALUE
01223  M01S01073.ns2750  ---|          STD    TO
01224  M01S01074.ns2750  ---|          LDN    BCPL+4      WRITE COMMAND BLOCK
01225  M01S01075.ns2750  ---|          RJM    WCB
Line S01076 Modification History
M01 (Removed by) 1xd6
M02 (Removed by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
01226  M02S01076.ns2750  ---|          LDM    SPDD,RW     ISSUE OPERATOR MESSAGE
01227  M02S01077.ns2750  ---|          RJM    IOM
Line S01078 Modification History
M01 (Removed by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
01228  M01S01078.ns2750  ---|
01229  M01S01079.ns2750  ---|*         WAIT UNTIL CONTROLLER HAS RAISED INTERRUPT.
01230  M01S01080.ns2750  ---|
01231  M01S01081.ns2750  ---|          LDN    CMSS        PROCESS ATTENTION
01232  M01S01082.ns2750  ---|          RJM    ATT
Line S00001 Modification History
M01 (Added by) 1xd6
M02 (Removed by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
01233  M02S00001.ns2750  ---| SPDG     EQU    *           (RETURN ADDRESS WHEN RESPONSE RECEIVED)
Line S01083 Modification History
M01 (Removed by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
01234  M01S01083.ns2750  ---|          ZJN    SPD8        IF NORMAL COMPLETION
01235  M01S01084.ns2750  ---|          LCN    0
01236  M01S01085.ns2750  ---|          LMM    SPDE,RW
01237  M01S01086.ns2750  ---|          RJM    ERR         PROCESS ERROR
01238  M01S01087.ns2750  ---|
01239  M01S01088.ns2750  ---| SPD8     LDD    RW
01240  M01S01089.ns2750  ---|          ZJN    SPD10       IF SPIN-DOWN
Line S01090 Modification History
M01 (Removed by) 272l774
M02 (Removed by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
01241  M02S01090.ns2750  ---|          LDM    SREQ
Line S00032 Modification History
M01 (Added by) 272l774
M02 (Removed by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
01242  M02S00032.ns2750  ---|          LDM    SREQ,DI
Line S01091 Modification History
M01 (Removed by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
01243  M01S01091.ns2750  ---|          ZJN    SPD9        IF SPIN-UP INITIATED BY DRIVER
01244  M01S01092.ns2750  ---|          LDN    DUNF
01245  M01S01093.ns2750  ---|          RJM    CPF         CLEAR DEVICE UNAVAILABLE
01246  M01S01094.ns2750  ---|
01247  M01S01095.ns2750  ---|*         COMPLETE DEVICE INITIALIZATION.
01248  M01S01096.ns2750  ---|
01249  M01S01097.ns2750  ---| SPD9     LDN    0           CLEAR OPERATOR MESSAGE
01250  M01S01098.ns2750  ---|          RJM    IOM
Line S01099 Modification History
M01 (Removed by) 272l774
M02 (Removed by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
01251  M02S01099.ns2750  ---| SPD10    LDM    ERAD        SET RETURN ADDRESS
Line S00033 Modification History
M01 (Added by) 272l774
M02 (Removed by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
01252  M02S00033.ns2750  ---| SPD10    LDM    ERAD,DI     SET RETURN ADDRESS
Line S01100 Modification History
M01 (Removed by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
01253  M01S01100.ns2750  ---|          STD    PA
01254  M01S01101.ns2750  ---|          LDN    0           INDICATE OPERATION SUCCESSFUL
01255  M01S01102.ns2750  ---|          LJM    0,PA        RETURN TO CALLER
01256  M01S01103.ns2750  ---|
01257  M01S01104.ns2750  ---|
01258  M01S01105.ns2750  ---| SPDA     DATA   C* EQ000, SPIN UP PENDING.*
01259  M01S01106.ns2750  ---|
01260  M01S01107.ns2750  ---| SPDB     BSS    0           DISK MODES
01261  M01S01108.ns2750  ---|          CONL   0#4000
01262  M01S01109.ns2750  ---|          CONL   0#8000
01263  M01S01110.ns2750  ---|
01264  M01S01111.ns2750  ---| SPDC     BSS    0           TIMEOUT VALUES
01265  M01S01112.ns2750  ---|          CON    1*60D
01266  M01S01113.ns2750  ---|          CON    4*60D
01267  M01S01114.ns2750  ---|
01268  M01S01115.ns2750  ---| SPDD     BSS    0           MESSAGE ADDRESSES
01269  M01S01116.ns2750  ---|          CON    0
01270  M01S01117.ns2750  ---|          CON    SPDA
01271  M01S01118.ns2750  ---|
01272  M01S01119.ns2750  ---| SPDE     BSS    0           FAULT CODES
01273  M01S01120.ns2750  ---|          CON    ESDF
01274  M01S01121.ns2750  ---|          CON    ESUF
01275  M00S01122.1xd     ---|          TITLE  SELECTIVE RESET PROCESSING.
Line S01123 Modification History
M01 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01276  M01S01123.1xd5    ---| SRS      SPACE  4,10
Line S00078 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01277  M01S00078.1xd5    +++| SRS      SPACE  4,20
01278  M00S01124.1xd     +++|**        SRS - SELECTIVE RESET PROCESSING.
01279  M01S00079.1xd5    +++|*
01280  M01S00080.1xd5    +++|*         ENTRY  (A) = 6/FLAG,12/RADD.
01281  M01S00081.1xd5    +++|*                      (FLAG) = 0 FOR SLAVE RESET.
01282  M01S00082.1xd5    +++|*                      (FLAG) = 1 FOR LOGICAL RESET.
01283  M01S00083.1xd5    +++|*                      (RADD) = RETURN ADDRESS.
01284  M01S00084.1xd5    +++|*                (CN) = CONTROLLER NUMBER.
01285  M01S00085.1xd5    +++|*                (ADDR,DI) = 0 FOR ALL DRIVES ON CONTROL MODULE.
01286  M01S00086.1xd5    +++|*
01287  M01S00087.1xd5    +++|*         EXIT   TO *ERR* IF ERROR.
01288  M01S00088.1xd5    +++|*                TO *CMP9* FOR NON-CONTROLLING DRIVES ON SLAVE RESET.
01289  M01S00089.1xd5    +++|*
01290  M01S00090.1xd5    +++|*         USES   PA, RF, RW, T1, T5.
01291  M01S00091.1xd5    +++|*
01292  M01S00092.1xd5    +++|*         CALLS  ATT, C2D, IOM, LND, RIF, SCA, SRP, STO, XMD.
01293  M00S01125.1xd     +++|
01294  M00S01126.1xd     +++|
Line S01127 Modification History
M01 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01295  M01S01127.1xd5    ---| SRS      BSS    0
01296  M01S01128.1xd5    ---|          SHN    14-0        POSITION RESET OPTION
01297  M01S01129.1xd5    ---|          LMC    CMP
01298  M01S01130.1xd5    ---| SRS1     STM    ERAD        SET RETURN ADDRESS
Line S00093 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01299  M01S00093.1xd5    +++| SRS      BSS    0           ENTRY
01300  M01S00094.1xd5    +++|          STM    ERAD,DI     SET RETURN ADDRESS
01301  M00S01131.1xd     +++|          SHN    -14
01302  M00S01132.1xd     +++|          STD    RW          SAVE RESET OPTION
Line S01133 Modification History
M01 (Removed by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
01303  M01S01133.272l774 ---|          STM    RWST
Line S00034 Modification History
M01 (Added by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
01304  M01S00034.272l774 +++|          STM    RWST,DI
01305  M00S01134.1xd     +++| SRS2     LDC    0           CHECK RESET ACTIVITY
01306  M00S01135.1xd     +++| SRSA     EQU    *-1
01307  M00S01136.1xd     +++|          ZJN    SRS4        IF NONE IN PROGRESS
01308  M00S01137.1xd     +++| SRS3     RJM    XMD         RETURN TO MAIN LOOP
01309  M00S01138.1xd     +++|          UJN    SRS2        CHECK RESET IN PROGRESS
01310  M00S01139.1xd     +++|
Line S01140 Modification History
M01 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01311  M01S01140.1xd5    ---| SRS4     LDN    1           GET RESET INTERLOCK
01312  M01S01141.1xd5    ---|          RJM    SRI
01313  M01S01142.1xd5    ---|          NJN    SRS3        IF RESET IN PROGRESS ELSEWHERE
01314  M01S01143.1xd5    ---|          LDD    DI
Line S00095 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01315  M01S00095.1xd5    +++| SRS4     LDD    DI
01316  M00S01144.1xd     +++|          STM    SRSA        SET LOCAL RESET IN PROGRESS
Line S01145 Modification History
M01 (Removed by) ns2714
Seq #  *Modification Id* Act 
----------------------------+
01317  M01S01145.ns2714  ---|          LDM    PNUN
01318  M01S01146.ns2714  ---|          SHN    -3          SET CONTROLLER BLOCK INDEX
01319  M01S01147.ns2714  ---|          STD    T5
01320  M01S01148.ns2714  ---|          LDC    1S15        DISABLE CONTROLLER ACTIVITY
01321  M01S01149.ns2714  ---|          RAML   CSTB,T5
01322  M01S01150.ns2714  ---|          SBN    DSTBE       INITIALIZE FOR DRIVE SCAN
01323  M01S01151.ns2714  ---|          STD    T7
01324  M01S01152.ns2714  ---| SRS5     RJM    LND         LOCATE NEXT DRIVE
Line S00029 Modification History
M01 (Added by) ns2714
M02 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01325  M02S00029.1xd5    ---| SRS5     LMD    DI
01326  M02S00030.1xd5    ---|          RJM    LND         LOCATE NEXT DRIVE
Line S01153 Modification History
M01 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01327  M01S01153.1xd5    ---|          STD    DI
Line S00096 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01328  M01S00096.1xd5    +++|          LDN    0
01329  M01S00097.1xd5    +++| SRS5     RJM    LND         LOCATE NEXT DRIVE
01330  M00S01154.1xd     +++|          ZJN    SRS7        IF NO MORE DRIVES ON CONTROLLER
01331  M00S01155.1xd     +++|          LDM    SRSE,RW
Line S01156 Modification History
M01 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01332  M01S01156.1xd5    ---|          STM    ADDR        SET DRIVE PROCESSING ADDRESS
Line S00098 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01333  M01S00098.1xd5    +++|          STM    ADDR,T7     SET DRIVE PROCESSING ADDRESS
01334  M00S01157.1xd     +++|          STM    SRSC
Line S01158 Modification History
M01 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01335  M01S01158.1xd5    ---|          ZJN    SRS5        IF NOT SLAVE RESET
01336  M01S01159.1xd5    ---| SRS6     RJM    SUI         SET UNIT INTERLOCK
01337  M01S01160.1xd5    ---|          ZJN    SRS5        IF UNIT ASSIGNED THIS DRIVER
01338  M01S01161.1xd5    ---|          WAIT   512
01339  M01S01162.1xd5    ---|          UJN    SRS6        RETRY ACQUIRING INTERLOCK
Line S00099 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01340  M01S00099.1xd5    +++|          LDN    1
01341  M01S00100.1xd5    +++|          UJN    SRS5        CHECK FOR NEXT DRIVE
01342  M00S01163.1xd     +++|
Line S01164 Modification History
M01 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01343  M01S01164.1xd5    ---| SRS7     LDM    SRSA        RESTORE DEVICE INDEX
01344  M01S01165.1xd5    ---|          STD    DI
Line S00031 Modification History
M01 (Added by) ns2714
M02 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01345  M02S00031.1xd5    ---|          LDC    1S15        DISABLE CONTROLLER ACTIVITY
01346  M02S00032.1xd5    ---|          RAML   CSTB,T5
Line S01166 Modification History
M01 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01347  M01S01166.1xd5    ---|          LDD    RW          RESET SLAVE / LOGICAL INTERFACE
01348  M01S01167.1xd5    ---|          RJM    RIF
Line S01168 Modification History
M01 (Removed by) 1xd4
M02 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01349  M02S01168.1xd5    ---|          LDM    SRSD,RW     DEFINE TIMEOUT
Line S00002 Modification History
M01 (Added by) 1xd4
M02 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01350  M02S00002.1xd5    ---|          LDN    60D         DEFINE RESET TIMEOUT
Line S00101 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01351  M01S00101.1xd5    +++| SRS7     LDM    PNUN,DI
Line S00102 Modification History
M01 (Added by) 1xd5
M02 (Removed by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
01352  M02S00102.272l774 ---|          SHN    -3          CONTROLLER BLOCK INDEX
Line S00035 Modification History
M01 (Added by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
01353  M01S00035.272l774 +++|          SHN    -6          CONTROLLER BLOCK INDEX
Line S00103 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01354  M01S00103.1xd5    +++|          STD    T5
01355  M01S00104.1xd5    +++|          LDD    RW
01356  M01S00105.1xd5    +++|          LMN    1
01357  M01S00106.1xd5    +++|          SHN    17-0        BIT 15 SET IF SLAVE RESET
01358  M01S00107.1xd5    +++|          STDL   T1
01359  M01S00108.1xd5    +++|          LDML   CSTB,T5     SET / CLEAR SLAVE RESET IN PROGRESS FLAG
01360  M01S00109.1xd5    +++|          LPC    -1S15
01361  M01S00110.1xd5    +++|          LMDL   T1
01362  M01S00111.1xd5    +++|          STML   CSTB,T5
01363  M01S00112.1xd5    +++|          RJM    RIF         RESET SLAVE / LOGICAL INTERFACE
01364  M01S00113.1xd5    +++|          LDN    60D         RESET TIMEOUT = 1 MINUTE
01365  M00S01169.1xd     +++|          RJM    STO
01366  M00S01170.1xd     +++|          LDD    CN          CONVERT CONTROL MODULE NUMBER
01367  M00S01171.1xd     +++|          RJM    C2D
01368  M00S01172.1xd     +++|          SHN    6           INSERT IN MESSAGE
01369  M00S01173.1xd     +++|          LMN    1R
01370  M00S01174.1xd     +++|          STM    SRSH+1      INSERT IN FAILURE MESSAGE
01371  M00S01175.1xd     +++|          STM    SRSG+1
01372  M01S00114.1xd5    +++|          LDD    RW
01373  M01S00115.1xd5    +++|          NJN    SRS7.1      IF LOGICAL RESET
01374  M00S01176.1xd     +++|          LDC    SRSG        ACTIVATE OPERATOR MESSAGE
01375  M00S01177.1xd     +++|          STM    IOMA
Line S01178 Modification History
M01 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01376  M01S01178.1xd5    ---|          LDN    ASRT        WAIT ON ASYNC INTERRUPT
Line S00116 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01377  M01S00116.1xd5    +++|          LCN    1
01378  M01S00117.1xd5    +++|          RJM    IOM
01379  M01S00118.1xd5    +++| SRS7.1   LDN    ASRT        WAIT ON ASYNC INTERRUPT
01380  M00S01179.1xd     +++|          RJM    ATT
Line S01180 Modification History
M01 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01381  M01S01180.1xd5    ---|          NJN    SRS8        IF INTERRUPT TIMEOUT OR NONE
Line S00119 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01382  M01S00119.1xd5    +++|          NJN    SRS8        IF ERROR
01383  M00S01181.1xd     +++|
Line S01182 Modification History
M01 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01384  M01S01182.1xd5    ---|*         SEARCH REPONSE PACKET FOR MACHINE EXCEPTION PARAMETER.
Line S00120 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01385  M01S00120.1xd5    +++|*         SEARCH RESPONSE PACKET FOR MACHINE EXCEPTION PARAMETER.
01386  M00S01183.1xd     +++|
01387  M00S01184.1xd     +++|          LDN    ID16        LOOK FOR MACHINE EXCEPTION
01388  M00S01185.1xd     +++|          RJM    SRP
01389  M00S01186.1xd     +++|          MJN    SRS8        IF PARAMETER NOT FOUND
01390  M00S01187.1xd     +++|          LDML   RPBF+6,T3
01391  M00S01188.1xd     +++|          LPC    0#FEE0      CHECK OPERATIONAL + READY TRANSITION
01392  M00S01189.1xd     +++|          LMC    0#6000
01393  M00S01190.1xd     +++|          ZJN    SRS9        IF CONTROLLER RESET SUCCESSFUL
01394  M00S01191.1xd     +++| SRS8     LCN    ESRE
01395  M00S01192.1xd     +++|          RJM    ERR         PROCESS ERROR
01396  M00S01193.1xd     +++|
01397  M00S01194.1xd     +++| SRS9     RJM    SCA         SET CONTROLLER ATTRIBUTES
Line S01195 Modification History
M01 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01398  M01S01195.1xd5    ---|*         LDN    0
01399  M01S01196.1xd5    ---|          STM    SRSA        CLEAR RESET INTERLOCKS
01400  M01S01197.1xd5    ---|          RJM    SRI
01401  M01S01198.1xd5    ---|*         LDN    0           CLEAR RESET IN PROGRESS FLAG
01402  M01S01199.1xd5    ---|          STD    RF
Line S00121 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01403  M01S00121.1xd5    +++|*         LDN    0           CLEAR RESET INTERLOCK
01404  M01S00122.1xd5    +++|          STM    SRSA
01405  M01S00123.1xd5    +++|          STD    RF          CLEAR RESET IN PROGRESS FLAG
01406  M00S01200.1xd     +++|          RJM    IOM         CLEAR OPERATOR MESSAGE
Line S01201 Modification History
M01 (Removed by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
01407  M01S01201.272l774 ---|          LDM    PNUN
01408  M01S01202.272l774 ---|          SHN    -3          CONTROLLER BLOCK INDEX
Line S00036 Modification History
M01 (Added by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
01409  M01S00036.272l774 +++|          LDM    PNUN,DI
01410  M01S00037.272l774 +++|          SHN    -6          CONTROLLER BLOCK INDEX
01411  M00S01203.1xd     +++|          STD    T5
01412  M00S01204.1xd     +++|          LDML   CSTB,T5     ENABLE CONTROLLER ACTIVITY
Line S01205 Modification History
M01 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01413  M01S01205.1xd5    ---|          LPC    37777
Line S00124 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01414  M01S00124.1xd5    +++|          LPC    -1S14-1S15
01415  M00S01206.1xd     +++|          STML   CSTB,T5
Line S01207 Modification History
M01 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01416  M01S01207.1xd5    ---|          LDC    0           CHECK RESET COMPLETION
Line S00125 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01417  M01S00125.1xd5    +++|
01418  M01S00126.1xd5    +++|*         SLAVE RESET - WAIT FOR ASYNC INTERRUPT ON CONTROLLING UNIT.
01419  M01S00127.1xd5    +++|*         IF THE DRIVE INTERRUPT FOR THE CONTROLLING UNIT IS RECEIVED
01420  M01S00128.1xd5    +++|*         BEFORE THE CONTROLLER INTERRUPT, *IHD* WILL CLEAR *SRSC*
01421  M01S00129.1xd5    +++|*         AND THROW AWAY THE INTERRUPT.
01422  M01S00130.1xd5    +++|
01423  M01S00131.1xd5    +++| SRS10    LDC    0           CHECK RESET COMPLETION
01424  M01S00132.1xd5    +++|*         LDC    (NONZERO)   (SLAVE RESET - MAY BE CLEARED BY *IHD*)
01425  M00S01208.1xd     +++| SRSC     EQU    *-1
Line S01209 Modification History
M01 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01426  M01S01209.1xd5    ---|          ZJP    SPD10       IF CONTROLLING DRIVE COMPLETE
Line S00133 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01427  M01S00133.1xd5    +++|          ZJN    SRS11       IF CONTROLLING DRIVE COMPLETE
01428  M01S00134.1xd5    +++|          LDC    7*60D       TIMEOUT = 7 MINUTES
01429  M01S00135.1xd5    +++|          RJM    STO
01430  M01S00136.1xd5    +++|          LDN    ASRT        WAIT ON ASYNC INTERRUPT
Line S00137 Modification History
M01 (Added by) 1xd5
M02 (Removed by) 1xd6a
Seq #  *Modification Id* Act 
----------------------------+
01431  M02S00137.1xd6a   ---|          RJM    ATT
Line S00001 Modification History
M01 (Added by) 1xd6a
Seq #  *Modification Id* Act 
----------------------------+
01432  M01S00001.1xd6a   +++|          RJM    ATT         (RETURN TO *SRS11* IF INTERRUPT TIMEOUT)
01433  M00S01210.1xd     +++|
Line S01211 Modification History
M01 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01434  M01S01211.1xd5    ---|*         TIMEOUT NON-OPERATIONAL / NON-EXISTENT DRIVES.
Line S00138 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01435  M01S00138.1xd5    +++|*         COMPLETE RESET PROCESSING.
01436  M00S01212.1xd     +++|
Line S01213 Modification History
M01 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01437  M01S01213.1xd5    ---| SRS10    LDC    6*60D       SET TIMEOUT
Line S00139 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01438  M01S00139.1xd5    +++| SRS11    LDN    0           REENABLE ACCESS TO CONTROLLING DEVICE
01439  M01S00140.1xd5    +++|          STM    ADDR,DI
Line S00002 Modification History
M01 (Added by) 1xd6a
Seq #  *Modification Id* Act 
----------------------------+
01440  M01S00002.1xd6a   +++|          STM    ATTN,DI
01441  M01S00003.1xd6a   +++|          RJM    IOM         CLEAR OPERATOR MESSAGE
Line S00141 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01442  M01S00141.1xd5    +++|          LDM    ERAD,DI
01443  M01S00142.1xd5    +++|          STD    PA
01444  M01S00143.1xd5    +++|          LJM    0,PA        RETURN TO CALLER
01445  M01S00144.1xd5    +++|
01446  M01S00145.1xd5    +++|*         SLAVE RESET - WAIT FOR ASYNC INTERRUPTS ON OTHER UNITS.
Line S00004 Modification History
M01 (Added by) 1xd6a
Seq #  *Modification Id* Act 
----------------------------+
01447  M01S00004.1xd6a   +++|*         ENTRY TO THIS CODE IS FORCED BY CODE AT *SRS5*.
01448  M01S00005.1xd6a   +++|*         IF A DRIVE INTERRUPT FOR A NONCONTROLLING UNIT IS RECEIVED
01449  M01S00006.1xd6a   +++|*         BEFORE ENTRY AT *SRS12*, *VIS* WILL CLEAR *ADDR* FOR THE
01450  M01S00007.1xd6a   +++|*         DRIVE AND THROW AWAY THE INTERRUPT.
Line S00146 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01451  M01S00146.1xd5    +++|
01452  M01S00147.1xd5    +++| SRS12    LDC    8D*60D      TIMEOUT = 8 MINUTES
01453  M00S01214.1xd     +++|          RJM    STO
Line S01215 Modification History
M01 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01454  M01S01215.1xd5    ---| SRS11    RJM    XMD         RETURN TO MAIN LOOP
01455  M01S01216.1xd5    ---|          RJM    CTO         CHECK TIMEOUT
01456  M01S01217.1xd5    ---|          MJN    SRS11       IF NOT TIMED OUT
01457  M01S01218.1xd5    ---|          LDN    STNR        SET NOT READY ERROR IN MST
01458  M01S01219.1xd5    ---|          RJM    SES
01459  M01S01220.1xd5    ---|          LJM    CMP9        COMPLETE RESET PROCESSING
Line S00148 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01460  M01S00148.1xd5    +++|          LDN    ASRT        WAIT FOR ASYNC INTERRUPT
01461  M01S00149.1xd5    +++|          RJM    ATT         (RETURN TO *SRS13* IF INTERRUPT TIMEOUT)
Line S00150 Modification History
M01 (Added by) 1xd5
M02 (Removed by) 1xd6
Seq #  *Modification Id* Act 
----------------------------+
01462  M02S00150.1xd6    ---| SRS13    LJM    CMP9        REENABLE ACCESS TO DEVICE
Line S00002 Modification History
M01 (Added by) 1xd6
Seq #  *Modification Id* Act 
----------------------------+
01463  M01S00002.1xd6    +++| SRS13    LDN    0
01464  M01S00003.1xd6    +++|          RJM    IOM         CLEAR OPERATOR MESSAGE
01465  M01S00004.1xd6    +++|          LJM    CMP9        REENABLE ACCESS TO DRIVE
01466  M00S01221.1xd     +++|
Line S01222 Modification History
M01 (Removed by) 1xd4
Seq #  *Modification Id* Act 
----------------------------+
01467  M01S01222.1xd4    ---|
01468  M01S01223.1xd4    ---| SRSD     BSS    0           RESET TIMEOUT VALUES
01469  M01S01224.1xd4    ---|          CON    60D
01470  M01S01225.1xd4    ---|          CON    3
01471  M00S01226.1xd     ---|
01472  M00S01227.1xd     ---| SRSE     BSS    0           DRIVE PROCESSING ADDRESSES
Line S01228 Modification History
M01 (Removed by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01473  M01S01228.1xd5    ---|          CON    SRS10
01474  M01S01229.1xd5    ---|          CON    0
Line S00151 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01475  M01S00151.1xd5    +++|          CON    SRS12       SLAVE RESET
01476  M01S00152.1xd5    +++|          CON    0           LOGICAL RESET
01477  M00S01230.1xd     +++|
01478  M00S01231.1xd     +++| SRSG     DATA   C*CM3 BEING RESET ON CCHNN.*
01479  M00S01232.1xd     +++|
01480  M00S01233.1xd     +++| SRSH     DATA   C*CM3 RESET FAILURE ON CCHNN.*
01481  M00S01234.1xd     +++|          TITLE  INTERRUPT DRIVEN SUBROUTINES.
Line S00153 Modification History
M01 (Added by) 1xd5
M02 (Removed by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
01482  M02S00153.ns2750  ---| BOR      SPACE  4,10
Line S00003 Modification History
M01 (Added by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
01483  M01S00003.ns2750  +++| BOR      SPACE  4,20
Line S00154 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01484  M01S00154.1xd5    +++|**        BOR - BREAK OPPOSITE RESERVE.
01485  M01S00155.1xd5    +++|*
01486  M01S00156.1xd5    +++|*         EXECUTE A DRIVE RESET FOR THE SPECIFIED DRIVE.  THIS IS DONE
01487  M01S00157.1xd5    +++|*         FOR EACH DRIVE AT DRIVER INITIALIZATION TIME TO BREAK ANY
01488  M01S00158.1xd5    +++|*         DRIVE RESERVES WHICH MAY BE HELD BY THE OPPOSITE ACCESS.
Line S00006 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
01489  M01S00006.273l780 +++|*         ALSO CLEAR CONTROLLER OVER TEMPERATURE STATUS IN MST WORD
01490  M01S00007.273l780 +++|*         *BDLL*.
Line S00159 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01491  M01S00159.1xd5    +++|*
01492  M01S00160.1xd5    +++|*         ENTRY  (CN) = CONTROLLER NUMBER.
01493  M01S00161.1xd5    +++|*                (DN) = DRIVE NUMBER.
01494  M01S00162.1xd5    +++|*
01495  M01S00163.1xd5    +++|*         EXIT   TO *CMP*.
01496  M01S00164.1xd5    +++|*
Line S00004 Modification History
M01 (Added by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
01497  M01S00004.ns2750  +++|*         USES   CM+2, T7.
01498  M01S00005.ns2750  +++|*
Line S00165 Modification History
M01 (Added by) 1xd5
M02 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
01499  M02S00165.273l780 ---|*         CALLS  EDR.
Line S00008 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
01500  M01S00008.273l780 +++|*         CALLS  EDR, UBP.
Line S00166 Modification History
M01 (Added by) 1xd5
Seq #  *Modification Id* Act 
----------------------------+
01501  M01S00166.1xd5    +++|
Proceed to Part 1
cdc/nos2.source/opl.opl871/deck/1xd.txt ยท Last modified: (external edit)