User Tools

Site Tools


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

Deck 1IS

Library Member Format: MODIFY

Source

Seq #  *Modification Id* Act 
----------------------------+
00001  M00S00001.1is     +++|          IDENT  1IS,IOS
00002  M00S00002.1is     +++|          PERIPH
00003  M00S00003.1is     +++|          BASE   M
00004  M00S00004.1is     +++|          SST
00005  M00S00005.1is     +++|          SYSCOM
00006  M00S00006.1is     +++|          TITLE  1IS - INSTALL DEADSTART FILE.
00007  M00S00007.1is     +++|*COMMENT  1IS - INSTALL DEADSTART FILE.
Line S00008 Modification History
M01 (Removed by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00008  M01S00008.281l803 ---|          COMMENT COPYRIGHT CONTROL DATA CORP. 1978.
Line S00001 Modification History
M01 (Added by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00009  M01S00001.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
00010  M00S00009.1is     +++|          SPACE  4,10
00011  M00S00010.1is     +++|*****     1IS - INSTALL DEADSTART FILE.
00012  M00S00011.1is     +++|*
00013  M00S00012.1is     +++|*         P. D. HAAS.        78/03/16.
00014  M00S00013.1is     +++|*         D. R. HILGREN.     78/08/01.
00015  M00S00014.1is     +++|          SPACE  4,10
00016  M00S00015.1is     +++|***              *1IS* WORKS IN CONJUNCTION WITH THE CP ROUTINE
00017  M00S00016.1is     +++|*         *INSTALL* TO INSTALL THE RUNNING SYSTEM OR USER
00018  M00S00017.1is     +++|*         SPECIFIED DEADSTART FILE ON A RMS DEADSTART DEVICE.
00019  M00S00018.1is     +++|          SPACE  4,10
00020  M00S00019.1is     +++|***       CALL.
00021  M00S00020.1is     +++|*
00022  M00S00021.1is     +++|*T        18/ *1IS* ,6/0,12/ CODE ,12/ SFA ,12/ IFA
Figure

01112232429 IFA SFA CODE 303536414259 CODE 0 *1IS*

00023  M00S00022.1is     +++|*
00024  M00S00023.1is     +++|*         CODE = FUNCTION CODE.
00025  M00S00024.1is     +++|*         SFA = SDF FET FWA (IF PRESENT).
00026  M00S00025.1is     +++|*         IFA = INSTALL FILE FET FWA (IF PRESENT).
00027  M00S00026.1is     +++|*
00028  M00S00027.1is     +++|*
00029  M00S00028.1is     +++|*         FOR FUNCTION CODE *IDF*,
00030  M00S00029.1is     +++|*T,FET+5  48/0,12/ EQ
Figure FET+5

0111229 EQ030590

00031  M00S00030.1is     +++|*
Line S00031 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00032  M01S00031.ns22000 ---|*         EQ = EQUIPMENT NUMBER  FROM *INSTALL* STATEMENT.
Line S00001 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00033  M01S00001.ns22000 +++|*         EQ = EST ORDINAL SPECIFIED ON *INSTALL*.
00034  M00S00032.1is     +++|*
00035  M00S00033.1is     +++|*
00036  M00S00034.1is     +++|*         FOR FUNCTION CODE *CFI*,
00037  M00S00035.1is     +++|*T,FET+5  24/ R1 ,12/0,24/ R2
Figure FET+5

0232429 R20303536590 R1

00038  M00S00036.1is     +++|*
00039  M00S00037.1is     +++|*         R1 = RANDOM SECTOR ADDRESS OF *OSB*.
00040  M00S00038.1is     +++|*         R2 = RELATIVE SECTOR ADDRESS OF EOI.
00041  M00S00039.1is     +++|          SPACE  4,10
00042  M00S00040.1is     +++|***       DAYFILE MESSAGES.
00043  M00S00041.1is     +++|*
00044  M00S00042.1is     +++|*         * ASSIGNED FILE CONFLICT - SDF.* - A LOCAL FILE NAMED *SDF*
00045  M00S00043.1is     +++|*         IS ASSIGNED AT THE CONTROL POINT.  *SDF* IS A RESERVED FILE
00046  M00S00044.1is     +++|*         NAME.
00047  M00S00045.1is     +++|*
Line S00046 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00048  M01S00046.v23l617 ---|*         * ILLEGAL SDF DEVICE.* - THE EQUIPMENT SELECTED TO RECEIVE A
00049  M01S00047.v23l617 ---|*         DEADSTART FILE DOES NOT MEET THE REQUIREMENTS OF AN *RMS*
Line S00001 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00050  M01S00001.v23l617 +++|*         * INCORRECT SDF DEVICE.* - THE EQUIPMENT SELECTED TO RECEIVE
00051  M01S00002.v23l617 +++|*         A DEADSTART FILE DOES NOT MEET THE REQUIREMENTS OF AN *RMS*
00052  M00S00048.1is     +++|*         DEADSTART DEVICE.
00053  M00S00049.1is     +++|*
00054  M00S00050.1is     +++|*         * INSTALL FILE NOT FOUND.* - THE FILE TO BE INSTALLED AS A
00055  M00S00051.1is     +++|*         DEADSTART FILE WAS NOT FOUND (NOT ASSIGNED TO THE JOB CONTROL
00056  M00S00052.1is     +++|*         POINT).
00057  M00S00053.1is     +++|*
00058  M00S00054.1is     +++|*         * INSTALL FILE NOT MASS STORAGE.* - THE FILE TO BE INSTALLED
00059  M00S00055.1is     +++|*         AS A DEADSTART FILE DOES NOT RESIDE ON MASS STORAGE.
00060  M00S00056.1is     +++|*
00061  M00S00057.1is     +++|*         * MS ERROR ON DEADSTART FILE.* - A MASS STORAGE ERROR WAS
00062  M00S00058.1is     +++|*         ENCOUNTERED WHILE WRITING THE DEADSTART FILE, OR READING
00063  M00S00059.1is     +++|*         THE DEADSTART SECTOR.
00064  M00S00060.1is     +++|*
00065  M00S00061.1is     +++|*         * TRACK LIMIT ON SDF DEVICE.* - THE DEVICE SELECTED TO BECOME
00066  M00S00062.1is     +++|*         AN *RMS* DEADSTART DEVICE DOES NOT HAVE ENOUGH SPACE TO
00067  M00S00063.1is     +++|*         ACCOMMODATE THE DEADSTART FILE.
00068  M00S00064.1is     +++|*
Line S00065 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00069  M01S00065.v23l617 ---|*         * 1IS - ILLEGAL REQUEST.* - 1IS WAS CALLED WITH AN ILLEGAL
00070  M01S00066.v23l617 ---|*         FUNCTION REQUEST.
Line S00003 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00071  M01S00003.v23l617 +++|*         * 1IS - INCORRECT REQUEST.* - 1IS WAS CALLED WITH AN
00072  M01S00004.v23l617 +++|*         INCORRECT FUNCTION REQUEST.
00073  M00S00067.1is     +++|*
00074  M00S00068.1is     +++|*         * INSTALL ABORTED.* - OPERATOR ACTION ABORTED JOB.
00075  M00S00069.1is     +++|          SPACE  4,10
00076  M00S00070.1is     +++|***       OPERATOR MESSAGES.
00077  M00S00071.1is     +++|*
00078  M00S00072.1is     +++|*         *WAITING - GLOBAL INTERLOCK.* - GLOBAL INTERLOCK IS NOT
00079  M00S00073.1is     +++|*         AVAILABLE FOR DEADSTART FILE INSTALLATION.  *1IS* ISSUES
00080  M00S00074.1is     +++|*         MESSAGE AND GOES ON RECALL.
00081  M00S00075.1is     +++|          SPACE  4,10
00082  M00S00076.1is     +++|**        ROUTINES USED.
00083  M00S00077.1is     +++|*
00084  M00S00078.1is     +++|*         0BF - BEGIN FILE.
00085  M00S00079.1is     +++|*         0PI - PRESET DRIVER TO READ/WRITE DEADSTART SECTOR.
00086  M00S00080.1is     +++|          SPACE  4,10
00087  M00S00081.1is     +++|*CALL     COMPMAC
00088  M00S00082.1is     +++|*CALL     COMSCPS
00089  M00S00083.1is     +++|*CALL     COMSDSL
00090  M00S00084.1is     +++|*CALL     COMSLFD
00091  M00S00085.1is     +++|*CALL     COMSMSP
00092  M00S00086.1is     +++|*CALL     COMSMST
Line S00001 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00093  M01S00001.242l642 +++|*CALL     COMSPIM
00094  M00S00087.1is     +++|*CALL     COMSPRD
Line S00001 Modification History
M01 (Added by) 1is3
Seq #  *Modification Id* Act 
----------------------------+
00095  M01S00001.1is3    +++|*CALL     COMSSSJ
00096  M00S00088.1is     +++|*CALL     COMSWEI
00097  M00S00089.1is     +++|          SPACE  4,10
00098  M00S00090.1is     +++|****      DIRECT LOCATION ASSIGNMENTS.
00099  M00S00091.1is     +++|
00100  M00S00092.1is     +++|
00101  M00S00093.1is     +++| FS       EQU    20 - 24     FST ENTRY (5 LOCATIONS)
00102  M00S00094.1is     +++| RI       EQU    25 - 26     RANDOM INDEX (2 LOCATIONS)
00103  M00S00095.1is     +++| MS       EQU    27          MST POINTER
00104  M00S00096.1is     +++| CN       EQU    30 - 34     CM WORD BUFFER (5 LOCATIONS)
00105  M00S00097.1is     +++| TC       EQU    35          TRACK COUNT
00106  M00S00098.1is     +++| CT       EQU    36          CURRENT TRACK
00107  M00S00099.1is     +++| FN       EQU    40 - 44     FNT ENTRY (5 LOCATIONS)
Line S00100 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00108  M01S00100.ns22000 ---| EQ       EQU    45          EQUIPMENT NUMBER
Line S00002 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00109  M01S00002.ns22000 +++| EQ       EQU    45          EST ORDINAL
00110  M00S00101.1is     +++| PA       EQU    46          PROCESSOR ADDRESS
00111  M00S00102.1is     +++| FA       EQU    57          FST ADDRESS
Line S00103 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00112  M01S00103.ns22000 ---| EP       EQU    60 - 62     EST POINTERS
00113  M00S00104.1is     +++| WB       EQU    63 - 67     CM WORD BUFFER (5 LOCATIONS)
00114  M00S00105.1is     +++|****
00115  M00S00106.1is     +++|          TITLE  MACRO DEFINITIONS.
00116  M00S00107.1is     +++|          SPACE  4,10
00117  M00S00108.1is     +++|**        ERROR - ERROR MACRO.
00118  M00S00109.1is     +++|*
00119  M00S00110.1is     +++|*         ERROR  A
00120  M00S00111.1is     +++|*
00121  M00S00112.1is     +++|*                *A* = ADDRESS OF ERROR MESSAGE.
00122  M00S00113.1is     +++|
00123  M00S00114.1is     +++|
00124  M00S00115.1is     +++|          PURGMAC ERROR
00125  M00S00116.1is     +++|
00126  M00S00117.1is     +++| ERROR    MACRO  A
00127  M00S00118.1is     +++|          LDC    A
00128  M00S00119.1is     +++|          RJM    ABT
00129  M00S00120.1is     +++|          ENDM
00130  M00S00121.1is     +++|          TITLE  MAIN PROGRAM.
00131  M00S00122.1is     +++| IOS      SPACE  4,10
00132  M00S00123.1is     +++|**        1IS - MAIN PROGRAM.
00133  M00S00124.1is     +++|
00134  M00S00125.1is     +++|
00135  M00S00126.1is     +++|          ORG    PPFW
00136  M00S00127.1is     +++|
00137  M00S00128.1is     +++| IOS      RJM    CRQ         CHECK REQUEST
Line S00129 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00138  M01S00129.ns22000 ---|          LDN    ESTP        SET EST POINTERS
00139  M01S00130.ns22000 ---|          CRD    EP
00140  M00S00131.1is     +++|          LDM    TFCN-1,IR+2 SET PROCESSOR ADDRESS
00141  M00S00132.1is     +++|          STD    PA
00142  M00S00133.1is     +++|          RJM    0,PA        EXECUTE PROCESSOR
00143  M00S00134.1is     +++|          LDN    1           SET REQUEST COMPLETE
00144  M00S00135.1is     +++|          STD    IR+4
00145  M00S00136.1is     +++|          LDD    RA          STORE REQUEST COMPLETE
00146  M00S00137.1is     +++|          SHN    6
00147  M00S00138.1is     +++|          ADN    ARGR
00148  M00S00139.1is     +++|          CWD    IR
00149  M00S00140.1is     +++|          MONITOR  DPPM      DROP PP
00150  M00S00141.1is     +++|          LJM    PPR         EXIT TO PP RESIDENT
00151  M00S00142.1is     +++|          SPACE  4,10
00152  M00S00143.1is     +++| TFCN     BSS    0           TABLE OF FUNCTION REQUESTS
00153  M00S00144.1is     +++|          LOC    1
00154  M00S00145.1is     +++|          CON    VIF         VALIDATE INSTALL FILE
00155  M00S00146.1is     +++|          CON    IDF         INITIALIZE DEADSTART FILE
00156  M00S00147.1is     +++|          CON    CFI         COMPLETE SDF INSTALLATION
00157  M00S00148.1is     +++|          CON    PME         PROCESS MASS STORAGE ERROR
00158  M00S00149.1is     +++|
00159  M00S00150.1is     +++| TFCNL    BSS    0           TABLE LENGTH
00160  M00S00151.1is     +++|          LOC    *O
00161  M00S00152.1is     +++|          TITLE  ERROR PROCESSOR / MESSAGES.
00162  M00S00153.1is     +++| ABT      SPACE  4,10
00163  M00S00154.1is     +++|**        ABT - ERROR PROCESSOR.
00164  M00S00155.1is     +++|*
00165  M00S00156.1is     +++|*         ENTRY  (A) = ADDRESS OF ERROR MESSAGE.
00166  M00S00157.1is     +++|*
00167  M00S00158.1is     +++|*         EXIT   TO *PPR*.
00168  M00S00159.1is     +++|*                ERROR MESSAGE ISSUED.
00169  M00S00160.1is     +++|*                CONTROL POINT ABORTED.
00170  M00S00161.1is     +++|*
00171  M00S00162.1is     +++|*         CALLS  DFM.
00172  M00S00163.1is     +++|*
00173  M00S00164.1is     +++|*         MACROS MONITOR.
00174  M00S00165.1is     +++|
00175  M00S00166.1is     +++|
00176  M00S00167.1is     +++| ABT      CON    0           ENTRY
00177  M00S00168.1is     +++|          RJM    DFM         ISSUE MESSAGE
00178  M00S00169.1is     +++|          MONITOR  ABTM      ABORT CONTROL POINT
00179  M00S00170.1is     +++|          LJM    PPR         EXIT TO PP RESIDENT
00180  M00S00171.1is     +++|          SPACE  4,10
00181  M00S00172.1is     +++|*         ERROR MESSAGES.
00182  M00S00173.1is     +++|
00183  M00S00174.1is     +++|
Line S00175 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00184  M01S00175.v23l617 ---| EILR     DATA   C* 1IS - ILLEGAL REQUEST.*
00185  M01S00176.v23l617 ---| EISD     DATA   C* ILLEGAL SDF DEVICE.*
Line S00005 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00186  M01S00005.v23l617 +++| EILR     DATA   C* 1IS - INCORRECT REQUEST.*
00187  M01S00006.v23l617 +++| EISD     DATA   C* INCORRECT SDF DEVICE.*
00188  M00S00177.1is     +++| EAFC     DATA   C* ASSIGNED FILE CONFLICT - SDF.*
00189  M00S00178.1is     +++| EFNF     DATA   C* INSTALL FILE NOT FOUND.*
00190  M00S00179.1is     +++| EFNM     DATA   C* INSTALL FILE NOT MASS STORAGE.*
00191  M00S00180.1is     +++| EMSE     DATA   C* MS ERROR ON  DEADSTART FILE.*
00192  M00S00181.1is     +++| ETKL     DATA   C* TRACK LIMIT ON SDF DEVICE.*
00193  M00S00182.1is     +++| EABT     DATA   C* INSTALL ABORTED.*
00194  M00S00183.1is     +++|          TITLE  FUNCTION PROCESSORS.
00195  M00S00184.1is     +++| VIF      SPACE  4,10
00196  M00S00185.1is     +++|**        VIF - VALIDATE INSTALL FILE (FUNCTION 1).
00197  M00S00186.1is     +++|
00198  M00S00187.1is     +++|
00199  M00S00188.1is     +++| VIF      SUBR               ENTRY/EXIT
00200  M00S00189.1is     +++|          LDD    RA          GET INSTALL FILE NAME FROM FET
00201  M00S00190.1is     +++|          SHN    6
00202  M00S00191.1is     +++|          ADD    IR+4
00203  M00S00192.1is     +++|          CRD    FN
00204  M00S00193.1is     +++|          ADN    4           READ LIMIT WORD
00205  M00S00194.1is     +++|          CRD    CN
00206  M00S00195.1is     +++|          RJM    SAF         SEARCH FOR ASSIGNED FILE
00207  M00S00196.1is     +++|          NJN    VIF1        IF INSTALL FILE FOUND
00208  M00S00197.1is     +++|          ERROR  EFNF        * INSTALL FILE NOT FOUND.*
00209  M00S00198.1is     +++|
00210  M00S00199.1is     +++| VIF1     STD    CN          SET FNT ADDRESS IN LIMIT WORD
00211  M00S00200.1is     +++|          NFA    CN,R        READ INSTALL FILE FST INFORMATION
00212  M00S00201.1is     +++|          ADN    FSTL
00213  M00S00202.1is     +++|          CRD    FS
00214  M00S00203.1is     +++|          CRD    T5
Line S00204 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00215  M01S00204.ns22000 ---|          LDD    T5
00216  M01S00205.ns22000 ---|          ADM    ESTS        READ EST ENTRY
Line S00003 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00217  M01S00003.ns22000 +++|          SFA    EST,T5      READ EST ENTRY
00218  M01S00004.ns22000 +++|          ADK    EQDE
00219  M00S00206.1is     +++|          CRD    CM
00220  M00S00207.1is     +++|          LDD    CM
00221  M00S00208.1is     +++|          SHN    21-13
00222  M00S00209.1is     +++|          MJN    VIF3        IF INSTALL FILE ON MASS STORAGE
00223  M00S00210.1is     +++| VIF2     ERROR  EFNM        * INSTALL FILE NOT MASS STORAGE.*
00224  M00S00211.1is     +++|
00225  M00S00212.1is     +++| VIF3     RJM    IRA         INITIALIZE RANDOM ACCESS PROCESSORS
Line S00213 Modification History
M01 (Removed by) 1is1
Seq #  *Modification Id* Act 
----------------------------+
00226  M01S00213.1is1    ---|          LDD    FS+1
Line S00001 Modification History
M01 (Added by) 1is1
Seq #  *Modification Id* Act 
----------------------------+
00227  M01S00001.1is1    +++|          LDD    FS+2
00228  M00S00214.1is     +++|          ZJN    VIF2        IF NO TRACK ASSIGNED
00229  M00S00215.1is     +++|          RJM    SEI         FIND EOI ON INSTALL FILE
00230  M00S00216.1is     +++|          LDD    T6          SET EOI POSITION IN FST
00231  M00S00217.1is     +++|          STD    FS+2
00232  M00S00218.1is     +++|          LDD    T7
00233  M00S00219.1is     +++|          STD    FS+3
00234  M00S00220.1is     +++|          LDN    1
00235  M00S00221.1is     +++|          STD    FS+4
00236  M00S00222.1is     +++|          NFA    CN,R        STORE INSTALL FILE FST INFORMATION
00237  M00S00223.1is     +++|          ADN    FSTL
00238  M00S00224.1is     +++|          CWD    FS
00239  M00S00225.1is     +++|          LDD    RA          STORE LIMIT WORD
00240  M00S00226.1is     +++|          SHN    6
00241  M00S00227.1is     +++|          ADD    IR+4
00242  M00S00228.1is     +++|          ADN    4
00243  M00S00229.1is     +++|          CWD    CN
00244  M00S00230.1is     +++|          LJM    VIFX        RETURN
00245  M00S00231.1is     +++|          TITLE  FUNCTION PROCESSORS.
00246  M00S00232.1is     +++| IDF      SPACE  4,10
00247  M00S00233.1is     +++|**        IDF - INITIALIZE DEADSTART FILE (FUNCTION 2).
00248  M00S00234.1is     +++|
00249  M00S00235.1is     +++|
00250  M00S00236.1is     +++| IDF      SUBR               ENTRY/EXIT
00251  M00S00237.1is     +++|          LDD    RA          GET SDF FILE NAME FROM FET
00252  M00S00238.1is     +++|          SHN    6
00253  M00S00239.1is     +++|          ADD    IR+3
00254  M00S00240.1is     +++|          CRD    FN
00255  M00S00241.1is     +++|          ADN    4           READ LIMIT WORD
00256  M00S00242.1is     +++|          CRD    CN
00257  M00S00243.1is     +++|          ADN    5-4         READ FET PARAMETER WORD
00258  M00S00244.1is     +++|          CRD    WB
00259  M00S00245.1is     +++|          RJM    SAF         SEARCH FOR ASSIGNED FILE
00260  M00S00246.1is     +++|          ZJN    IDF2        IF FILE NOT FOUND
00261  M00S00247.1is     +++|          NFA    FA,R        READ FST INFORMATION
00262  M00S00248.1is     +++|          CRD    CM
00263  M00S00249.1is     +++|          ADN    FSTL
00264  M00S00250.1is     +++|          CRD    FS
00265  M00S00251.1is     +++|          LDD    CM+4
00266  M00S00252.1is     +++|          LPN    77
00267  M00S00253.1is     +++|          LMN    SSST
00268  M00S00254.1is     +++|          ZJN    IDF1        IF CREATED BY *1IS* REQUEST
00269  M00S00255.1is     +++|          ERROR  EAFC        * ASSIGNED FILE CONFLICT - SDF.*
00270  M00S00256.1is     +++|
Line S00257 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00271  M01S00257.ns22000 ---| IDF1     LDD    FS          EXTRACT EQUIPMENT NUMBER
Line S00005 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00272  M01S00005.ns22000 +++| IDF1     LDD    FS          SET EST ORDINAL
00273  M00S00258.1is     +++|          STD    EQ
00274  M00S00259.1is     +++|          UJN    IDF3        CREATED BY DEADSTART REQUEST
00275  M00S00260.1is     +++|
00276  M00S00261.1is     +++| IDF2     LDD    WB+4        CREATE DEADSTART FILE FNT
00277  M00S00262.1is     +++|          RJM    CDF
Line S00263 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00278  M01S00263.ns22000 ---|          LDD    EQ          SET EQUIPMENT NUMBER
Line S00006 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00279  M01S00006.ns22000 +++|          LDD    EQ          SET EST ORDINAL
00280  M00S00264.1is     +++| IDF3     STD    T5
00281  M00S00265.1is     +++|          LDD    FA          SET FNT ADDRESS IN LIMIT WORD
00282  M00S00266.1is     +++|          STD    CN
00283  M00S00267.1is     +++|          LDD    RA          STORE LIMIT WORD
00284  M00S00268.1is     +++|          SHN    6
00285  M00S00269.1is     +++|          ADD    IR+3
00286  M00S00270.1is     +++|          ADN    4
00287  M00S00271.1is     +++|          CWD    CN
00288  M00S00272.1is     +++|          RJM    SGI         SET GLOBAL INTERLOCK
00289  M00S00273.1is     +++|          ZJN    IDF4        IF INTERLOCK SET
00290  M00S00274.1is     +++|          LJM    RCL         RECALL PP
00291  M00S00275.1is     +++|
00292  M00S00276.1is     +++| IDF4     LDD    CN          CHECK PRESENSE OF SDF
Line S00277 Modification History
M01 (Removed by) 251l670
Seq #  *Modification Id* Act 
----------------------------+
00293  M01S00277.251l670 ---|          LPC    MGSDF
Line S00001 Modification History
M01 (Added by) 251l670
Seq #  *Modification Id* Act 
----------------------------+
00294  M01S00001.251l670 +++|          LPC    MGDSF
00295  M00S00278.1is     +++|          ZJN    IDF5        IF NO SDF ON DEVICE
00296  M00S00279.1is     +++|          LDN    0           READ DEADSTART SECTOR
00297  M00S00280.1is     +++|          RJM    RDD
00298  M00S00281.1is     +++|          LDN    ZERL        CLEAR SDF INDICATORS
00299  M00S00282.1is     +++|          CRM    BFMS+OSBP,ON
00300  M00S00283.1is     +++|          LDC    BFMS+WLSF   REWRITE DEADSTART SECTOR
Line S00284 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00301  M01S00284.242l642 ---|          RJM    WDS
Line S00002 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00302  M01S00002.242l642 +++|          RJM    WMS
00303  M00S00285.1is     +++|          ENDMS              RELEASE CHANNEL
Line S00286 Modification History
M01 (Removed by) 251l670
Seq #  *Modification Id* Act 
----------------------------+
00304  M01S00286.251l670 ---|          CMSTF  GSDF        CLEAR SDF STATUS IN MST
Line S00002 Modification History
M01 (Added by) 251l670
Seq #  *Modification Id* Act 
----------------------------+
00305  M01S00002.251l670 +++|          CMSTF  GDSF
00306  M00S00287.1is     +++|          LDM    BFMS+OSBP+5 EXTRACT FIRST TRACK OF SDF
00307  M00S00288.1is     +++|          STD    CM+2
00308  M00S00289.1is     +++|          SHN    0-13
00309  M00S00290.1is     +++|          ZJN    IDF5        IF GARBAGE IN DEADSTART SECTOR
00310  M00S00291.1is     +++|          LDD    T5
00311  M00S00292.1is     +++|          LMC    4000        SET CHECKPOINT REQUEST
00312  M00S00293.1is     +++|          STD    CM+1
00313  M00S00294.1is     +++|          MONITOR  DTKM      RELEASE SDF TRACK CHAIN
00314  M00S00295.1is     +++| IDF5     RJM    IRA         INITIALIZE RANDOM ACCESS PROCESSORS
00315  M00S00296.1is     +++|          LDD    RA          GET NEW DEADSTART FILE LENGTH
00316  M00S00297.1is     +++|          SHN    6
00317  M00S00298.1is     +++|          ADD    IR+4        READ INSTALL FET PARAMETER WORD
00318  M00S00299.1is     +++|          ADN    5
00319  M00S00300.1is     +++|          CRD    CN
00320  M00S00301.1is     +++|          RJM    DTC         DETERMINE TRACK COUNT
00321  M00S00302.1is     +++|          LDN    ZERL        REQUEST TRACK CHAIN FOR DEADSTART FILE
00322  M00S00303.1is     +++|          CRD    CM
00323  M00S00304.1is     +++|          LDD    T5
00324  M00S00305.1is     +++|          STD    CM+1
00325  M00S00306.1is     +++|          LCN    1           SELECT RESERVE ALL TRACKS
00326  M00S00307.1is     +++|          STD    CM+4
00327  M00S00308.1is     +++|          SHN    -14
00328  M00S00309.1is     +++|          STD    CM+3
00329  M00S00310.1is     +++|          MONITOR  RTCM
00330  M00S00311.1is     +++|          LDD    CM+4        SET FIRST TRACK
00331  M00S00312.1is     +++|          STD    T6
00332  M00S00313.1is     +++|          STD    CT
00333  M00S00314.1is     +++|          STD    T4
00334  M00S00315.1is     +++|          ZJN    IDF6        IF NO TRACKS AVAILABLE
00335  M00S00316.1is     +++|          RJM    SEI         COUNT TRACKS IN CHAIN
00336  M00S00317.1is     +++|          STD    T3          SAVE TRACK COUNT
00337  M00S00318.1is     +++|          SBD    TC
00338  M00S00319.1is     +++|          PJN    IDF7        IF ENOUGH TRACKS IN CHAIN
00339  M00S00320.1is     +++|          LDD    T5          DROP TRACK CHAIN
00340  M00S00321.1is     +++|          STD    CM+1
00341  M00S00322.1is     +++|          LDD    CT
00342  M00S00323.1is     +++|          STD    CM+2
00343  M00S00324.1is     +++|          MONITOR  DTKM
00344  M00S00325.1is     +++| IDF6     RJM    CFE         CLEAR FNT/FST ENTRY
00345  M00S00326.1is     +++|          RJM    CGI         CLEAR GLOBAL INTERLOCK
00346  M00S00327.1is     +++|          ERROR  ETKL        * TRACK LIMIT ON SDF DEVICE.*
00347  M00S00328.1is     +++|
00348  M00S00329.1is     +++| IDF7     ZJN    IDF9        IF EXACTLY ENOUGH TRACKS
00349  M00S00330.1is     +++| IDF8     LDD    T4          SAVE CURRENT TRACK
00350  M00S00331.1is     +++|          STD    T6
00351  M00S00332.1is     +++|          RJM    SNT         SET NEXT TRACK
00352  M00S00333.1is     +++|          STD    T4
00353  M00S00334.1is     +++|          SOD    T3          DECREMENT TRACK COUNT
00354  M00S00335.1is     +++|          LMD    TC
00355  M00S00336.1is     +++|          NJN    IDF8        IF NOT AT REQUIRED TRACK COUNT
00356  M00S00337.1is     +++|
00357  M00S00338.1is     +++|*         DELINK FIRST PART OF TRACK CHAIN.
00358  M00S00339.1is     +++|
00359  M00S00340.1is     +++|          STD    CM+3
00360  M00S00341.1is     +++|          LDD    CT          SET FIRST TRACK
00361  M00S00342.1is     +++|          STD    CM+2
00362  M00S00343.1is     +++|          LDD    T6          SET LAST TRACK TO BE DROPPED
00363  M00S00344.1is     +++|          STD    CM+4
00364  M00S00345.1is     +++|          LDD    T5
00365  M00S00346.1is     +++|          STD    CM+1
00366  M00S00347.1is     +++|          MONITOR  DLKM      DELINK FRONT OF TRACK CHAIN
00367  M00S00348.1is     +++| IDF9     LDD    T4          SET FIRST TRACK IN FST
00368  M00S00349.1is     +++|          STD    FS+1
00369  M00S00350.1is     +++|          STD    FS+2        SET CURRENT TRACK
00370  M00S00351.1is     +++|          LDN    FSMS        SET FIRST SECTOR
00371  M00S00352.1is     +++|          STD    FS+3
00372  M00S00353.1is     +++|          LDN    1
00373  M00S00354.1is     +++|          STD    FS+4
Line S00355 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00374  M01S00355.ns22000 ---|          LDD    EQ          SET EQUIPMENT NUMBER
Line S00007 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00375  M01S00007.ns22000 +++|          LDD    EQ          SET EST ORDINAL
00376  M00S00356.1is     +++|          STD    FS
00377  M00S00357.1is     +++|          NFA    FA,R        STORE FST INFORMATION
00378  M00S00358.1is     +++|          ADN    FSTL
00379  M00S00359.1is     +++|          CWD    FS
00380  M00S00360.1is     +++|          LJM    IDFX        RETURN
00381  M00S00361.1is     +++|          TITLE  FUNCTION PROCESSORS.
00382  M00S00362.1is     +++| CFI      SPACE  4,10
00383  M00S00363.1is     +++|**        CFI - COMPLETE SDF INSTALLATION (FUNCTION 3).
00384  M00S00364.1is     +++|
00385  M00S00365.1is     +++|
00386  M00S00366.1is     +++| CFI      SUBR               ENTRY/EXIT
00387  M00S00367.1is     +++|          LDD    RA          READ SDF LIMIT WORD
00388  M00S00368.1is     +++|          SHN    6
00389  M00S00369.1is     +++|          ADD    IR+3
00390  M00S00370.1is     +++|          ADN    4
00391  M00S00371.1is     +++|          CRD    CM
00392  M00S00372.1is     +++|          SBD    IR+3        READ INSTALL FILE PARAMETER WORD
00393  M00S00373.1is     +++|          ADN    5-4
00394  M00S00374.1is     +++|          ADD    IR+4
00395  M00S00375.1is     +++|          CRD    RI          (RI - RI+1) = RANDOM ADDRESS OF *OSB*
00396  M00S00376.1is     +++|          LDD    CM          SET SDF FNT ADDRESS
00397  M00S00377.1is     +++|          STD    FA
00398  M00S00378.1is     +++|          NFA    CM,R        READ FNT ENTRY
00399  M00S00379.1is     +++|          CRD    FN
00400  M00S00380.1is     +++|          ADN    FSTL
00401  M00S00381.1is     +++|          CRD    FS
00402  M00S00382.1is     +++|          LCN    LOFT-LIFT   CHANGE FILE TYPE FOR SYSTEM SECTOR
00403  M00S00383.1is     +++|          SHN    6
00404  M00S00384.1is     +++|          RAD    FN+4
00405  M00S00385.1is     +++|          LDC    BFMS+502-FTSS-1
00406  M00S00386.1is     +++|          STD    T2
00407  M00S00387.1is     +++| CFI1     LDN    0           CLEAR SYSTEM SECTOR BUFFER
00408  M00S00388.1is     +++|          STM    FTSS+1,T2
00409  M00S00389.1is     +++|          SOD    T2
00410  M00S00390.1is     +++|          NJN    CFI1        LOOP TO START OF BUFFER
Line S00391 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00411  M01S00391.ns22000 ---|          LDD    FS          SET EQUIPMENT NUMBER
Line S00008 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00412  M01S00008.ns22000 +++|          LDD    FS          SET EST ORDINAL
00413  M00S00392.1is     +++|          STD    T5
00414  M00S00393.1is     +++|          STD    CM+1
Line S00394 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00415  M01S00394.ns22000 ---|          ADM    ESTS        READ EST ENTRY
Line S00009 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00416  M01S00009.ns22000 +++|          SFA    EST         READ EST ENTRY
00417  M01S00010.ns22000 +++|          ADK    EQDE
00418  M00S00395.1is     +++|          CRD    WB
00419  M00S00396.1is     +++|          LDD    FS+1        SET FIRST TRACK
00420  M00S00397.1is     +++|          STD    CM+2
00421  M00S00398.1is     +++|          LDN    SPFS        PRESERVE SDF TRACK CHAIN
00422  M00S00399.1is     +++|          STD    CM+3
00423  M00S00400.1is     +++|          MONITOR  STBM
00424  M00S00401.1is     +++|          RJM    IRA         INITIALIZE RANDOM ACCESS PROCESSORS
00425  M00S00402.1is     +++|          NFA    FA,R        STORE FNT ENTRY WITH FILE TYPE *LIFT*
00426  M00S00403.1is     +++|          CWD    FN
Line S00404 Modification History
M01 (Removed by) 1is4
Seq #  *Modification Id* Act 
----------------------------+
00427  M01S00404.1is4    ---|          SETMS  WRITE       SET MASS STORAGE
Line S00001 Modification History
M01 (Added by) 1is4
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00428  M02S00001.242l642 ---|          SETMS  WRITE,(RW)  SET MASS STORAGE
Line S00003 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00429  M01S00003.242l642 +++|          SETMS  IO,RW
00430  M00S00405.1is     +++|          LDD    FS+2        SET EOI TRACK
00431  M00S00406.1is     +++|          STD    T6
00432  M00S00407.1is     +++|          LDD    FS+3        SET EOI SECTOR
00433  M00S00408.1is     +++|          STD    T7
00434  M00S00409.1is     +++|          RJM    WEI         WRITE EOI
Line S00004 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00435  M01S00004.242l642 +++|          SETMS  POSITION
00436  M00S00410.1is     +++|          LDD    FS+1        SET FIRST TRACK
00437  M00S00411.1is     +++|          STD    T6
00438  M00S00412.1is     +++|          RJM    WSS         WRITE SYSTEM SECTOR
00439  M00S00413.1is     +++|          ENDMS              RELEASE CHANNEL
00440  M00S00414.1is     +++|          LDD    T5          SET EOI IN TRT
00441  M00S00415.1is     +++|          STD    CM+1
00442  M00S00416.1is     +++|          LDD    FS+2
00443  M00S00417.1is     +++|          LPC    3777
00444  M00S00418.1is     +++|          STD    CM+2
00445  M00S00419.1is     +++|          LDD    FS+3
00446  M00S00420.1is     +++|          STD    CM+3
00447  M00S00421.1is     +++|          MONITOR  DTKM
00448  M00S00422.1is     +++|          LDD    WB+4        GET ALGORITHM INDEX FROM MST
Line S00001 Modification History
M01 (Added by) ns2485
M02 (Removed by) ns2485a
Seq #  *Modification Id* Act 
----------------------------+
00449  M02S00001.ns2485a ---|          ERRNZ  AIDC-12     *OSB* AND *1IS* ALGORITHM INDEX MISMATCH
00450  M00S00423.1is     +++|          SHN    3
00451  M00S00424.1is     +++|          ADN    DILL
00452  M00S00425.1is     +++|          CRD    WB
00453  M00S00426.1is     +++|          ADN    DDLL-DILL   GET UNIT NUMBER
00454  M00S00427.1is     +++|          CRD    FN
00455  M00S00428.1is     +++|          LDD    WB+4        SET ALGORITHM INDEX IN PARAMETER BLOCK
00456  M00S00429.1is     +++|          LPN    77
00457  M00S00430.1is     +++|          LMD    HN          ADD SEEK FUNCTION (1 TO 1 INTERLACE)
00458  M00S00431.1is     +++|          STD    CN+3
00459  M00S00432.1is     +++|          LPN    77
00460  M00S00433.1is     +++|          SBN    AIHT+1
00461  M00S00434.1is     +++|          PJN    CFI2        IF FULL TRACK DEVICE
00462  M00S00435.1is     +++|          LDD    HN          CHANGE SEEK FUNCTION (2 TO 1 INTERLACE)
00463  M00S00436.1is     +++|          RAD    CN+3
00464  M00S00437.1is     +++| CFI2     RJM    CRA         CONVERT RANDOM ADDRESS OF *OSB*
00465  M00S00438.1is     +++|          LDD    FN+4        SET UNIT NUMBER IN MONITOR REQUEST
00466  M00S00439.1is     +++|          LPN    77
00467  M00S00440.1is     +++|          STD    T3
00468  M00S00441.1is     +++|          LDD    T6          SET TRACK CONTAINING *OSB*
00469  M00S00442.1is     +++|          STD    CN+4
00470  M00S00443.1is     +++|          LDD    MA          CONVERT LOGICAL TO PHYSICAL ADDRESS
00471  M00S00444.1is     +++|          CWD    T4
00472  M00S00445.1is     +++|          MONITOR  LDAM
00473  M00S00446.1is     +++|          LDD    MA          READ PHYSICAL ADDRESS
00474  M00S00447.1is     +++|          ADN    1
00475  M00S00448.1is     +++|          CRD    CN-2
Line S00449 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00476  M01S00449.241l630 ---|          AOD    T7          SET ADDRESS OF *DIO*
00477  M01S00450.241l630 ---|          LMM    SLM
00478  M01S00451.241l630 ---|          NJN    CFI3        IF NOT TRACK SWITCH
Line S00001 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00479  M01S00001.241l630 +++|          LDD    CN+3
00480  M01S00002.241l630 +++|          LPN    77
00481  M01S00003.241l630 +++|          LMN    AIDC
00482  M01S00004.241l630 +++|          NJN    CFI3        IF NOT 895 DEVICE
00483  M01S00005.241l630 +++|          LDC    2000        SET 895 DEADSTART READ FLAG
00484  M01S00006.241l630 +++|          RAD    CN+1
Line S00001 Modification History
M01 (Added by) ns2485b
Seq #  *Modification Id* Act 
----------------------------+
00485  M01S00001.ns2485b +++|          AOM    CFIA        ADVANCE SHIFTS IF 895
00486  M01S00002.ns2485b +++|          STM    CFIB
Line S00007 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00487  M01S00007.241l630 +++| CFI3     AOD    T7          SET ADDRESS OF *DIO*
00488  M01S00008.241l630 +++|          LMM    SLM
00489  M01S00009.241l630 +++|          NJN    CFI4        IF NOT TRACK SWITCH
00490  M00S00452.1is     +++|          STD    T7
00491  M00S00453.1is     +++|          RJM    SNT         SET NEXT TRACK
00492  M00S00454.1is     +++|          STD    T6
Line S00455 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00493  M01S00455.241l630 ---| CFI3     LDD    MA          CONVERT LOGICAL TO PHYSICAL ADDRESS
Line S00010 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00494  M01S00010.241l630 +++| CFI4     LDD    MA          CONVERT LOGICAL TO PHYSICAL ADDRESS
00495  M00S00456.1is     +++|          CWD    T4
00496  M00S00457.1is     +++|          MONITOR  LDAM
00497  M00S00458.1is     +++|*         LDN    0
00498  M00S00459.1is     +++|          STD    T7
00499  M00S00460.1is     +++|          LDD    MA          READ PHYSICAL ADDRESS
00500  M00S00461.1is     +++|          ADN    1
00501  M00S00462.1is     +++|          CRD    CM
Line S00463 Modification History
M01 (Removed by) ns2485
Seq #  *Modification Id* Act 
----------------------------+
00502  M01S00463.ns2485  ---|          LDD    CM+2        SET CYLINDER
Line S00002 Modification History
M01 (Added by) ns2485
M02 (Removed by) ns2485a
Seq #  *Modification Id* Act 
----------------------------+
00503  M02S00002.ns2485a ---|          LDD    CM+2        SET CYLINDER INCREMENT
00504  M02S00003.ns2485a ---|          SBD    CN
Line S00001 Modification History
M01 (Added by) ns2485a
Seq #  *Modification Id* Act 
----------------------------+
00505  M01S00001.ns2485a +++|          LDD    CM+2        SET CYLINDER
00506  M01S00002.ns2485a +++|          STD    WB+1
00507  M01S00003.ns2485a +++|          LDD    CM+3        PACK TRACK AND SECTOR
Line S00004 Modification History
M01 (Added by) ns2485
M02 (Removed by) ns2485b
Seq #  *Modification Id* Act 
----------------------------+
00508  M02S00004.ns2485b ---|          SHN    6
Line S00003 Modification History
M01 (Added by) ns2485b
Seq #  *Modification Id* Act 
----------------------------+
00509  M01S00003.ns2485b +++| CFIA     SHN    6
00510  M01S00004.ns2485b +++|*         SHN    7           (IF 895)
Line S00005 Modification History
M01 (Added by) ns2485
M02 (Removed by) ns2485a
Seq #  *Modification Id* Act 
----------------------------+
00511  M02S00005.ns2485a ---|          STD    WB
00512  M02S00006.ns2485a ---|          LDD    CM+3        SET TRACK
Line S00464 Modification History
M01 (Removed by) ns2485a
Seq #  *Modification Id* Act 
----------------------------+
00513  M01S00464.ns2485a ---|          STD    WB+1
Line S00465 Modification History
M01 (Removed by) ns2485
M02 (Removed by) ns2485a
Seq #  *Modification Id* Act 
----------------------------+
00514  M02S00465.ns2485a ---|          LDD    CM+3        PACK TRACK AND SECTOR
00515  M02S00466.ns2485a ---|          SHN    6
00516  M02S00467.ns2485a ---|          LMD    CM+4
Line S00007 Modification History
M01 (Added by) ns2485
M02 (Removed by) ns2485a
Seq #  *Modification Id* Act 
----------------------------+
00517  M02S00007.ns2485a ---|          LDD    CM+4        SET SECTOR
Line S00004 Modification History
M01 (Added by) ns2485a
Seq #  *Modification Id* Act 
----------------------------+
00518  M01S00004.ns2485a +++|          LMD    CM+4
00519  M00S00468.1is     +++|          STD    WB+2
00520  M00S00469.1is     +++|          RJM    SNT         SET NEXT TRACK
00521  M00S00470.1is     +++|          STD    T6
00522  M00S00471.1is     +++|          LDD    MA          CONVERT ADDRESS OF NEXT TRACK SWITCH
00523  M00S00472.1is     +++|          CWD    T4
00524  M00S00473.1is     +++|          MONITOR  LDAM
00525  M00S00474.1is     +++|          LDD    MA          READ PHYSICAL ADDRESS
00526  M00S00475.1is     +++|          ADN    1
00527  M00S00476.1is     +++|          CRD    CM
Line S00477 Modification History
M01 (Removed by) ns2485
Seq #  *Modification Id* Act 
----------------------------+
00528  M01S00477.ns2485  ---|          LDD    CM+2        SET CYLINDER
Line S00008 Modification History
M01 (Added by) ns2485
M02 (Removed by) ns2485a
Seq #  *Modification Id* Act 
----------------------------+
00529  M02S00008.ns2485a ---|          LDD    CM+2        SET CYLINDER INCREMENT
00530  M02S00009.ns2485a ---|          SBD    CN
00531  M02S00010.ns2485a ---|          RAD    WB
00532  M02S00011.ns2485a ---|          LDD    CM+3        SET TRACK
Line S00005 Modification History
M01 (Added by) ns2485a
Seq #  *Modification Id* Act 
----------------------------+
00533  M01S00005.ns2485a +++|          LDD    CM+2        SET CYLINDER
00534  M00S00478.1is     +++|          STD    WB+3
Line S00479 Modification History
M01 (Removed by) ns2485
Seq #  *Modification Id* Act 
----------------------------+
00535  M01S00479.ns2485  ---|          LDD    CM+3        PACK TRACK AND SECTOR
00536  M01S00480.ns2485  ---|          SHN    6
00537  M01S00481.ns2485  ---|          LMD    CM+4
Line S00012 Modification History
M01 (Added by) ns2485
M02 (Removed by) ns2485a
Seq #  *Modification Id* Act 
----------------------------+
00538  M02S00012.ns2485a ---|          LDD    CM+4        SET SECTOR
Line S00006 Modification History
M01 (Added by) ns2485a
Seq #  *Modification Id* Act 
----------------------------+
00539  M01S00006.ns2485a +++|          LDD    CM+3        PACK TRACK AND SECTOR
Line S00007 Modification History
M01 (Added by) ns2485a
M02 (Removed by) ns2485b
Seq #  *Modification Id* Act 
----------------------------+
00540  M02S00007.ns2485b ---|          SHN    6
Line S00005 Modification History
M01 (Added by) ns2485b
Seq #  *Modification Id* Act 
----------------------------+
00541  M01S00005.ns2485b +++| CFIB     SHN    6
00542  M01S00006.ns2485b +++|*         SHN    7           (IF 895)
Line S00008 Modification History
M01 (Added by) ns2485a
Seq #  *Modification Id* Act 
----------------------------+
00543  M01S00008.ns2485a +++|          LMD    CM+4
00544  M00S00482.1is     +++|          STD    WB+4
00545  M00S00483.1is     +++|          LDD    FS+1        READ DEADSTART SECTOR
Line S00009 Modification History
M01 (Added by) ns2485a
Seq #  *Modification Id* Act 
----------------------------+
00546  M01S00009.ns2485a +++|          STD    WB
Line S00484 Modification History
M01 (Removed by) ns2485
Seq #  *Modification Id* Act 
----------------------------+
00547  M01S00484.ns2485  ---|          STD    WB
00548  M00S00485.1is     +++|          RJM    RDD
00549  M00S00486.1is     +++|          LDD    MA          MOVE SDF PARAMETERS TO DEADSTART SECTOR
00550  M00S00487.1is     +++|          CWD    CN
00551  M00S00488.1is     +++|          CRM    BFMS+OSBP,ON
00552  M00S00489.1is     +++|          CWD    WB
00553  M00S00490.1is     +++|          CRM    BFMS+OSBP+5,ON
00554  M00S00491.1is     +++|          LDC    BFMS+WLSF   REWRITE DEADSTART SECTOR
Line S00492 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00555  M01S00492.242l642 ---|          RJM    WDS
Line S00005 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00556  M01S00005.242l642 +++|          RJM    WMS
00557  M00S00493.1is     +++|          ENDMS              RELEASE CHANNEL
00558  M00S00494.1is     +++|          RJM    CFE         CLEAR FNT/FST ENTRY
Line S00495 Modification History
M01 (Removed by) 251l670
Seq #  *Modification Id* Act 
----------------------------+
00559  M01S00495.251l670 ---|          SMSTF  GSDF        SET SDF PRESENT IN MST
Line S00003 Modification History
M01 (Added by) 251l670
Seq #  *Modification Id* Act 
----------------------------+
00560  M01S00003.251l670 +++|          SMSTF  GDSF        SET DEADSTART FILE PRESENT IN MST
Line S00496 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00561  M01S00496.242l642 ---|          RJM    CGI         CLEAR GLOBAL INTERLOCK
00562  M01S00497.242l642 ---|          SMSTF  LCKP        SET CHECKPOINT REQUEST
Line S00006 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00563  M01S00006.242l642 +++|          SMSTF  LCKP        SET CHECKPOINT REQUEST
00564  M01S00007.242l642 +++|          RJM    CGI         CLEAR GLOBAL INTERLOCK
00565  M00S00498.1is     +++|          LJM    CFIX        RETURN
00566  M00S00499.1is     +++|          TITLE  FUNCTION PROCESSORS.
00567  M00S00500.1is     +++| PME      SPACE  4,10
00568  M00S00501.1is     +++|**        PME - PROCESS MASS STORAGE ERROR (FUNCTION 4).
00569  M00S00502.1is     +++|
00570  M00S00503.1is     +++|
00571  M00S00504.1is     +++| PME      SUBR               ENTRY/EXIT
00572  M00S00505.1is     +++|          LDD    RA
00573  M00S00506.1is     +++|          SHN    6
00574  M00S00507.1is     +++|          CRD    WB
00575  M00S00508.1is     +++|          ADD    IR+3        GET SDF LIMIT WORD
00576  M00S00509.1is     +++|          ADN    4
00577  M00S00510.1is     +++|          CRD    CN
00578  M00S00511.1is     +++|          LDD    CN          SET FNT ADDRESS
00579  M00S00512.1is     +++|          STD    FA
00580  M00S00513.1is     +++|          ZJN    PME1        IF NO FNT ENTRY
00581  M00S00514.1is     +++|          NFA    CN,R        READ FST INFORMATION
00582  M00S00515.1is     +++|          ADN    FSTL
00583  M00S00516.1is     +++|          CRD    FS
00584  M00S00517.1is     +++|          RJM    CFE         CLEAR FNT/FST ENTRY
Line S00518 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00585  M01S00518.ns22000 ---|          LDD    FS          SET EQUIPMENT NUMBER
Line S00011 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00586  M01S00011.ns22000 +++|          LDD    FS          SET EST ORDINAL
00587  M00S00519.1is     +++|          STD    T5
00588  M00S00520.1is     +++|          STD    CM+1
00589  M00S00521.1is     +++|          LDD    FS+1        SET FIRST TRACK
00590  M00S00522.1is     +++|          ZJN    PME1        IF TRACK CHAIN NOT ASSIGNED
00591  M00S00523.1is     +++|          STD    CM+2
00592  M00S00524.1is     +++|          MONITOR  DTKM      DROP TRACK CHAIN
00593  M00S00525.1is     +++|          RJM    CGI         CLEAR GLOBAL INTERLOCK
00594  M00S00526.1is     +++| PME1     LDD    WB+2        CHECK ERROR CONDITION
00595  M00S00527.1is     +++|          LPN    77
00596  M00S00528.1is     +++|          NJN    PME2        IF NOT MASS STORAGE ERROR
00597  M00S00529.1is     +++|          ERROR  EMSE        * MS ERROR ON DEADSTART FILE.*
00598  M00S00530.1is     +++|
00599  M00S00531.1is     +++| PME2     ERROR  EABT        * INSTALL ABORTED.*
00600  M00S00532.1is     +++|          TITLE  SUBROUTINES.
00601  M00S00533.1is     +++| CDF      SPACE  4,15
00602  M00S00534.1is     +++|**        CDF - CREATE DEADSTART FILE.
00603  M00S00535.1is     +++|*
Line S00536 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00604  M01S00536.ns22000 ---|*         ENTRY  (A) = EQUIPMENT NUMBER OF RMS DEADSTART DEVICE.
Line S00012 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00605  M01S00012.ns22000 +++|*         ENTRY  (A) = EST ORDINAL OF RMS DEADSTART DEVICE.
00606  M00S00537.1is     +++|*                (FN - FN+3) = FILE NAME.
00607  M00S00538.1is     +++|*
Line S00539 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00608  M01S00539.ns22000 ---|*         EXIT   (EQ) = EQUIPMENT NUMBER.
Line S00013 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00609  M01S00013.ns22000 +++|*         EXIT   (EQ) = EST ORDINAL.
00610  M00S00540.1is     +++|*                (FA) = FNT ADDRESS.
00611  M00S00541.1is     +++|*
Line S00542 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00612  M01S00542.241l630 ---|*         USES   FS, T7, CM - CM+7.
Line S00011 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00613  M01S00011.241l630 +++|*         USES   FS, T7, CM - CM+4.
00614  M00S00543.1is     +++|*
00615  M00S00544.1is     +++|*         CALLS  *0BF*.
00616  M00S00545.1is     +++|*
00617  M00S00546.1is     +++|*         MACROS ERROR, EXECUTE, NFA.
00618  M00S00547.1is     +++|
00619  M00S00548.1is     +++|
00620  M00S00549.1is     +++| CDF      SUBR               ENTRY/EXIT
Line S00550 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00621  M01S00550.ns22000 ---|          STD    EQ          SAVE EQUIPMENT NUMBER
00622  M01S00551.ns22000 ---|          ADD    EP
Line S00014 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00623  M01S00014.ns22000 +++|          STD    EQ          SAVE EST ORDINAL
00624  M01S00015.ns22000 +++|          LDN    ESTP        CHECK EST ORDINAL
00625  M01S00016.ns22000 +++|          CRD    CM
00626  M01S00017.ns22000 +++|          LDD    EQ
00627  M01S00018.ns22000 +++|          SBD    CM+3
Line S00019 Modification History
M01 (Added by) ns22000
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00628  M02S00019.v23l617 ---|          PJN    CDF1        IF ILLEGAL EQUIPMENT SPECIFIED
Line S00007 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00629  M01S00007.v23l617 +++|          PJN    CDF1        IF INCORRECT EQUIPMENT SPECIFIED
Line S00020 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00630  M01S00020.ns22000 +++|          SFA    EST,EQ
00631  M01S00021.ns22000 +++|          ADK    EQDE
00632  M00S00552.1is     +++|          CRD    CM          READ EST ENTRY
Line S00553 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00633  M01S00553.ns22000 ---|          SBD    EP+2
00634  M01S00554.ns22000 ---|          PJN    CDF1        IF ILLEGAL MS EQUIPMENT
00635  M00S00555.1is     +++|          LDD    CM          CHECK EQUIPMENT STATUS
Line S00556 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00636  M01S00556.242l642 ---|          SHN    21-13
00637  M01S00557.242l642 ---|          PJN    CDF1        IF NOT MASS STORAGE
Line S00558 Modification History
M01 (Removed by) 241l630
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00638  M02S00558.242l642 ---|          SHN    13-6
Line S00012 Modification History
M01 (Added by) 241l630
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00639  M02S00012.242l642 ---|          SHN    13-7
00640  M02S00013.242l642 ---|          PJN    CDF1        IF NOT *LDAM* DEVICE
00641  M02S00014.242l642 ---|          SHN    7-6
Line S00559 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00642  M01S00559.242l642 ---|          MJN    CDF1        IF EQUIPMENT UNAVAILABLE
00643  M01S00560.242l642 ---|          LDD    CM+3
00644  M01S00561.242l642 ---|          SHN    0-13
Line S00562 Modification History
M01 (Removed by) 241l630
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00645  M02S00562.242l642 ---|          ZJN    CDF2        IF EQUIPMENT ON
Line S00015 Modification History
M01 (Added by) 241l630
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00646  M02S00015.242l642 ---|          NJN    CDF1        IF EQUIPMENT OFF
Line S00008 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00647  M01S00008.242l642 +++|          LPC    4312
00648  M01S00009.242l642 +++|          LMC    4210
00649  M01S00010.242l642 +++|          NJN    CDF1        IF NOT ON/AVAILABLE/LDAM/MS DEVICE
Line S00016 Modification History
M01 (Added by) 241l630
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00650  M02S00016.252l678 ---|          LDD    CM+3
00651  M02S00017.252l678 ---|          LMC    2RDB
00652  M02S00018.252l678 ---|          NJN    CDF2        IF NOT *DB* DEVICE
Line S00001 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00653  M01S00001.252l678 +++|          LDD    CM+1
00654  M01S00002.252l678 +++|          SHN    21-5
00655  M01S00003.252l678 +++|          PJN    CDF2        IF NOT A CONCURRENT CHANNEL
00656  M01S00004.252l678 +++|          LDD    CM+2
00657  M01S00005.252l678 +++|          ZJN    CDF1        IF SINGLE ACCESS
00658  M01S00006.252l678 +++|          SHN    21-5
00659  M01S00007.252l678 +++|          PJN    CDF2        IF BOTH CHANNELS ARE NOT CONCURRENT
Line S00563 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00660  M01S00563.v23l617 ---| CDF1     ERROR  EISD        * ILLEGAL SDF DEVICE.*
Line S00008 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00661  M01S00008.v23l617 +++| CDF1     ERROR  EISD        * INCORRECT SDF DEVICE.*
00662  M00S00564.1is     +++|
Line S00565 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00663  M01S00565.252l678 ---| CDF2     LDD    CM+4        READ MST
Line S00008 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00664  M01S00008.252l678 +++| CDF2     LDD    CM+3        CHECK DEVICE TYPE
00665  M01S00009.252l678 +++|          LMC    2RDB
00666  M01S00010.252l678 +++|          ZJN    CDF1        IF *DB* DEVICE
00667  M01S00011.252l678 +++|          LDD    CM+4        READ MST
00668  M00S00566.1is     +++|          SHN    3
00669  M00S00567.1is     +++|          ADN    ACGL
00670  M00S00568.1is     +++|          CRD    T7
00671  M00S00569.1is     +++|          ADN    PFGL-ACGL
Line S00570 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00672  M01S00570.241l630 ---|          CRD    CM+3
00673  M01S00571.241l630 ---|          ADN    MDGL-PFGL
00674  M00S00572.1is     +++|          CRD    CM
Line S00573 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00675  M01S00573.241l630 ---|          LDD    CM+2        CHECK DRIVER NAME
00676  M01S00574.241l630 ---|          LMC    2RDI
00677  M01S00575.241l630 ---|          NJN    CDF1        IF NOT *LDAM* DEVICE
00678  M00S00576.1is     +++|          LDD    T7          CHECK CTI PACKAGE PRESENT
00679  M00S00577.1is     +++|          LPC    MGCTI
00680  M00S00578.1is     +++|          ZJN    CDF1        IF CTI PACKAGE NOT INSTALLED
Line S00579 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00681  M01S00579.241l630 ---|          LDD    CM+7        CHECK DEVICE STATUS
Line S00019 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00682  M01S00019.241l630 +++|          LDD    CM+4        CHECK DEVICE STATUS
00683  M00S00580.1is     +++|          LPN    77
00684  M00S00581.1is     +++|          NJN    CDF1        IF MULTI-UNIT DEVICE
00685  M00S00582.1is     +++|          STM    OVL-1       SELECT NO RETURN WITHOUT FILE CREATED
00686  M00S00583.1is     +++|          LDN    NEEQ        SET NO MS ALLOCATION
00687  M00S00584.1is     +++|          STD    FS
00688  M00S00585.1is     +++|          EXECUTE  0BF,OVL   CREATE FNT/FST ENTRY
00689  M00S00586.1is     +++|          LDD    EQ
00690  M00S00587.1is     +++|          STD    FS
00691  M00S00588.1is     +++|          NFA    FA,R        STORE FST INFORMATION
00692  M00S00589.1is     +++|          ADN    FSTL
00693  M00S00590.1is     +++|          CWD    FS
00694  M00S00591.1is     +++|          LJM    CDFX        RETURN
00695  M00S00592.1is     +++| CFE      SPACE  4,10
00696  M00S00593.1is     +++|**        CFE - CLEAR FNT/FST ENTRY.
00697  M00S00594.1is     +++|*
00698  M00S00595.1is     +++|*         ENTRY  (FA) = FNT ADDRESS.
00699  M00S00596.1is     +++|*
00700  M00S00597.1is     +++|*         EXIT   (CM - CM+4) = 0.
00701  M00S00598.1is     +++|*                FET FNT ADDRESS CLEARED.
00702  M00S00599.1is     +++|*
00703  M00S00600.1is     +++|*         MACROS MONITOR.
00704  M00S00601.1is     +++|
00705  M00S00602.1is     +++|
00706  M00S00603.1is     +++| CFE      SUBR               ENTRY/EXIT
00707  M00S00604.1is     +++|          LDN    ZERL
00708  M00S00605.1is     +++|          CRD    CM
00709  M00S00606.1is     +++|          LDD    FA          SET RELATIVE FNT ADDRESS
00710  M00S00607.1is     +++|          STD    CM+4
00711  M00S00608.1is     +++|          LDN    DLFS        DELETE LOCAL FNT ENTRY
00712  M00S00609.1is     +++|          STD    CM+1
00713  M00S00610.1is     +++|          MONITOR  PLFM
00714  M00S00611.1is     +++|          LDD    RA          CLEAR FNT ADDRESS IN FET
00715  M00S00612.1is     +++|          SHN    6
00716  M00S00613.1is     +++|          ADD    IR+3
00717  M00S00614.1is     +++|          ADN    4
00718  M00S00615.1is     +++|          CRD    CM
00719  M00S00616.1is     +++|          LDN    0
00720  M00S00617.1is     +++|          STD    CM
00721  M00S00618.1is     +++|          LDD    RA
00722  M00S00619.1is     +++|          SHN    6
00723  M00S00620.1is     +++|          ADD    IR+3
00724  M00S00621.1is     +++|          ADN    4
00725  M00S00622.1is     +++|          CWD    CM
00726  M00S00623.1is     +++|          LDN    ZERL
00727  M00S00624.1is     +++|          CRD    CM
00728  M00S00625.1is     +++|          UJN    CFEX        RETURN
00729  M00S00626.1is     +++| CGI      SPACE  4,10
00730  M00S00627.1is     +++|**        CGI - CLEAR GLOBAL INTERLOCK.
00731  M00S00628.1is     +++|*
Line S00629 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00732  M01S00629.ns22000 ---|*         ENTRY  (T5) = EQUIPMENT NUMBER.
Line S00022 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00733  M01S00022.ns22000 +++|*         ENTRY  (T5) = EST ORDINAL.
00734  M00S00630.1is     +++|*
00735  M00S00631.1is     +++|*         EXIT   INTERLOCK CLEARED.
00736  M00S00632.1is     +++|*                ACTIVE USER COUNT DECREMENTED.
00737  M00S00633.1is     +++|*
00738  M00S00634.1is     +++|*         USES   CM - CM+4.
00739  M00S00635.1is     +++|*
00740  M00S00636.1is     +++|*         MACROS MONITOR.
00741  M00S00637.1is     +++|
00742  M00S00638.1is     +++|
00743  M00S00639.1is     +++| CGI      SUBR               ENTRY/EXIT
00744  M00S00640.1is     +++|          LDD    T5
00745  M00S00641.1is     +++|          STD    CM+1
00746  M00S00642.1is     +++|          LDN    CIIS        CLEAR INSTALL INTERLOCK
00747  M00S00643.1is     +++|          STD    CM+3
00748  M00S00644.1is     +++|          MONITOR  STBM
00749  M00S00645.1is     +++|          LDC    0
00750  M00S00646.1is     +++| CGIA     EQU    *-1
00751  M00S00647.1is     +++|          NJN    CGIX        IF USER COUNT NOT INCREMENTED
00752  M00S00648.1is     +++|          LDD    T5
00753  M00S00649.1is     +++|          STD    CM+1
00754  M00S00650.1is     +++|          LDN    DUCS        DECREMENT ACTIVE USER COUNT
00755  M00S00651.1is     +++|          STD    CM+3
Line S00652 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00756  M01S00652.253l688 ---|          MONITOR  STBM
Line S00001 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00757  M01S00001.253l688 +++|          MONITOR  SMDM
00758  M00S00653.1is     +++|          UJN    CGIX        RETURN
00759  M00S00654.1is     +++| DTC      SPACE  4,10
00760  M00S00655.1is     +++|**        DTC - DETERMINE TRACK COUNT.
00761  M00S00656.1is     +++|*
00762  M00S00657.1is     +++|*         ENTRY  (SLM) = SECTOR LIMIT.
00763  M00S00658.1is     +++|*                (CN+3 - CN+4) = FILE LENGTH IN SECTORS.
00764  M00S00659.1is     +++|*
00765  M00S00660.1is     +++|*         EXIT   (TC) = TRACK COUNT.
00766  M00S00661.1is     +++|
00767  M00S00662.1is     +++|
00768  M00S00663.1is     +++| DTC      SUBR               ENTRY/EXIT
00769  M00S00664.1is     +++|          LDN    0           INITIALIZE COUNTER
00770  M00S00665.1is     +++|          STD    TC
00771  M00S00666.1is     +++| DTC1     AOD    TC          ADVANCE TRACK COUNT
00772  M00S00667.1is     +++|          LDD    CN+4        DECREMENT SECTOR COUNT
00773  M00S00668.1is     +++|          SBM    SLM
00774  M00S00669.1is     +++|          STD    CN+4
00775  M00S00670.1is     +++|          PJN    DTC1        IF NO UNDERFLOW
00776  M00S00671.1is     +++|          AOD    CN+4
00777  M00S00672.1is     +++|          SOD    CN+3
00778  M00S00673.1is     +++|          PJN    DTC1        IF COUNT NOT COMPLETE
00779  M00S00674.1is     +++|          UJN    DTCX        RETURN
00780  M00S00675.1is     +++| RCL      SPACE  4,10
00781  M00S00676.1is     +++|**        RCL - RECALL PP.
00782  M00S00677.1is     +++|*
00783  M00S00678.1is     +++|*         EXIT   TO *PPR*.
00784  M00S00679.1is     +++|*
00785  M00S00680.1is     +++|*         USES   CM - CM+4.
00786  M00S00681.1is     +++|*
00787  M00S00682.1is     +++|*         MACROS MONITOR.
00788  M00S00683.1is     +++|
00789  M00S00684.1is     +++|
00790  M00S00685.1is     +++| RCL      BSS    0
00791  M00S00686.1is     +++|          LDD    CP          STORE CONTROL POINT MESSAGE
00792  M00S00687.1is     +++|          ADN    MS2W
00793  M00S00688.1is     +++|          CWM    RCLA,TR
00794  M00S00689.1is     +++|          LDN    ZERL
00795  M00S00690.1is     +++|          CRD    CM
00796  M00S00691.1is     +++|          LDD    MA          STORE PP RECALL REQUEST
00797  M00S00692.1is     +++|          CWD    IR
00798  M00S00693.1is     +++|          MONITOR  RECM
00799  M00S00694.1is     +++|          LJM    PPR         EXIT TO PP RESIDENT
00800  M00S00695.1is     +++|
00801  M00S00696.1is     +++| RCLA     DATA   C*$WAITING - GLOBAL INTERLOCK.*
00802  M00S00697.1is     +++| RDD      SPACE  4,10
00803  M00S00698.1is     +++|**        RDD - READ DEADSTART SECTOR.
00804  M00S00699.1is     +++|*
00805  M00S00700.1is     +++|*         ENTRY  (A) = FIRST TRACK OF SDF.
Line S00701 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00806  M01S00701.ns22000 ---|*                (T5) = EQUIPMENT NUMBER.
Line S00023 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00807  M01S00023.ns22000 +++|*                (T5) = EST ORDINAL.
00808  M00S00702.1is     +++|*                (FA) = FST ADDRESS.
00809  M00S00703.1is     +++|*
00810  M00S00704.1is     +++|*         EXIT   (T4) = CHANNEL (RESERVED).
00811  M00S00705.1is     +++|*                (T6) = LOGICAL TRACK OF DEADSTART SECTOR.
00812  M00S00706.1is     +++|*                (T7) = LOGICAL SECTOR OF DEADSTART SECTOR.
Line S00011 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00813  M01S00011.242l642 +++|*                (CT) = FIRST TRACK OF SDF.
00814  M00S00707.1is     +++|*                (BFMS) = DEADSTART SECTOR.
00815  M00S00708.1is     +++|*
Line S00709 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00816  M01S00709.242l642 ---|*         USES   CT, CM - CM+4.
Line S00012 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00817  M01S00012.242l642 +++|*         USES   CM - CM+4.
00818  M00S00710.1is     +++|*
Line S00711 Modification History
M01 (Removed by) ns2240
Seq #  *Modification Id* Act 
----------------------------+
00819  M01S00711.ns2240  ---|*         CALLS  CFE, CGI, RDS, *0PI*.
Line S00001 Modification History
M01 (Added by) ns2240
Seq #  *Modification Id* Act 
----------------------------+
00820  M01S00001.ns2240  +++|*         CALLS  CFE, CGI, *0PI*.
00821  M00S00712.1is     +++|*
Line S00713 Modification History
M01 (Removed by) ns2240
Seq #  *Modification Id* Act 
----------------------------+
00822  M01S00713.ns2240  ---|*         MACROS ENDMS, ERROR, EXECUTE, MONITOR.
Line S00002 Modification History
M01 (Added by) ns2240
Seq #  *Modification Id* Act 
----------------------------+
00823  M01S00002.ns2240  +++|*         MACROS ERROR, EXECUTE, MONITOR.
00824  M00S00714.1is     +++|
00825  M00S00715.1is     +++|
00826  M00S00716.1is     +++| RDD      SUBR               ENTRY/EXIT
00827  M00S00717.1is     +++|          STD    CT
Line S00718 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00828  M01S00718.ns22000 ---|          LDD    T5          SET EQUIPMENT NUMBER FOR *0PI*
Line S00024 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00829  M01S00024.ns22000 +++|          LDD    T5          SET EST ORDINAL FOR *0PI*
00830  M00S00719.1is     +++|          LMC    4000        OPTION TO READ DEADSTART SECTOR
00831  M00S00720.1is     +++|          STM    OVL-1
00832  M00S00721.1is     +++|          EXECUTE  0PI,OVL
Line S00722 Modification History
M01 (Removed by) ns2240
Seq #  *Modification Id* Act 
----------------------------+
00833  M01S00722.ns2240  ---|          LDC    BFMS        READ SECTOR
00834  M01S00723.ns2240  ---|          RJM    RDS
00835  M01S00724.ns2240  ---|          PJN    RDDX        IF NO ERROR
00836  M01S00725.ns2240  ---|          ENDMS              RELEASE CHANNEL
Line S00003 Modification History
M01 (Added by) ns2240
Seq #  *Modification Id* Act 
----------------------------+
00837  M01S00003.ns2240  +++|          ZJN    RDDX        IF A VALID DEADSTART SECTOR FOUND
Line S00726 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00838  M01S00726.242l642 ---|          RJM    CFE         CLEAR FNT/FST ENTRY
00839  M01S00727.242l642 ---|          LDD    CT
00840  M01S00728.242l642 ---|          ZJN    RDD1        IF NO TRACK CHAIN ASSIGNED
Line S00013 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00841  M01S00013.242l642 +++| RDD1     RJM    CFE         CLEAR FNT ENTRY
00842  M01S00014.242l642 +++|          LDD    CT
00843  M01S00015.242l642 +++|          ZJN    RDD2        IF NO TRACK CHAIN ASSIGNED
00844  M00S00729.1is     +++|          STD    CM+2
00845  M00S00730.1is     +++|          LDD    T5
00846  M00S00731.1is     +++|          LMC    4000        SET CHECKPOINT REQUEST
00847  M00S00732.1is     +++|          STD    CM+1
00848  M00S00733.1is     +++|          MONITOR  DTKM      RELEASE SDF TRACK CHAIN
Line S00734 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00849  M01S00734.242l642 ---| RDD1     RJM    CGI         CLEAR GLOBAL INTERLOCK
Line S00016 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00850  M01S00016.242l642 +++| RDD2     RJM    CGI         CLEAR GLOBAL INTERLOCK
00851  M00S00735.1is     +++|          ERROR  EMSE        * MS ERROR ON DEADSTART FILE.*
00852  M00S00736.1is     +++| SGI      SPACE  4,10
00853  M00S00737.1is     +++|**        SGI - SET GLOBAL INTERLOCK.
00854  M00S00738.1is     +++|*
Line S00739 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00855  M01S00739.ns22000 ---|*         ENTRY  (T5) = EQUIPMENT NUMBER.
Line S00025 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00856  M01S00025.ns22000 +++|*         ENTRY  (T5) = EST ORDINAL.
00857  M00S00740.1is     +++|*
00858  M00S00741.1is     +++|*         EXIT   (A) = 0 IF INTERLOCK SET.
00859  M00S00742.1is     +++|*                (MP) = MST POINTER.
00860  M00S00743.1is     +++|*                (CN - CN+4) = ACGL WORD OF MST.
00861  M00S00744.1is     +++|*
00862  M00S00745.1is     +++|*         USES   CM - CM+4, WB - WB+4.
00863  M00S00746.1is     +++|*
00864  M00S00747.1is     +++|*         CALLS  CGI.
00865  M00S00748.1is     +++|*
00866  M00S00749.1is     +++|*         MACROS MONITOR.
00867  M00S00750.1is     +++|
00868  M00S00751.1is     +++|
00869  M00S00752.1is     +++| SGI      SUBR               ENTRY/EXIT
00870  M00S00753.1is     +++|          LDD    T5          READ EST ENTRY
00871  M00S00754.1is     +++|          STD    CM+1
Line S00755 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00872  M01S00755.ns22000 ---|          ADM    ESTS
Line S00026 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00873  M01S00026.ns22000 +++|          SFA    EST
00874  M01S00027.ns22000 +++|          ADK    EQDE
00875  M00S00756.1is     +++|          CRD    WB
00876  M00S00757.1is     +++|          LDD    WB+4        SET MST POINTER
00877  M00S00758.1is     +++|          STD    MS
00878  M00S00759.1is     +++|          SHN    3           READ MST STATUS WORD
00879  M00S00760.1is     +++|          ADN    STLL
00880  M00S00761.1is     +++|          CRD    WB
00881  M00S00762.1is     +++|          LDD    WB          CHECK DEVICE STATUS
00882  M00S00763.1is     +++|          LPN    MLUNL
00883  M00S00764.1is     +++|          NJN    SGIX        IF UNLOAD REQUESTED
00884  M00S00765.1is     +++|          LDN    SIIS        SET INSTALL INTERLOCK
00885  M00S00766.1is     +++|          STD    CM+3
00886  M00S00767.1is     +++|          MONITOR  STBM
00887  M00S00768.1is     +++|          LDD    CM+1
00888  M00S00769.1is     +++|          LPC    200
00889  M00S00770.1is     +++|          NJN    SGIX        IF OS INSTALLATION IN PROGRESS
00890  M00S00771.1is     +++|          LDD    T5
00891  M00S00772.1is     +++|          STD    CM+1
00892  M00S00773.1is     +++|          LDN    IUCS
00893  M00S00774.1is     +++|          STD    CM+3
Line S00775 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00894  M01S00775.253l688 ---|          MONITOR  STBM
Line S00002 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00895  M01S00002.253l688 +++|          MONITOR  SMDM
00896  M00S00776.1is     +++|          LDD    CM+1
00897  M00S00777.1is     +++|          STM    CGIA
00898  M00S00778.1is     +++|          NJN    SGI1        IF USER COUNT NOT INCREMENTED
00899  M00S00779.1is     +++|          LDD    MS
00900  M00S00780.1is     +++|          SHN    3
00901  M00S00781.1is     +++|          ADN    STLL
00902  M00S00782.1is     +++|          CRD    WB
00903  M00S00783.1is     +++|          SBN    STLL-ACGL   FETCH DEADSTART FILE STATUS
00904  M00S00784.1is     +++|          CRD    CN
00905  M00S00785.1is     +++|          LDD    WB          CHECK FOR UNLOAD NOW REQUESTED
00906  M00S00786.1is     +++|          LPN    MLUNL
00907  M00S00787.1is     +++|          ZJN    SGI2        IF NOT LOCAL UNLOAD REQUEST
00908  M00S00788.1is     +++| SGI1     RJM    CGI
00909  M00S00789.1is     +++|          LDN    1
00910  M00S00790.1is     +++| SGI2     LJM    SGIX        RETURN
Line S00017 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00911  M01S00017.242l642 +++| WMS      SPACE  4,15
00912  M01S00018.242l642 +++|**        WMS - WRITE MASS STORAGE.
00913  M01S00019.242l642 +++|*
00914  M01S00020.242l642 +++|*         ENTRY  (A) = BUFFER ADDRESS.
00915  M01S00021.242l642 +++|*                (CT) = FIRST TRACK OF SDF.
00916  M01S00022.242l642 +++|*                (T5 - T7) = MASS STORAGE PARAMETERS.
00917  M01S00023.242l642 +++|*                DRIVER PRESET.
00918  M01S00024.242l642 +++|*
00919  M01S00025.242l642 +++|*         ERROR  TO *RDD1* IF MASS STORAGE ERROR.
00920  M01S00026.242l642 +++|*
00921  M01S00027.242l642 +++|*         USES   T3, CM - CM+4.
00922  M01S00028.242l642 +++|*
00923  M01S00029.242l642 +++|*         CALLS  WDS.
00924  M01S00030.242l642 +++|*
00925  M01S00031.242l642 +++|*         MACROS PAUSE.
00926  M01S00032.242l642 +++|
00927  M01S00033.242l642 +++|
00928  M01S00034.242l642 +++| WMS3     LDD    CP          FETCH CONTROL POINT STATUS WORD
00929  M01S00035.242l642 +++|          ADN    STSW
00930  M01S00036.242l642 +++|          CRD    CM
00931  M01S00037.242l642 +++|          LDD    CM+1        CHECK ERROR FLAG
00932  M01S00038.242l642 +++|          LMN    ORET
00933  M01S00039.242l642 +++|          ZJN    WMS2        IF OPERATOR OVERRIDE
00934  M01S00040.242l642 +++|          LDD    T3
00935  M01S00041.242l642 +++|          LMK    WLSF        RETRY WRITE
00936  M01S00042.242l642 +++|          RJM    WDS
00937  M01S00043.242l642 +++|          MJN    WMS1        IF WRITE ERRORS
00938  M01S00044.242l642 +++|
00939  M01S00045.242l642 +++| WMS      SUBR               ENTRY/EXIT
00940  M01S00046.242l642 +++|          STD    T3
00941  M01S00047.242l642 +++|          RJM    WDS
00942  M01S00048.242l642 +++|          PJN    WMSX        IF WRITE COMPLETED
Line S00049 Modification History
M01 (Added by) 242l642
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00943  M02S00049.253l688 ---| WMS1     LPN    17          CHECK MASS STORAGE ERROR
Line S00003 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00944  M01S00003.253l688 +++| WMS1     LPN    77          CHECK MASS STORAGE ERROR CODE
Line S00050 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00945  M01S00050.242l642 +++|          LMN    NRDE
00946  M01S00051.242l642 +++|          ZJN    WMS3        IF NOT READY
00947  M01S00052.242l642 +++| WMS2     LJM    RDD1        ABORT
00948  M00S00791.1is     +++|          SPACE  4,10
00949  M00S00792.1is     +++|**        COMMON DECKS.
00950  M00S00793.1is     +++|
00951  M00S00794.1is     +++|
00952  M00S00795.1is     +++|*CALL     COMPSAF
00953  M00S00796.1is     +++|*CALL     COMPTGB
00954  M00S00797.1is     +++|*CALL     COMPTLB
Line S00053 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00955  M01S00053.242l642 +++|          QUAL   WMS
00956  M01S00054.242l642 +++| QUAL$    EQU    1
00957  M01S00055.242l642 +++| WDS      EQU    WMS
00958  M00S00798.1is     +++|*CALL     COMPWEI
00959  M00S00799.1is     +++|*CALL     COMPWSS
Line S00056 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00960  M01S00056.242l642 +++|          QUAL   *
00961  M01S00057.242l642 +++| WEI      EQU    /WMS/WEI
00962  M01S00058.242l642 +++| WSS      EQU    /WMS/WSS
00963  M00S00800.1is     +++| IRA$     EQU    1           RANDOM ACCESS PROCESSORS INITIALIZED
00964  M00S00801.1is     +++|*CALL     COMPCRA
00965  M00S00802.1is     +++|*CALL     COMPSEI
00966  M00S00803.1is     +++|*CALL     COMPSNT
00967  M00S00804.1is     +++|*CALL     COMPIRA
00968  M00S00805.1is     +++|          SPACE  4,10
00969  M00S00806.1is     +++| OVL      EQU    *+1         LOAD ADDRESS FOR ZERO LEVEL OVERLAYS
00970  M00S00807.1is     +++|          ERRPL  OVL-BFMS    OVERFLOW INTO SYSTEM SECTOR BUFFER
00971  M00S00808.1is     +++| CRQ      SPACE  4,10
00972  M00S00809.1is     +++|**        CRQ - CHECK REQUEST.
00973  M00S00810.1is     +++|*
00974  M00S00811.1is     +++|*         ENTRY  (IR+2) = FUNCTION REQUEST.
00975  M00S00812.1is     +++|*
Line S00813 Modification History
M01 (Removed by) 1is2
Seq #  *Modification Id* Act 
----------------------------+
00976  M01S00813.1is2    ---|*         USES   CN - CN+4, WB - WB+4.
Line S00001 Modification History
M01 (Added by) 1is2
M02 (Removed by) 1is3
Seq #  *Modification Id* Act 
----------------------------+
00977  M02S00001.1is3    ---|*         USES   CN - CN+4.
Line S00002 Modification History
M01 (Added by) 1is3
Seq #  *Modification Id* Act 
----------------------------+
00978  M01S00002.1is3    +++|*         USES   CN - CN+4, FS - FS+4.
00979  M00S00814.1is     +++|*
Line S00815 Modification History
M01 (Removed by) ns2428
Seq #  *Modification Id* Act 
----------------------------+
00980  M01S00815.ns2428  ---|*         CALLS  CUA.
00981  M01S00816.ns2428  ---|*
00982  M00S00817.1is     +++|*         MACROS ERROR.
00983  M00S00818.1is     +++|
00984  M00S00819.1is     +++|
00985  M00S00820.1is     +++| CRQ      SUBR               ENTRY/EXIT
00986  M00S00821.1is     +++|          LDD    IR+2
Line S00822 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00987  M01S00822.v23l617 ---|          ZJN    CRQ1        IF ILLEGAL FUNCTION CODE
Line S00009 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00988  M01S00009.v23l617 +++|          ZJN    CRQ1        IF INCORRECT FUNCTION CODE
00989  M00S00823.1is     +++|          SBN    TFCNL
Line S00824 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00990  M01S00824.v23l617 ---|          PJN    CRQ1        IF ILLEGAL FUNCTION CODE
Line S00010 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00991  M01S00010.v23l617 +++|          PJN    CRQ1        IF INCORRECT FUNCTION CODE
00992  M00S00825.1is     +++|          LDD    CP          CHECK CP PARAMETERS
Line S00826 Modification History
M01 (Removed by) 1is2
Seq #  *Modification Id* Act 
----------------------------+
00993  M01S00826.1is2    ---|          ADN    JCIW
00994  M01S00827.1is2    ---|          CRD    WB
00995  M01S00828.1is2    ---|          ADN    SEPW-JCIW
Line S00002 Modification History
M01 (Added by) 1is2
Seq #  *Modification Id* Act 
----------------------------+
00996  M01S00002.1is2    +++|          ADK    SEPW
00997  M00S00829.1is     +++|          CRD    CN
Line S00003 Modification History
M01 (Added by) 1is3
Seq #  *Modification Id* Act 
----------------------------+
00998  M01S00003.1is3    +++|          ADK    JSCW-SEPW   READ SECURITY WORD
00999  M01S00004.1is3    +++|          CRD    FS
Line S00830 Modification History
M01 (Removed by) 1is2
Seq #  *Modification Id* Act 
----------------------------+
01000  M01S00830.1is2    ---|          LDD    WB          CHECK CPU PRIORITY
01001  M01S00831.1is2    ---|          SHN    -1
01002  M01S00832.1is2    ---|          LMN    SYCS
01003  M01S00833.1is2    ---|          NJN    CRQ1        IF NOT *SYSEDIT* PRIORITY
01004  M00S00834.1is     +++|          LDD    CN          CHECK CALLING ROUTINE
01005  M00S00835.1is     +++|          LPN    4
01006  M00S00836.1is     +++|          ZJN    CRQ1        IF NOT CALLED BY SPECIAL SYSTEM JOB
01007  M00S00837.1is     +++|          LDD    CN+3
01008  M00S00838.1is     +++|          LPN    37
01009  M00S00839.1is     +++|          ADD    CN+4
01010  M00S00840.1is     +++|          ZJN    CRQ1        IF NO SSJ PARAMETER BLOCK
Line S00841 Modification History
M01 (Removed by) ns2428
Seq #  *Modification Id* Act 
----------------------------+
01011  M01S00841.ns2428  ---|          RJM    CUA         CHECK USER ACCESS
Line S00842 Modification History
M01 (Removed by) 1is3
M02 (Removed by) ns2428
Seq #  *Modification Id* Act 
----------------------------+
01012  M02S00842.ns2428  ---|          ZJN    CRQX        IF SYSTEM ACCESS ALLOWED
Line S00005 Modification History
M01 (Added by) 1is3
M02 (Removed by) ns2428
Seq #  *Modification Id* Act 
----------------------------+
01013  M02S00005.ns2428  ---|          NJN    CRQ1        IF ACCESS NOT ALLOWED
Line S00006 Modification History
M01 (Added by) 1is3
Seq #  *Modification Id* Act 
----------------------------+
01014  M01S00006.1is3    +++|          LDK    SSML        READ SYSTEM SECURITY STATUS
01015  M01S00007.1is3    +++|          CRD    CN
01016  M01S00008.1is3    +++|          LDD    CN
01017  M01S00009.1is3    +++|          LPN    7
01018  M01S00010.1is3    +++|          ZJN    CRQX        IF UNSECURED SYSTEM
01019  M01S00011.1is3    +++|          LDD    FS
01020  M01S00012.1is3    +++|          SHN    21-13
01021  M01S00013.1is3    +++|          MJN    CRQX        IF SECURITY ADMINISTRATOR
Line S00843 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
01022  M01S00843.v23l617 ---| CRQ1     ERROR  EILR        * 1IS - ILLEGAL REQUEST.*
Line S00011 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
01023  M01S00011.v23l617 +++| CRQ1     ERROR  EILR        * 1IS - INCORRECT REQUEST.*
Line S00844 Modification History
M01 (Removed by) ns2428
Seq #  *Modification Id* Act 
----------------------------+
01024  M01S00844.ns2428  ---|          SPACE  4,10
01025  M01S00845.ns2428  ---|**        COMMON DECKS.
01026  M00S00846.1is     +++|
Line S00847 Modification History
M01 (Removed by) ns2428
Seq #  *Modification Id* Act 
----------------------------+
01027  M01S00847.ns2428  ---|
Line S00014 Modification History
M01 (Added by) 1is3
M02 (Removed by) ns2428
Seq #  *Modification Id* Act 
----------------------------+
01028  M02S00014.ns2428  ---| SSJ$     EQU    1
Line S00848 Modification History
M01 (Removed by) ns2428
Seq #  *Modification Id* Act 
----------------------------+
01029  M01S00848.ns2428  ---|*CALL     COMPCUA
01030  M01S00849.ns2428  ---|
01031  M00S00850.1is     +++|          END
cdc/nos2.source/opl.opl871/deck/1is.txt ยท Last modified: (external edit)