User Tools

Site Tools


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

Deck CONFIG Part 001

14 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
01500  M00S01325.config  +++|          SB3    B3-B1
01501  M00S01326.config  +++|          NZ     B3,CHA3     IF CHANNEL NOT IN CORRECT POSITION
Line S01327 Modification History
M01 (Removed by) confi4
Seq #  *Modification Id* Act 
----------------------------+
01502  M01S01327.confi4  ---|          LX1    59-5
01503  M01S01328.confi4  ---|          NG     X1,CHA4     IF SPECIFIED CHANNEL IS DOWN
01504  M01S01329.confi4  ---|          SX5    B0
Line S00018 Modification History
M01 (Added by) confi4
Seq #  *Modification Id* Act 
----------------------------+
01505  M01S00018.confi4  +++|          LX1    59-5        SET POSSIBLE CHANNEL DOWN FLAG
01506  M01S00019.confi4  +++|          SX5    B0          SET CHANNEL AVAILABLE
01507  M00S01330.config  +++|          EQ     CHAX        RETURN
01508  M00S01331.config  +++|
01509  M00S01332.config  +++|
01510  M00S01333.config  +++| CHAA     CON    0           TEMPORARY CHANNEL STORAGE BUFFER
01511  M00S01334.config  +++| CLD      SPACE  4,20
01512  M00S01335.config  +++|**        CLD - CHECK LEGALITY OF DEVICE.
01513  M00S01336.config  +++|*         DEVICE MUST BE MASS STORAGE, IDLED, AND
01514  M00S01337.config  +++|*         FIRST IN CHAIN IF LINKED DEVICE.
01515  M00S01338.config  +++|*
01516  M00S01339.config  +++|*         ENTRY  (CUEQ) = CURRENT EQUIPMENT.
01517  M00S01340.config  +++|*
01518  M00S01341.config  +++|*         EXIT   (X5) = ERROR MESSAGE ADDRESS.
01519  M00S01342.config  +++|*                     = 0 IF LEGAL DEVICE.
01520  M00S01343.config  +++|*
01521  M00S01344.config  +++|*         USES   A - 1, 5.
01522  M00S01345.config  +++|*                X - 1, 5.
01523  M00S01346.config  +++|*
01524  M00S01347.config  +++|*         CALLS  RMT.
01525  M00S01348.config  +++|
01526  M00S01349.config  +++|
01527  M00S01350.config  +++| CLD      SUBR               ENTRY/EXIT
01528  M00S01351.config  +++|          SA5    B1RM+CUEQ
Line S01352 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01529  M01S01352.ns22000 ---|          SA1    ESTB+X5
Line S00050 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01530  M01S00050.ns22000 +++|          R=     X1,ESTE
01531  M01S00051.ns22000 +++|          IX1    X5*X1
01532  M01S00052.ns22000 +++|          SA1    ESTB+X1+EQDE  READ EST ENTRY
01533  M00S01353.config  +++|          PL     X1,CLD1     IF NOT MASS STORAGE
01534  M00S01354.config  +++|          RJ     RMT         READ MST TO *MSTB*
01535  M00S01355.config  +++|          SA1    MSTB+ACGL   CHECK FOR IDLED DEVICE
01536  M00S01356.config  +++|          LX1    59-11
01537  M00S01357.config  +++|          PL     X1,CLD1     IF NOT IDLED DEVICE
01538  M00S01358.config  +++|          SA1    MSTB+STLL
Line S01359 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01539  M01S01359.ns22000 ---|          SX5    7704B
Line S00053 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01540  M01S00053.ns22000 +++|          SX5    7774B       MASK FOR CHAINED EST ORDINAL, FLAG
01541  M00S01360.config  +++|          BX5    X5*X1
01542  M00S01361.config  +++|          ZR     X5,CLDX     IF LEGAL DEVICE
01543  M00S01362.config  +++|          SX5    ERDF        **** DEVICE NOT FIRST IN CHAIN.
01544  M00S01363.config  +++|          EQ     CLDX        RETURN
01545  M00S01364.config  +++|
Line S01365 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01546  M01S01365.ns22000 ---| CLD1     SX5    EREN        **** ERROR IN EQUIPMENT NUMBER.
Line S00054 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01547  M01S00054.ns22000 +++| CLD1     SX5    EREN        **** ERROR IN EST ORDINAL.
01548  M00S01366.config  +++|          EQ     CLDX        RETURN
01549  M00S01367.config  +++| CRM      SPACE  4,10
01550  M00S01368.config  +++|**        CRM - CALL *1RM* TO PROCESSES FUNCTION.
01551  M00S01369.config  +++|*
01552  M00S01370.config  +++|*         ENTRY  (X6) = FUNCTION REQUEST.
01553  M00S01371.config  +++|*                (TPAR) = CURRENT PARAMETER LEGALITY TABLE.
01554  M00S01372.config  +++|*                (CUEQ) = EQUIPMENT IF APPLICABLE TO FUNCTION.
01555  M00S01373.config  +++|*                (URCD) = UNITS TO BE RECONFIGURED.
01556  M00S01374.config  +++|*                (ESTD) = EST WITH RECONFIGURATION CHANGES.
01557  M00S01375.config  +++|*                (MSTD) = MST WITH RECONFIGURATION CHANGES.
01558  M00S01376.config  +++|*
01559  M00S01377.config  +++|*         USES   A - 1, 2, 5, 6, 7.
01560  M00S01378.config  +++|*                X - 1, 2, 5, 6, 7.
01561  M00S01379.config  +++|*                B - 6.
01562  M00S01380.config  +++|*
01563  M00S01381.config  +++|*         CALLS  ASC, IDE, ISB, SPT, UKD.
01564  M00S01382.config  +++|*
01565  M00S01383.config  +++|*         MACROS RECALL, SYSTEM.
01566  M00S01384.config  +++|
01567  M00S01385.config  +++|
01568  M00S01386.config  +++| CRM3     SA1    CRMB        RESTORE PARAMETER LIST
01569  M00S01387.config  +++|          BX7    X1
01570  M00S01388.config  +++|          SA7    B1RM+TPAR
01571  M00S01389.config  +++|          RJ     UKD         UPDATE K-DISPLAY
01572  M00S01390.config  +++|
01573  M00S01391.config  +++| CRM      SUBR               ENTRY/EXIT
01574  M00S01392.config  +++|          SA2    B1RM+TPAR   SAVE LEGAL PARAMETERS
01575  M00S01393.config  +++|          SA1    B1RM+RFNB   CHECK FOR *1RM* ACTIVE
01576  M00S01394.config  +++|          BX7    X2
01577  M00S01395.config  +++|          SA6    A1
01578  M00S01396.config  +++|          SA7    CRMB
01579  M00S01397.config  +++|          BX6    X6-X6       CLEAR LEGAL PARAMETERS
01580  M00S01398.config  +++|          SA6    A2
01581  M00S01399.config  +++|          SA6    B1RM+TCOM   CLEAR COMMAND PASSING AREA
01582  M00S01400.config  +++|          NZ     X1,CRM1     IF *1RM* ACTIVE
01583  M00S01401.config  +++|          SA1    CRMC
01584  M00S01402.config  +++|          BX6    X1
01585  M00S01403.config  +++|          SA6    CRMA
01586  M00S01404.config  +++|          SYSTEM SPC,R,CRMA
01587  M00S01405.config  +++| CRM1     RECALL
01588  M00S01406.config  +++|          SA1    B1RM+RFNB
01589  M00S01407.config  +++|          LX1    59-0
01590  M00S01408.config  +++|          PL     X1,CRM3     IF FUNCTION COMPLETE
01591  M00S01409.config  +++|          RJ     UKD         UPDATE K-DISPLAY
01592  M00S01410.config  +++|          SA5    KBUF        CHECK FOR INPUT ENTERED
01593  M00S01411.config  +++|          ZR     X5,CRM1     IF NO INPUT DATA
01594  M00S01412.config  +++|          RJ     ISB         INPUT STRING BUFFER
01595  M00S01413.config  +++|          SX7    B0          ASSEMBLE KEYWORD
01596  M00S01414.config  +++|          RJ     ASC
01597  M00S01415.config  +++|          ZR     X4,CRM1     IF NO DATA ASSEMBLED
01598  M00S01416.config  +++|          RJ     SPT         SEARCH PARAMETER TABLE
01599  M00S01417.config  +++|          ZR     X5,CRM2     IF NO ERROR
01600  M00S01418.config  +++|          RJ     IDE         PROCESS ERROR
01601  M00S01419.config  +++|          EQ     CRM1        RECHECK FUNCTION
01602  M00S01420.config  +++|
01603  M00S01421.config  +++| CRM2     SB6    A3-TKEY     PASS PARAMETER TO *1RM*
01604  M00S01422.config  +++|          MX6    1
01605  M00S01423.config  +++|          LX6    B6
01606  M00S01424.config  +++|          SA6    B1RM+TCOM
01607  M00S01425.config  +++|          EQ     CRM1        CHECK FOR FUNCTION COMPLETE
01608  M00S01426.config  +++|
Line S00054 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
01609  M01S00054.241l630 +++|
01610  M00S01427.config  +++| CRMA     CON    0           *1RM* CALL BUFFER
01611  M00S01428.config  +++| CRMB     CON    0           PARAMETER TABLE SAVE AREA
01612  M00S01429.config  +++| CRMC     VFD    18/0L1RM,6/,18/MSG1,18/B1RM  *1RM* CALL
Line S00055 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01613  M01S00055.ns22000 +++| EST      SPACE  4,10
01614  M01S00056.ns22000 +++|**        EST - READ EST INTO *ESTB*.
01615  M01S00057.ns22000 +++|*
01616  M01S00058.ns22000 +++|*         ENTRY  NONE.
01617  M01S00059.ns22000 +++|*
01618  M01S00060.ns22000 +++|*         EXIT   *ESTB* = EST ENTRIES (THROUGH LAST MASS STORAGE + 1).
01619  M01S00061.ns22000 +++|*                (LMSO) = LAST MASS STORAGE EST ORDINAL + 1.
01620  M01S00062.ns22000 +++|*
01621  M01S00063.ns22000 +++|*         CALLS  RSB=.
01622  M01S00064.ns22000 +++|*
01623  M01S00065.ns22000 +++|*         USES   X - 1, 2, 3, 4, 6, 7.
01624  M01S00066.ns22000 +++|*                A - 2, 6, 7.
01625  M01S00067.ns22000 +++|*                B - NONE.
01626  M01S00068.ns22000 +++|
01627  M01S00069.ns22000 +++|
01628  M01S00070.ns22000 +++| EST      SUBR               ENTRY/EXIT
01629  M01S00071.ns22000 +++|          SA2    ESTA        SET *COMCRSB* ENTRY CONDITIONS
01630  M01S00072.ns22000 +++|          SX1    ESTB        SET ADDRESS TO TRANSFER TO
01631  M01S00073.ns22000 +++|          MX3    -12
01632  M01S00074.ns22000 +++|          AX2    12
01633  M01S00075.ns22000 +++|          BX3    -X3*X2
01634  M01S00076.ns22000 +++|          SX7    X3
01635  M01S00077.ns22000 +++|          AX2    24          SET ADDRESS TO TRANSFER FROM
01636  M01S00078.ns22000 +++|          R=     X6,ESTE
01637  M01S00079.ns22000 +++|          IX3    X3*X6       SET WORD COUNT
01638  M01S00080.ns22000 +++|          SX4    B0          SET SUBSYSTEM (= *CMR*)
01639  M01S00081.ns22000 +++|          MX6    1
01640  M01S00082.ns22000 +++|          SA6    X1
01641  M01S00083.ns22000 +++|          SA7    LMSO        SAVE EST SIZE TO SEARCH
01642  M01S00084.ns22000 +++|          RJ     RSB=        READ EST
01643  M01S00085.ns22000 +++|          EQ     ESTX        RETURN
01644  M00S01430.config  +++| FUM      SPACE  4,20
01645  M00S01431.config  +++|**        FUM - FIND REPLACEMENT UNIT IN MST-S.
01646  M00S01432.config  +++|*
01647  M00S01433.config  +++|*         ENTRY  (CUEQ) = CURRENT EQUIPMENT.
01648  M00S01434.config  +++|*
01649  M00S01435.config  +++|*         EXIT   (X5) = ERROR MESSAGE ADDRESS.
01650  M00S01436.config  +++|*                (B5) = UNIT POSITION IF UNIT IN MST.
01651  M00S01437.config  +++|*
01652  M00S01438.config  +++|*         USES   A - 1, 2, 4.
01653  M00S01439.config  +++|*                X - 0, 1, 2, 3, 4, 5, 6, 7.
01654  M00S01440.config  +++|*                B - 2, 3, 4, 5, 6.
01655  M00S01441.config  +++|*
01656  M00S01442.config  +++|*         CALLS  CCH, SML.
01657  M00S01443.config  +++|
01658  M00S01444.config  +++|
01659  M00S01445.config  +++| FUM6     SX5    ERSI        **** EQUIPMENT STATUS INCORRECT.
01660  M00S01446.config  +++|          EQ     FUMX        RETURN
01661  M00S01447.config  +++|
01662  M00S01448.config  +++| FUM7     SX5    ERIU        **** INTRODUCED UNIT IN USE.
01663  M00S01449.config  +++|
01664  M00S01450.config  +++| FUM      SUBR               ENTRY/EXIT
01665  M00S01451.config  +++|          SA1    B1RM+ESTD   CHECK FOR SHARED DEVICES
01666  M00S01452.config  +++|          SX5    B0
01667  M00S01453.config  +++|          LX1    59-57
01668  M00S01454.config  +++|          PL     X1,FUM1     IF DEVICE NOT SHARED
01669  M00S01455.config  +++|          SA2    MSTC+ACGL   CHECK FOR GLOBAL UNLOAD
01670  M00S01456.config  +++|          LX2    59-5
01671  M00S01457.config  +++|          NG     X2,FUM3     IF GLOBAL UNLOAD SET
01672  M00S01458.config  +++|          EQ     FUM2        CHECK UNIT NUMBER
01673  M00S01459.config  +++|
01674  M00S01460.config  +++| FUM1     LX1    57-54
01675  M00S01461.config  +++|          NG     X1,FUM3     IF NON-SHARED DEVICE UNAVAILABLE
01676  M00S01462.config  +++| FUM2     SA1    MSTC+DDLL   CHECK FOR UNIT NUMBER CHANGE
01677  M00S01463.config  +++|          SA2    B1RM+MSTD+DDLL
01678  M00S01464.config  +++|          BX1    X1-X2
Line S01465 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01679  M01S01465.ns22000 ---|          MX0    -11
Line S00086 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01680  M01S00086.ns22000 +++|          MX0    -3
01681  M00S01466.config  +++|          AX1    48
01682  M00S01467.config  +++|          BX1    -X0*X1
01683  M00S01468.config  +++|          NZ     X1,FUM6     IF CHANGE IN NUMBER OF UNITS
01684  M00S01469.config  +++| FUM3     RJ     SML         SEARCH FOR MASS STORAGE, *LDAM* DEVICES
01685  M00S01470.config  +++|          ZR     X5,FUMX     IF ALL MS EQUIPMENTS CHECKED
01686  M00S01471.config  +++|
01687  M00S01472.config  +++|*         CHECK THAT CHANNELS ARE THE SAME.
01688  M00S01473.config  +++|
Line S01474 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01689  M01S01474.ns22000 ---|          SA1    ESTB+X5     EQUIPMENT NUMBER
Line S00087 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01690  M01S00087.ns22000 +++|          R=     X1,ESTE
01691  M01S00088.ns22000 +++|          IX1    X5*X1
01692  M01S00089.ns22000 +++|          SA1    ESTB+X1+EQDE  READ EST ENTRY
01693  M00S01475.config  +++|          RJ     CCH         COMPARE CHANNELS
01694  M00S01476.config  +++|          ZR     X1,FUM3     IF NO CHANNEL MATCHES
01695  M00S01477.config  +++|          SA1    MSTB+STLL
01696  M00S01478.config  +++|          LX1    59-2
01697  M00S01479.config  +++|          NG     X1,FUM3     IF DEVICE IN USE IN CHAIN
01698  M00S01480.config  +++|
01699  M00S01481.config  +++|*         SEARCH FOR MATCHING UNIT NUMBER.
01700  M00S01482.config  +++|
01701  M00S01483.config  +++|          SA2    B1RM+MSTD+DDLL
01702  M00S01484.config  +++|          SA4    MSTB+DDLL
01703  M00S01485.config  +++|          BX3    X4+X2
01704  M00S01486.config  +++|          LX3    59-58
Line S01487 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
01705  M01S01487.242l642 ---|          NG     X4,FUM3     IF SUSPEND STATUS SET
Line S00006 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
01706  M01S00006.242l642 +++|          SA1    MSTB+DALL
01707  M01S00007.242l642 +++|          SX6    3
01708  M01S00008.242l642 +++|          AX1    56
01709  M01S00009.242l642 +++|          BX1    X6-X1
01710  M01S00010.242l642 +++|          ZR     X1,FUM3     IF DEVICE DOWN
01711  M00S01488.config  +++|          NG     X3,FUM3     IF EITHER EQUIPMENT IS NULL
01712  M00S01489.config  +++|          LX2    12          EXTRACT CURRENT UNIT COUNT
Line S01490 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01713  M01S01490.ns22000 ---|          MX6    -6
Line S00090 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01714  M01S00090.ns22000 +++|          MX6    -3
01715  M00S01491.config  +++|          LX4    12
01716  M00S01492.config  +++|          BX1    -X6*X4      EXTRACT UNIT COUNT FOR COMPARISON UNIT
01717  M00S01493.config  +++|          SB5    B0          INITIALIZE UNIT POSITION IN ERROR
01718  M00S01494.config  +++|          LX4    -12
01719  M00S01495.config  +++|          BX7    -X6*X2
01720  M00S01496.config  +++|          LX2    -12
01721  M00S01497.config  +++|          SB2    B0          INITIALIZE COMPARISON LOOP
Line S00091 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01722  M01S00091.ns22000 +++|          MX6    -6          SET UNIT MASK
01723  M00S01498.config  +++|          SB4    6
01724  M00S01499.config  +++| FUM4     SB3    B0
01725  M00S01500.config  +++|          AX0    X2,B2       EXTRACT UNIT TO CHECK
01726  M00S01501.config  +++|          SB6    X1          SET COMPARISON UNIT COUNT
01727  M00S01502.config  +++|          BX0    -X6*X0
01728  M00S01503.config  +++| FUM5     AX3    X4,B3       POSITION COMPARISON EQUIPMENT UNIT
01729  M00S01504.config  +++|          BX3    -X6*X3
01730  M00S01505.config  +++|          SB3    B3+B4
01731  M00S01506.config  +++|          BX3    X3-X0
01732  M00S01507.config  +++|          ZR     X3,FUM7     IF UNIT NUMBER MATCH
01733  M00S01508.config  +++|          SB6    B6-B1
01734  M00S01509.config  +++|          PL     B6,FUM5     IF MORE UNITS TO CHECK
01735  M00S01510.config  +++|          SX7    X7-1
01736  M00S01511.config  +++|          PL     X7,FUM4     IF MORE UNITS TO CHECK
01737  M00S01512.config  +++|          EQ     FUM3        CHECK NEXT EQUIPMENT
01738  M00S01513.config  +++| GLC      SPACE  4,10
01739  M00S01514.config  +++|**        GLC - GET LOW CORE WORDS.
01740  M00S01515.config  +++|*
01741  M00S01516.config  +++|*         ENTRY  (X1) = WORD COUNT.
01742  M00S01517.config  +++|*                (X2) = LOW CORE ADDRESS.
01743  M00S01518.config  +++|*                (X3) = ADDRESS TO STORE WORDS.
01744  M00S01519.config  +++|*
01745  M00S01520.config  +++|*         EXIT   (X1) = FIRST LOW CORE WORD.
01746  M00S01521.config  +++|*                LOW CORE WORD(S) RETURNED.
01747  M00S01522.config  +++|*
01748  M00S01523.config  +++|*         USES   A - 1, 6.
01749  M00S01524.config  +++|*                X - 1, 2, 6.
01750  M00S01525.config  +++|*
01751  M00S01526.config  +++|*         MACROS SYSTEM.
01752  M00S01527.config  +++|
01753  M00S01528.config  +++|
01754  M00S01529.config  +++| GLC      SUBR               ENTRY/EXIT
01755  M00S01530.config  +++|          MX6    42
01756  M00S01531.config  +++|          LX1    36
01757  M00S01532.config  +++|          SA6    X3
01758  M00S01533.config  +++|          LX2    18
01759  M00S01534.config  +++|          BX6    X1+X3
01760  M00S01535.config  +++|          BX6    X2+X6
01761  M00S01536.config  +++|          SA6    GLCA
01762  M00S01537.config  +++|          SYSTEM RSB,,A6
01763  M00S01538.config  +++|          SA1    X3
01764  M00S01539.config  +++|          EQ     GLCX        RETURN
01765  M00S01540.config  +++|
Line S00055 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
01766  M01S00055.241l630 +++|
01767  M00S01541.config  +++| GLCA     CON    0           *RSB* STATUS WORD
01768  M00S01542.config  +++| IDE      SPACE  4,10
01769  M00S01543.config  +++|**        IDE - ISSUE INPUT DATA ERROR MESSAGE TO K-DISPLAY.
01770  M00S01544.config  +++|*
01771  M00S01545.config  +++|*         ENTRY  (SLMP) = STRING BUFFER LIMIT POINTER.
01772  M00S01546.config  +++|*                (X5) = ADDRESS OF ERROR MESSAGE.
01773  M00S01547.config  +++|*
01774  M00S01548.config  +++|*         EXIT   ERROR MESSAGE SET IN K-DISPLAY.
01775  M00S01549.config  +++|*                STRING BUFFER SET EMPTY.
01776  M00S01550.config  +++|*
01777  M00S01551.config  +++|*         USES   A - 5, 6.
01778  M00S01552.config  +++|*                X - 5, 6.
01779  M00S01553.config  +++|*
01780  M00S01554.config  +++|*         MACROS MOVE, WRITEC.
01781  M00S01555.config  +++|
01782  M00S01556.config  +++|
01783  M00S01557.config  +++| IDE      SUBR               ENTRY/EXIT
01784  M00S01558.config  +++|          MOVE   6,ERR+X5,MSG1  MOVE MESSAGE TO BUFFER
01785  M00S01559.config  +++|          SA5    SLMP        SET BUFFER EMPTY
01786  M00S01560.config  +++|          BX6    X5
01787  M00S01561.config  +++|          SA6    SPTR
01788  M00S01562.config  +++|          WRITEC O,MSG1,6    RECORD ERROR ON OUTPUT FILE
01789  M00S01563.config  +++|          EQ     IDEX        RETURN
01790  M00S01564.config  +++| ISB      SPACE  4,20
01791  M00S01565.config  +++|**        ISB - INPUT STRING BUFFER.
01792  M00S01566.config  +++|*
01793  M00S01567.config  +++|*         ENTRY  (SPTR) = STRING BUFFER ADDRESS.
01794  M00S01568.config  +++|*                (SLMP) = STRING BUFFER LIMIT.
01795  M00S01569.config  +++|*
01796  M00S01570.config  +++|*         EXIT   (SPTR) = UPDATED STRING BUFFER.
01797  M00S01571.config  +++|*                (SLMP) = LWA+1 OF STRING BUFFER.
01798  M00S01572.config  +++|*
01799  M00S01573.config  +++|*         USES   A - 4, 5, 6, 7.
01800  M00S01574.config  +++|*                X - 4, 5, 6, 7.
01801  M00S01575.config  +++|*                B - 2.
01802  M00S01576.config  +++|*
01803  M00S01577.config  +++|*         CALLS  USB.
01804  M00S01578.config  +++|*
01805  M00S01579.config  +++|*         MACROS MESSAGE, MOVE, RECALL, WRITEC.
01806  M00S01580.config  +++|
01807  M00S01581.config  +++|
01808  M00S01582.config  +++|*         MOVE INPUT TO STRING BUFFER.
01809  M00S01583.config  +++|
01810  M00S01584.config  +++| ISB2     MOVE   6,A5,MSG2   MOVE INPUT TO DISPLAY
01811  M00S01585.config  +++|          MOVE   6,ERR+ERBL,MSG1  CLEAR MESSAGE LINE
01812  M00S01586.config  +++|          MESSAGE  A5,3,R    ENTER DIRECTIVES IN CONTROL POINT DAYFILE
01813  M00S01587.config  +++|          WRITEC O,KBUF-1,6  RECORD INPUT DIRECTIVES ON OUTPUT
01814  M00S01588.config  +++|          SB2    A5          MOVE INPUT TO STRING BUFFER
01815  M00S01589.config  +++|          RJ     USB
01816  M00S01590.config  +++|          SX6    X6+B1       SET LWA+1 OF CHARACTER STRING
01817  M00S01591.config  +++|          SA6    SLMP
01818  M00S01592.config  +++|          SX7    B6-B1
01819  M00S01593.config  +++|          BX6    X6-X6       CLEAR INPUT BUFFER
01820  M00S01594.config  +++|          SA6    A5
01821  M00S01595.config  +++|          SA7    SPTR
01822  M00S01596.config  +++|
01823  M00S01597.config  +++| ISB      SUBR               ENTRY/EXIT
01824  M00S01598.config  +++|          SA4    SPTR
01825  M00S01599.config  +++|          SA5    SLMP
01826  M00S01600.config  +++|          BX7    X5-X4
01827  M00S01601.config  +++|          NZ     X7,ISBX     IF BUFFER NOT EMPTY
01828  M00S01602.config  +++|
01829  M00S01603.config  +++|*         WAIT FOR INPUT.
01830  M00S01604.config  +++|
01831  M00S01605.config  +++| ISB1     SA5    KBUF
01832  M00S01606.config  +++|          NZ     X5,ISB2     IF INPUT ENTERED
01833  M00S01607.config  +++|          RECALL
01834  M00S01608.config  +++|          EQ     ISB1        LOOP FOR INPUT
01835  M00S01609.config  +++|
Line S00056 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
01836  M01S00056.241l630 +++|
01837  M00S01610.config  +++| USBB     BSS    NSCI+10     STRING BUFFER
Line S00057 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
01838  M01S00057.241l630 +++| MPL      SPACE  4,15
01839  M01S00058.241l630 +++|**        MPL - MOVE AND POSITION LINE.
01840  M01S00059.241l630 +++|*
01841  M01S00060.241l630 +++|*         *MPL* IS USED TO MOVE A DISPLAY LINE TO A K-DISPLAY
01842  M01S00061.241l630 +++|*         BUFFER WHICH HAS THE X,Y COORDINATES IN THE FIRST 24 BITS
01843  M01S00062.241l630 +++|*         OF EACH LINE.
01844  M01S00063.241l630 +++|*
01845  M01S00064.241l630 +++|*         ENTRY  (X1) = WORD COUNT OF BLOCK TO BE MOVED.
01846  M01S00065.241l630 +++|*                (X2) = ADDRESS OF FIRST WORD OF SOURCE.
01847  M01S00066.241l630 +++|*                (X3) = ADDRESS OF FIRST WORD OF DESTINATION.
01848  M01S00067.241l630 +++|*
01849  M01S00068.241l630 +++|*         USES   X - 1, 2, 3, 4, 6, 7.
01850  M01S00069.241l630 +++|*                A - 2, 4, 6.
01851  M01S00070.241l630 +++|
01852  M01S00071.241l630 +++|
01853  M01S00072.241l630 +++| MPL      SUBR               ENTRY/EXIT
01854  M01S00073.241l630 +++|          SA4    X3          GET X,Y COORDINATES FROM DESTINATION
01855  M01S00074.241l630 +++|          MX7    24
01856  M01S00075.241l630 +++|          SA2    X2+         GET FIRST WORD FROM ORIGIN
01857  M01S00076.241l630 +++| MPL1     BX4    X7*X4
01858  M01S00077.241l630 +++|          LX2    36
01859  M01S00078.241l630 +++|          BX6    -X7*X2
01860  M01S00079.241l630 +++|          BX6    X6+X4
01861  M01S00080.241l630 +++|          SX1    X1-1        DECREMENT COUNT
01862  M01S00081.241l630 +++|          SA6    X3          STORE WORD IN DESTINATION
01863  M01S00082.241l630 +++|          BX4    X2          PARTIAL WORD FROM SOURCE
01864  M01S00083.241l630 +++|          SX3    X3+B1       ADDRESS OF NEXT DESTINATION LOCATION
01865  M01S00084.241l630 +++|          SA2    A2+B1       GET NEXT FULL SOURCE WORD
01866  M01S00085.241l630 +++|          NZ     X1,MPL1     IF MORE TO MOVE
01867  M01S00086.241l630 +++|          BX6    X7*X4
01868  M01S00087.241l630 +++|          ZR     X6,MPLX     IF LAST PARTIAL WORD IS EMPTY
01869  M01S00088.241l630 +++|          SA6    X3          STORE LAST PARTIAL WORD
01870  M01S00089.241l630 +++|          EQ     MPLX        RETURN
01871  M00S01611.config  +++| RMT      SPACE  4,10
01872  M00S01612.config  +++|**        RMT - READ MST FOR EQUIPMENT.
01873  M00S01613.config  +++|*
Line S01614 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01874  M01S01614.ns22000 ---|*         ENTRY  (X5) = EQUIPMENT NUMBER.
Line S00092 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01875  M01S00092.ns22000 +++|*         ENTRY  (X5) = EST ORDINAL.
01876  M00S01615.config  +++|*
01877  M00S01616.config  +++|*         EXIT   (MSTB) = MST FOR EQUIPMENT.
01878  M00S01617.config  +++|*                MST READ INTO SPECIFIED BUFFER.
01879  M00S01618.config  +++|*
01880  M00S01619.config  +++|*         USES   A - 1.
01881  M00S01620.config  +++|*                X - 1, 6.
01882  M00S01621.config  +++|*
01883  M00S01622.config  +++|*         MACROS GETLCW.
01884  M00S01623.config  +++|
01885  M00S01624.config  +++|
01886  M00S01625.config  +++| RMT      SUBR               ENTRY/EXIT
Line S01626 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01887  M01S01626.ns22000 ---|          SA1    ESTB+X5     READ MST ADDRESS
Line S00093 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01888  M01S00093.ns22000 +++|          R=     X1,ESTE
01889  M01S00094.ns22000 +++|          IX1    X5*X1
01890  M01S00095.ns22000 +++|          SA1    ESTB+X1+EQDE  READ EST ENTRY FOR MST ADDRESS
01891  M00S01627.config  +++|          MX6    -12
01892  M00S01628.config  +++|          BX6    -X6*X1
01893  M00S01629.config  +++|          LX6    3
01894  M00S01630.config  +++|          GETLCW MSTL,X6,MSTB
01895  M00S01631.config  +++|          EQ     RMTX        RETURN
01896  M00S01632.config  +++| SEQ      SPACE  4,10
01897  M00S01633.config  +++|**        SEQ - SET EQUIPMENT PARAMETERS IN DISPLAY.
01898  M00S01634.config  +++|*
01899  M00S01635.config  +++|*         ENTRY  (CUEQ) = CURRENT EQUIPMENT.
01900  M00S01636.config  +++|*                (MSTC) = MST FOR CURRENT EQUIPMENT.
01901  M00S01637.config  +++|*                (MSTD) = CHANGED MST PARAMETERS.
01902  M00S01638.config  +++|*
01903  M00S01639.config  +++|*         EXIT   PARAMETERS SET IN DISPLAY BUFFER.
01904  M00S01640.config  +++|*
01905  M00S01641.config  +++|*         USES   A - 0, 1, 4, 5, 6.
01906  M00S01642.config  +++|*                X - 0, 1, 3, 4, 5, 6, 7.
01907  M00S01643.config  +++|*
01908  M00S01644.config  +++|*         CALLS  BED, RMT.
01909  M00S01645.config  +++|*
Line S01646 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
01910  M01S01646.241l630 ---|*         MACROS MOVE.
Line S00090 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
01911  M01S00090.241l630 +++|*         MACROS MOVE, MOVEDL.
01912  M00S01647.config  +++|
01913  M00S01648.config  +++|
Line S01649 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
01914  M01S01649.241l630 ---| SEQ3     MOVE   KLNL-1,NONE,DSCC  CLEAR CURRENT EQUIPMENT PARAMETERS
01915  M01S01650.241l630 ---|          MOVE   KLNL-1,BLKL,DSRC
01916  M01S01651.241l630 ---|          MOVE   KLNL-1,BLKL,DSAB
Line S00091 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
01917  M01S00091.241l630 +++| SEQ3     MOVEDL BEDAL,NONE,DSCC  CLEAR CURRRENT EQUIP CONFIGURATION
01918  M01S00092.241l630 +++|          MOVEDL BEDAL,BLKL,DSRC  CLEAR REQUESTED EQUIP CONFIGURATION
01919  M01S00093.241l630 +++|          MOVEDL SEQAL,BLKL,DSAB  CLEAR CHANGED UNITS LINE
01920  M00S01652.config  +++|
01921  M00S01653.config  +++| SEQ      SUBR               ENTRY/EXIT
01922  M00S01654.config  +++|          SA5    B1RM+CUEQ
01923  M00S01655.config  +++|          ZR     X5,SEQ3     IF NO EQUIPMENT PRESENT
01924  M00S01656.config  +++|          RJ     RMT         READ MST
01925  M00S01657.config  +++|          RJ     BED         BUILD DISPLAY LINE
Line S01658 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
01926  M01S01658.241l630 ---|          MOVE   KLNL-1,BEDC,DSCC  MOVE TO K-DISPLAY
Line S00094 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
01927  M01S00094.241l630 +++|          MOVEDL BEDAL,BEDC,DSCC  SET CURRENT EQUIPMENT CONFIGURATION
01928  M00S01659.config  +++|          MOVE   MSTL,B1RM+MSTD,MSTB  USE CHANGED PARAMETERS
01929  M00S01660.config  +++|          MOVE   1,B1RM+ESTD,ESTB
01930  M00S01661.config  +++|          BX5    X5-X5
01931  M00S01662.config  +++|          RJ     BED         BUILD DISPLAY LINE
Line S01663 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
01932  M01S01663.241l630 ---|          MOVE   KLNL-1,BEDC,DSRC
Line S00095 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
01933  M01S00095.241l630 +++|          MOVEDL BEDAL,BEDC,DSRC  SET REQUESTED EQUIP CONFIGURATION
01934  M00S01664.config  +++|
01935  M00S01665.config  +++|*         INDICATE CHANGED UNITS ON K-DISPLAY.
01936  M00S01666.config  +++|
Line S01667 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
01937  M01S01667.241l630 ---|          MOVE   KLNL-1,SEQA,DSAB
Line S00096 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
01938  M01S00096.241l630 +++|          MOVEDL SEQAL,SEQA,DSAB  SET CHANGED UNITS
01939  M00S01668.config  +++|          SA0    DSAB+1
01940  M00S01669.config  +++|          SA4    B1RM+URCD   GET CHANGED UNITS
01941  M00S01670.config  +++|          SX7    1R*
01942  M00S01671.config  +++|          MX0    -6
01943  M00S01672.config  +++|          MX3    1
01944  M00S01673.config  +++| SEQ1     ZR     X4,SEQX     IF END OF UNITS
01945  M00S01674.config  +++|          LX4    -1
01946  M00S01675.config  +++|          SX1    X0
01947  M00S01676.config  +++|          LX7    -18
01948  M00S01677.config  +++|          ZR     X1,SEQ2     IF NOT NEW WORD
01949  M00S01678.config  +++|          SA0    A0+B1
01950  M00S01679.config  +++| SEQ2     LX0    -18
01951  M00S01680.config  +++|          PL     X4,SEQ1     IF NOT THIS UNIT
01952  M00S01681.config  +++|          SA1    A0          MERGE * IN UNIT POSITION
01953  M00S01682.config  +++|          BX4    -X3*X4
01954  M00S01683.config  +++|          BX1    X0*X1
01955  M00S01684.config  +++|          BX6    X1+X7
01956  M00S01685.config  +++|          SA6    A1
01957  M00S01686.config  +++|          EQ     SEQ1        LOOP FOR NEXT UNIT
01958  M00S01687.config  +++|
Line S01688 Modification History
M01 (Removed by) confi3
Seq #  *Modification Id* Act 
----------------------------+
01959  M01S01688.confi3  ---| SEQA     DATA   64H     CHANGED UNITS
Line S00003 Modification History
M01 (Added by) confi3
M02 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
01960  M02S00003.241l630 ---| SEQA     DATA   64L     CHANGED UNITS
Line S00097 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
01961  M01S00097.241l630 +++|
01962  M01S00098.241l630 +++| SEQA     DATA   L* CHANGED UNITS                          *
01963  M01S00099.241l630 +++| SEQAL    EQU    *-SEQA
01964  M00S01689.config  +++| SPT      SPACE  4,20
01965  M00S01690.config  +++|**        SPT - SEARCH PARAMETER TABLE.
01966  M00S01691.config  +++|*
01967  M00S01692.config  +++|*         ENTRY  (X6) = SEARCH ELEMENT.
01968  M00S01693.config  +++|*                (TPAR) = PARAMETER LEGALITY MASK
01969  M00S01694.config  +++|*
01970  M00S01695.config  +++|*         EXIT   (X3) = PARAMETER TABLE ENTRY.
01971  M00S01696.config  +++|*                (X5) = ERROR MESSAGE ADDRESS.
01972  M00S01697.config  +++|*                     = 0 ON CLEAR ERROR STATUS.
01973  M00S01698.config  +++|*                (A3) = PARAMETER TABLE ADDRESS.
01974  M00S01699.config  +++|*
01975  M00S01700.config  +++|*         USES   A - 1, 3.
01976  M00S01701.config  +++|*                X - 0, 1, 3, 4, 5.
01977  M00S01702.config  +++|
01978  M00S01703.config  +++|
01979  M00S01704.config  +++| SPT      SUBR               ENTRY/EXIT
01980  M00S01705.config  +++|          SA1    B1RM+TPAR   LEGAL PARAMETER DESCRIPTION
01981  M00S01706.config  +++|          MX0    42
01982  M00S01707.config  +++|          SA3    TKEY        INITIALIZE PARAMETER SEARCH
Line S01708 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
01983  M01S01708.v23l617 ---|          SX5    ERIE        **** ILLEGAL ENTRY.
Line S00010 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
01984  M01S00010.v23l617 +++|          SX5    ERIE        **** INCORRECT ENTRY.
01985  M00S01709.config  +++| SPT1     SA3    A3+B1
01986  M00S01710.config  +++|          BX4    X0*X3
01987  M00S01711.config  +++|          ZR     X3,SPTX     IF END OF TABLE
01988  M00S01712.config  +++|          BX4    X6-X4
01989  M00S01713.config  +++|          LX1    59-0
01990  M00S01714.config  +++|          NZ     X4,SPT1     IF NO MATCH
01991  M00S01715.config  +++|          PL     X1,SPTX     IF COMMAND NOT LEGAL
01992  M00S01716.config  +++|          SX5    B0          CLEAR ERROR STATUS
01993  M00S01717.config  +++|          EQ     SPTX        RETURN
01994  M00S01718.config  +++| SML      SPACE  4,20
01995  M00S01719.config  +++|**        SML - SEARCH EST FOR MASS STORAGE *LDAM* DEVICES.
01996  M00S01720.config  +++|*
Line S01721 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01997  M01S01721.ns22000 ---|*         ENTRY  (X5) = PREVIOUS EQUIPMENT NUMBER.
Line S00096 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01998  M01S00096.ns22000 +++|*         ENTRY  (X5) = PREVIOUS EST ORDINAL.
01999  M00S01722.config  +++|*                (ESTB) = EST BUFFER INITIALIZED.
02000  M00S01723.config  +++|*
02001  M00S01724.config  +++|*         EXIT   (X5) = 0 IF ALL EQUIPMENTS CHECKED.
Line S01725 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02002  M01S01725.ns22000 ---|*                (X5) = EQUIPMENT NUMBER FOR REDEFINITION.
Line S00097 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02003  M01S00097.ns22000 +++|*                (X5) = EST ORDINAL FOR REDEFINITION.
02004  M00S01726.config  +++|*                (X1) .LT. 0 IF IDLED DEVICE.
02005  M00S01727.config  +++|*                (MSTB) = MST FOR EQUIPMENT.
02006  M00S01728.config  +++|*
02007  M00S01729.config  +++|*         USES   A - 1, 2.
02008  M00S01730.config  +++|*                X - 1, 2, 5, 6.
02009  M00S01731.config  +++|*
02010  M00S01732.config  +++|*         CALLS  RMT.
Line S00098 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02011  M01S00098.ns22000 +++|
02012  M01S00099.ns22000 +++| SML2     SX5    0           RETURN END OF EST STATUS
02013  M00S01733.config  +++|
02014  M00S01734.config  +++|
02015  M00S01735.config  +++| SML      SUBR               ENTRY/EXIT
Line S01736 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02016  M01S01736.ns22000 ---| SML1     SX5    X5+1-NMSD
02017  M01S01737.ns22000 ---|          ZR     X5,SMLX     IF END OF EQUIPMENTS
02018  M01S01738.ns22000 ---|          SX5    X5+NMSD
02019  M01S01739.ns22000 ---|          SA1    ESTB+X5
Line S00100 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02020  M01S00100.ns22000 +++| SML1     SA1    LMSO
02021  M01S00101.ns22000 +++|          SX5    X5+B1
02022  M01S00102.ns22000 +++|          IX1    X1-X5
02023  M01S00103.ns22000 +++|          ZR     X1,SML2     IF END OF MASS STORAGE DEVICES
02024  M01S00104.ns22000 +++|          R=     X1,ESTE
02025  M01S00105.ns22000 +++|          IX1    X5*X1
02026  M01S00106.ns22000 +++|          SA1    ESTB+X1+EQDE  READ EST ENTRY
02027  M00S01740.config  +++|          PL     X1,SML1     IF NOT MASS STORAGE
02028  M00S01741.config  +++|          SA2    B1RM+CUEQ
02029  M00S01742.config  +++|          LX1    59-55
02030  M00S01743.config  +++|          PL     X1,SML1     IF NOT *LDAM*
02031  M00S01744.config  +++|          BX6    X2-X5
02032  M00S01745.config  +++|          ZR     X6,SML1     IF CURRENT EQUIPMENT
02033  M00S01746.config  +++|          RJ     RMT         READ MST
02034  M00S01747.config  +++|          SA1    MSTB+ACGL   CHECK REDEFINITION STATUS
02035  M00S01748.config  +++|          LX1    59-11
02036  M00S01749.config  +++|          EQ     SMLX        RETURN
02037  M00S01750.config  +++| S2L      SPACE  4,10
02038  M00S01751.config  +++|**        S2L - SET 2 DIGITS IN DISPLAY LINE.
02039  M00S01752.config  +++|*
02040  M00S01753.config  +++|*         ENTRY  (B7) = SHIFT COUNT.
02041  M00S01754.config  +++|*                (A0) = DISPLAY LINE ADDRESS.
02042  M00S01755.config  +++|*                (X1) = DIGITS TO DISPLAY.
02043  M00S01756.config  +++|*
02044  M00S01757.config  +++|*         USES   A - 2, 6.
02045  M00S01758.config  +++|*                X - 1, 2, 6.
02046  M00S01759.config  +++|*
02047  M00S01760.config  +++|*         CALLS  COD.
02048  M00S01761.config  +++|
02049  M00S01762.config  +++|
02050  M00S01763.config  +++| S2L      SUBR               ENTRY/EXIT
02051  M00S01764.config  +++|          SX1    X1+100B     INSURE TWO DIGITS
02052  M00S01765.config  +++|          RJ     COD         CONVERT TO DISPLAY CODE
02053  M00S01766.config  +++|          MX1    -12
02054  M00S01767.config  +++|          BX6    -X1*X6
02055  M00S01768.config  +++|          SA2    A0
02056  M00S01769.config  +++|          LX1    B7
02057  M00S01770.config  +++|          LX6    B7
02058  M00S01771.config  +++|          BX2    X1*X2
02059  M00S01772.config  +++|          BX6    X2+X6
02060  M00S01773.config  +++|          SA6    A0
02061  M00S01774.config  +++|          EQ     S2LX        RETURN
02062  M00S01775.config  +++| UKD      SPACE  4,10
02063  M00S01776.config  +++|**        UKD - UPDATE K-DISPLAY INFORMATION.
02064  M00S01777.config  +++|*
02065  M00S01778.config  +++|*         ENTRY  (TPAR) CONTAINS LEGAL PARAMETERS.
02066  M00S01779.config  +++|*
02067  M00S01780.config  +++|*         EXIT   K-DISPLAY UPDATED.
02068  M00S01781.config  +++|*
02069  M00S01782.config  +++|*         USES   A - 4, 5, 6.
02070  M00S01783.config  +++|*                X - 4, 5, 6.
02071  M00S01784.config  +++|*                B - 5, 6.
02072  M00S01785.config  +++|*
02073  M00S01786.config  +++|*         CALLS  BED, SEQ, SML.
02074  M00S01787.config  +++|*
Line S01788 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02075  M01S01788.241l630 ---|*         MACROS MOVE.
Line S00100 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02076  M01S00100.241l630 +++|*         MACROS MOVEDL.
02077  M00S01789.config  +++|
02078  M00S01790.config  +++|
02079  M00S01791.config  +++| UKD      SUBR               ENTRY/EXIT
02080  M00S01792.config  +++|          SA5    B1RM+TPAR   COPY LEGAL PARAMETER DEFINITION TO DISPLAY
02081  M00S01793.config  +++|          SB5    B0
02082  M00S01794.config  +++|          SB6    B0
02083  M00S01795.config  +++| UKD1     ZR     X5,UKD2     IF END OF PARAMETERS
Line S01796 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02084  M01S01796.241l630 ---|          SB5    B5+KLNL-1
Line S00101 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02085  M01S00101.241l630 +++|          SB5    B5+KLNL
02086  M00S01797.config  +++|          LX5    -1
02087  M00S01798.config  +++|          PL     X5,UKD1     IF NOT LEGAL PARAMETER
02088  M00S01799.config  +++|          MX6    1           CLEAR PARAMETER BIT
02089  M00S01800.config  +++|          BX5    -X6*X5
Line S01801 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02090  M01S01801.241l630 ---|          MOVE   KLNL-1,UKDC-KLNL+1+B5,DSAA+B6  MOVE DESCRIPTION
Line S00102 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02091  M01S00102.241l630 +++|          MOVEDL KLNL,UKDC-KLNL+B5,DSAA+B6  MOVE DESCRIPTION
02092  M00S01802.config  +++|          SB6    B6+KLNL
02093  M00S01803.config  +++|          NZ     X5,UKD1     IF MORE LEGAL PARAMETERS
02094  M00S01804.config  +++| UKD2     SB5    KLNL*KCML   CLEAR REMAINDER OF PARAMETER DESCRIPTIONS
Line S01805 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02095  M01S01805.241l630 ---|          GT     B6,B5,UKD4  IF PARAMETER AREA FULL
02096  M01S01806.241l630 ---| UKD3     MOVE   KLNL-1,BLKL,DSAA+B6
Line S00103 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02097  M01S00103.241l630 +++|          GE     B6,B5,UKD4  IF PARAMETER AREA FULL
02098  M01S00104.241l630 +++| UKD3     MOVEDL KLNL,BLKL,DSAA+B6
02099  M00S01807.config  +++|          SB6    B6+KLNL
02100  M00S01808.config  +++|          LT     B6,B5,UKD3  IF MORE TO CLEAR
02101  M00S01809.config  +++|
02102  M00S01810.config  +++|*         SET OTHER EQUIPMENTS TO RECONFIGURE IN DISPLAY.
02103  M00S01811.config  +++|
Line S01812 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02104  M01S01812.241l630 ---| UKD4     MOVE   KLNL-1,NONE,DSAE  CLEAR EQUIPMENTS
02105  M01S01813.241l630 ---| UKDA     SET    1
02106  M01S01814.241l630 ---|          DUP    KEQL,2
02107  M01S01815.241l630 ---|          MOVE   KLNL-1,BLKL,DSAE+KLNL*UKDA
02108  M01S01816.241l630 ---| UKDA     SET    UKDA+1
02109  M01S01817.241l630 ---|          SX6    B0          SAVE POSITION
Line S00105 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02110  M01S00105.241l630 +++| UKD4     SX6    B0          SAVE POSITION
02111  M00S01818.config  +++|          SX5    B0          INITIALIZE EQUIPMENT SEARCH LOOP
02112  M00S01819.config  +++|          SA6    UKDB
02113  M00S01820.config  +++| UKD5     RJ     SML         FIND EQUIPMENT
02114  M00S01821.config  +++|          ZR     X5,UKD6     IF END OF EQUIPMENTS
02115  M00S01822.config  +++|          PL     X1,UKD5     IF DEVICE IDLE BIT NOT SET
02116  M00S01823.config  +++|          RJ     BED         BUILD EQUIPMENT DISPLAY LINE
02117  M00S01824.config  +++|          SA4    UKDB
Line S01825 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02118  M01S01825.241l630 ---|          MOVE   KLNL-1,BEDC,DSAE+X4
Line S00106 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02119  M01S00106.241l630 +++|          MOVEDL BEDAL,BEDC,DSAE+X4
02120  M00S01826.config  +++|          SA4    UKDB        INCREMENT DISPLAY LINE
02121  M00S01827.config  +++|          SX6    X4+KLNL
02122  M00S01828.config  +++|          SA6    A4
02123  M00S01829.config  +++|          SB5    X6
Line S01830 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02124  M01S01830.241l630 ---|          SB6    KLNL*KEQL-KEQL
Line S00107 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02125  M01S00107.241l630 +++|          SB6    KLNL*KEQL
02126  M00S01831.config  +++|          LT     B5,B6,UKD5  IF NOT END OF DISPLAY LINES
Line S01832 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02127  M01S01832.241l630 ---| UKD6     RJ     SEQ         SET PARAMETERS FOR CURRENT EQUIPMENT
Line S00108 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02128  M01S00108.241l630 +++|          EQ     UKD8        COMPLETE PROCESSING
02129  M01S00109.241l630 +++|
02130  M01S00110.241l630 +++| UKD6     SA4    UKDB
02131  M01S00111.241l630 +++|          SB6    KLNL*KEQL
02132  M01S00112.241l630 +++|          SB5    X4+
02133  M01S00113.241l630 +++|          NZ     X4,UKD7     IF AN EQUIPMENT ALREADY ENTERED
02134  M01S00114.241l630 +++|          SB5    KLNL
02135  M01S00115.241l630 +++|          MOVEDL BEDAL,NONE,DSAE
02136  M01S00116.241l630 +++| UKD7     MOVEDL BEDAL,BLKL,DSAE+B5  MOVE BLANK LINES
02137  M01S00117.241l630 +++|          SB5    B5+KLNL
02138  M01S00118.241l630 +++|          LT     B5,B6,UKD7  IF NOT END OF DISPLAY LINES
02139  M01S00119.241l630 +++| UKD8     RJ     SEQ         SET PARAMETERS FOR CURRENT EQUIPMENT
02140  M00S01833.config  +++|          EQ     UKDX        RETURN
02141  M00S01834.config  +++|
Line S00120 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02142  M01S00120.241l630 +++|
02143  M00S01835.config  +++| UKDB     CON    0           TEMPORARY
02144  M00S01836.config  +++|
02145  M00S01837.config  +++| UKDC     BSS    0           PARAMETER DESCRIPTIONS
02146  M00S01838.config  +++| COMMAND  HERE
02147  M00S01839.config  +++| VON      SPACE  4,20
02148  M00S01840.config  +++|**        VON - VALIDATE OCTAL NUMBERS.
02149  M00S01841.config  +++|*
02150  M00S01842.config  +++|*         ENTRY  (X0) = MAXIMUM NUMBER OF CHARACTERS + 1 ALLOWED.
02151  M00S01843.config  +++|*                (SPTR) = STRING BUFFER ADDRESS OF PREVIOUS CHARACTER.
02152  M00S01844.config  +++|*                (SLMP) = STRING BUFFER LIMIT POINTER.
02153  M00S01845.config  +++|*
02154  M00S01846.config  +++|*         EXIT   (X4) = NUMBER OF CHARACTERS ASSEMBLED.
02155  M00S01847.config  +++|*                (X5) = ERROR MESSAGE ADDRESS.
02156  M00S01848.config  +++|*                (X6) = BINARY VALUE OF NUMBER.
02157  M00S01849.config  +++|*                (B5) = SEPARATOR.
02158  M00S01850.config  +++|*                (SPTR) = UPDATED STRING BUFFER POINTER.
02159  M00S01851.config  +++|*
02160  M00S01852.config  +++|*         USES   A - 1, 2, 4, 6.
02161  M00S01853.config  +++|*                X - 1, 2, 4, 5, 6, 7.
02162  M00S01854.config  +++|*                B - 7.
02163  M00S01855.config  +++|*
02164  M00S01856.config  +++|*         CALLS  ASC, DXB.
02165  M00S01857.config  +++|
02166  M00S01858.config  +++|
Line S01859 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02167  M01S01859.v23l617 ---| VON3     SX5    ERIE        **** ILLEGAL ENTRY.
Line S00011 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02168  M01S00011.v23l617 +++| VON3     SX5    ERIE        **** INCORRECT ENTRY.
02169  M00S01860.config  +++|
02170  M00S01861.config  +++| VON      SUBR               ENTRY/EXIT
02171  M00S01862.config  +++|
02172  M00S01863.config  +++|*         CHECK SYNTAX OF VALUE.
02173  M00S01864.config  +++|
02174  M00S01865.config  +++|          SX7    B0
02175  M00S01866.config  +++|          RJ     ASC
02176  M00S01867.config  +++|          SA2    SPTR        CHECK FOR POST RADIX
02177  M00S01868.config  +++|          SA1    X2-1
02178  M00S01869.config  +++|          SX2    X1-1R0
02179  M00S01870.config  +++|          PL     X2,VON2     IF NO POST RADIX
02180  M00S01871.config  +++|          SX7    X1-1RB
02181  M00S01872.config  +++|          ZR     X7,VON1     IF OCTAL POST RADIX
02182  M00S01873.config  +++|          SX2    X1-1RD
02183  M00S01874.config  +++|          NZ     X2,VON3     IF NOT DECIMAL POST RADIX
02184  M00S01875.config  +++| VON1     SX4    X4-1        DECREMENT NUMBER OF CHARACTERS
02185  M00S01876.config  +++| VON2     IX7    X4-X0
02186  M00S01877.config  +++|          PL     X7,VON3     IF TOO MANY DIGITS
Line S01878 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02187  M01S01878.v23l617 ---|          SX5    ERIS        **** ILLEGAL SEPARATOR.
Line S00012 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02188  M01S00012.v23l617 +++|          SX5    ERIS        **** INCORRECT SEPARATOR.
02189  M00S01879.config  +++|          SX2    B5-1R=
Line S01880 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02190  M01S01880.v23l617 ---|          ZR     X2,VONX     IF ILLEGAL SEPARATOR
Line S00013 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02191  M01S00013.v23l617 +++|          ZR     X2,VONX     IF INCORRECT SEPARATOR
02192  M00S01881.config  +++|          BX5    X5-X5
02193  M00S01882.config  +++|          ZR     X4,VONX     IF NO CHARACTERS
02194  M00S01883.config  +++|
02195  M00S01884.config  +++|*         CHECK BINARY VALUES.
02196  M00S01885.config  +++|
02197  M00S01886.config  +++|          BX5    X6          CONVERT TO BINARY
02198  M00S01887.config  +++|          SB7    B0
02199  M00S01888.config  +++|          PX6    X4,B5
02200  M00S01889.config  +++|          SA6    VONA
02201  M00S01890.config  +++|          RJ     DXB
02202  M00S01891.config  +++|          NZ     X4,VON3     IF ERROR IN CONVERSION
02203  M00S01892.config  +++|          SA4    VONA        RESTORE CHARACTER COUNT
02204  M00S01893.config  +++|          UX4,B5 X4
02205  M00S01894.config  +++|          BX5    X5-X5       CLEAR ERROR
02206  M00S01895.config  +++|          EQ     VONX        RETURN
02207  M00S01896.config  +++|
Line S00121 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02208  M01S00121.241l630 +++|
02209  M00S01897.config  +++| VONA     CON    0           SCRATCH LOCATION
02210  M00S01898.config  +++|          TITLE  ERROR MESSAGES.
02211  M00S01899.config  +++|*         ERROR MESSAGES.
02212  M00S01900.config  +++|
02213  M00S01901.config  +++|
02214  M00S01902.config  +++| ERR      BSS    0           ERROR MESSAGE FIRST WORD ADDRESS
02215  M00S01903.config  +++|          LOC    0
02216  M00S01904.config  +++| ERBL     DIS    6,
02217  M00S01905.config  +++| ERCN     DIS    6,**** ERROR IN CHANNEL NUMBER.
02218  M00S01906.config  +++| ERDF     DIS    6,**** DEVICE NOT FIRST IN CHAIN.
Line S01907 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02219  M01S01907.ns22000 ---| EREN     DIS    6,**** ERROR IN EQUIPMENT NUMBER.
Line S00107 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02220  M01S00107.ns22000 +++| EREN     DIS    6,**** ERROR IN EST ORDINAL.
Line S01908 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02221  M01S01908.v23l617 ---| ERIE     DIS    6,**** ILLEGAL ENTRY.
02222  M01S01909.v23l617 ---| ERIS     DIS    6,**** ILLEGAL SEPARATOR.
Line S00014 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02223  M01S00014.v23l617 +++| ERIE     DIS    6,**** INCORRECT ENTRY.
02224  M01S00015.v23l617 +++| ERIS     DIS    6,**** INCORRECT SEPARATOR.
02225  M00S01910.config  +++| ERSI     DIS    6,**** EQUIPMENT STATUS INCORRECT.
02226  M00S01911.config  +++| ERIU     DIS    6,**** INTRODUCED UNIT IN USE.
02227  M00S01912.config  +++| ERUN     DIS    6,**** ERROR IN UNIT LIST.
02228  M00S01913.config  +++|          LOC    *O
02229  M00S01914.config  +++|          ERRNZ  ERBL
02230  M00S01915.config  +++| TKEY     SPACE  4,10
02231  M00S01916.config  +++|**        TKEY - TABLE OF KEYWORDS.
02232  M00S01917.config  +++|*
02233  M00S01918.config  +++|*         ENTRY  42/  KEYWORD,18/  PRO
02234  M00S01919.config  +++|*                KEYWORD =
02235  M00S01920.config  +++|*                PRO = PROCESSOR ADDRESS.
02236  M00S01921.config  +++|
02237  M00S01922.config  +++|
02238  M00S01923.config  +++| TKEY     EQU    *-1
02239  M00S01924.config  +++|
02240  M00S01925.config  +++|          DUP    KYMX+1,1
02241  M00S01926.config  +++|          CON    0
02242  M00S01927.config  +++|
02243  M00S01928.config  +++|          LIST   G
02244  M00S01929.config  +++| KEY      HERE
02245  M00S01930.config  +++|          LIST   *
02246  M00S01931.config  +++|          ORG    TKEY+KYMX+1
02247  M00S01932.config  +++|          CON    0           END OF TABLE
02248  M00S01933.config  +++|          TITLE  DISPLAY BUFFER.
02249  M00S01934.config  +++|*         DISPLAY AREA DATA.
02250  M00S01935.config  +++|
02251  M00S01936.config  +++|
Line S01937 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02252  M01S01937.241l630 ---| KL       VFD    24/KBUF,18/0,18/DSA  LEFT SCREEN CONTROL WORD
Line S00122 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02253  M01S00122.241l630 +++| KL       VFD    24/KBUF,18/DSB,18/DSA  SCREEN CONTROL WORD
02254  M00S01938.config  +++|          DATA   10H
02255  M00S01939.config  +++| KBUF     BSSZ   8           KEYBOARD BUFFER
02256  M00S01940.config  +++|          NOREF  K
02257  M00S01941.config  +++|          SPACE  4,10
02258  M00S01942.config  +++|*         LEFT SCREEN DISPLAY BUFFER.
02259  M00S01943.config  +++|
02260  M00S01944.config  +++|
02261  M00S01945.config  +++| DSA      VFD    10/0,1/0,1/0,48/0  64 CHARACTERS/LINE, FORMATTED
02262  M00S01946.config  +++|
Line S01947 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02263  M01S01947.241l630 ---| K        SET    5           FIRST LINE OF K-DISPLAY
02264  M01S01948.241l630 ---|
Line S01949 Modification History
M01 (Removed by) confi3
M02 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02265  M02S01949.241l630 ---|  D (        **** MASS STORAGE FAILURE RECOVERY ****)
Line S00004 Modification History
M01 (Added by) confi3
M02 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02266  M02S00004.241l630 ---|  D (             MASS STORAGE FAILURE RECOVERY )
Line S01950 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02267  M01S01950.241l630 ---|  D
02268  M01S01951.241l630 ---|  D
02269  M01S01952.241l630 ---|  D (LEGAL PARAMETER DEFINITIONS.)
02270  M01S01953.241l630 ---|  D
02271  M01S01954.241l630 ---| DSAA     EQU    *+1
02272  M01S01955.241l630 ---|          DUP    KCML,1
02273  M01S01956.241l630 ---|  D (                                                                )
02274  M01S01957.241l630 ---|  D
02275  M01S01958.241l630 ---|  D (CURRENT EQUIPMENT CONFIGURATION.)
02276  M01S01959.241l630 ---|  D
02277  M01S01960.241l630 ---| DSCC     EQU    *+1
02278  M01S01961.241l630 ---|  D (12. DQ-3  CH20,21 UL= 40 41 42 -- -- -- -- --   ST = ----      )
02279  M01S01962.241l630 ---|  D
02280  M01S01963.241l630 ---|  D (REQUESTED EQUIPMENT CONFIGURATION.)
02281  M01S01964.241l630 ---|  D
02282  M01S01965.241l630 ---| DSRC     EQU    *+1
02283  M01S01966.241l630 ---|  D (12. DQ-3  CH20,21 UL= 47 41 42 -- -- -- -- --   ST = SOME      )
02284  M01S01967.241l630 ---| DSAB     EQU    *+1
02285  M01S01968.241l630 ---|  D (   CHANGED UNITS      *                                        )
02286  M01S01969.241l630 ---|  D
02287  M01S01970.241l630 ---|  D
02288  M01S01971.241l630 ---|  D (IDLED EQUIPMENTS)
02289  M01S01972.241l630 ---|  D
02290  M01S01973.241l630 ---| DSAE     EQU    *+1
02291  M01S01974.241l630 ---|  D (NONE                                                           )
02292  M01S01975.241l630 ---|          DUP    KEQL,1
02293  M01S01976.241l630 ---|  D (                                                               )
02294  M01S01977.241l630 ---|
02295  M01S01978.241l630 ---| MSG1     EQU    *+1
02296  M01S01979.241l630 ---|          ERRNG  KMLL-K
02297  M01S01980.241l630 ---| K        SET    KMLL
02298  M01S01981.241l630 ---|  D (                                                            )
02299  M01S01982.241l630 ---| MSG2     EQU    *+1
02300  M01S01983.241l630 ---|  D (                                                            )
02301  M01S01984.241l630 ---|
Line S00123 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02302  M01S00123.241l630 +++|
02303  M01S00124.241l630 +++|  KDL 18,T,(MASS STORAGE FAILURE RECOVERY)
02304  M01S00125.241l630 +++|  KDL 1,K,(CURRENT EQUIPMENT CONFIGURATION)
02305  M01S00126.241l630 +++| DSCC     EQU    *
02306  M01S00127.241l630 +++|  KDL 4,K,(12. DQ-3  CH20,21 UL= 40 41 42 -- -- -- -- --   ST = ----)
02307  M01S00128.241l630 +++| K        SET    K+2         SKIP TWO LINES
02308  M01S00129.241l630 +++|  KDL 1,K,(REQUESTED EQUIPMENT CONFIGURATION)
02309  M01S00130.241l630 +++| DSRC     EQU    *
02310  M01S00131.241l630 +++|  KDL 4,K,(12. DQ-3  CH20,21 UL= 47 41 42 -- -- -- -- --   ST = ----)
02311  M01S00132.241l630 +++| DSAB     EQU    *
02312  M01S00133.241l630 +++|  KDL 8,K,( CHANGED UNITS    *                     )
02313  M01S00134.241l630 +++| K        SET    K+2         SKIP TWO LINES
02314  M01S00135.241l630 +++|  KDL 1,K,(IDLED EQUIPMENTS)
02315  M01S00136.241l630 +++| DSAE     EQU    *
02316  M01S00137.241l630 +++|          DUP    KEQL,1
02317  M01S00138.241l630 +++|  KDL 4,K,(                                                         )
02318  M01S00139.241l630 +++| MSG1     EQU    *+1
02319  M01S00140.241l630 +++|  KDL 1,M,(                                                            )
02320  M01S00141.241l630 +++| MSG2     EQU    *+1
02321  M01S00142.241l630 +++|  KDL 1,I,(                                                            )
02322  M01S00143.241l630 +++|          CON    0           END OF DISPLAY
02323  M01S00144.241l630 +++| DSB      SPACE  4,10
02324  M01S00145.241l630 +++|*         RIGHT SCREEN DISPLAY BUFFER.
02325  M01S00146.241l630 +++|
02326  M01S00147.241l630 +++|
02327  M01S00148.241l630 +++| DSB      VFD    10/0,1/0,1/0,48/0  64 CHARACTERS/LINE, FORMATTED
02328  M01S00149.241l630 +++|
02329  M01S00150.241l630 +++|  KDL 1,T,(K DISPLAY COMMANDS)
02330  M01S00151.241l630 +++| DSAA     EQU    *
02331  M01S00152.241l630 +++|          DUP    KCML,1
02332  M01S00153.241l630 +++|  KDL 1,K,(
02333  M01S00154.241l630 +++|,   )
02334  M00S01985.config  +++|          CON    0           END OF DISPLAY
02335  M00S01986.config  +++|          SPACE  4,10
02336  M00S01987.config  +++|*         LINE SKELETONS.
02337  M00S01988.config  +++|
02338  M00S01989.config  +++|
02339  M00S01990.config  +++| NONE     DATA   10HNONE.
Line S01991 Modification History
M01 (Removed by) confi3
Seq #  *Modification Id* Act 
----------------------------+
02340  M01S01991.confi3  ---| BLKL DATA 64H
Line S00005 Modification History
M01 (Added by) confi3
Seq #  *Modification Id* Act 
----------------------------+
02341  M01S00005.confi3  +++| BLKL     DATA   64L
02342  M00S01992.config  +++|          TITLE  COMMON DECKS.
Line S01993 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02343  M01S01993.ns22000 ---|*         COMMON DECKS.
Line S00108 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02344  M01S00108.ns22000 +++|**        COMMON DECKS.
02345  M00S01994.config  +++|
02346  M00S01995.config  +++|
02347  M00S01996.config  +++|*CALL     COMCCIO
02348  M00S01997.config  +++|*CALL     COMCCOD
02349  M00S01998.config  +++|*CALL     COMCCPM
02350  M00S01999.config  +++|*CALL     COMCDXB
02351  M00S02000.config  +++|*CALL     COMCLFM
02352  M00S02001.config  +++|*CALL     COMCMVE
Line S00109 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02353  M01S00109.ns22000 +++|*CALL     COMCRSB
02354  M00S02002.config  +++|*CALL     COMCSYS
02355  M00S02003.config  +++|*CALL     COMCUSB
02356  M00S02004.config  +++|*CALL     COMCWTC
02357  M00S02005.config  +++|*CALL     COMCWTW
02358  M00S02006.config  +++|*CALL     COMCZTB
02359  M00S02007.config  +++|          TITLE  BUFFERS.
02360  M00S02008.config  +++|          USE    LITERALS
02361  M00S02009.config  +++|
02362  M00S02010.config  +++|
02363  M00S02011.config  +++|*         BUFFERS.
02364  M00S02012.config  +++|
02365  M00S02013.config  +++|
02366  M00S02014.config  +++| SSJ=     BSSZ   SSJL
02367  M00S02015.config  +++| CHTB     EQU    *           CHANNEL STATUS TABLE BUFFER
02368  M00S02016.config  +++| ESTB     EQU    CHTB+CTALL  EST BUFFER
Line S02017 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02369  M01S02017.ns22000 ---| MSTC     EQU    ESTB+NMSD   CURRENT EQUIPMENT MST
Line S00110 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02370  M01S00110.ns22000 +++| MSTC     EQU    ESTB+ESTE*ESMX  CURRENT EQUIPMENT MST
02371  M00S02018.config  +++| MSTB     EQU    MSTC+MSTL   MST READ BUFFER
02372  M00S02019.config  +++| OBUF     EQU    MSTB+MSTL   OUTPUT BUFFER
Line S02020 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02373  M01S02020.ns22000 ---|
02374  M00S02021.config  +++| BUFL     EQU    OBUF+OBUFL  END OF BUFFERS
02375  M00S02022.config  +++| RFL=     EQU    BUFL+10B
02376  M00S02023.config  +++| PRS      TITLE  PRESET.
02377  M00S02024.config  +++|**        PRS - PRESET.
02378  M00S02025.config  +++|*
02379  M00S02026.config  +++|*         EXIT   (NPPU) = NUMBER OF PPUS.
02380  M00S02027.config  +++|*                (ESTA) = EST ADDRESS.
02381  M00S02028.config  +++|*                (MMFF) .NE. 0 IF MMF MODE.
02382  M00S02029.config  +++|*
02383  M00S02030.config  +++|*         USES   A - 1, 6.
Line S02031 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02384  M01S02031.241l630 ---|*                X - 0, 1, 2, 5, 6.
Line S00155 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02385  M01S00155.241l630 +++|*                X - 0, 1, 2, 3, 5, 6.
02386  M01S00156.241l630 +++|*
02387  M01S00157.241l630 +++|*         CALLS  PRK.
02388  M00S02032.config  +++|*
02389  M00S02033.config  +++|*         MACROS ABORT, EREXIT, GETLCW, MESSAGE.
02390  M00S02034.config  +++|
02391  M00S02035.config  +++|
02392  M00S02036.config  +++| PRS      SUBR               ENTRY/EXIT
02393  M00S02037.config  +++|          EREXIT END1
02394  M00S02038.config  +++|
02395  M00S02039.config  +++|*         CHECK NUMBER OF ARGUMENTS.
02396  M00S02040.config  +++|
Line S02041 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02397  M01S02041.v23l617 ---|          SX5    PRSA        * INVALID USER ACCESS.*
Line S00016 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02398  M01S00016.v23l617 +++|          SX5    PRSA        * USER ACCESS NOT VALID.*
02399  M00S02042.config  +++|          SA1    SSJ=        CHECK SUBSYSTEM ID
02400  M00S02043.config  +++|          MX0    -12
02401  M00S02044.config  +++|          BX1    -X0*X1
02402  M00S02045.config  +++|          SX6    X1-MSSI
Line S02046 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02403  M01S02046.v23l617 ---|          NZ     X6,PRS1     IF INVALID USER ACCESS
Line S00017 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02404  M01S00017.v23l617 +++|          NZ     X6,PRS1     IF USER ACCESS NOT VALID
02405  M00S02047.config  +++|          SA1    ACTR        CHECK NUMBER OF ARGUMENTS
Line S02048 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02406  M01S02048.v23l617 ---|          SX5    PRSB        * INVALID CONTROL STATEMENT.*
Line S00018 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02407  M01S00018.v23l617 +++|          SX5    PRSB        * INCORRECT COMMAND.*
02408  M00S02049.config  +++|          MX0    -18
02409  M00S02050.config  +++|          BX2    -X0*X1
02410  M00S02051.config  +++|          ZR     X2,PRS2     IF NO ARGUMENTS
02411  M00S02052.config  +++| PRS1     MESSAGE X5
02412  M00S02053.config  +++|          ABORT
02413  M00S02054.config  +++|
02414  M00S02055.config  +++|*         GET NUMBER OF PPUS IN SYSTEM.
02415  M00S02056.config  +++|
02416  M00S02057.config  +++| PRS2     GETLCW 1,PPUL,NPPU
02417  M00S02058.config  +++|          MX0    -12
02418  M00S02059.config  +++|          LX1    -24
02419  M00S02060.config  +++|          BX6    -X0*X1
02420  M00S02061.config  +++|          SA6    A1
02421  M00S02062.config  +++|
02422  M00S02063.config  +++|*         GET NUMBER OF MASS STORAGE EQUIPMENTS AND SET EST ADDRESS.
02423  M00S02064.config  +++|
02424  M00S02065.config  +++|          GETLCW 1,ESTP,ESTA
Line S02066 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02425  M01S02066.ns22000 ---|          LX1    12
02426  M01S02067.ns22000 ---|          BX6    -X0*X1
02427  M01S02068.ns22000 ---|          SA6    A1
02428  M00S02069.config  +++|
02429  M00S02070.config  +++|*         SET MULTI-MAINFRAME STATUS.
02430  M00S02071.config  +++|
02431  M00S02072.config  +++|          GETLCW 1,MMFL,MMFF
02432  M00S02073.config  +++|          AX1    36
02433  M00S02074.config  +++|          BX6    -X0*X1
Line S02075 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02434  M01S02075.241l630 ---|          SA6    A1
Line S00158 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02435  M01S00158.241l630 +++|          SA6    A1+
02436  M01S00159.241l630 +++|          SX3    PRSD
02437  M01S00160.241l630 +++|          RJ     PRK         PRESET K-DISPLAY BUFFER
02438  M00S02076.config  +++|          EQ     PRSX        RETURN
02439  M00S02077.config  +++|
Line S02078 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02440  M01S02078.v23l617 ---| PRSA     DATA   C* INVALID USER ACCESS.*
02441  M01S02079.v23l617 ---| PRSB     DATA   C* INVALID CONTROL STATEMENT.*
Line S00019 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
02442  M01S00019.v23l617 +++| PRSA     DATA   C* USER ACCESS NOT VALID.*
02443  M01S00020.v23l617 +++| PRSB     DATA   C* INCORRECT COMMAND.*
02444  M00S02080.config  +++| PRSC     CON    0           *GETQP* BUFFER WORD
Line S00161 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02445  M01S00161.241l630 +++| PRSD     KDL    *           Y-COORDINATE TABLE
02446  M01S00162.241l630 +++|
02447  M01S00163.241l630 +++| PRK      HERE               REMOTE BLOCK FROM *COMCDCP*
02448  M00S02081.config  +++|          SPACE  4
02449  M00S02082.config  +++|          END
cdc/nos2.source/opl.opl871/deck/config.001.txt ยท Last modified: by 127.0.0.1