User Tools

Site Tools


cdc:nos2.source:opl.opl871:deck:config

Deck CONFIG

14 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
00001  M01S00001.config  +++|          IDENT  CONFIG,FWA
00002  M01S00002.config  +++|          ABS
00003  M01S00003.config  +++|          SST
00004  M01S00004.config  +++|          ENTRY  CONFIG
00005  M01S00005.config  +++|          ENTRY  RFL=
00006  M01S00006.config  +++|          ENTRY  SSJ=
00007  M01S00007.config  +++|          SYSCOM B1
00008  M01S00008.config  +++| CONFIG   TITLE  CONFIG - CONFIGURE MASS STORAGE.
00009  M01S00009.config  +++|*COMMENT  CONFIG - CONFIGURE MASS STORAGE.
Line S00010 Modification History
M01 (Added by) config
M02 (Updated by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00010  M02S00010.281l803 ---|          COMMENT COPYRIGHT CONTROL DATA CORPORATION.  1982.
00011  M01S00001.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
00012  M01S00011.config  +++| CONFIG   SPACE  4,10
00013  M01S00012.config  +++|*****     CONFIG - CONFIGURE MASS STORAGE.
00014  M01S00013.config  +++|*
00015  M01S00014.config  +++|*         A. J. BEEKMAN.               77/04/25.
00016  M01S00015.config  +++|*         W. E. GOEBEL       80/02/29.
00017  M01S00016.config  +++|*
00018  M01S00017.config  +++|*         *CONFIG* PROVIDES THE CAPABILITY TO REPAIR OR RECONFIGURE
00019  M01S00018.config  +++|*         844 OR 885 DEVICES ON-LINE.
00020  M01S00019.config  +++|          SPACE  4,10
00021  M01S00020.config  +++|***       *CONFIG* ACCEPTS OPERATOR INPUT THROUGH A K-DISPLAY, VERIFIES
00022  M01S00021.config  +++|*         THE ENTERED PARAMETERS AND THEN USES THESE PARAMETERS WHILE
00023  M01S00022.config  +++|*         CALLING THE PP PROGRAM *1RM* TO RECONFIGURE OR SUSPEND
00024  M01S00023.config  +++|*         844 OR 885 TYPE RMS DEVICES.
00025  M01S00024.config  +++|          SPACE  4,10
Line S00025 Modification History
M01 (Added by) config
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00026  M02S00025.v23l617 ---|***       CONTROL STATEMENT CALL.
00027  M01S00001.v23l617 +++|***       COMMAND.
00028  M01S00026.config  +++|*
00029  M01S00027.config  +++|*         CONFIG.   *CONFIG* IS INITIATED BY *CMS* WHEN AN IDLED
00030  M01S00028.config  +++|*                DEVICE IS FOUND.
00031  M01S00029.config  +++|          SPACE  4,10
00032  M01S00030.config  +++|***       K-DISPLAY INPUT DATA.
00033  M01S00031.config  +++|*
00034  M01S00032.config  +++|*         DATA ITEMS ARE PARTITIONED WITH SEPARATOR CHARACTERS, I.E.,
00035  M01S00033.config  +++|*         ANY NON-ALPHANUMERIC CHARACTER EXCEPT *=*.  EACH VALUE
00036  M01S00034.config  +++|*         MUST BE PRECEDED BY A PARAMETER AND SEPARATED FROM THE
00037  M01S00035.config  +++|*         PARAMETER BY AN *=*.  ONLY ONE DATA ITEM (PARAMETER=
00038  M01S00036.config  +++|*         VALUE OR COMMAND) MAY BE ENTERED ON A LINE OF INPUT AND NO
00039  M01S00037.config  +++|*         LINE TERMINATOR IS NECESSARY.
00040  M01S00038.config  +++|*
00041  M01S00039.config  +++|*         THE FOLLOWING IS A DESCRIPTION OF PARAMETERS.
00042  M01S00040.config  +++|*
Line S00041 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00043  M02S00041.ns22000 ---|*         EQ=EE  EQUIPMENT *EE* IS TO BE PROCESSED.
00044  M01S00001.ns22000 +++|*         EQ=EEE EST ORDINAL *EEE* IS TO BE PROCESSED.
00045  M01S00042.config  +++|*                THIS PARAMETER IS ENTERED WHEN THE PROCESSING
00046  M01S00043.config  +++|*                OF EQUIPMENTS IS ORDER-DEPENDENT.  THIS IS
00047  M01S00044.config  +++|*                NEEDED, FOR EXAMPLE, WHEN A UNIT MUST FIRST BE
00048  M01S00045.config  +++|*                FREED UP TO REPLACE A FAILING UNIT.  IN THIS
00049  M01S00046.config  +++|*                CASE A UNIT IS DELETED FROM AN EQUIPMENT WHERE
00050  M01S00047.config  +++|*                IT IS NOT IN USE SO THAT IT CAN REPLACE A UNIT
00051  M01S00048.config  +++|*                WHICH IS FAILING.
00052  M01S00049.config  +++|*
00053  M01S00050.config  +++|*         CH=C1,C2  CHANNEL(S) TO BE USED UNDER NEW DEVICE
00054  M01S00051.config  +++|*                DEFINITION.  THIS PARAMETER IS USED WHEN THE
00055  M01S00052.config  +++|*                ENTIRE DEVICE IS TO BE REDEFINED TO AN ALTERNATE
00056  M01S00053.config  +++|*                CHANNEL STRING.  IT CAN ALSO BE USED TO ADD OR
00057  M01S00054.config  +++|*                DELETE CHANNELS FROM AN EQUIPMENT DEFINITION.
00058  M01S00055.config  +++|*
00059  M01S00056.config  +++|*         UL=U1,U2,... UN  UNIT LIST FOR NEW CONFIGURATION.  WHEN
00060  M01S00057.config  +++|*                A UNIT IS TO BE REPLACED, ADDED OR DELETED
00061  M01S00058.config  +++|*                THE ENTIRE UNIT CONFIGURATION MUST BE ENTERED
00062  M01S00059.config  +++|*                WITH THIS PARAMETER.  IF A UNIT IS TO BE
00063  M01S00060.config  +++|*                ADDED OR DELETED THE EQUIPMENT MUST BE GLOBALLY
00064  M01S00061.config  +++|*                UNLOADED IF SHARED OR HAVE UNAVAILABLE STATUS
00065  M01S00062.config  +++|*                OTHERWISE.
00066  M01S00063.config  +++|*
00067  M01S00064.config  +++|*         UR=UU  UNIT *UU* IS TO BE RECABLED.  THIS OPTION IS USED
00068  M01S00065.config  +++|*                WHEN A UNIT IS TO BE REPLACED BY A NEW UNIT WITH
00069  M01S00066.config  +++|*                THE SAME UNIT NUMBER.  THIS IS DONE BY PHYSICALLY
00070  M01S00067.config  +++|*                DISCONNECTING THE OLD UNIT AND RECABLING IN THE
00071  M01S00068.config  +++|*                REPLACEMENT UNIT.  MULTIPLE UNITS MAY BE
00072  M01S00069.config  +++|*                SPECIFIED FOR RECABLING.
00073  M01S00070.config  +++|          SPACE  4,10
00074  M01S00071.config  +++|***       K-DISPLAY COMMANDS.
00075  M01S00072.config  +++|*
00076  M01S00073.config  +++|*         GO.    INITIATE PROCESSING OF RECONFIGURATION RUN USING
00077  M01S00074.config  +++|*                PARAMETERS ENTERED.  THE K-DISPLAY PARAMETERS WILL BE
00078  M01S00075.config  +++|*                SET TO THE DEFAULT VALUES WHEN CONTROL IS RETURNED.
00079  M01S00076.config  +++|*
00080  M01S00077.config  +++|*         SUSPEND.  ALL REQUESTS TO CURRENT EQUIPMENT ARE SUSPENDED.
00081  M01S00078.config  +++|*                THIS IS DONE SO THAT THE DRIVE MAY BE REPAIRED
00082  M01S00079.config  +++|*                ON LINE.  MULTIPLE EQUIPMENTS MAY BE SUSPENDED
00083  M01S00080.config  +++|*                CONCURRENTLY.
00084  M01S00081.config  +++|*
00085  M01S00082.config  +++|*         CLEAR. CLEARS THE SUSPEND AND IDLE STATUS FOR CURRENT
00086  M01S00083.config  +++|*                EQUIPMENT.  THIS IS ENTERED WHEN THE EQUIPMENT IS
00087  M01S00084.config  +++|*                TO BE RETURNED FOR NORMAL SYSTEM USE.
00088  M01S00085.config  +++|*
00089  M01S00086.config  +++|*         END.   ENDS *CONFIG* PROCESSING.
00090  M01S00087.config  +++|*
00091  M01S00088.config  +++|*         RERUN. SET THE PARAMETERS TO THEIR DEFAULT VALUES AND UPDATE
00092  M01S00089.config  +++|*                THE LIST OF EQUIPMENTS TO BE RECONFIGURED.
00093  M01S00090.config  +++|*
00094  M01S00091.config  +++|*         RESET. RESET THE PARAMETERS TO THEIR DEFAULT VALUES.
00095  M01S00092.config  +++|*
00096  M01S00093.config  +++|*
00097  M01S00094.config  +++|*         THE FOLLOWING COMMANDS ARE ENTERED IN RESPONSE TO AN
00098  M01S00095.config  +++|*         ERROR CONDITION DETECTED BY *1RM*.
00099  M01S00096.config  +++|*
00100  M01S00097.config  +++|*         ABORT. THIS COMMAND IS ENTERED TO DISCONTINUE PROCESSING
00101  M01S00098.config  +++|*                OF THE CURRENT COMMAND IN PROGRESS.
00102  M01S00099.config  +++|*
00103  M01S00100.config  +++|*         IGNORE.  THE ERROR CONDITION DETECTED BY *1RM* IS TO
00104  M01S00101.config  +++|*                BE IGNORED.  THIS COMMAND SHOULD BE USED WITH
00105  M01S00102.config  +++|*                DISCRETION.  IT SHOULD BE USED ONLY WHEN THE
00106  M01S00103.config  +++|*                ERROR BEING POSTED IS WELL UNDERSTOOD AND
00107  M01S00104.config  +++|*                CAN LEGITIMATELY BE IGNORED.
00108  M01S00105.config  +++|*
00109  M01S00106.config  +++|*         NEXT.  THIS COMMAND IS ENTERED IN RESPONSE TO AN
00110  M01S00107.config  +++|*                885 SERVO TIMING CHECK WHEN THE TIMING DATA
00111  M01S00108.config  +++|*                IS IN THE REQUIRED RANGE.  ENTRY OF THIS
00112  M01S00109.config  +++|*                COMMAND WILL CAUSE PROCESSING TO CONTINUE
00113  M01S00110.config  +++|*                WITH EITHER THE NEXT UNIT OR THE NEXT STEP
00114  M01S00111.config  +++|*                OF PROCESSING.
00115  M01S00112.config  +++|*
00116  M01S00113.config  +++|*         RECHECK.  THIS COMMAND IS ENTERED TO RETRY A PROCESS
00117  M01S00114.config  +++|*                WHICH PREVIOUSLY GAVE AN ERROR.  IF THE ERROR
00118  M01S00115.config  +++|*                PERSISTS THE MESSAGE WILL BE POSTED AGAIN
00119  M01S00116.config  +++|*                WITH ANOTHER OPPORTUNITY FOR OPERATOR ACTION.
00120  M01S00117.config  +++|          SPACE  4,10
00121  M01S00118.config  +++|***       OPERATIONAL CONSIDERATIONS.
00122  M01S00119.config  +++|*
00123  M01S00120.config  +++|*         WHEN REPLACING A FAILING UNIT WITH A NEW UNIT THE
00124  M01S00121.config  +++|*         NEW UNIT MUST NOT BE DEFINED IN THE EST.  IF THE
00125  M01S00122.config  +++|*         REPLACEMENT UNIT IS DEFINED IN THE EST IT MUST
00126  M01S00123.config  +++|*         FIRST BE DELETED FROM THE EQUIPMENT IN WHICH IT IS
00127  M01S00124.config  +++|*         DEFINED.
00128  M01S00125.config  +++|*         WHEN ADDING OR DELETING A UNIT FROM AN EQUIPMENT
00129  M01S00126.config  +++|*         THE EQUIPMENT MUST BE UNLOADED.
00130  M01S00127.config  +++|*
00131  M01S00128.config  +++|*
00132  M01S00129.config  +++|*         WHEN RUNNING IN A MMF ENVIRONMENT CERTAIN PROBLEMS ARISE.
00133  M01S00130.config  +++|*         THEY ARE AS FOLLOWS -
00134  M01S00131.config  +++|*
00135  M01S00132.config  +++|*         1) WHEN A UNIT IS INTRODUCED INTO AN EQUIPMENT
00136  M01S00133.config  +++|*         *CONFIG* WILL CHECK IF THE REPLACEMENT UNIT IS NOT IN
00137  M01S00134.config  +++|*         USE IN THE MACHINE INITIATING THE RECONFIGURATION, BUT IT
00138  M01S00135.config  +++|*         CANNOT CHECK IF IT IS IN USE BY THE OTHER MACHINES.  THE
00139  M01S00136.config  +++|*         DESIGN OF THIS PROGRAM DOES NOT SOLVE THIS PROBLEM AND IT
00140  M01S00137.config  +++|*         IS LEFT TO THE OPERATORS TO ENSURE THAT THE REPLACEMENT
00141  M01S00138.config  +++|*         UNIT IS TRULY FREE IN THE MMF COMPLEX.
00142  M01S00139.config  +++|*
00143  M01S00140.config  +++|*         2) WHEN REPLACING A UNIT WITH A NEW UNIT, *CONFIG*
00144  M01S00141.config  +++|*         WILL CHECK FOR ALL MACHINES ACCESSING THE DEVICE TO COMPLY
00145  M01S00142.config  +++|*         WITH THE RECONFIGURATION.  HOWEVER, IF THE MACHINE DOES NOT
00146  M01S00143.config  +++|*         HAVE THE DEVICE LOADED THERE IS NO WAY TO CHECK FOR ITS
00147  M01S00144.config  +++|*         COMPLIANCE.  IN THIS CASE THE RECONFIGURATION WILL PROCEED
00148  M01S00145.config  +++|*         ON THE MACHINES WITH THE DEVICE LOADED AND THE OTHER
00149  M01S00146.config  +++|*         MACHINES WILL NOT BE ABLE TO USE THIS DEVICE.
00150  M01S00147.config  +++|*
00151  M01S00148.config  +++|*         3) THE ADDITION AND DELETION OF A UNIT IS INTENDED
00152  M01S00149.config  +++|*         FOR LOCAL MACHINE USE.  WHEN AN ADD OR DELETE IS COMPLETED
00153  M01S00150.config  +++|*         ON ONE MACHINE, THE REDEFINITION REQUESTED BIT WILL BE
00154  M01S00151.config  +++|*         CLEARED FOR THAT EQUIPMENT.  THUS, NO OTHER MACHINE WILL
00155  M01S00152.config  +++|*         RECOGNIZE THE REQUEST FOR RECONFIGURATION ON THIS EQUIPMENT.
00156  M01S00153.config  +++|*         IF MORE THAN ONE MACHINE IN THE COMPLEX WISHES TO ADD OR
Line S00154 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00157  M02S00154.ns22000 ---|*         DELETE UNITS FROM THE SAME SHARED EQUIPMENT, *IDLE,EQNN.*
00158  M01S00002.ns22000 +++|*         DELETE UNITS FROM THE SAME SHARED EQUIPMENT, *IDLE,EQXXX.*
00159  M01S00155.config  +++|*         WILL HAVE TO BE ENTERED FROM EACH MACHINE.
00160  M01S00156.config  +++|          SPACE  4,10
00161  M01S00157.config  +++|***       ROUTINES CALLED.
00162  M01S00158.config  +++|*
00163  M01S00159.config  +++|*         *1RM*, *CMS*.
00164  M01S00160.config  +++|          SPACE  4,10
00165  M01S00161.config  +++|***       DAYFILE MESSAGES.
00166  M01S00162.config  +++|*
00167  M01S00163.config  +++|*
Line S00164 Modification History
M01 (Added by) config
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00168  M02S00164.v23l617 ---|*         * INVALID CONTROL STATEMENT.* = ARGUMENTS WERE ENTERED
Line S00165 Modification History
M01 (Added by) config
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00169  M02S00165.v23l617 ---|*         ON THE CONTROL STATEMENT CALL TO *CONFIG*.
00170  M01S00002.v23l617 +++|*         * INCORRECT COMMAND.* = INCORRECT ARGUMENTS WERE ENTERED
00171  M01S00003.v23l617 +++|*         ON THE *CONFIG* COMMAND.
00172  M01S00166.config  +++|*
Line S00167 Modification History
M01 (Added by) config
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00173  M02S00167.v23l617 ---|*         * INVALID USER ACCESS.* = *CONFIG* WAS CALLED FROM A NON-
00174  M01S00004.v23l617 +++|*         * USER ACCESS NOT VALID.* = *CONFIG* WAS CALLED FROM A NON-
00175  M01S00168.config  +++|*         SYSTEM ORIGIN JOB OR WITHOUT MASS STORAGE SUBSYSTEM ID.
00176  M01S00169.config  +++|*
00177  M01S00170.config  +++|*         * CONFIG UTILITY COMPLETE.* = ALL IDLED EQUIPMENTS HAVE
00178  M01S00171.config  +++|*         BEEN PROCESSED.
Line S00172 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00179  M02S00172.ns22000 ---|          SPACE  4,10
Line S00173 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00180  M02S00173.ns22000 ---|***       ERROR LOG MESSAGES.
Line S00174 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00181  M02S00174.ns22000 ---|*
Line S00175 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00182  M02S00175.ns22000 ---|*         *EQXX REDEFINITION COMPLETE.* = THE REDEFINITION RUN FOR
Line S00176 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00183  M02S00176.ns22000 ---|*         EQUIPMENT XX HAS COMPLETED SUCCESSFULLY.
00184  M01S00177.config  +++|          SPACE  4,10
00185  M01S00178.config  +++|***       OPERATOR MESSAGES.
00186  M01S00179.config  +++|*
00187  M01S00180.config  +++|*         IF ONE OF THE ERRORS BELOW IS ENCOUNTERED, THE OPERATOR WILL
00188  M01S00181.config  +++|*         BE ABLE TO CORRECT THE ERROR VIA THE K-DISPLAY.  ALL
00189  M01S00182.config  +++|*         PARAMETERS OR COMMANDS AFTER THE ONE IN ERROR WILL BE
00190  M01S00183.config  +++|*         IGNORED.
00191  M01S00184.config  +++|*
00192  M01S00185.config  +++|*
00193  M01S00186.config  +++|*         **** DEVICE NOT FIRST IN CHAIN.
00194  M01S00187.config  +++|*                AN EQUIPMENT OTHER THAN THE FIRST EQUIPMENT IN A
00195  M01S00188.config  +++|*                LINKED DEVICE WAS ENTERED TO BE RECONFIGURED.  THIS
00196  M01S00189.config  +++|*                IS NOT ALLOWED IN ORDER TO PREVENT DESTROYING THE
00197  M01S00190.config  +++|*                INTEGRITY OF A LINKED DEVICE RECONFIGURATION.
00198  M01S00191.config  +++|*
00199  M01S00192.config  +++|*         **** EQUIPMENT STATUS INCORRECT.
00200  M01S00193.config  +++|*                THE EQUIPMENT BEING REDEFINED IS NOT UNLOADED AND
00201  M01S00194.config  +++|*                AS SUCH THE NUMBER OF UNITS CANNOT BE CHANGED.
00202  M01S00195.config  +++|*
00203  M01S00196.config  +++|*         **** ERROR IN CHANNEL NUMBER.
00204  M01S00197.config  +++|*                MAY INDICATE -
00205  M01S00198.config  +++|*                1) IF .LE. 10 PP-S, NOT WITHIN RANGE OF 0-13B.
00206  M01S00199.config  +++|*                2) IF .GT. 10 PP-S, NOT WITHIN RANGES OF 0 - 13B
00207  M01S00200.config  +++|*                   OR 20B-33B.
00208  M01S00201.config  +++|*                3) 1 (OR MORE) OF CHANNELS SPECIFIED IS DOWN.
00209  M01S00202.config  +++|*
Line S00203 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00210  M02S00203.ns22000 ---|*         **** ERROR IN EQUIPMENT NUMBER.
00211  M01S00003.ns22000 +++|*         **** ERROR IN EST ORDINAL.
00212  M01S00204.config  +++|*                MAY INDICATE -
00213  M01S00205.config  +++|*                1) EQUIPMENT NOT MASS STORAGE.
00214  M01S00206.config  +++|*                2) EQUIPMENT IS NOT *844* OR *885*.
00215  M01S00207.config  +++|*
00216  M01S00208.config  +++|*         **** ERROR IN UNIT LIST.
00217  M01S00209.config  +++|*                MAY INDICATE -
00218  M01S00210.config  +++|*                1) A UNIT NUMBER WAS DUPLICATED IN THE UNIT LIST.
00219  M01S00211.config  +++|*                2) MORE THAN 3 UNITS WERE SPECIFIED FOR AN *885*.
00220  M01S00212.config  +++|*
Line S00213 Modification History
M01 (Added by) config
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00221  M02S00213.v23l617 ---|*         **** ILLEGAL ENTRY.
00222  M01S00005.v23l617 +++|*         **** INCORRECT ENTRY.
00223  M01S00214.config  +++|*                1) A KEYWORD WAS NOT FOUND.
00224  M01S00215.config  +++|*                2) TOO MANY DIGITS WERE ENTERED AS A PARAMETER.
00225  M01S00216.config  +++|*                3) A NON-DIGIT CHARACTER WAS FOUND IN A
00226  M01S00217.config  +++|*                   PARAMETER.
00227  M01S00218.config  +++|*                4) A CHARACTER WAS FOUND AFTER THE POST RADIX.
00228  M01S00219.config  +++|*                5) AN 8 OR 9 WAS FOUND WITH A *B* POST RADIX.
00229  M01S00220.config  +++|*
Line S00221 Modification History
M01 (Added by) config
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00230  M02S00221.v23l617 ---|*         **** ILLEGAL SEPARATOR.
00231  M01S00006.v23l617 +++|*         **** INCORRECT SEPARATOR.
00232  M01S00222.config  +++|*                A *=* SEPARATOR WAS FOUND FOLLOWING A PARAMETER
00233  M01S00223.config  +++|*                VALUE OR COMMAND IN THE INPUT STRING.
00234  M01S00224.config  +++|*
00235  M01S00225.config  +++|*         **** INTRODUCED UNIT IN USE.
00236  M01S00226.config  +++|*                MAY INDICATE -
00237  M01S00227.config  +++|*                A UNIT BEING INTRODUCED INTO AN EQUIPMENT IS
00238  M01S00228.config  +++|*                DEFINED ON ANOTHER EQUIPMENT.
00239  M01S00229.config  +++|*
00240  M01S00230.config  +++|*
00241  M01S00231.config  +++|*         THE FOLLOWING COMMANDS ARE POSTED ON THE K-DISPLAY BY
00242  M01S00232.config  +++|*         *1RM*.  WHEN *1RM* DETECTS A CONDITION WHICH MAY BE
00243  M01S00233.config  +++|*         RESPONDED TO BY THE OPERATOR, A MESSAGE IS POSTED AND
00244  M01S00234.config  +++|*         THE LEGAL COMMANDS ARE POSTED ON THE K-DISPLAY.  THE
00245  M01S00235.config  +++|*         FOLLOWING LIST OF ERROR MESSAGES LISTS THOSE LEGAL
00246  M01S00236.config  +++|*         COMMANDS AND INDICATES IF AN OPERATOR RESPONSE IS
00247  M01S00237.config  +++|*         REQUIRED OR OPTIONAL.
00248  M01S00238.config  +++|*
00249  M01S00239.config  +++|*
00250  M01S00240.config  +++|*         UNIT XX, CHYY WRITE/READ VERIFY ERROR.
00251  M01S00241.config  +++|*                PART OF THE VALIDATION PROCEDURE WHEN RETURNING
00252  M01S00242.config  +++|*                AN EQUIPMENT FOR SYSTEM USE (CLEAR COMMAND) IS
00253  M01S00243.config  +++|*                TO WRITE A SECTOR OF DATA TO THE DEVICE, READ IT
00254  M01S00244.config  +++|*                BACK AND VERIFY THE DATA.  WHEN THIS VERIFICATION
00255  M01S00245.config  +++|*                FAILS THE ABOVE MESSAGE APPEARS.
00256  M01S00246.config  +++|*         COMMANDS - REQUIRED.
00257  M01S00247.config  +++|*                ABORT, IGNORE, RECHECK.
00258  M01S00248.config  +++|*
00259  M01S00249.config  +++|*
00260  M01S00250.config  +++|*         ERROR IN PERFORMING SERVO CHECK ON UNIT XX.
00261  M01S00251.config  +++|*                THE SERVO ADJUSTMENT PROCEDURE HAS ENCOUNTERED
00262  M01S00252.config  +++|*                A DISK ERROR CONDITION.
00263  M01S00253.config  +++|*         COMMANDS - REQUIRED.
00264  M01S00254.config  +++|*                ABORT, IGNORE, RECHECK.
00265  M01S00255.config  +++|*
00266  M01S00256.config  +++|*
00267  M01S00257.config  +++|*         UNIT XX SERVO TIMING= XXX.  ACCEPTABLE RANGE IS 325 TO 345.
00268  M01S00258.config  +++|*                WHEN RECONFIGURING AN 885 HDA A SERVO ADJUSTMENT
00269  M01S00259.config  +++|*                PROCEDURE IS EXECUTED.  THIS PROCEDURE MEASURES
00270  M01S00260.config  +++|*                SERVO TIMING CHARACTERISTICS WHICH MUST BE IN THE
00271  M01S00261.config  +++|*                SPECIFIED RANGE.  A DRIVE ADJUSTMENT MUST BE MADE
00272  M01S00262.config  +++|*                BY A CE UNTIL THE TIMING IS IN THE SPECIFIED
00273  M01S00263.config  +++|*                RANGE.
00274  M01S00264.config  +++|*         COMMANDS - REQUIRED.
00275  M01S00265.config  +++|*                ABORT, RECHECK.
00276  M01S00266.config  +++|*                NEXT.  ONLY IF TIMING IS IN RANGE.
00277  M01S00267.config  +++|*                IGNORE.  ONLY IF TIMING IS NOT IN RANGE.
00278  M01S00268.config  +++|*
00279  M01S00269.config  +++|*
00280  M01S00270.config  +++|*         ERROR ON LINK DEVICE.
00281  M01S00271.config  +++|*                WHEN A DEVICE IS SHARED BETWEEN MAINFRAMES THE
00282  M01S00272.config  +++|*                LINK DEVICE IS READ TO SYNCHRONIZE PROCESSING
00283  M01S00273.config  +++|*                BETWEEN MACHINES.  WHEN AN ERROR OCCURS IN
00284  M01S00274.config  +++|*                READING THE LINK DEVICE THIS ERROR MESSAGE
00285  M01S00275.config  +++|*                IS ISSUED.
00286  M01S00276.config  +++|*         COMMANDS - REQUIRED.
00287  M01S00277.config  +++|*                ABORT, IGNORE.
00288  M01S00278.config  +++|*
00289  M01S00279.config  +++|*
00290  M01S00280.config  +++|*         SPIN DOWN UNIT XX.
00291  M01S00281.config  +++|*                THIS IS A DIRECTIVE TO THE OPERATOR OR CE TO
00292  M01S00282.config  +++|*                SPIN DOWN THE SPECIFIED UNIT IN PREPARATION
00293  M01S00283.config  +++|*                FOR MOVING THE PACK OR HDA.
00294  M01S00284.config  +++|*         COMMAND - OPTIONAL.
00295  M01S00285.config  +++|*                ABORT, IGNORE.
00296  M01S00286.config  +++|*
00297  M01S00287.config  +++|*
00298  M01S00288.config  +++|*         MOVE PACK FROM UNIT XX TO UNIT YY AND SPIN UP.
00299  M01S00289.config  +++|*                THIS DIRECTIVE IS ISSUED TO THE OPERATOR FOR
00300  M01S00290.config  +++|*                EACH UNIT TO BE MOVED DURING A RECONFIGURATION.
00301  M01S00291.config  +++|*                UNIT XX HAS PREVIOUSLY BEEN DIRECTED TO BE
00302  M01S00292.config  +++|*                SPUN DOWN AND ITS PACK OR HDA IS NOW TO BE
00303  M01S00293.config  +++|*                MOVED TO UNIT YY.
00304  M01S00294.config  +++|*         COMMANDS - OPTIONAL.
00305  M01S00295.config  +++|*                ABORT, IGNORE.
00306  M01S00296.config  +++|*
00307  M01S00297.config  +++|*
00308  M01S00298.config  +++|*         UNIT XX, CHYY LABEL READ ERROR.
00309  M01S00299.config  +++|*                IN VERIFYING THAT THE CORRECT LABEL IS PRESENT
00310  M01S00300.config  +++|*                ON UNIT XX A DISK ERROR OCCURRED WHICH PREVENTED
00311  M01S00301.config  +++|*                THE LABEL FROM BEING READ SUCCESSFULLY.
00312  M01S00302.config  +++|*                THE CHANNEL IS SPECIFIED IN THE MESSAGE AND
00313  M01S00303.config  +++|*                MAY BE HELPFUL IF THE VERIFY ERROR OCCURS
00314  M01S00304.config  +++|*                ONLY FROM A SINGLE CHANNEL IN A DUAL ACCESS
00315  M01S00305.config  +++|*                CONFIGURATION.
00316  M01S00306.config  +++|*         COMMANDS - REQUIRED.
00317  M01S00307.config  +++|*                ABORT, IGNORE, RECHECK.
00318  M01S00308.config  +++|*
00319  M01S00309.config  +++|*
00320  M01S00310.config  +++|*         UNIT XX, CHYY LABEL VERIFICATION ERROR.
00321  M01S00311.config  +++|*                THE LABEL SECTOR WAS READ BUT THE DATA IN THE
00322  M01S00312.config  +++|*                LABEL SECTOR IS NOT CORRECT.
00323  M01S00313.config  +++|*         COMMANDS - REQUIRED.
00324  M01S00314.config  +++|*                ABORT, IGNORE, RECHECK.
00325  M01S00315.config  +++|*
00326  M01S00316.config  +++|*
00327  M01S00317.config  +++|*         WAITING FOR MACHINE ID=XX.
00328  M01S00318.config  +++|*                A SHARED DEVICE IS BEING PROCESSED AND IT HAS
00329  M01S00319.config  +++|*                BEEN DETECTED THAT MACHINE IDXX IS NOT AT THE
00330  M01S00320.config  +++|*                SAME STAGE OF PROCESSING AS THIS MACHINE.
00331  M01S00321.config  +++|*         COMMANDS - REQUIRED.
00332  M01S00322.config  +++|*                ABORT, IGNORE.
00333  M01S00323.config  +++|          SPACE  4,10
00334  M01S00324.config  +++|****      ASSEMBLY CONSTANTS.
00335  M01S00325.config  +++|
00336  M01S00326.config  +++|
00337  M01S00327.config  +++| OBUFL    EQU    1001B       OUTPUT BUFFER LENGTH
Line S00328 Modification History
M01 (Added by) config
M02 (Updated by) confi3
Seq #  *Modification Id* Act 
----------------------------+
00338  M02S00328.confi3  ---| KMLL     EQU    44          LINES IN K-DISPLAY BEFORE MESSAGE BUFFER
Line S00001 Modification History
M01 (Added by) confi3
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00339  M02S00001.241l630 ---| KMLL     EQU    43          LINES IN K-DISPLAY BEFORE MESSAGE BUFFER
00340  M01S00329.config  +++| KCML     EQU    12          COMMAND LINES IN K-DISPLAY
Line S00330 Modification History
M01 (Added by) config
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00341  M02S00330.241l630 ---| KEQL     EQU    4           EQUIPMENT DISPLAY LINES IN K-DISPLAY
Line S00331 Modification History
M01 (Added by) config
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00342  M02S00331.241l630 ---| KLNL     EQU    8           K-DISPLAY LINE LENGTH INCLUDING HEADER
00343  M01S00001.241l630 +++| KEQL     EQU    7           MAX NUMBER OF IDLED EQUIPMENTS DISPLAYED
00344  M01S00002.241l630 +++| KLNL     EQU    7           K-DISPLAY LINE LENGTH INCLUDING HEADER
00345  M01S00332.config  +++| NSCI     EQU    80          NUMBER OF CHARACTERS TO SCAN ON INPUT
00346  M01S00333.config  +++|
00347  M01S00334.config  +++|
00348  M01S00335.config  +++|****
00349  M01S00336.config  +++|          SPACE  4,10
00350  M01S00337.config  +++|*CALL     COMCMAC
00351  M01S00007.v23l617 +++|*CALL     COMCDCM
00352  M01S00003.241l630 +++|*CALL     COMCDCP
00353  M01S00338.config  +++|*CALL     COMSSSD
00354  M01S00339.config  +++|*CALL     COMSSSJ
00355  M01S00340.config  +++|          LIST   G,X
00356  M01S00341.config  +++|*CALL     COMS1RM
00357  M01S00342.config  +++|          LIST   *
00358  M01S00343.config  +++| MACROS   TITLE  MACROS.
00359  M01S00344.config  +++| CALL1RM  SPACE  4,10
00360  M01S00345.config  +++|**        CALL1RM - CALL *1RM* TO PERFORM SPECIFIED FUNCTION.
00361  M01S00346.config  +++|*
00362  M01S00347.config  +++|*         CALL1RM  F
00363  M01S00348.config  +++|*                F = FUNCTION CODE AS DEFINED IN *COMS1RM*.
00364  M01S00349.config  +++|*
00365  M01S00350.config  +++|*         USES   X - 6.
00366  M01S00351.config  +++|*
00367  M01S00352.config  +++|*         CALLS  CRM.
00368  M01S00353.config  +++|
00369  M01S00354.config  +++|
00370  M01S00355.config  +++| CALL1RM  MACRO  F
00371  M01S00356.config  +++|          MACREF CALL1RM
00372  M01S00357.config  +++|          SX6    F*2+1
00373  M01S00358.config  +++|          RJ     CRM
Line S00359 Modification History
M01 (Added by) config
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00374  M02S00359.241l630 ---|          ENDM
Line S00360 Modification History
M01 (Added by) config
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00375  M02S00360.241l630 ---| D        SPACE  4,10
Line S00361 Modification History
M01 (Added by) config
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00376  M02S00361.241l630 ---|**        D - GENERATE DISPLAY LINE FOR *K-DISPLAY*.
Line S00362 Modification History
M01 (Added by) config
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00377  M02S00362.241l630 ---|*
Line S00363 Modification History
M01 (Added by) config
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00378  M02S00363.241l630 ---|*         D      C           C = CHARACTER DATA TO BE DISPLAYED.
Line S00364 Modification History
M01 (Added by) config
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00379  M02S00364.241l630 ---|*                            DATA IS DISPLAYED LEFT-JUSTIFIED.
Line S00365 Modification History
M01 (Added by) config
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00380  M02S00365.241l630 ---|
Line S00366 Modification History
M01 (Added by) config
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00381  M02S00366.241l630 ---|
Line S00367 Modification History
M01 (Added by) config
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00382  M02S00367.241l630 ---| D        MACRO  C
Line S00368 Modification History
M01 (Added by) config
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00383  M02S00368.241l630 ---|          IFC    NE,+C++,2
Line S00369 Modification History
M01 (Added by) config
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00384  M02S00369.241l630 ---|          VFD    12/7756B-10*K,36/6H      ,12/6000B
Line S00370 Modification History
M01 (Added by) config
M02 (Updated by) v23l617
M03 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00385  M03S00370.241l630 ---|          DATA   H+C+
Line S00008 Modification History
M01 (Added by) v23l617
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00386  M02S00008.241l630 ---|          DATA   L+C+
Line S00371 Modification History
M01 (Added by) config
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00387  M02S00371.241l630 ---| K        SET    K+1
Line S00372 Modification History
M01 (Added by) config
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00388  M02S00372.241l630 ---|          ENDM
00389  M01S00004.241l630 +++| CALL1RM  ENDM
00390  M01S00373.config  +++| GETLCW   SPACE  4,10
00391  M01S00374.config  +++|**        GETLCW - GET LOW CORE WORDS.
00392  M01S00375.config  +++|*
00393  M01S00376.config  +++|*         GETLCW WC,LC,AD
00394  M01S00377.config  +++|*                WC = WORD COUNT OF LOW CORE WORDS TO READ.
00395  M01S00378.config  +++|*                LC = ADDRESS OF LOW CORE WORDS.
00396  M01S00379.config  +++|*                AD = ADDRESS TO STORE LOW CORE WORDS.
00397  M01S00380.config  +++|*
00398  M01S00381.config  +++|*         USES   X - 1, 2, 3.
00399  M01S00382.config  +++|*
00400  M01S00383.config  +++|*         CALLS  GLC.
00401  M01S00384.config  +++|
00402  M01S00385.config  +++|
00403  M01S00386.config  +++| GETLCW   MACRO  WC,FR,AD
00404  M01S00387.config  +++|          MACREF GETLCW
00405  M01S00388.config  +++|          R=     X1,WC
00406  M01S00389.config  +++|          R=     X2,FR
00407  M01S00390.config  +++|          R=     X3,AD
00408  M01S00391.config  +++|          RJ     GLC
Line S00392 Modification History
M01 (Added by) config
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00409  M02S00392.241l630 ---|          ENDM
00410  M01S00005.241l630 +++| GETLCW   ENDM
00411  M01S00393.config  +++| KEYWORD  SPACE  4,10
00412  M01S00394.config  +++|**        KEYWORD - DEFINE COMMAND AND PARAMETER ENTRY POINTS.
00413  M01S00395.config  +++|*
00414  M01S00396.config  +++|*         KEYWORD  E
00415  M01S00397.config  +++|*                E = KEYBOARD KEYWORD SYNTAX.
00416  M01S00398.config  +++|*                AN *=* IS APPENDED TO THE KEYWORD OF AN EQUIVALENCED
00417  M01S00399.config  +++|*                PARAMETER.  THIS MACRO DEFINES BOTH COMMAND AND
00418  M01S00400.config  +++|*                PARAMETER KEYWORDS.
00419  M01S00401.config  +++|
00420  M01S00402.config  +++|
00421  M01S00403.config  +++| KEYWORD  MACRO  KEYWRD,PR
00422  M01S00404.config  +++|          MACREF KEYWORD
00423  M01S00405.config  +++| KYMX     SET    KYMX+1
00424  M01S00406.config  +++|          IFC    NE,*PR*0*,1
00425  M01S00407.config  +++| PR       SUBR
00426  M01S00408.config  +++| KEY      RMT
00427  M01S00409.config  +++| A        MICRO  1,,=KEYWRD=
00428  M01S00410.config  +++|          ORG    TKEY+."A"
00429  M01S00411.config  +++|          VFD    42/0L_KEYWRD,18/PR
00430  M01S00412.config  +++| KEY      RMT
Line S00413 Modification History
M01 (Added by) config
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00431  M02S00413.241l630 ---|          ENDM
00432  M01S00006.241l630 +++| KEYWORD  ENDM
00433  M01S00414.config  +++|
00434  M01S00415.config  +++| KYMX     SET    0           INITIALIZE KEYWORD COUNT
00435  M01S00007.241l630 +++| MOVEDL   SPACE  4,15
00436  M01S00008.241l630 +++|**        MOVEDL - MOVE DISPLAY LINE.
00437  M01S00009.241l630 +++|*
00438  M01S00010.241l630 +++|*         *MOVEDL* IS USED TO MOVE A DISPLAY LINE TO A K-DISPLAY
00439  M01S00011.241l630 +++|*         BUFFER WHICH HAS THE X,Y COORDINATES IN THE FIRST 24 BITS
00440  M01S00012.241l630 +++|*         OF EACH LINE.
00441  M01S00013.241l630 +++|*
00442  M01S00014.241l630 +++|*         MOVEDL COUNT,FROM,TO
00443  M01S00015.241l630 +++|*
00444  M01S00016.241l630 +++|*                COUNT =  WORD COUNT OF BLOCK TO BE MOVED.
00445  M01S00017.241l630 +++|*                FROM = ADDRESS OF FIRST WORD OF SOURCE.
00446  M01S00018.241l630 +++|*                TO = ADDRESS OF FIRST WORD OF DESTINATION.
00447  M01S00019.241l630 +++|*
00448  M01S00020.241l630 +++|*         USES   X - 1, 2, 3.
00449  M01S00021.241l630 +++|*
00450  M01S00022.241l630 +++|*         CALLS  MPL.
00451  M01S00023.241l630 +++|
00452  M01S00024.241l630 +++|
00453  M01S00025.241l630 +++| MOVEDL   MACRO  COUNT,FROM,TO
00454  M01S00026.241l630 +++|          MACREF  MOVEDL
00455  M01S00027.241l630 +++|          R=     X1,COUNT
00456  M01S00028.241l630 +++|          R=     X2,FROM
00457  M01S00029.241l630 +++|          R=     X3,TO
00458  M01S00030.241l630 +++|          RJ     MPL
00459  M01S00031.241l630 +++| MOVEDL   ENDM
00460  M01S00416.config  +++|          TITLE  KEYWORD DEFINITION FOR *CONFIG* COMMANDS.
Line S00417 Modification History
M01 (Added by) config
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00461  M02S00417.241l630 ---|  CDEF   CLEAR,(CLEARS IDLE AND SUSPEND ON CURRENT EQUIPMENT.)
Line S00418 Modification History
M01 (Added by) config
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00462  M02S00418.241l630 ---|  CDEF   END,(CLEAR ALL DEVICE IDLES, AND END *CONFIG*.)
Line S00419 Modification History
M01 (Added by) config
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00463  M02S00419.241l630 ---|  CDEF   GO,(INITIATES PROCESSING OF ENTERED CONFIGURATION.)
Line S00420 Modification History
M01 (Added by) config
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00464  M02S00420.241l630 ---|  CDEF   RERUN,(RESTARTS *CONFIG* UTILITY PROCESSING.)
Line S00421 Modification History
M01 (Added by) config
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00465  M02S00421.241l630 ---|  CDEF   RESET,(RESETS CURRENT EQUIPMENT TO DEFAULT PARAMETERS.)
Line S00422 Modification History
M01 (Added by) config
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00466  M02S00422.241l630 ---|  CDEF   SUSPEND,(SUSPEND ALL SYSTEM OPERATION ON CURRENT EQUIPMENT.)
Line S00423 Modification History
M01 (Added by) config
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00467  M02S00423.241l630 ---|  CDEF   (CH=C1,C2),(C1 AND OPTIONALLY C2 ARE NEW CHANNELS FOR ACCESS.)
00468  M01S00032.241l630 +++|  CDEF   CLEAR,(CLEAR IDLE AND SUSPEND ON CURRENT EQUIPMENT.)
00469  M01S00033.241l630 +++|  CDEF   END,(CLEAR ALL DEVICE IDLES AND END *CONFIG*.)
00470  M01S00034.241l630 +++|  CDEF   GO,(INITIATE PROCESSING OF ENTERED CONFIGURATION.)
00471  M01S00035.241l630 +++|  CDEF   RERUN,(RESTART *CONFIG* UTILITY PROCESSING.)
00472  M01S00036.241l630 +++|  CDEF   RESET,(RESET CURRENT EQUIPMENT TO DEFAULT PARAMETERS.)
00473  M01S00037.241l630 +++|  CDEF   SUSPEND,(SUSPEND SYSTEM OPERATION ON CURRENT EQUIPMENT.)
00474  M01S00038.241l630 +++|  CDEF   (CH=C1,C2),(C1 AND OPTIONALLY C2 ARE NEW ACCESS CHANNELS.)
Line S00424 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00475  M02S00424.ns22000 ---|  CDEF   (EQ=EE),(SET EQUIPMENT EE TO BE PROCESSED.)
00476  M01S00004.ns22000 +++|  CDEF   (EQ=EEE),(SET EST ORDINAL EEE TO BE PROCESSED.)
Line S00425 Modification History
M01 (Added by) config
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00477  M02S00425.241l630 ---|  CDEF   (UL=U1,U2 .,UN),(SET UNIT LIST AS SPECIFIED.)
00478  M01S00039.241l630 +++|  CDEF   (UL=U1,U2,...),(SET UNIT LIST AS SPECIFIED.)
00479  M01S00426.config  +++|  CDEF   (UR=UU),(UNIT UU IS TO BE RECABLED WITH A NEW DRIVE.)
00480  M01S00427.config  +++|          TITLE  RESERVED LOCATIONS AND FETS.
00481  M01S00428.config  +++|          ORG    102B
00482  M01S00429.config  +++|
00483  M01S00430.config  +++|*         RESERVED LOCATIONS.
00484  M01S00431.config  +++|
00485  M01S00432.config  +++|
00486  M01S00433.config  +++| FWA      BSS    0
00487  M01S00434.config  +++| ESTA     CON    0           EST ADDRESS
00488  M01S00005.ns22000 +++| LMSO     CON    0           LAST MASS STORAGE EST ORDINAL + 1
00489  M01S00435.config  +++| MMFF     CON    0           MULTI-MAINFRAME FLAG
00490  M01S00436.config  +++| NPPU     CON    0           NUMBER OF PPU-S IN SYSTEM
00491  M01S00437.config  +++| SLMP     CON    0           STRING BUFFER LIMIT POINTER
00492  M01S00438.config  +++| SPTR     CON    0           STRING BUFFER POINTER
00493  M01S00439.config  +++| TEMP     CON    0           TEMPORARY
00494  M01S00440.config  +++|          SPACE  4,10
00495  M01S00441.config  +++|*         *1RM* CALL BLOCK.
00496  M01S00442.config  +++|
00497  M01S00443.config  +++|
00498  M01S00444.config  +++| B1RM     BSS    0           *1RM* CALL BLOCK
00499  M01S00445.config  +++|
00500  M01S00446.config  +++|          LOC    0
00501  M01S00447.config  +++|
00502  M01S00448.config  +++|*         WHILE *1RM* IS ACTIVE K-DISPLAY INPUT IS INTERPRETED BY
00503  M01S00449.config  +++|*         *CONFIG* AND THE COMMAND CODE PASSED TO *1RM*.  THE
00504  M01S00450.config  +++|*         COMMANDS WHICH ARE LEGAL FOR *1RM* TO ACCEPT ARE SET IN
00505  M01S00451.config  +++|*         THE CALL BLOCK BY *1RM* IN THE FORM OF A BIT MAP.  THIS
00506  M01S00452.config  +++|*         BIT MAP IS ALSO USED TO GENERATE A DESCRIPTION OF LEGAL
00507  M01S00453.config  +++|*         COMMANDS IN THE DISPLAY.
00508  M01S00454.config  +++|
00509  M01S00455.config  +++| RFNB     VFD    48/0
00510  M01S00456.config  +++|          VFD    11/0        *1RM* FUNCTION CODE
00511  M01S00457.config  +++|          VFD    1/0         FUNCTION IN PROGRESS BIT
00512  M01S00458.config  +++|
00513  M01S00459.config  +++| TPAR     BSS    0           TABLE OF LEGAL PARAMETERS
00514  M01S00460.config  +++|          POS    .CLEAR
00515  M01S00461.config  +++|          VFD    1/1
00516  M01S00462.config  +++|          POS    .END
00517  M01S00463.config  +++|          VFD    1/1
00518  M01S00464.config  +++|          POS    .GO
00519  M01S00465.config  +++|          VFD    1/1
00520  M01S00466.config  +++|          POS    .RERUN
00521  M01S00467.config  +++|          VFD    1/1
00522  M01S00468.config  +++|          POS    .RESET
00523  M01S00469.config  +++|          VFD    1/1
00524  M01S00470.config  +++|          POS    .SUSPEND
00525  M01S00471.config  +++|          VFD    1/1
00526  M01S00472.config  +++|          POS    .CH
00527  M01S00473.config  +++|          VFD    1/1
00528  M01S00474.config  +++|          POS    .EQ
00529  M01S00475.config  +++|          VFD    1/1
00530  M01S00476.config  +++|          POS    .UL
00531  M01S00477.config  +++|          VFD    1/1
00532  M01S00478.config  +++|          POS    .UR
00533  M01S00479.config  +++|          VFD    1/1
00534  M01S00480.config  +++| TCOM     CON    0           COMMANDS TO PASS TO *1RM*
00535  M01S00481.config  +++| CUEQ     CON    0           CURRENT EQUIPMENT
00536  M01S00482.config  +++| URCD     CON    0           UNITS TO RECONFIGURE OR RECABLE
00537  M01S00483.config  +++| ESTD     CON    0           NEW EST ENTRY FOR CURRENT EQUIPMENT
00538  M01S00484.config  +++| MSTD     BSS    MSTL        NEW MST FOR CURRENT EQUIPMENT
00539  M01S00485.config  +++|          LOC    *O
00540  M01S00486.config  +++|          SPACE  4,10
00541  M01S00487.config  +++|*         FETS.
00542  M01S00488.config  +++|
00543  M01S00489.config  +++|
00544  M01S00490.config  +++| O        BSS    0           OUTPUT FILE
00545  M01S00491.config  +++| OUTPUT   FILEB  OBUF,OBUFL,(FET=7)
00546  M01S00492.config  +++|          TITLE  CONFIG - MAIN LOOP.
00547  M01S00493.config  +++|**        CONFIG - MAIN LOOP.
00548  M01S00494.config  +++|
00549  M01S00495.config  +++|
00550  M01S00496.config  +++| CONFIG   SB1    1
00551  M01S00497.config  +++|          RJ     PRS         PRESET
00552  M01S00498.config  +++|          RJ     BCL         OUTPUT INITIAL CONFIGURATION
00553  M01S00499.config  +++|
00554  M01S00500.config  +++|*         INITIATE K-DISPLAY.
00555  M01S00501.config  +++|
00556  M01S00502.config  +++|          SA1    MMFF
00557  M01S00503.config  +++|          ZR     X1,CON1     IF NOT MMF MODE
00558  M01S00504.config  +++|          CALL1RM  RCDF      CLEAR DAT INTERLOCK
00559  M01S00505.config  +++| CON1     RJ     RRC         SET VALUES ON K-DISPLAY
00560  M01S00506.config  +++|          MX6    -5
00561  M01S00507.config  +++|          SA6    TEMP
00562  M01S00508.config  +++|          CONSOLE  KL
00563  M01S00509.config  +++| CON2     RJ     UKD         UPDATE K-DISPLAY
00564  M01S00510.config  +++|          RECALL
00565  M01S00511.config  +++|          SA1    B1RM+CUEQ   CHECK FOR EQUIPMENT PRESENT
00566  M01S00512.config  +++|          NZ     X1,CON3     IF EQUIPMENT PRESENT
00567  M01S00513.config  +++|          SA1    TEMP
00568  M01S00514.config  +++|          ZR     X1,CON1     IF TIME TO CHECK FOR EQUIPMENT
00569  M01S00515.config  +++|          SX6    X1+B1
00570  M01S00516.config  +++|          SA6    A1
00571  M01S00517.config  +++|
00572  M01S00518.config  +++|*         CHECK FOR INPUT.
00573  M01S00519.config  +++|
00574  M01S00520.config  +++| CON3     SA1    KBUF
00575  M01S00521.config  +++|          ZR     X1,CON2     IF NO INPUT
00576  M01S00522.config  +++|          RJ     ISB         INPUT STRING BUFFER
00577  M01S00523.config  +++|          SX7    B0          ASSEMBLE KEYWORD
00578  M01S00524.config  +++|          RJ     ASC
00579  M01S00525.config  +++|          ZR     X4,CON3     IF NO DATA ASSEMBLED
00580  M01S00526.config  +++|          SB4    1R=
00581  M01S00527.config  +++|          NE     B4,B5,CON4  IF NOT *=* SEPARATOR
00582  M01S00528.config  +++|          SX1    6
00583  M01S00529.config  +++|          IX1    X1*X4
00584  M01S00530.config  +++|          SX5    B5
00585  M01S00531.config  +++|          SB4    X1-54
00586  M01S00532.config  +++|          AX5    B4
00587  M01S00533.config  +++|          BX6    X6+X5
00588  M01S00534.config  +++| CON4     RJ     SPT
00589  M01S00535.config  +++|          NZ     X5,CON5     IF PARAMETER NOT FOUND
00590  M01S00536.config  +++|          SA1    CONA        SIMULATE RETURN JUMP
00591  M01S00537.config  +++|          SB4    X3
00592  M01S00538.config  +++|          BX6    X1
00593  M01S00539.config  +++|          SA6    B4
00594  M01S00540.config  +++|          JP     B4+1        JUMP TO PROCESSOR
00595  M01S00541.config  +++|
00596  M01S00542.config  +++|*         RETURN FROM PARAMETER PROCESSING.
00597  M01S00543.config  +++|
00598  M01S00544.config  +++| CON5     ZR     X5,CON3     IF NO ERROR
00599  M01S00545.config  +++|          RJ     IDE         PROCESSES ERROR
00600  M01S00546.config  +++|          EQ     CON3        LOOP FOR MORE INPUT
00601  M01S00547.config  +++|
00602  M01S00040.241l630 +++|
00603  M01S00548.config  +++| CONA     EQ     CON5        SIMULATED RETURN JUMP TO PROCESSOR
00604  M01S00549.config  +++|          TITLE  *1RM* COMMAND DEFINITIONS.
00605  M01S00550.config  +++|ABORT     SPACE  4,10
00606  M01S00551.config  +++|**        ABORT - ABORT THE CURRENT COMMAND SEQUENCE.
00607  M01S00552.config  +++|
00608  M01S00553.config  +++|
00609  M01S00554.config  +++|          KEYWORD  ABORT,0
00610  M01S00555.config  +++| IGNORE   SPACE  4,10
00611  M01S00556.config  +++|**        IGNORE - IGNORE CURRENT ERROR CONDITION.
00612  M01S00557.config  +++|
00613  M01S00558.config  +++|
00614  M01S00559.config  +++|          KEYWORD  IGNORE,0
00615  M01S00560.config  +++| NEXT     SPACE  4,10
00616  M01S00561.config  +++|**        NEXT - PROCEED TO NEXT UNIT.
00617  M01S00562.config  +++|
00618  M01S00563.config  +++|
00619  M01S00564.config  +++|          KEYWORD  NEXT,0
00620  M01S00565.config  +++| RECHECK  SPACE  4,10
00621  M01S00566.config  +++|**        RECHECK - RETRY PROCESS GIVING ERROR.
00622  M01S00567.config  +++|
00623  M01S00568.config  +++|
00624  M01S00569.config  +++|          KEYWORD  RECHECK,0
00625  M01S00570.config  +++|          TITLE  CLC - *CLEAR* COMMAND PROCESSOR.
00626  M01S00571.config  +++|**        CLC - *CLEAR* COMMAND PROCESSOR.
00627  M01S00572.config  +++|*
00628  M01S00573.config  +++|*         ENTRY  (CUEQ) = CURRENT EQUIPMENT TO RECONFIGURE.
00629  M01S00574.config  +++|*
00630  M01S00575.config  +++|*         EXIT   REDEFINITION REQUEST CLEARED FOR CURRENT EQUIPMENT.
00631  M01S00576.config  +++|*
00632  M01S00577.config  +++|*         USES   A - 1, 6.
00633  M01S00578.config  +++|*                X - 1, 5, 6.
00634  M01S00579.config  +++|*
00635  M01S00580.config  +++|*         MACRO  CALL1RM.
00636  M01S00581.config  +++|
00637  M01S00582.config  +++|
00638  M01S00583.config  +++|          KEYWORD  CLEAR,CLP
00639  M01S00584.config  +++|          SA1    B1RM+CUEQ
00640  M01S00585.config  +++|          ZR     X1,CLPX     IF NO EQUIPMENT
00641  M01S00586.config  +++|          RJ     FUM         CHECK FOR UNIT IN USE
00642  M01S00587.config  +++|          NZ     X5,CLPX     IF ERROR DETECTED
00643  M01S00588.config  +++|          CALL1RM  RCLF
00644  M01S00589.config  +++|          RJ     RRC         SET NEW EQUIPMENT
00645  M01S00590.config  +++|          EQ     CLPX        RETURN
00646  M01S00591.config  +++|          TITLE  END - END COMMAND PROCESSOR.
00647  M01S00592.config  +++|**        END - *END* COMMAND PROCESSOR.
00648  M01S00593.config  +++|*
00649  M01S00594.config  +++|*         COMPLETE RECONFIGURATION RUN.
00650  M01S00595.config  +++|*
00651  M01S00596.config  +++|*         USES   X - 1,    5.
00652  M01S00597.config  +++|*                A - 1.
00653  M01S00598.config  +++|*                B - 0.
00654  M01S00599.config  +++|*
00655  M01S00600.config  +++|*         CALLS  CAE.
00656  M01S00601.config  +++|*
00657  M01S00602.config  +++|*         MACROS  CALL1RM, EXCST, KEYWORD, MESSAGE, SETFS.
00658  M01S00603.config  +++|
00659  M01S00604.config  +++|
00660  M01S00605.config  +++|          KEYWORD  END,END
00661  M01S00606.config  +++| END1     RJ     CAE         CLEAR ALL EQUIPMENT IDLE REQUESTS
00662  M01S00607.config  +++|          SA1    MMFF
00663  M01S00608.config  +++|          ZR     X1,END2     IF NOT MMF MODE
00664  M01S00609.config  +++|          CALL1RM  RCDF      CLEAR DAT INTERLOCK
00665  M01S00610.config  +++| END2     SA1    B1RM+RFNB
00666  M01S00611.config  +++|          SX5    B0+         INDICATE NO ERROR
00667  M01S00612.config  +++|          NZ     X1,ENDX     IF *1RM* STILL ATTACHED
00668  M01S00613.config  +++|          MESSAGE  ENDA      * CONFIG UTILITY COMPLETE.*
00669  M01S00614.config  +++|          SETFS  O,0
00670  M01S00615.config  +++|          EXCST  ENDB        FORCE CALL TO *CMS*
00671  M01S00616.config  +++|          ENDRUN
00672  M01S00617.config  +++|
00673  M01S00041.241l630 +++|
00674  M01S00618.config  +++| ENDA     DATA   C* CONFIG UTILITY COMPLETE.*
00675  M01S00619.config  +++| ENDB     DATA   4LCMS.
00676  M01S00620.config  +++|          TITLE  GOC - *GO* COMMAND PROCESSOR.
00677  M01S00621.config  +++|**        GOC - *GO* COMMAND PROCESSOR.
00678  M01S00622.config  +++|*
00679  M01S00623.config  +++|*         ENTRY  (CUEQ) = CURRENT EQUIPMENT TO RECONFIGURE.
00680  M01S00624.config  +++|*
00681  M01S00625.config  +++|*         EXIT   (X5) = ERROR MESSAGE ADDRESS.
00682  M01S00626.config  +++|*
00683  M01S00627.config  +++|*         USES   A - 1, 2, 3, 4, 6, 7.
00684  M01S00628.config  +++|*                X - ALL.
00685  M01S00629.config  +++|*
00686  M01S00630.config  +++|*         CALLS  BCL, CLD, FUM.
00687  M01S00631.config  +++|*
00688  M01S00632.config  +++|*         MACROS  CALL1RM, KEYWORD.
00689  M01S00633.config  +++|
00690  M01S00634.config  +++|
00691  M01S00635.config  +++|          KEYWORD  GO,GOC
00692  M01S00636.config  +++|          RJ     CLD         CHECK FOR LEGAL DEVICE
Line S00637 Modification History
M01 (Added by) config
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00693  M02S00637.v23l617 ---|          NZ     X5,GOCX     IF ILLEGAL DEVICE
00694  M01S00009.v23l617 +++|          NZ     X5,GOCX     IF INCORRECT DEVICE
00695  M01S00638.config  +++|          RJ     FUM         FIND UNIT IN OTHER MST
00696  M01S00639.config  +++|          NZ     X5,GOCX     IF ERROR IN CONFIGURATION
00697  M01S00640.config  +++|          CALL1RM  RDDF
00698  M01S00641.config  +++|          RJ     BCL         BUILD CONFIGURATION LIST
00699  M01S00642.config  +++|          RJ     RRC         RESET NEW EQUIPMENT
00700  M01S00643.config  +++|          EQ     GOCX        RETURN
Line S00644 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00701  M02S00644.ns22000 ---|
Line S00645 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00702  M02S00645.ns22000 ---| GOCD     DATA   C*EQXX REDEFINITION COMPLETE.*
00703  M01S00646.config  +++|          TITLE  RRC - *RERUN* COMMAND PROCESSOR.
00704  M01S00647.config  +++|**        RRC - *RERUN* COMMAND PROCESSOR.
00705  M01S00648.config  +++|*
00706  M01S00649.config  +++|*         ENTRY  (ESTA) = EST ADDRESS.
00707  M01S00650.config  +++|*                (MMFF) .NE. 0 IF MMF MODE.
00708  M01S00651.config  +++|*
00709  M01S00652.config  +++|*         EXIT   (X1) = CURRENT EQUIPMENT.
00710  M01S00653.config  +++|*                (X5) = ERROR MESSAGE.
00711  M01S00654.config  +++|*                (CUEQ) = CURRENT EQUIPMENT TO RECONFIGURE.
00712  M01S00655.config  +++|*                (CUEQ), (ESTB), (MSTD), AND K-DISPLAY RESET.
00713  M01S00656.config  +++|*
00714  M01S00657.config  +++|*         USES   A - 1, 2, 5, 6, 7.
00715  M01S00658.config  +++|*                B - 5, 6.
00716  M01S00659.config  +++|*                X - 0, 1, 2, 5, 6, 7.
00717  M01S00660.config  +++|*
Line S00661 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00718  M02S00661.ns22000 ---|*         CALLS  DBL, DUL, RMT, RSC, SML.
00719  M01S00006.ns22000 +++|*         CALLS  EST, RSC, SML.
00720  M01S00662.config  +++|*
00721  M01S00663.config  +++|*         MACROS  CALL1RM, GETLCW, KEYWORD.
00722  M01S00664.config  +++|
00723  M01S00665.config  +++|
00724  M01S00666.config  +++|          KEYWORD  RERUN,RRC
00725  M01S00667.config  +++|          CALL1RM  RUMF
Line S00668 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00726  M02S00668.ns22000 ---|          SA2    ESTA
Line S00669 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00727  M02S00669.ns22000 ---|          GETLCW NMSD,X2,ESTB
00728  M01S00007.ns22000 +++|          RJ     EST         READ EST INTO *ESTB*
00729  M01S00670.config  +++|
00730  M01S00671.config  +++|*         SEARCH FOR EQUIPMENT TO RECONFIGURE.
00731  M01S00672.config  +++|
Line S00673 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00732  M02S00673.ns22000 ---|          SX5    B0          INITIALIZE SEARCH LOOP
00733  M01S00008.ns22000 +++|          SX5    NOPE-1      INITIALIZE EST ORDINAL FOR SEARCH
00734  M01S00674.config  +++|          SB5    B0          SET EQUIPMENT NOT FOUND
00735  M01S00675.config  +++|          BX6    X6-X6       CLEAR CURRENT EQUIPMENT
Line S00676 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00736  M02S00676.ns22000 ---|          SB6    B0          SET SHARED EQUIPMENT NUMBER
00737  M01S00009.ns22000 +++|          SB6    B0          SET SHARED EST ORDINAL
00738  M01S00677.config  +++|          SA6    B1RM+CUEQ
00739  M01S00678.config  +++|          SA6    B1RM+URCD   CLEAR UNITS TO RECONFIGURE
00740  M01S00679.config  +++| RRC1     RJ     SML         FIND EQUIPMENT
00741  M01S00680.config  +++|          ZR     X5,RRC3     IF END OF EQUIPMENTS
00742  M01S00681.config  +++|          PL     X1,RRC1     IF DEVICE IDLE BIT NOT SET
00743  M01S00682.config  +++|          NZ     B5,RRC2     IF EQUIPMENT PREVIOUSLY FOUND
00744  M01S00683.config  +++|          SB5    X5
Line S00684 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00745  M02S00684.ns22000 ---| RRC2     SA1    ESTB+X5     CHECK FOR SHARED
00746  M01S00010.ns22000 +++| RRC2     R=     X1,ESTE     CHECK FOR SHARED DEVICE
00747  M01S00011.ns22000 +++|          IX1    X5*X1
00748  M01S00012.ns22000 +++|          SA1    ESTB+X1+EQDE  READ EST ENTRY
00749  M01S00685.config  +++|          LX1    59-57
00750  M01S00686.config  +++|          PL     X1,RRC1     IF NOT SHARED
00751  M01S00687.config  +++|          NZ     B6,RRC1     IF SHARED EQUIPMENT FOUND
00752  M01S00688.config  +++|          SB6    X5
00753  M01S00689.config  +++|          EQ     RRC1        NEXT EQUIPMENT
00754  M01S00690.config  +++|
00755  M01S00691.config  +++| RRC3     SX6    B6
00756  M01S00692.config  +++|          NZ     B6,RRC4     IF SHARED EQUIPMENT FOUND
00757  M01S00693.config  +++|          SX6    B5
00758  M01S00694.config  +++| RRC4     SA6    B1RM+CUEQ
00759  M01S00695.config  +++|          RJ     RSC         RESET PARAMETERS
00760  M01S00696.config  +++|          SA1    B1RM+CUEQ
00761  M01S00697.config  +++|          SX5    B0
00762  M01S00698.config  +++|          EQ     RRCX        RETURN
00763  M01S00699.config  +++|          TITLE  RSC - *RESET* COMMAND PROCESSOR.
00764  M01S00700.config  +++|**        RSC - *RESET* COMMAND PROCESSOR.
00765  M01S00701.config  +++|*
00766  M01S00702.config  +++|*         ENTRY  (CUEQ) = CURRENT EQUIPMENT.
00767  M01S00703.config  +++|*
00768  M01S00704.config  +++|*         EXIT   (X5) = 0.
00769  M01S00705.config  +++|*
00770  M01S00706.config  +++|*         USES   A - 1, 2, 6, 7.
00771  M01S00707.config  +++|*                B - 2, 3, 5, 6, 7.
00772  M01S00708.config  +++|*                X - 0, 1, 2, 4, 5, 6, 7.
00773  M01S00709.config  +++|*
00774  M01S00710.config  +++|*         CALLS  COD, ZTB.
00775  M01S00711.config  +++|*
00776  M01S00712.config  +++|*         MACROS  KEYWORD, MOVE.
00777  M01S00713.config  +++|
00778  M01S00714.config  +++|
00779  M01S00715.config  +++|          KEYWORD  RESET,RSC
00780  M01S00716.config  +++|          SA5    B1RM+CUEQ
Line S00717 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00781  M02S00717.ns22000 ---|          SA1    ESTB+X5     RESET EST ENTRY
00782  M01S00013.ns22000 +++|          R=     X1,ESTE
00783  M01S00014.ns22000 +++|          IX1    X5*X1
00784  M01S00015.ns22000 +++|          SA1    ESTB+X1+EQDE  RESET EST ENTRY
00785  M01S00718.config  +++|          BX6    X1
00786  M01S00719.config  +++|          BX7    X7-X7
00787  M01S00720.config  +++|          SA6    B1RM+ESTD
00788  M01S00721.config  +++|          SA7    B1RM+URCD   CLEAR UNITS TO RECONFIGURE
00789  M01S00722.config  +++|          RJ     RMT         READ CURRENT EQUIPMENT MST
00790  M01S00723.config  +++|          MOVE   MSTL,MSTB,MSTC
00791  M01S00724.config  +++|          MOVE   MSTL,MSTB,B1RM+MSTD
00792  M01S00725.config  +++|          RJ     UKD         UPDATE K-DISPLAY INFORMATION
00793  M01S00726.config  +++|          EQ     RSCX        RETURN
00794  M01S00727.config  +++|          TITLE  SSP - *SUSPEND* COMMAND PROCESSOR.
00795  M01S00728.config  +++|**        SSP - *SUSPEND* COMMAND PROCESSOR.
00796  M01S00729.config  +++|*         ONLY 885 AND 844 TYPE DEVICES ARE ALLOWED FOR THIS
00797  M01S00730.config  +++|*         COMMAND.  THIS IS BECAUSE THE *6DI* DRIVER IS THE
00798  M01S00731.config  +++|*         ONLY ONE TO DETECT AND HONOR THE SUSPEND STATUS.
00799  M01S00732.config  +++|*
00800  M01S00733.config  +++|*         ENTRY  (CUEQ) = CURRENT EQUIPMENT.
00801  M01S00734.config  +++|*
00802  M01S00735.config  +++|*         EXIT   (X5) = ERROR MESSAGE ADDRESS.
00803  M01S00736.config  +++|*
00804  M01S00737.config  +++|*         USES   X - 1,    5.
00805  M01S00738.config  +++|*                A - 1.
00806  M01S00739.config  +++|*
00807  M01S00740.config  +++|*         CALLS  EQP.
00808  M01S00741.config  +++|*
00809  M01S00742.config  +++|*         MACROS  CALL1RM, KEYWORD.
00810  M01S00743.config  +++|
00811  M01S00744.config  +++|
00812  M01S00745.config  +++|          KEYWORD  SUSPEND,SSP
00813  M01S00746.config  +++|          SA1    B1RM+CUEQ
00814  M01S00747.config  +++|          ZR     X1,SSPX     IF NO EQUIPMENT
00815  M01S00748.config  +++|          SA1    B1RM+ESTD   CHECK FOR 885 OR 844
00816  M01S00749.config  +++|          LX1    59-55
Line S00750 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00817  M02S00750.ns22000 ---|          SX5    EREN        **** ERROR IN EQUIPMENT NUMBER.
00818  M01S00016.ns22000 +++|          SX5    EREN        **** ERROR IN EST ORDINAL.
00819  M01S00751.config  +++|          PL     X1,SSPX     IF NOT *LDAM*
00820  M01S00752.config  +++|          CALL1RM  RSPF
00821  M01S00753.config  +++|          EQ     SSPX        RETURN
00822  M01S00754.config  +++|          TITLE  CHP - *CH* PARAMETER PROCESSOR.
00823  M01S00755.config  +++|**        CHP - *CH* PARAMETER PROCESSOR.
00824  M01S00756.config  +++|*
00825  M01S00757.config  +++|*         ENTRY  (SPTR) = STRING BUFFER ADDRESS OF PREVIOUS CHARACTER.
00826  M01S00758.config  +++|*                (SLMP) = STRING BUFFER LIMIT POINTER.
00827  M01S00759.config  +++|*
00828  M01S00760.config  +++|*         EXIT   (X5) = 0 IF NO ERROR.
00829  M01S00761.config  +++|*                     = ERROR MESSAGE ADDRESS IF ERROR.
00830  M01S00762.config  +++|*                (SPTR) = UPDATED STRING BUFFER POINTER.
00831  M01S00763.config  +++|*                VALUE SET IN K-DISPLAY AND PARAMETER TABLE.
00832  M01S00764.config  +++|*
Line S00765 Modification History
M01 (Added by) config
M02 (Updated by) ns2550
Seq #  *Modification Id* Act 
----------------------------+
00833  M02S00765.ns2550  ---|*         USES   X - 0, 1, 2,    5, 6.
Line S00766 Modification History
M01 (Added by) config
M02 (Updated by) ns2550
Seq #  *Modification Id* Act 
----------------------------+
00834  M02S00766.ns2550  ---|*                A - 1, 2,     6.
00835  M01S00001.ns2550  +++|*         USES   X - 0, 1, 2, 5, 6.
00836  M01S00002.ns2550  +++|*                A - 1, 2, 6.
00837  M01S00767.config  +++|*                B - 1, 2.
00838  M01S00768.config  +++|*
00839  M01S00769.config  +++|*         CALLS  CCH, CHA, VON.
00840  M01S00770.config  +++|
00841  M01S00771.config  +++|
00842  M01S00772.config  +++|          KEYWORD  CH=,CHP
00843  M01S00773.config  +++|          SX0    3           VALIDATE CHANNEL NUMBER
00844  M01S00774.config  +++|          RJ     VON
00845  M01S00775.config  +++|          NZ     X5,CHPX     IF ERROR
00846  M01S00003.ns2550  +++|          SX0    1S11        ACCESS PATH ENABLED FLAG
00847  M01S00004.ns2550  +++|          SX2    X6
00848  M01S00005.ns2550  +++|          BX6    X0+X6
Line S00006 Modification History
M01 (Added by) ns2550
M02 (Updated by) confi4
Seq #  *Modification Id* Act 
----------------------------+
00849  M02S00006.confi4  ---|          LX6    12
Line S00776 Modification History
M01 (Added by) config
M02 (Updated by) confi4
Seq #  *Modification Id* Act 
----------------------------+
00850  M02S00776.confi4  ---|          SA6    CHPA        SAVE CHANNEL
00851  M01S00777.config  +++|
00852  M01S00778.config  +++|*         CHECK THAT CHANNELS ARE AVAILABLE.
00853  M01S00779.config  +++|
Line S00780 Modification History
M01 (Added by) config
M02 (Updated by) ns2550
Seq #  *Modification Id* Act 
----------------------------+
00854  M02S00780.ns2550  ---|          SX2    X6
00855  M01S00781.config  +++|          RJ     CHA
00856  M01S00782.config  +++|          NZ     X5,CHPX     IF ERROR IN CHANNEL NUMBER
00857  M01S00001.confi4  +++|          PL     X1,CHP1     IF CHANNEL IS UP
00858  M01S00002.confi4  +++|          SX0    3000B       MARK CHANNEL DOWN
00859  M01S00003.confi4  +++|          BX6    X0+X6
00860  M01S00004.confi4  +++| CHP1     LX6    12          SAVE CHANNEL
00861  M01S00005.confi4  +++|          SA6    CHPA
00862  M01S00783.config  +++|
00863  M01S00784.config  +++|*         CHECK FOR SECOND CHANNEL.
00864  M01S00785.config  +++|
00865  M01S00786.config  +++|          SX0    3
00866  M01S00787.config  +++|          RJ     VON
00867  M01S00788.config  +++|          NZ     X5,CHPX     IF ERROR
Line S00789 Modification History
M01 (Added by) config
M02 (Updated by) confi4
Seq #  *Modification Id* Act 
----------------------------+
00868  M02S00789.confi4  ---|          ZR     X4,CHP1     IF NO SECOND CHANNEL
00869  M01S00006.confi4  +++|          ZR     X4,CHP3     IF NO SECOND CHANNEL
Line S00790 Modification History
M01 (Added by) config
M02 (Updated by) ns2550
Seq #  *Modification Id* Act 
----------------------------+
00870  M02S00790.ns2550  ---|          ZR     X6,CHP1     IF SECOND CHANNEL ZERO
00871  M01S00007.ns2550  +++|          SX0    1S11        ACCESS PATH ENABLED FLAG
00872  M01S00791.config  +++|          SA1    CHPA        SAVE CHANNEL NUMBER
Line S00792 Modification History
M01 (Added by) config
M02 (Updated by) confi4
Seq #  *Modification Id* Act 
----------------------------+
00873  M02S00792.confi4  ---|          SX2    X6
00874  M01S00007.confi4  +++|          SX2    X6+
00875  M01S00008.ns2550  +++|          BX6    X0+X6
Line S00793 Modification History
M01 (Added by) config
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00876  M02S00793.252l678 ---|          LX6    6
Line S00001 Modification History
M01 (Added by) 252l678
M02 (Updated by) ns2550
Seq #  *Modification Id* Act 
----------------------------+
00877  M02S00001.ns2550  ---|          LX6    12
00878  M01S00794.config  +++|          BX6    X1+X6
Line S00795 Modification History
M01 (Added by) config
M02 (Updated by) confi4
Seq #  *Modification Id* Act 
----------------------------+
00879  M02S00795.confi4  ---|          SA6    A1
00880  M01S00796.config  +++|          RJ     CHA
00881  M01S00797.config  +++|          NZ     X5,CHPX     IF ERROR IN CHANNEL NUMBER
00882  M01S00008.confi4  +++|          PL     X1,CHP2     IF CHANNEL IS UP
00883  M01S00009.confi4  +++|          SX0    3000B       MARK CHANNEL DOWN
00884  M01S00010.confi4  +++|          BX6    X0+X6
Line S00798 Modification History
M01 (Added by) config
M02 (Updated by) confi4
Seq #  *Modification Id* Act 
----------------------------+
00885  M02S00798.confi4  ---| CHP1     SA1    B1RM+ESTD   INSERT CHANNELS IN REPLACEMENT ENTRY
00886  M01S00011.confi4  +++| CHP2     SA6    CHPA        SAVE CHANNEL
00887  M01S00012.confi4  +++| CHP3     SA1    B1RM+ESTD   INSERT CHANNELS IN REPLACEMENT ENTRY
00888  M01S00799.config  +++|          SA2    CHPA
Line S00800 Modification History
M01 (Added by) config
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00889  M02S00800.252l678 ---|          MX0    12
Line S00801 Modification History
M01 (Added by) config
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00890  M02S00801.252l678 ---|          LX2    36
00891  M01S00002.252l678 +++|          MX0    24
00892  M01S00003.252l678 +++|          LX2    24
00893  M01S00802.config  +++|          LX0    -12
Line S00803 Modification History
M01 (Added by) config
M02 (Updated by) confi1a
Seq #  *Modification Id* Act 
----------------------------+
00894  M02S00803.confi1a ---|          BX1    -X0*X1      CLEAR CHANNEL FIELD
Line S00804 Modification History
M01 (Added by) config
M02 (Updated by) confi1a
Seq #  *Modification Id* Act 
----------------------------+
00895  M02S00804.confi1a ---|          BX6    X2+X1
Line S00805 Modification History
M01 (Added by) config
M02 (Updated by) confi1a
Seq #  *Modification Id* Act 
----------------------------+
00896  M02S00805.confi1a ---|          BX1    X2+X1
00897  M01S00001.confi1a +++|          BX6    -X0*X1      CLEAR CHANNEL FIELD
00898  M01S00002.confi1a +++|          BX6    X2+X6
00899  M01S00806.config  +++|          SA6    A1
00900  M01S00807.config  +++|          RJ     CCH         CHECK FOR MATCHING CHANNELS
Line S00808 Modification History
M01 (Added by) config
M02 (Updated by) confi4
Seq #  *Modification Id* Act 
----------------------------+
00901  M02S00808.confi4  ---|          NZ     X1,CHP2     IF AT LEAST ONE CHANNEL MATCHES
00902  M01S00013.confi4  +++|          NZ     X1,CHP4     IF AT LEAST ONE CHANNEL MATCHES
00903  M01S00809.config  +++|
00904  M01S00810.config  +++|*         SET *URCD* TO INDICATE ALL UNITS CHANGED.
00905  M01S00811.config  +++|
00906  M01S00812.config  +++|          SA1    B1RM+MSTD+DDLL  GET UNIT COUNT
00907  M01S00813.config  +++|          AX1    48
Line S00814 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00908  M02S00814.ns22000 ---|          MX0    -6
00909  M01S00017.ns22000 +++|          MX0    -3
00910  M01S00815.config  +++|          BX1    -X0*X1
00911  M01S00816.config  +++|          SB2    X1
00912  M01S00817.config  +++|          MX6    1
00913  M01S00818.config  +++|          AX6    B2
00914  M01S00819.config  +++|          SB2    B2+B1
00915  M01S00820.config  +++|          LX6    B2
00916  M01S00821.config  +++|          SA1    B1RM+URCD   MERGE CHANGED UNITS
00917  M01S00822.config  +++|          BX6    X1+X6
00918  M01S00823.config  +++|          SA6    A1
Line S00824 Modification History
M01 (Added by) config
M02 (Updated by) confi4
Seq #  *Modification Id* Act 
----------------------------+
00919  M02S00824.confi4  ---| CHP2     RJ     SEQ         SET EQUIPMENT PARAMETERS IN K-DISPLAY
00920  M01S00014.confi4  +++| CHP4     RJ     SEQ         SET EQUIPMENT PARAMETERS IN K-DISPLAY
00921  M01S00825.config  +++|          BX5    X5-X5       CLEAR ERROR STATUS
00922  M01S00826.config  +++|          EQ     CHPX        RETURN
00923  M01S00827.config  +++|
00924  M01S00042.241l630 +++|
00925  M01S00828.config  +++| CHPA     CON    0           TEMPORARY
00926  M01S00829.config  +++|          TITLE  EQP - *EQ* PARAMETER PROCESSOR.
00927  M01S00830.config  +++|**        EQP - *EQ* PARAMETER PROCESSOR.
00928  M01S00831.config  +++|*         ANY MASS STORAGE DEVICE IS ALLOWED FOR THIS COMMAND.
00929  M01S00832.config  +++|*         THIS IS BECAUSE DEVICE IDLE MAY BE SET FOR ANY MASS
00930  M01S00833.config  +++|*         STORAGE DEVICE.
00931  M01S00834.config  +++|*
00932  M01S00835.config  +++|*         ENTRY  (CUEQ) = CURRENT EQUIPMENT.
00933  M01S00836.config  +++|*                (SPTR) = STRING BUFFER ADDRESS OF PREVIOUS CHARACTER.
00934  M01S00837.config  +++|*                (SLMP) = STRING BUFFER LIMIT POINTER.
00935  M01S00838.config  +++|*
00936  M01S00839.config  +++|*         EXIT   (X5) = 0 IF NO ERROR.
00937  M01S00840.config  +++|*                     = ERROR MESSAGE ADDRESS IF ERROR.
00938  M01S00841.config  +++|*                (SPTR) = UPDATED STRING BUFFER POINTER.
00939  M01S00842.config  +++|*                K-DISPLAY UPDATED TO SHOW NEW EQUIPMENT.
00940  M01S00843.config  +++|*
00941  M01S00844.config  +++|*         USES   X - 0, 4, 5, 6.
00942  M01S00845.config  +++|*                A - 6.
00943  M01S00846.config  +++|*                B - 0.
00944  M01S00847.config  +++|*
00945  M01S00848.config  +++|*         CALLS  CLD, RSC, VON.
00946  M01S00849.config  +++|
00947  M01S00850.config  +++|
00948  M01S00851.config  +++|          KEYWORD  EQ=,EQP
Line S00852 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00949  M02S00852.ns22000 ---|          SX0    3           VALIDATE EQUIPMENT NUMBER
00950  M01S00018.ns22000 +++|          SX0    3+1         VALIDATE EST ORDINAL
00951  M01S00853.config  +++|          RJ     VON
00952  M01S00854.config  +++|          NZ     X5,EQPX     IF ERROR
00953  M01S00855.config  +++|          ZR     X4,EQP1     IF NO EQUIPMENT ENTERED
00954  M01S00856.config  +++|          SA6    B1RM+CUEQ   SET EQUIPMENT
00955  M01S00857.config  +++| EQP1     RJ     CLD         CHECK FOR LEGAL DEVICE
00956  M01S00858.config  +++|          NZ     X5,EQP2     IF ERROR IN EQUIPMENT
00957  M01S00859.config  +++|          RJ     RSC         RESET PARAMETERS
00958  M01S00860.config  +++|          SX5    B0
00959  M01S00861.config  +++|          EQ     EQPX        RETURN
00960  M01S00862.config  +++|
00961  M01S00863.config  +++| EQP2     SX6    B0          CLEAR CURRENT EQUIPMENT
Line S00864 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00962  M02S00864.ns22000 ---|          SX5    EREN        **** ERROR IN EQUIPMENT NUMBER.
00963  M01S00019.ns22000 +++|          SX5    EREN        **** ERROR IN EST ORDINAL.
00964  M01S00865.config  +++|          SA6    B1RM+CUEQ
00965  M01S00866.config  +++|          RJ     RSC         RESET PARAMETERS
00966  M01S00867.config  +++|          EQ     EQPX        RETURN
00967  M01S00868.config  +++|          TITLE  ULP - UNIT LIST PARAMETER PROCESSOR.
00968  M01S00869.config  +++|**        ULP - *UL=* PARAMETER PROCESSOR.
00969  M01S00870.config  +++|*
00970  M01S00871.config  +++|*         ENTRY  (CUEQ) = CURRENT EQUIPMENT.
00971  M01S00872.config  +++|*
00972  M01S00873.config  +++|*         EXIT   (MSTD) UPDATED WITH NEW UNIT LIST.
00973  M01S00874.config  +++|*                K-DISPLAY UPDATED WITH NEW CONFIGURATION.
00974  M01S00875.config  +++|*
00975  M01S00876.config  +++|*         USES   X - 0, 1, 2, 3, 4, 5, 6, 7.
00976  M01S00877.config  +++|*                A - 1, 6.
00977  M01S00878.config  +++|*                B - 3, 4, 5.
00978  M01S00879.config  +++|*
00979  M01S00880.config  +++|*         CALLS  SEQ, VON.
00980  M01S00881.config  +++|*
00981  M01S00882.config  +++|*         MACRO  KEYWORD.
00982  M01S00883.config  +++|
00983  M01S00884.config  +++|
00984  M01S00885.config  +++| ULP8     SX5    ERUN        **** ERROR IN UNIT LIST.
00985  M01S00886.config  +++|
00986  M01S00887.config  +++|          KEYWORD  UL=,ULP
00987  M01S00888.config  +++|          BX6    X6-X6       CLEAR ASSEMBLY
00988  M01S00889.config  +++|          PX6    X6
00989  M01S00890.config  +++|          SA6    ULPA
00990  M01S00891.config  +++| ULP1     SX0    3           VALIDATE UNIT NUMBERS
00991  M01S00892.config  +++|          RJ     VON
00992  M01S00893.config  +++|          NZ     X5,ULPX     IF ERROR IN ASSEMBLY
00993  M01S00894.config  +++|          ZR     X4,ULP4     IF NO DIGITS
00994  M01S00895.config  +++|          SA1    ULPA
00995  M01S00896.config  +++|          UX1,B4 X1
00996  M01S00897.config  +++|          SB3    B4+B4       COMPUTE SHIFT COUNT FOR NEW UNIT
00997  M01S00898.config  +++|          SB3    B3+B4
00998  M01S00899.config  +++|          SB3    B3+B3
00999  M01S00900.config  +++|          SB4    B4+B1
01000  M01S00901.config  +++|          LX4    X6,B3       POSITION NEW UNIT
01001  M01S00902.config  +++|          BX6    X1+X4
01002  M01S00903.config  +++|          PX6    X6,B4
01003  M01S00904.config  +++|          SA6    ULPA
01004  M01S00905.config  +++|          SA2    B1RM+ESTD   CHECK FOR 885
01005  M01S00906.config  +++|          MX0    -11
01006  M01S00907.config  +++|          LX2    -12
01007  M01S00908.config  +++|          BX2    -X0*X2
01008  M01S00909.config  +++|          SX3    X2-2RDM
01009  M01S00910.config  +++|          SX2    X2-2RDQ
01010  M01S00911.config  +++|          ZR     X3,ULP2     IF 885
01011  M01S00912.config  +++|          NZ     X2,ULP3     IF NOT 885
01012  M01S00913.config  +++| ULP2     AX4    B3          CHECK NUMBER OF UNITS AND UNIT NUMBER
01013  M01S00914.config  +++|          SB3    3
01014  M01S00915.config  +++|          LX4    59-5
01015  M01S00916.config  +++|          GT     B4,B3,ULP8  IF MORE THAN 3 UNITS
01016  M01S00917.config  +++|          PL     X4,ULP8     IF UNIT NUMBER NOT 4X OR 5X
01017  M01S00918.config  +++|          LX4    59-4-59+5
01018  M01S00919.config  +++|          NG     X4,ULP8     IF UNIT NUMBER NOT 4X OR 5X
01019  M01S00920.config  +++| ULP3     SX1    B5-1R,
01020  M01S00921.config  +++|          ZR     X1,ULP1     IF MORE UNITS
01021  M01S00922.config  +++|          SX1    B5-1R.
01022  M01S00923.config  +++|          SX5    ERIS        **** ERROR IN SEPARATOR.
01023  M01S00924.config  +++|          NZ     X1,ULPX     IF NOT END OF LINE
01024  M01S00925.config  +++| ULP4     SA1    ULPA        BUILD DDLL WORD
01025  M01S00926.config  +++|          UX1,B4 X1
01026  M01S00927.config  +++|          ZR     B4,ULP5     IF NULL EQUIPMENT
01027  M01S00928.config  +++|          SB4    B4-2000B
01028  M01S00929.config  +++| ULP5     PX6    X6,B4
01029  M01S00930.config  +++|          SA1    B1RM+MSTD+DDLL
01030  M01S00931.config  +++|          SA6    A1
01031  M01S00932.config  +++|          MX0    -6
01032  M01S00933.config  +++|          MX3    1           INITIALIZE LOOP PARAMETERS
01033  M01S00934.config  +++|          BX4    X4-X4
01034  M01S00935.config  +++|          MX2    -8          LOOP COUNTER
01035  M01S00936.config  +++| ULP6     ZR     X2,ULP7     IF END OF LOOP
01036  M01S00937.config  +++|          BX7    X1-X6
01037  M01S00938.config  +++|          BX7    -X0*X7
01038  M01S00939.config  +++|          LX0    6           ADVANCE UNIT
01039  M01S00940.config  +++|          AX2    1
01040  M01S00941.config  +++|          LX3    1
01041  M01S00942.config  +++|          ZR     X7,ULP6     IF NO CHANGE IN UNIT NUMBER
01042  M01S00943.config  +++|          BX4    X4+X3
01043  M01S00944.config  +++|          EQ     ULP6        CHECK NEXT UNIT
01044  M01S00945.config  +++|
01045  M01S00946.config  +++| ULP7     SA1    B1RM+URCD   MERGE BITS IN CALL BLOCK
01046  M01S00947.config  +++|          BX6    X1+X4
01047  M01S00948.config  +++|          SA6    A1
01048  M01S00949.config  +++|          RJ     SEQ         SET EQUIPMENT PARAMETERS IN DISPLAY
01049  M01S00950.config  +++|          EQ     ULPX        RETURN
01050  M01S00951.config  +++|
01051  M01S00043.241l630 +++|
01052  M01S00952.config  +++| ULPA     CON    0           SCRATCH LOCATION
01053  M01S00953.config  +++| URP      TITLE  URP - UNITS FOR RECABLING PARAMETER PROCESSOR.
01054  M01S00954.config  +++|**        URP - *UR=* PARAMETER PROCESSOR.
01055  M01S00955.config  +++|*
01056  M01S00956.config  +++|*         ENTRY  (URCD) = CURRENT LIST OF UNITS.
01057  M01S00957.config  +++|*                (MSTD) = CURRENT REDEFINITION PARAMETERS.
01058  M01S00958.config  +++|*
01059  M01S00959.config  +++|*         EXIT   (X5) = ERROR MESSAGE ADDRESS.
01060  M01S00960.config  +++|*
01061  M01S00961.config  +++|*         USES   X - 0, 1, 2, 3,    5, 6.
01062  M01S00962.config  +++|*                A - 1, 6.
01063  M01S00963.config  +++|*                B - 1, 2.
01064  M01S00964.config  +++|*
01065  M01S00965.config  +++|*         CALLS  VON.
01066  M01S00966.config  +++|*
01067  M01S00967.config  +++|*         MACRO  KEYWORD.
01068  M01S00968.config  +++|
01069  M01S00969.config  +++|
01070  M01S00970.config  +++| URP2     SA1    B1RM+URCD   ADD UNIT TO LIST
01071  M01S00971.config  +++|          BX6    X1+X3
01072  M01S00972.config  +++|          SA6    A1
01073  M01S00973.config  +++|          RJ     SEQ         SET EQUIPMENT PARAMETERS IN K-DISPLAY
01074  M01S00974.config  +++|
01075  M01S00975.config  +++|          KEYWORD  UR=,URP   ENTRY/EXIT
01076  M01S00976.config  +++|          SX0    3           ASSEMBLE UNIT NUMBER
01077  M01S00977.config  +++|          RJ     VON
01078  M01S00978.config  +++|          NZ     X5,URPX     IF ERROR IN ASSEMBLY
01079  M01S00979.config  +++|
01080  M01S00980.config  +++|*         FIND UNIT IN CURRENT UNIT LIST.
01081  M01S00981.config  +++|
01082  M01S00982.config  +++|          SA1    B1RM+MSTD+DDLL
01083  M01S00983.config  +++|          MX0    -6
01084  M01S00020.ns22000 +++|          MX2    -3
01085  M01S00984.config  +++|          LX1    -48
Line S00985 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01086  M02S00985.ns22000 ---|          BX2    -X0*X1
01087  M01S00021.ns22000 +++|          BX2    -X2*X1
01088  M01S00986.config  +++|          LX1    48
01089  M01S00987.config  +++|          SB2    X2          SET UNIT COUNT
01090  M01S00988.config  +++|          SX3    B1          SET UNIT MASK
01091  M01S00989.config  +++| URP1     BX5    X6-X1       CHECK FOR UNIT NUMBER MATCH
01092  M01S00990.config  +++|          BX5    -X0*X5
01093  M01S00991.config  +++|          ZR     X5,URP2     IF MATCH
01094  M01S00992.config  +++|          SB2    B2-B1       ADVANCE UNIT NUMBER
01095  M01S00993.config  +++|          AX1    6
01096  M01S00994.config  +++|          LX3    1
01097  M01S00995.config  +++|          PL     B2,URP1     IF MORE UNITS TO CHECK
01098  M01S00996.config  +++|          SX5    ERUN        **** ERROR IN UNIT LIST.
01099  M01S00997.config  +++|          EQ     URPX        RETURN
01100  M01S00998.config  +++|          TITLE  UTILITY SUBROUTINES.
01101  M01S00999.config  +++| ASC      SPACE  4,20
01102  M01S01000.config  +++|**        ASC - ASSEMBLE CHARACTERS.
01103  M01S01001.config  +++|*
01104  M01S01002.config  +++|*         ENTRY  (SPTR) = STRING BUFFER ADDRESS OF PREVIOUS CHARACTER.
01105  M01S01003.config  +++|*                (SLMP) = STRING BUFFER LIMIT POINTER.
01106  M01S01004.config  +++|*                (X7) = 1 IF IGNORE LEADING ZEROES.
01107  M01S01005.config  +++|*
01108  M01S01006.config  +++|*         EXIT   (X4) = NUMBER OF CHARACTERS ASSEMBLED.
01109  M01S01007.config  +++|*                (X5) = RIGHT JUSTIFIED ASSEMBLED CHARACTERS.
01110  M01S01008.config  +++|*                (X6) = LEFT JUSTIFIED ASSEMBLED CHARACTERS.
01111  M01S01009.config  +++|*                (B5) = SEPARATOR.
01112  M01S01010.config  +++|*                (SPTR) = UPDATED STRING BUFFER ADDRESS.
01113  M01S01011.config  +++|*
01114  M01S01012.config  +++|*         USES   A - 1, 4, 6, 7.
01115  M01S01013.config  +++|*                X - 1, 2, 3, 4, 5, 6, 7.
01116  M01S01014.config  +++|*                B - 2, 3, 4, 5, 7.
01117  M01S01015.config  +++|
01118  M01S01016.config  +++|
01119  M01S01017.config  +++|*         PROCESS END OF BUFFER.
01120  M01S01018.config  +++|
01121  M01S01019.config  +++| ASC3     SA4    SLMP        SET STRING BUFFER EMPTY
01122  M01S01020.config  +++|          SB2    X4+
01123  M01S01021.config  +++|          SB5    1R.         SET TERMINATOR
01124  M01S01022.config  +++|
01125  M01S01023.config  +++|*         SET ASSEMBLED CHARACTERS.
01126  M01S01024.config  +++|
01127  M01S01025.config  +++| ASC4     SX4    10          CALCULATE NUMBER OF CHARACTERS
01128  M01S01026.config  +++|          SX3    B4
01129  M01S01027.config  +++|          IX4    X4-X3
01130  M01S01028.config  +++|          SX6    B2          SET BUFFER POINTER
01131  M01S01029.config  +++|          SA6    SPTR
01132  M01S01030.config  +++|          BX6    X6-X6
01133  M01S01031.config  +++|          ZR     X4,ASCX     IF NO CHARACTERS ASSEMBLED
01134  M01S01032.config  +++|          SX2    6           LEFT JUSTIFY CHARACTERS
01135  M01S01033.config  +++|          IX3    X3*X2
01136  M01S01034.config  +++|          SB4    X3
01137  M01S01035.config  +++|          LX6    X5,B4
01138  M01S01036.config  +++|
01139  M01S01037.config  +++| ASC      SUBR               ENTRY/EXIT
01140  M01S01038.config  +++|          SA7    ASCA        INITIALIZE IGNORE ZEROES FLAG
01141  M01S01039.config  +++|          BX5    X5-X5
01142  M01S01040.config  +++|          SB4    10
01143  M01S01041.config  +++|          SA1    SPTR        SET STRING POINTER
01144  M01S01042.config  +++|          SB2    X1
01145  M01S01043.config  +++|          SA1    SLMP        SET MAXIMUM CHARACTER SCAN
01146  M01S01044.config  +++|          SB3    X1
01147  M01S01045.config  +++|
01148  M01S01046.config  +++|*         ASSEMBLE CHARACTERS FROM BUFFER.
01149  M01S01047.config  +++|
01150  M01S01048.config  +++| ASC1     SB2    B2+B1
01151  M01S01049.config  +++|          GE     B2,B3,ASC3  IF END OF STRING BUFFER
01152  M01S01050.config  +++|          SA1    B2
01153  M01S01051.config  +++|          SB5    X1          SET SEPARATOR
01154  M01S01052.config  +++|          SB7    X1-1R
01155  M01S01053.config  +++|          ZR     B7,ASC1     IF BLANK
01156  M01S01054.config  +++|          SB7    X1-1R+
01157  M01S01055.config  +++|          PL     B7,ASC4     IF SEPARATOR
01158  M01S01056.config  +++|          SA4    ASCA
01159  M01S01057.config  +++|          ZR     X4,ASC2     IF NOT TO IGNORE ZEROES
01160  M01S01058.config  +++|          SB7    X1-1R0
01161  M01S01059.config  +++|          ZR     B7,ASC1     IF LEADING ZERO
01162  M01S01060.config  +++|          SX7    B0          CLEAR IGNORE ZEROES FLAG
01163  M01S01061.config  +++|          SA7    A4
01164  M01S01062.config  +++| ASC2     LX5    6           ASSEMBLE CHARACTER
01165  M01S01063.config  +++|          SB4    B4-1        DECREMENT COUNT
01166  M01S01064.config  +++|          BX5    X5+X1
01167  M01S01065.config  +++|          NZ     B4,ASC1     IF MORE CHARACTERS TO ASSEMBLE
01168  M01S01066.config  +++|          EQ     ASC4        SET ASSEMBLED CHARACTERS
01169  M01S01067.config  +++|
01170  M01S00044.241l630 +++|
01171  M01S01068.config  +++| ASCA     CON    0           IGNORE LEADING ZEROES FLAG
01172  M01S01069.config  +++| BCL      SPACE  4,20
01173  M01S01070.config  +++|**        BCL - BUILD CURRENT CONFIGURATION LIST.
01174  M01S01071.config  +++|*
01175  M01S01072.config  +++|*         EXIT   CURRENT MASS STORAGE CONFIGURATION ON OUTPUT.
01176  M01S01073.config  +++|*
01177  M01S01074.config  +++|*         USES   A - 1, 2.
01178  M01S01075.config  +++|*                X - 1, 2, 5, 6.
01179  M01S01076.config  +++|*
Line S01077 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01180  M02S01077.ns22000 ---|*         CALLS  BED, RMT.
01181  M01S00022.ns22000 +++|*         CALLS  BED, EST, RMT.
01182  M01S01078.config  +++|*
01183  M01S01079.config  +++|*         MACROS CLOCK, DATE, GETLCW, WRITEC, WRITER.
01184  M01S01080.config  +++|
01185  M01S01081.config  +++|
01186  M01S01082.config  +++| BCL2     WRITER O,R         FLUSH BUFFER
01187  M01S01083.config  +++|
01188  M01S01084.config  +++| BCL      SUBR               ENTRY/EXIT
Line S01085 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01189  M02S01085.ns22000 ---|          SA2    ESTA        READ EST
Line S01086 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01190  M02S01086.ns22000 ---|          GETLCW NMSD,X2,ESTB
01191  M01S00023.ns22000 +++|          RJ     EST         READ EST INTO *ESTB*
01192  M01S01087.config  +++|          DATE   BCLA+3      PUT DATE AND TIME IN HEADER
01193  M01S01088.config  +++|          CLOCK  BCLA+4
01194  M01S01089.config  +++|          WRITEC O,BCLA      WRITE HEADER
01195  M01S01090.config  +++|          WRITEC X2,BCLB     WRITE DESCRIPTION LINE
01196  M01S01091.config  +++|          WRITEC X2,(=C*          *)  WRITE BLANK LINE
01197  M01S01092.config  +++|
01198  M01S01093.config  +++|*         SEARCH FOR MASS STORAGE EQUIPMENTS.
01199  M01S01094.config  +++|
Line S01095 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01200  M02S01095.ns22000 ---|          SX5    B0
Line S01096 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01201  M02S01096.ns22000 ---| BCL1     SX5    X5+B1       NEXT EQUIPMENT
Line S01097 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01202  M02S01097.ns22000 ---|          SX6    X5-NMSD
Line S01098 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01203  M02S01098.ns22000 ---|          ZR     X6,BCL2     IF END OF MASS STORAGE EQUIPMENTS
Line S01099 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01204  M02S01099.ns22000 ---|          SA1    ESTB+X5
01205  M01S00024.ns22000 +++|          SX5    NOPE-1      INITIALIZE EST ORDINAL FOR SEARCH
01206  M01S00025.ns22000 +++| BCL1     SX5    X5+B1       INCREMENT EST ORDINAL
01207  M01S00026.ns22000 +++|          SA1    LMSO
01208  M01S00027.ns22000 +++|          IX1    X1-X5
01209  M01S00028.ns22000 +++|          ZR     X1,BCL2     IF END OF MASS STORAGE DEVICES
01210  M01S00029.ns22000 +++|          R=     X1,ESTE
01211  M01S00030.ns22000 +++|          IX1    X5*X1
01212  M01S00031.ns22000 +++|          SA1    ESTB+X1+EQDE  READ EST ENTRY
01213  M01S01100.config  +++|          PL     X1,BCL1     IF NOT MASS STORAGE
01214  M01S01101.config  +++|          RJ     RMT         READ MST
01215  M01S01102.config  +++|          RJ     BED         BUILD EQUIPMENT DISPLAY LINE
01216  M01S01103.config  +++|          WRITEC O,BEDB,BEDBL  WRITE DISPLAY LINE TO BUFFER
01217  M01S01104.config  +++|          EQ     BCL1        DISPLAY NEXT MS EQUIPMENT
01218  M01S01105.config  +++|
01219  M01S00045.241l630 +++|
01220  M01S01106.config  +++| BCLA     DATA   C*1  MASS STORAGE CONFIGURATION. 00/00/00. 00.00.00.*
01221  M01S01107.config  +++| BCLB     DATA   C*0 ORD  TYPE   CHANNELS   UNITS*
01222  M01S01108.config  +++| BED      SPACE  4,10
01223  M01S01109.config  +++|**        BED - BUILD EQUIPMENT DISPLAY LINE.
01224  M01S01110.config  +++|*
01225  M01S01111.config  +++|*         ENTRY  (X5) = EST ORDINAL.
01226  M01S01112.config  +++|*                (MSTB) = MST FOR EQUIPMENT.
01227  M01S01113.config  +++|*
01228  M01S01114.config  +++|*         EXIT   (BEDC) = DISPLAY LINE FOR EQUIPMENT.
01229  M01S01115.config  +++|*                (BEDB) = DISPLAY LINE PRECEDED BY BLANK WORD.
01230  M01S01116.config  +++|*
01231  M01S01117.config  +++|*         USES   A - 0, 1, 2, 3, 6.
01232  M01S01118.config  +++|*                X - 0, 1, 2, 3, 6.
01233  M01S01119.config  +++|*                B - 4, 5, 6, 7.
01234  M01S01120.config  +++|*
Line S01121 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01235  M02S01121.ns22000 ---|*         CALLS  S2L.
01236  M01S00032.ns22000 +++|*         CALLS  COD, S2L.
01237  M01S01122.config  +++|*
01238  M01S01123.config  +++|*         MACROS MOVE.
01239  M01S01124.config  +++|
01240  M01S01125.config  +++|
01241  M01S01126.config  +++| BED      SUBR               ENTRY/EXIT
Line S01127 Modification History
M01 (Added by) config
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
01242  M02S01127.241l630 ---|          MOVE   KLNL-1,BEDA,BEDC
01243  M01S00046.241l630 +++|          MOVE   BEDAL,BEDA,BEDC
Line S01128 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01244  M02S01128.ns22000 ---|          SX1    X5          CONVERT EQUIPMENT NUMBER
Line S00033 Modification History
M01 (Added by) ns22000
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
01245  M02S00033.241l630 ---|          SX1    X5          CONVERT EST ORDINAL
01246  M01S00047.241l630 +++|          SX1    X5+         CONVERT EST ORDINAL
01247  M01S01129.config  +++|          NZ     X5,BED1     IF NOT REDEFINITION EQUIPMENT
01248  M01S01130.config  +++|          SA1    B1RM+CUEQ
01249  M01S01131.config  +++| BED1     SA0    BEDC        DISPLAY WORD ADDRESS
Line S01132 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01250  M02S01132.ns22000 ---|          SB7    48          WORD POSITION
Line S01133 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01251  M02S01133.ns22000 ---|          RJ     S2L         SET TWO DIGITS IN LINE
Line S01134 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01252  M02S01134.ns22000 ---|          SA2    ESTB+X5     MERGE EQUIPMENT TYPE
01253  M01S00034.ns22000 +++|          SX1    X1+1000B    ENSURE THREE DIGITS
01254  M01S00035.ns22000 +++|          RJ     COD         CONVERT EST ORDINAL
01255  M01S00036.ns22000 +++|          MX1    -18
01256  M01S00037.ns22000 +++|          BX6    -X1*X6
01257  M01S00038.ns22000 +++|          SA2    A0
01258  M01S00039.ns22000 +++|          LX1    42          POSITION MASK
01259  M01S00040.ns22000 +++|          LX6    42
01260  M01S00041.ns22000 +++|          BX2    X1*X2
01261  M01S00042.ns22000 +++|          BX3    X2+X6       MERGE EST ORDINAL INTO LINE
01262  M01S00043.ns22000 +++|          R=     X2,ESTE
01263  M01S00044.ns22000 +++|          IX2    X5*X2
01264  M01S00045.ns22000 +++|          SA2    ESTB+X2+EQDE  MERGE EQUIPMENT TYPE
01265  M01S01135.config  +++|          LX2    -12
01266  M01S01136.config  +++|          MX0    -11
01267  M01S01137.config  +++|          BX1    -X0*X2
Line S01138 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01268  M02S01138.ns22000 ---|          SA3    A0          READ DISPLAY WORD
01269  M01S01139.config  +++|          LX0    24
01270  M01S01140.config  +++|          BX3    X0*X3
01271  M01S01141.config  +++|          LX1    24
01272  M01S01142.config  +++|          BX6    X1+X3
01273  M01S01143.config  +++|          SA6    A0
01274  M01S01144.config  +++|          SA3    MSTB+DDLL   MERGE UNIT COUNT
Line S01145 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01275  M02S01145.ns22000 ---|          MX0    -6
01276  M01S00046.ns22000 +++|          MX0    -3
01277  M01S01146.config  +++|          LX3    -48
01278  M01S01147.config  +++|          BX1    -X0*X3
01279  M01S01148.config  +++|          LX3    59-58+48
01280  M01S01149.config  +++|          NG     X3,BED2     IF NULL EQUIPMENT
01281  M01S01150.config  +++|          SX1    X1+B1
01282  M01S01151.config  +++| BED2     SX6    X1+2R-0
01283  M01S01152.config  +++|          MX0    -12
01284  M01S01153.config  +++|          SB5    X1          SAVE UNIT COUNT FOR UNIT LIST PROCESSING
01285  M01S01154.config  +++|          LX0    12
01286  M01S01155.config  +++|          LX6    12
01287  M01S01156.config  +++|          SA3    A0
01288  M01S01157.config  +++|          BX3    X0*X3
01289  M01S01158.config  +++|          BX6    X6+X3
01290  M01S01159.config  +++|          SA6    A0
01291  M01S01160.config  +++|          SA0    A0+B1       NEXT DISPLAY WORD
Line S01161 Modification History
M01 (Added by) config
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
01292  M02S01161.252l678 ---|          MX0    -5          MERGE CHANNELS IN DISPLAY LINE
Line S01162 Modification History
M01 (Added by) config
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
01293  M02S01162.252l678 ---|          LX2    -24
01294  M01S00004.252l678 +++|          MX0    -6          MERGE CHANNELS IN DISPLAY LINE
Line S00005 Modification History
M01 (Added by) 252l678
M02 (Updated by) ns2550
Seq #  *Modification Id* Act 
----------------------------+
01295  M02S00005.ns2550  ---|          LX2    -12
01296  M01S00009.ns2550  +++|          LX2    -24
01297  M01S01163.config  +++|          BX1    -X0*X2
01298  M01S01164.config  +++|          SB7    36
01299  M01S01165.config  +++|          RJ     S2L
Line S01166 Modification History
M01 (Added by) config
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01300  M02S01166.ns22000 ---|          SA1    ESTB+X5     CONVERT SECOND CHANNEL
01301  M01S00047.ns22000 +++|          R=     X1,ESTE
01302  M01S00048.ns22000 +++|          IX1    X5*X1
01303  M01S00049.ns22000 +++|          SA1    ESTB+X1+EQDE  CONVERT SECOND CHANNEL
Line S01167 Modification History
M01 (Added by) config
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
01304  M02S01167.252l678 ---|          LX1    -42
Line S01168 Modification History
M01 (Added by) config
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
01305  M02S01168.252l678 ---|          MX0    -5
Line S00006 Modification History
M01 (Added by) 252l678
M02 (Updated by) ns2550
Seq #  *Modification Id* Act 
----------------------------+
01306  M02S00006.ns2550  ---|          LX1    -36
01307  M01S00010.ns2550  +++|          LX1    -24
01308  M01S00007.252l678 +++|          MX0    -6
01309  M01S01169.config  +++|          BX1    -X0*X1
01310  M01S01170.config  +++|          ZR     X1,BED3     IF NO SECOND CHANNEL
01311  M01S01171.config  +++|          SB7    18
01312  M01S01172.config  +++|          RJ     S2L         SET SECOND CHANNEL IN DISPLAY WORD
01313  M01S01173.config  +++|          SA1    A0          INSERT COMMA
01314  M01S01174.config  +++|          SX6    1R,-1R
01315  M01S01175.config  +++|          LX6    30
01316  M01S01176.config  +++|          IX6    X1+X6
01317  M01S01177.config  +++|          SA6    A0
01318  M01S01178.config  +++| BED3     SA0    A0+B1       NEXT DISPLAY WORD
01319  M01S01179.config  +++|          SB7    36          INITIALIZE UNIT POSITION IN DISPLAY WORD
01320  M01S01180.config  +++|          SB6    B0          LOGICAL UNIT NUMBER
01321  M01S01181.config  +++| BED4     GE     B6,B5,BED5  IF END OF UNITS
01322  M01S01182.config  +++|          SA1    MSTB+DDLL
01323  M01S01183.config  +++|          SB4    B6+B6       COMPUTE SHIFT COUNT
01324  M01S01184.config  +++|          SB4    B4+B6
01325  M01S01185.config  +++|          SB4    B4+B4
01326  M01S01186.config  +++|          AX1    B4
01327  M01S01187.config  +++|          MX0    -6
01328  M01S01188.config  +++|          BX1    -X0*X1
01329  M01S01189.config  +++|          RJ     S2L         SET UNIT NUMBER IN DISPLAY LINE
01330  M01S01190.config  +++|          SB6    B6+B1       INCREMENT UNIT COUNT
01331  M01S01191.config  +++|          SB7    B7-18
01332  M01S01192.config  +++|          PL     B7,BED4     IF NOT NEW DISPLAY WORD
01333  M01S01193.config  +++|          SB7    B7+60
01334  M01S01194.config  +++|          SA0    A0+B1
01335  M01S01195.config  +++|          EQ     BED4        NEXT UNIT
01336  M01S01196.config  +++|
01337  M01S01197.config  +++| BED5     SA1    MSTB+ACGL   SET STATUSES IN DISPLAY LINE
01338  M01S01198.config  +++|          BX6    X6-X6
01339  M01S01199.config  +++|          LX1    59-11
01340  M01S01200.config  +++|          PL     X1,BED6     IF NOT DEVICE IDLE
01341  M01S01201.config  +++|          SX6    1RI&1R-
Line S01202 Modification History
M01 (Added by) config
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
01342  M02S01202.242l642 ---| BED6     SA1    MSTB+DDLL
01343  M01S00001.242l642 +++| BED6     SA1    MSTB+DALL
01344  M01S00002.242l642 +++|          AX1    56
01345  M01S01203.config  +++|          LX6    6
Line S01204 Modification History
M01 (Added by) config
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
01346  M02S01204.242l642 ---|          PL     X1,BED7     IF NOT SUSPEND STATUS
01347  M01S00003.242l642 +++|          SX2    3
01348  M01S00004.242l642 +++|          BX1    X2-X1
01349  M01S00005.242l642 +++|          NZ     X1,BED7     IF NOT DOWN
01350  M01S01205.config  +++|          SX6    X6+1RS&1R-
01351  M01S01206.config  +++| BED7     LX6    12
01352  M01S01207.config  +++|
01353  M01S01208.config  +++|*         MERGE STATUS BITS IN DISPLAY LINE.
01354  M01S01209.config  +++|
01355  M01S01210.config  +++|          SA1    BEDC+5
01356  M01S01211.config  +++|          LX6    18
01357  M01S01212.config  +++|          BX6    X1-X6
01358  M01S01213.config  +++|          SA6    A1
01359  M01S01214.config  +++|          EQ     BEDX        RETURN
01360  M01S01215.config  +++|
Line S01216 Modification History
M01 (Added by) config
M02 (Updated by) confi3
Seq #  *Modification Id* Act 
----------------------------+
01361  M02S01216.confi3  ---| BEDA     DATA   64H 1. DQ    CH00     UL=-- -- -- -- -- -- -- --   ST =
Line S00002 Modification History
M01 (Added by) confi3
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
01362  M02S00002.241l630 ---| BEDA     DATA   64L 1. DQ    CH00     UL=-- -- -- -- -- -- -- --   ST =
Line S01217 Modification History
M01 (Added by) config
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
01363  M02S01217.241l630 ---|, ----
01364  M01S00048.241l630 +++|
01365  M01S00049.241l630 +++| BEDA     DATA   L* 1. DQ    CH00     UL=-- -- -- -- -- -- -- --   ST =
01366  M01S00050.241l630 +++|,----*
01367  M01S00051.241l630 +++| BEDAL    EQU    *-BEDA
01368  M01S00052.241l630 +++|          ERRNZ  BEDAL+1-KLNL  LINE LENGTH ERROR
01369  M01S01218.config  +++| BEDB     DATA   10H            BLANK SPACING FOR OUTPUT
Line S01219 Modification History
M01 (Added by) config
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
01370  M02S01219.241l630 ---| BEDC     BSS    KLNL-1      DISPLAY LINE BUFFER
Line S01220 Modification History
M01 (Added by) config
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
01371  M02S01220.241l630 ---|          CON    0           END OF LINE FOR OUTPUT
01372  M01S00053.241l630 +++| BEDC     BSS    BEDAL       DISPLAY LINE BUFFER
01373  M01S01221.config  +++| BEDBL    EQU    *-BEDB      LENGTH OF OUTPUT LINE
01374  M01S01222.config  +++| CAE      SPACE  4,10
01375  M01S01223.config  +++|**        CAE - CLEAR ALL EQUIPMENT IDLE STATUS.
01376  M01S01224.config  +++|*
01377  M01S01225.config  +++|*         EXIT   (X5) = ERROR MESSAGE ADDRESS.
01378  M01S01226.config  +++|*                     = 0 IF NO EQUIPMENT FOUND.
01379  M01S01227.config  +++|*
01380  M01S01228.config  +++|*         CALLS  CLP, RRC.
01381  M01S01229.config  +++|
01382  M01S01230.config  +++|
01383  M01S01231.config  +++| CAE      SUBR               ENTRY/EXIT
01384  M01S01232.config  +++| CAE1     RJ     RRC
01385  M01S01233.config  +++|          ZR     X5,CAEX     IF NO EQUIPMENT FOUND
01386  M01S01234.config  +++|          RJ     CLP
01387  M01S01235.config  +++|          NZ     X5,CAEX     IF ERROR IN CLEAR REQUEST
01388  M01S01236.config  +++|          EQ     CAE1        CHECK FOR NEXT EQUIPMENT
01389  M01S01237.config  +++| CCH      SPACE  4,10
01390  M01S01238.config  +++|**        CCH - CHECK FOR MATCHING CHANNELS.
01391  M01S01239.config  +++|*
01392  M01S01240.config  +++|*         ENTRY  (X1) = EST TO CHECK.
Line S01241 Modification History
M01 (Added by) config
M02 (Updated by) confi1
Seq #  *Modification Id* Act 
----------------------------+
01393  M02S01241.confi1  ---|*                (CUEQ) = CURRENT EQUIPMENT.
01394  M01S00001.confi1  +++|*                (ESTD) = NEW EST ENTRY.
01395  M01S01242.config  +++|*
01396  M01S01243.config  +++|*         EXIT   (X1) = 0 IF NO CHANNEL MATCH.
01397  M01S01244.config  +++|*
01398  M01S01245.config  +++|*         USES   A - 2, 4.
01399  M01S01246.config  +++|*                X - 0, 1, 2, 3, 4.
01400  M01S01247.config  +++|*                B - 2.
01401  M01S01248.config  +++|
01402  M01S01249.config  +++|
01403  M01S01250.config  +++| CCH      SUBR               ENTRY/EXIT
Line S01251 Modification History
M01 (Added by) config
M02 (Updated by) confi1
Seq #  *Modification Id* Act 
----------------------------+
01404  M02S01251.confi1  ---|          SA2    B1RM+CUEQ   CURRENT EQUIPMENT
Line S01252 Modification History
M01 (Added by) config
M02 (Updated by) confi1
Seq #  *Modification Id* Act 
----------------------------+
01405  M02S01252.confi1  ---|          SA4    ESTB+X2
01406  M01S00002.confi1  +++|          SA4    B1RM+ESTD
Line S01253 Modification History
M01 (Added by) config
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
01407  M02S01253.252l678 ---|          LX1    -36
Line S01254 Modification History
M01 (Added by) config
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
01408  M02S01254.252l678 ---|          LX4    -36
Line S01255 Modification History
M01 (Added by) config
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
01409  M02S01255.252l678 ---|          MX0    -5
01410  M01S00008.252l678 +++|          LX1    -24
Line S00009 Modification History
M01 (Added by) 252l678
M02 (Updated by) ns2550
Seq #  *Modification Id* Act 
----------------------------+
01411  M02S00009.ns2550  ---|          LX4    -25
Line S00011 Modification History
M01 (Added by) ns2550
M02 (Updated by) confi1a
Seq #  *Modification Id* Act 
----------------------------+
01412  M02S00011.confi1a ---|          LX4    36
01413  M01S00003.confi1a +++|          LX4    24
01414  M01S00010.252l678 +++|          MX0    -6
Line S01256 Modification History
M01 (Added by) config
M02 (Updated by) confi1
Seq #  *Modification Id* Act 
----------------------------+
01415  M02S01256.confi1  ---|          BX2    -X0*X1      BUILD CHANNEL MASK FOR CURRENT EQUIPMENT
Line S00003 Modification History
M01 (Added by) confi1
M02 (Updated by) ns2550
Seq #  *Modification Id* Act 
----------------------------+
01416  M02S00003.ns2550  ---|          BX2    -X0*X1      BUILD CHANNEL MASK FOR NEW EQUIPMENT
01417  M01S00012.ns2550  +++|          BX3    -X0*X1      BUILD CHANNEL MASK FOR NEW EQUIPMENT
Line S01257 Modification History
M01 (Added by) config
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
01418  M02S01257.252l678 ---|          LX1    -6
01419  M01S00011.252l678 +++|          LX1    -12
Line S01258 Modification History
M01 (Added by) config
M02 (Updated by) ns2550
Seq #  *Modification Id* Act 
----------------------------+
01420  M02S01258.ns2550  ---|          BX3    -X0*X1
01421  M01S00013.ns2550  +++|          BX2    -X0*X1
01422  M01S01259.config  +++|          SX1    B1
01423  M01S01260.config  +++|          SB2    X2
01424  M01S01261.config  +++|          LX2    X1,B2
01425  M01S01262.config  +++|          SB2    X3
01426  M01S01263.config  +++|          ZR     X3,CCH1     IF NO SECOND CHANNEL
01427  M01S01264.config  +++|          LX3    X1,B2
01428  M01S01265.config  +++|          BX2    X2+X3
01429  M01S01266.config  +++| CCH1     BX3    -X0*X4      BUILD CHANNEL MASK FOR COMPARE EQUIPMENT
01430  M01S01267.config  +++|          SB2    X3
Line S01268 Modification History
M01 (Added by) config
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
01431  M02S01268.252l678 ---|          LX4    -6
Line S00012 Modification History
M01 (Added by) 252l678
M02 (Updated by) ns2550
Seq #  *Modification Id* Act 
----------------------------+
01432  M02S00012.ns2550  ---|          LX4    -12
01433  M01S00014.ns2550  +++|          LX4    12
01434  M01S01269.config  +++|          LX3    X1,B2
01435  M01S01270.config  +++|          BX4    -X0*X4
01436  M01S01271.config  +++|          SB2    X4
01437  M01S01272.config  +++|          ZR     X4,CCH2     IF NO SECOND CHANNEL
01438  M01S01273.config  +++|          LX4    X1,B2
01439  M01S01274.config  +++|          BX3    X3+X4
01440  M01S01275.config  +++| CCH2     BX1    X2*X3       NON-ZERO IF ANY CHANNEL MATCHES
01441  M01S01276.config  +++|          EQ     CCHX        RETURN
01442  M01S01277.config  +++| CHA      SPACE  4,10
01443  M01S01278.config  +++|**        CHA - CHECK CHANNEL AVAILABLE.
01444  M01S01279.config  +++|*
01445  M01S01280.config  +++|*         ENTRY  (X2) = CHANNEL NUMBER.
01446  M01S01281.config  +++|*                (NPPU) = NUMBER OF PP-S.
01447  M01S01282.config  +++|*
01448  M01S01283.config  +++|*         EXIT   (X5) = 0 IF CHANNEL AVAILABLE.
01449  M01S01284.config  +++|*                     = ERROR MESSAGE ADDRESS IF ERROR.
01450  M01S00015.confi4  +++|*                (X1) .LT. 0 IF CHANNEL AVAILABLE ((X5) = 0)) BUT DOWN.
01451  M01S00001.confi5  +++|*                (X6) = RESTORED TO ENTRY VALUE.
01452  M01S01285.config  +++|*
Line S01286 Modification History
M01 (Added by) config
M02 (Updated by) confi5
Seq #  *Modification Id* Act 
----------------------------+
01453  M02S01286.confi5  ---|*         USES   A - 1, 5, 7.
Line S01287 Modification History
M01 (Added by) config
M02 (Updated by) confi5
Seq #  *Modification Id* Act 
----------------------------+
01454  M02S01287.confi5  ---|*                X - 1, 3, 4, 5, 7.
01455  M01S00002.confi5  +++|*         USES   A - 1, 5, 6, 7.
01456  M01S00003.confi5  +++|*                X - 1, 3, 4, 5, 6, 7.
01457  M01S01288.config  +++|*                B - 2, 3.
01458  M01S01289.config  +++|*
01459  M01S01290.config  +++|*         MACROS GETLCW.
01460  M01S01291.config  +++|
01461  M01S01292.config  +++|
01462  M01S01293.config  +++| CHA4     SX5    ERCN        **** ERROR IN CHANNEL NUMBER.
01463  M01S01294.config  +++|
01464  M01S01295.config  +++| CHA      SUBR               ENTRY/EXIT
01465  M01S01296.config  +++|          SX7    13B         SET UPPER CHANNEL OF LOWER BANK
01466  M01S01297.config  +++|          IX1    X7-X2
01467  M01S01298.config  +++|          BX5    X5-X5       SET CHANNEL AVAILABLE
Line S01299 Modification History
M01 (Added by) config
M02 (Updated by) confi4
Seq #  *Modification Id* Act 
----------------------------+
01468  M02S01299.confi4  ---|          PL     X1,CHAX     IF CHANNEL IN LOWER BANK
01469  M01S00016.confi4  +++|          PL     X1,CHA0     IF CHANNEL IN LOWER BANK
01470  M01S01300.config  +++|          SA1    NPPU        NUMBER OF PP-S
01471  M01S01301.config  +++|          SX5    X1-11
01472  M01S01302.config  +++|          NG     X5,CHA4     IF ONLY CHANNELS 0 - 13
01473  M01S01303.config  +++|          SX3    20B         LOWER CHANNEL IN UPPER BANK
01474  M01S01304.config  +++|          SX4    33B         UPPER CHANNEL IN UPPER BANK
01475  M01S01305.config  +++|          IX5    X2-X3
01476  M01S01306.config  +++|          NG     X5,CHA4     IF NOT IN UPPER BANK
01477  M01S01307.config  +++|          IX5    X4-X2       CHECK UPPER LIMIT
01478  M01S01308.config  +++|          NG     X5,CHA4     IF ERROR
Line S01309 Modification History
M01 (Added by) config
M02 (Updated by) confi4
Seq #  *Modification Id* Act 
----------------------------+
01479  M02S01309.confi4  ---|          BX7    X2          SAVE CHANNEL NUMBER
01480  M01S00017.confi4  +++| CHA0     BX7    X2          SAVE CHANNEL NUMBER
01481  M01S01310.config  +++|          SA7    CHAA
01482  M01S00004.confi5  +++|          BX7    X6          PRESERVE X6
01483  M01S01311.config  +++|          GETLCW 1,CHTP,CHTB
01484  M01S01312.config  +++|          BX2    X1          FWA OF CHANNEL STATUS TABLE
Line S01313 Modification History
M01 (Added by) config
M02 (Updated by) confi2
Seq #  *Modification Id* Act 
----------------------------+
01485  M02S01313.confi2  ---|          LX2    0-11
01486  M01S00001.confi2  +++|          LX2    0-12        POSITION CHANNEL STATUS TABLE ADDRESS
01487  M01S00001.confi2a +++|          SX2    X2
01488  M01S01314.config  +++|          GETLCW CTALL,X2,CHTB
01489  M01S00005.confi5  +++|          BX6    X7          RESTORE X6
01490  M01S01315.config  +++|          SA5    CHAA        DETERMINE CHANNEL TABLE WORD INDEX
01491  M01S01316.config  +++|          SB2    B0
01492  M01S01317.config  +++| CHA1     SX5    X5-5        DIVIDE BY 5 LOOP
01493  M01S01318.config  +++|          NG     X5,CHA2     IF DIVIDE COMPLETE
01494  M01S01319.config  +++|          SB2    B2+B1
01495  M01S01320.config  +++|          EQ     CHA1        CONTINUE DIVIDE
01496  M01S01321.config  +++|
01497  M01S01322.config  +++| CHA2     SA1    CHTB+B2
01498  M01S01323.config  +++|          SB3    X5+6
01499  M01S01324.config  +++| CHA3     LX1    12          POSITION CHANNEL BYTE
01500  M01S01325.config  +++|          SB3    B3-B1
01501  M01S01326.config  +++|          NZ     B3,CHA3     IF CHANNEL NOT IN CORRECT POSITION
Line S01327 Modification History
M01 (Added by) config
M02 (Updated by) confi4
Seq #  *Modification Id* Act 
----------------------------+
01502  M02S01327.confi4  ---|          LX1    59-5
Line S01328 Modification History
M01 (Added by) config
M02 (Updated by) confi4
Seq #  *Modification Id* Act 
----------------------------+
01503  M02S01328.confi4  ---|          NG     X1,CHA4     IF SPECIFIED CHANNEL IS DOWN
Line S01329 Modification History
M01 (Added by) config
M02 (Updated by) confi4
Seq #  *Modification Id* Act 
----------------------------+
01504  M02S01329.confi4  ---|          SX5    B0
Proceed to Part 1
cdc/nos2.source/opl.opl871/deck/config.txt ยท Last modified: by 127.0.0.1