User Tools

Site Tools


cdc:nos2.source:opl.opl871:deck:set.004

Deck SET Part 004

79 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
06950  M01S00425.274l797 +++|          RJM    KWP         PROCESS KEYWORDS
06951  M01S00426.274l797 +++|
06952  M01S00427.274l797 +++| PDF      SUBR               ENTRY/EXIT
06953  M01S00428.274l797 +++|          LDM    .CCHN
06954  M01S00429.274l797 +++|          NJN    PDF1        IF *I4* IOU
06955  M01S00430.274l797 +++|          JMP    ILL         PROCESS INCORRECT ENTRY
06956  M01S00431.274l797 +++|
06957  M01S00432.274l797 +++|
06958  M01S00433.274l797 +++| PDH      EQU    PDF         *DH* PROCESSOR
06959  M01S00434.274l797 +++| PDN      EQU    PDF         *DN* PROCESSOR
06960  M01S00435.274l797 +++| PEA      EQU    PDF         *EA* PROCESSOR
06961  M01S00436.274l797 +++| PEB      EQU    PDF         *EB* PROCESSOR
06962  M01S00437.274l797 +++| PEC      EQU    PDF         *EC* PROCESSOR
06963  M01S00438.274l797 +++| PED      EQU    PDF         *ED* PROCESSOR
06964  M01S00439.274l797 +++| PEE      EQU    PDF         *EE* PROCESSOR
06965  M01S00440.274l797 +++| PEF      EQU    PDF         *EF* PROCESSOR
Line S00005 Modification History
M01 (Added by) ns2768
Seq #  *Modification Id* Act 
----------------------------+
06966  M01S00005.ns2768  +++| PEG      EQU    PDF         *EG* PROCESSOR
06967  M01S00006.ns2768  +++| PEH      EQU    PDF         *EH* PROCESSOR
Line S00124 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
06968  M01S00124.284l847 +++| PEO      EQU    PDF         *EO* PROCESSOR
06969  M01S00125.284l847 +++| PEP      EQU    PDF         *EP* PROCESSOR
06970  M01S00126.284l847 +++| PEI      SPACE  4,10
06971  M01S00127.284l847 +++|***       EQXXX=EI-2.        (MULTIPLE PARTITION DEVICES)
06972  M01S00128.284l847 +++|*         EQXXX=EJ-2.
06973  M01S00129.284l847 +++|*         EQXXX=EK-3.
06974  M01S00130.284l847 +++|*         EQXXX=EL-4.
06975  M01S00131.284l847 +++|*         EQXXX=EM-2.
06976  M01S00132.284l847 +++|*         EQXXX=EN-2.
06977  M01S00133.284l847 +++|*         EQXXX=ES-2.
06978  M01S00134.284l847 +++|*         EQXXX=EU-2.
06979  M01S00135.284l847 +++|*         EQXXX=EV-3.
06980  M01S00136.284l847 +++|*         EQXXX=EW-4.
06981  M01S00137.284l847 +++|
06982  M01S00138.284l847 +++|
06983  M01S00139.284l847 +++| PEI      SUBR               ENTRY/EXIT
06984  M01S00140.284l847 +++|          LDI    KA          CHECK SEPARATOR
06985  M01S00141.284l847 +++|          LMN    1R,
06986  M01S00142.284l847 +++|          ZJN    PEI2        IF *,*
06987  M01S00143.284l847 +++|          LMN    1R-&1R,
06988  M01S00144.284l847 +++|          NJN    PEI1        IF NOT *-*
06989  M01S00145.284l847 +++|          AOD    KA
06990  M01S00146.284l847 +++|          RJM    CDR         ASSEMBLE NUMBER OF PARTITIONS
06991  M01S00147.284l847 +++|          LMN    1R,
06992  M01S00148.284l847 +++|          NJN    PEI1        IF INCORRECT SEPARATOR
06993  M01S00149.284l847 +++|          LDD    AB+4
06994  M01S00150.284l847 +++|          ZJN    PEI1        IF NULL PARTITION COUNT
06995  M01S00151.284l847 +++|          STM    PEIB
06996  M01S00152.284l847 +++|          LDM    MSSL,MS
06997  M01S00153.284l847 +++|          LPN    17
06998  M01S00154.284l847 +++|          ADN    1
06999  M01S00155.284l847 +++|          SBD    AB+4
07000  M01S00156.284l847 +++|          PJN    PEI3        IF PARTITION COUNT OK
07001  M01S00157.284l847 +++| PEI1     JMP    ILL         PROCESS INCORRECT ENTRY
07002  M01S00158.284l847 +++|
07003  M01S00159.284l847 +++| PEI2     AOM    PEIB        INDICATE ONLY ONE PARTITION
07004  M01S00160.284l847 +++| PEI3     NJN    PEI4        IF NOT MAXIMUM PARTITONS
07005  M01S00161.284l847 +++|          AOM    PEIA        MAKE *PN=* NOT REQUIRED
07006  M01S00162.284l847 +++| PEI4     RJM    PDF         PROCESS BASIC DAS SETUP
07007  M01S00163.284l847 +++| PEIA     LDN    **          *PN=* PROCESSED INDICATOR
07008  M01S00164.284l847 +++|          ZJN    PEI1        IF REQUIRED *PN=* NOT PROCESSED
07009  M01S00165.284l847 +++|          LDC    0           NUMBER OF PARTITIONS
07010  M01S00166.284l847 +++| PEIB     EQU    *-1
07011  M01S00167.284l847 +++|          ADD    EQ
07012  M01S00168.284l847 +++|          SBN    1
07013  M01S00169.284l847 +++|          STD    T7
07014  M01S00170.284l847 +++|          LDC    0           FIRST PARTITION NUMBER
07015  M01S00171.284l847 +++| PEIC     EQU    *-1
07016  M01S00172.284l847 +++|          STD    T6
07017  M01S00173.284l847 +++| PEI5     STD    T0          PRESET CYLINDER CALCULATION
07018  M01S00174.284l847 +++|          LDM    EBUT+10     SET EST PARTITION NUMBER
07019  M01S00175.284l847 +++|          SHN    14
07020  M01S00176.284l847 +++|          SCN    57
07021  M01S00177.284l847 +++|          LMD    T6
07022  M01S00178.284l847 +++|          LMN    40          MARK AS A PARTITIONED DEVICE
07023  M01S00179.284l847 +++|          SHN    6
07024  M01S00180.284l847 +++|          STM    EBUT+10
07025  M01S00181.284l847 +++|          LDN    0           CLEAR MST CYLINDER OFFSET
07026  M01S00182.284l847 +++|          STM    TDDB+DVCO
07027  M01S00183.284l847 +++| PEI6     SOD    T0          CALCULATE CYLINDER OFFSET
07028  M01S00184.284l847 +++|          MJN    PEI7        IF CALCULATION IS COMPLETE
07029  M01S00185.284l847 +++|          LDM    MSCP,MS
07030  M01S00186.284l847 +++|          RAM    TDDB+DVCO
07031  M01S00187.284l847 +++|          UJN    PEI6        CHECK FOR COMPLETION
07032  M01S00188.284l847 +++|
07033  M01S00189.284l847 +++| PEI7     LDD    EB          READ ORIGINAL EQUIPMENT ENTRY
07034  M01S00190.284l847 +++|          SHN    5
07035  M01S00191.284l847 +++|          ADD    EQ
07036  M01S00192.284l847 +++|          SHN    1
07037  M01S00193.284l847 +++|          CRM    EBUT,ON
07038  M01S00194.284l847 +++|          LDD    EQ
07039  M01S00195.284l847 +++|          LMD    T7
07040  M01S00196.284l847 +++|          ZJP    PEIX        IF THIS IS THE LAST PARTITION
07041  M01S00197.284l847 +++|          LDM    EBUT+3
07042  M01S00198.284l847 +++|          LMD    CN+3
07043  M01S00199.284l847 +++|          ZJN    PEI8        IF NOT INITIAL ENTRY
07044  M01S00200.284l847 +++|          RJM    CML         CHECK MASS STORAGE LIMIT
07045  M01S00201.284l847 +++|          RJM    RMD         RESET MASS STORAGE DEVICE
07046  M01S00202.284l847 +++| PEI8     LDN    JSNL
07047  M01S00203.284l847 +++|          CWD    CN          MOVE EST ENTRY TO BUFFER
07048  M01S00204.284l847 +++|          CRM    EBUT,ON
07049  M01S00205.284l847 +++|          RJM    SPE         ENTER EQUIPMENT DEFINITION
07050  M01S00206.284l847 +++|          LDM    EBUT+4      UPDATE INITIALIZATION FLAGS
07051  M01S00207.284l847 +++|          STM    CN+4
07052  M01S00208.284l847 +++|          RJM    CLE         CHECK LAST EQUIPMENT
07053  M01S00209.284l847 +++|          AOD    T6          INCREMENT PARTITION NUMBER
07054  M01S00210.284l847 +++|          UJP    PEI5        PROCESS NEXT PARTITION
07055  M01S00211.284l847 +++|
07056  M01S00212.284l847 +++|
07057  M01S00213.284l847 +++| PEJ      EQU    PEI         *EJ* PROCESSOR
07058  M01S00214.284l847 +++| PEK      EQU    PEI         *EK* PROCESSOR
07059  M01S00215.284l847 +++| PEL      EQU    PEI         *EL* PROCESSOR
07060  M01S00216.284l847 +++| PEM      EQU    PEI         *EM* PROCESSOR
07061  M01S00217.284l847 +++| PEN      EQU    PEI         *EN* PROCESSOR
07062  M01S00218.284l847 +++| PES      EQU    PEI         *ES* PROCESSOR
07063  M01S00219.284l847 +++| PEU      EQU    PEI         *EU* PROCESSOR
07064  M01S00220.284l847 +++| PEV      EQU    PEI         *EV* PROCESSOR
07065  M01S00221.284l847 +++| PEW      EQU    PEI         *EW* PROCESSOR
Line S00441 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
07066  M01S00441.274l797 +++| KWP      SPACE  4,10
07067  M01S00442.274l797 +++|**        KWP - KEYWORD MAIN PROCESSOR.
07068  M01S00443.274l797 +++|*
07069  M01S00444.274l797 +++|*         ENTRY  (KA) = ADDRESS OF SEPARATOR CHARACTER.
07070  M01S00445.274l797 +++|*                (TA) = *TVRK* ENTRY ADDRESS.
07071  M01S00446.274l797 +++|
07072  M01S00447.274l797 +++|
07073  M01S00448.274l797 +++| KWP      SUBR               ENTRY/EXIT
07074  M01S00449.274l797 +++| KWP1     AOD    KA
07075  M01S00450.274l797 +++|          LDI    KA          ASSEMBLE KEYWORD
07076  M01S00451.274l797 +++|          SHN    6
07077  M01S00452.274l797 +++|          LMM    1,KA
07078  M01S00453.274l797 +++|          STD    AB
07079  M01S00454.274l797 +++|          LDN    2           ADVANCE KEYBOARD BUFFER ADDRESS
07080  M01S00455.274l797 +++|          RAD    KA
07081  M01S00456.274l797 +++|          LDI    KA
07082  M01S00457.274l797 +++|          LMN    1R=
07083  M01S00458.274l797 +++|          NJN    KWP3        IF INCORRECT SEPARATOR
07084  M01S00459.274l797 +++|          AOD    KA
07085  M01S00460.274l797 +++|          LDC    TKWP-TKWPL
07086  M01S00461.274l797 +++|          STD    T3
07087  M01S00462.274l797 +++| KWP2     LDN    TKWPL
07088  M01S00463.274l797 +++|          RAD    T3
07089  M01S00464.274l797 +++|          LDI    T3
07090  M01S00465.274l797 +++|          NJN    KWP4        IF NOT END OF TABLE
07091  M01S00466.274l797 +++| KWP3     JMP    ILL         PROCESS INCORRECT ENTRY
07092  M01S00467.274l797 +++|
07093  M01S00468.274l797 +++| KWP4     STD    T2
07094  M01S00469.274l797 +++|          LDD    AB
07095  M01S00470.274l797 +++|          LMI    T2
07096  M01S00471.274l797 +++|          NJN    KWP2        IF NOT MATCH
07097  M01S00472.274l797 +++|          RJM    VKW         VALIDATE KEYWORD
07098  M01S00473.274l797 +++|
07099  M01S00474.274l797 +++|*         EXIT TO KEYWORD PROCESSOR.
07100  M01S00475.274l797 +++|*         (T3) = ADDRESS OF *TKWP* ENTRY.
07101  M01S00476.274l797 +++|*         (KA) = ADDRESS OF KEYWORD VALUE FIRST CHARACTER.
07102  M01S00477.274l797 +++|
07103  M01S00478.274l797 +++|          LJM    1,T2        EXIT TO PROCESSOR
07104  M01S00479.274l797 +++|
07105  M01S00480.274l797 +++|*         RETURN FROM KEYWORD PROCESSOR.
07106  M01S00481.274l797 +++|*         (KA) = ADDRESS OF SEPARATOR CHARACTER.
07107  M01S00482.274l797 +++|
07108  M01S00483.274l797 +++| KWP5     LDI    KA          CHECK SEPARATOR
07109  M01S00484.274l797 +++|          LMN    1R,
07110  M01S00485.274l797 +++|          ZJN    KWP1        IF NOT END OF ENTRY
07111  M01S00486.274l797 +++|          LMN    1R.&1R,
07112  M01S00487.274l797 +++|          NJN    KWP3        IF INCORRECT SEPARATOR
07113  M01S00488.274l797 +++|          LDM    TRQP
07114  M01S00489.274l797 +++|          ZJN    KWP7        IF NOT INITIAL ENTRY
07115  M01S00490.274l797 +++|          LDN    KTWC
07116  M01S00491.274l797 +++|          STD    T2
07117  M01S00492.274l797 +++|          LDN    TVRKL
07118  M01S00493.274l797 +++|          RAD    TA
07119  M01S00494.274l797 +++| KWP6     SOD    TA
07120  M01S00495.274l797 +++|          LDI    TA
07121  M01S00496.274l797 +++|          STM    KWPA
07122  M01S00497.274l797 +++|          LDM    TRQP,T2
07123  M01S00498.274l797 +++|          LPC    **
07124  M01S00499.274l797 +++| KWPA     EQU    *-1
07125  M01S00500.274l797 +++|          LMI    TA
07126  M01S00501.274l797 +++|          NJN    KWP3        IF REQUIRED KEYWORD NOT SPECIFIED
07127  M01S00502.274l797 +++|          SOD    T2
07128  M01S00503.274l797 +++|          NJN    KWP6        IF MORE KEYWORDS TO CHECK
07129  M01S00504.274l797 +++| KWP7     LDD    CN
07130  M01S00505.274l797 +++|          LPN    3
07131  M01S00506.274l797 +++|          LMN    3
07132  M01S00507.274l797 +++|          ZJN    KWP9        IF DEVICE IS DOWN
07133  M01S00508.274l797 +++|          LDD    CN+1        CHECK PRIMARY CHANNEL
07134  M01S00509.274l797 +++|          SHN    21-13
07135  M01S00510.274l797 +++|          PJN    KWP9        IF NO PRIMARY CHANNEL
07136  M01S00511.274l797 +++|          SHN    21-12-21+13
07137  M01S00512.274l797 +++|          PJN    KWP9        IF CHANNEL IS UP
07138  M01S00513.274l797 +++|          LDD    CN+2        CHECK SECONDARY CHANNEL
07139  M01S00514.274l797 +++|          SHN    21-13
07140  M01S00515.274l797 +++|          PJN    KWP8        IF NO SECONDARY CHANNEL
07141  M01S00516.274l797 +++|          SHN    21-12-21+13
07142  M01S00517.274l797 +++|          PJN    KWP9        IF CHANNEL IS UP
07143  M01S00518.274l797 +++| KWP8     JMP    ILL         PROCESS INCORRECT ENTRY
07144  M01S00519.274l797 +++|
07145  M01S00520.274l797 +++| KWP9     LJM    KWPX        RETURN
07146  M01S00521.274l797 +++|
07147  M01S00522.274l797 +++|
07148  M01S00523.274l797 +++| PDI      EQU    KWP         *DI* PROCESSOR
07149  M01S00524.274l797 +++| PDJ      EQU    KWP         *DJ* PROCESSOR
07150  M01S00525.274l797 +++| PDM      EQU    KWP         *DM* PROCESSOR
07151  M01S00526.274l797 +++| PDK      EQU    KWP         *DK* PROCESSOR
07152  M01S00527.274l797 +++| PDL      EQU    KWP         *DL* PROCESSOR
07153  M01S00528.274l797 +++| PDQ      EQU    KWP         *DQ* PROCESSOR
Line S00002 Modification History
M01 (Added by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
07154  M01S00002.ns2776  +++| PDR      EQU    KWP         *DR* PROCESSOR
Line S00529 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
07155  M01S00529.274l797 +++| PDB      EQU    KWP         *DB* PROCESSOR
07156  M01S00530.274l797 +++| PDX      EQU    KWP         *DX* PROCESSOR
07157  M01S00531.274l797 +++| PDY      EQU    KWP         *DY* PROCESSOR
07158  M01S00532.274l797 +++| PDZ      EQU    KWP         *DZ* PROCESSOR
07159  M01S00533.274l797 +++| PDA      EQU    KWP         *DA* PROCESSOR
07160  M01S00534.274l797 +++| PDV      EQU    KWP         *DV* PROCESSOR
07161  M01S00535.274l797 +++| PDW      EQU    KWP         *DW* PROCESSOR
07162  M01S00536.274l797 +++|          TITLE  MISCELLANEOUS EQUIPMENT DEFINITION SUBROUTINES.
07163  M01S00537.274l797 +++| CDC      SPACE  4,15
07164  M01S00538.274l797 +++|**        CDC - CLEAR ISMD CHANNELS.
07165  M01S00539.274l797 +++|*
07166  M01S00540.274l797 +++|*         ENTRY  (EBUT) = PREVIOUS EBUT *CM* EQUIPMENT ENTRY.
07167  M01S00541.274l797 +++|*
07168  M01S00542.274l797 +++|*         EXIT   CHANNEL NUMBERS ARE CLEARED IN ALL ISMD DEVICE ENTRIES
07169  M01S00543.274l797 +++|*                WHICH HAVE THE FIRST UNIT ON THIS *CM* EQUIPMENT.
07170  M01S00544.274l797 +++|*
07171  M01S00545.274l797 +++|*         USES   T1, T2, T3.
07172  M01S00546.274l797 +++|*
07173  M01S00547.274l797 +++|*         CALLS  SDC.
07174  M01S00548.274l797 +++|
07175  M01S00549.274l797 +++|
07176  M01S00550.274l797 +++| CDC      SUBR               ENTRY/EXIT
07177  M01S00551.274l797 +++|          LDM    EBUT+4      SAVE EQUIPMENT NUMBER
07178  M01S00552.274l797 +++|          SHN    -11
07179  M01S00553.274l797 +++|          STD    T1
07180  M01S00554.274l797 +++|          LDM    EBUT+3
07181  M01S00555.274l797 +++|          LMC    2RCM
07182  M01S00556.274l797 +++|          NJN    CDCX        IF NOT CONTROL MODULE
07183  M01S00557.274l797 +++|          STM    TENB,T1     CLEAR EST ORDINAL
07184  M01S00558.274l797 +++|          STD    T3
07185  M01S00559.274l797 +++|          LDN    37          SET NO CHANNEL SPECIFIED
07186  M01S00560.274l797 +++|          STD    T2
07187  M01S00561.274l797 +++|          RJM    SDC         SET ISMD CHANNELS
07188  M01S00562.274l797 +++|          UJN    CDCX        RETURN
07189  M01S00563.274l797 +++| CLE      SPACE  4,15
07190  M01S00564.274l797 +++|**        CLE - CHECK LAST EQUIPMENT.
07191  M01S00565.274l797 +++|*
07192  M01S00566.274l797 +++|*         ENTRY  (EQ) = CURRENT EST ORDINAL.
07193  M01S00567.274l797 +++|*                (LE) = LAST EQUIPMENT DEFINED.
07194  M01S00568.274l797 +++|*                (CN - CN+4) = CURRENT EQUIPMENT DEFINITION.
07195  M01S00569.274l797 +++|*
07196  M01S00570.274l797 +++|*         EXIT   (LE) = CURRENT LAST EQUIPMENT.
07197  M01S00571.274l797 +++|*                (EQ) = CURRENT EST ORDINAL + 1.
07198  M01S00572.274l797 +++|*
07199  M01S00573.274l797 +++|*         USES   T5, CN - CN+4.
07200  M01S00574.274l797 +++|*
07201  M01S00575.274l797 +++|*         CALLS  IBF.
07202  M01S00576.274l797 +++|
07203  M01S00577.274l797 +++|
07204  M01S00578.274l797 +++| CLE3     AOD    EQ          CHECK NEW EQUIPMENT DEFINITION
07205  M01S00579.274l797 +++|          SBD    LE
07206  M01S00580.274l797 +++|          PJN    CLE2        IF ORDINAL .GE. PREVIOUS HIGH
07207  M01S00581.274l797 +++|
07208  M01S00582.274l797 +++| CLE      SUBR               ENTRY/EXIT
07209  M01S00583.274l797 +++|          LDD    CN+3
07210  M01S00584.274l797 +++|          NJN    CLE3        IF DEFINING EQUIPMENT
07211  M01S00585.274l797 +++|          AOD    EQ
07212  M01S00586.274l797 +++|          LMD    LE
07213  M01S00587.274l797 +++|          NJN    CLEX        IF NOT CLEARING LAST EQUIPMENT
07214  M01S00588.274l797 +++| CLE1     SOD    LE
07215  M01S00589.274l797 +++|          SHN    14+1
07216  M01S00590.274l797 +++|          ADD    EB          SEARCH FOR LAST EQUIPMENT
07217  M01S00591.274l797 +++|          SHN    6
07218  M01S00592.274l797 +++|          CRD    CN
07219  M01S00593.274l797 +++|          LDD    CN+3
07220  M01S00594.274l797 +++|          ZJN    CLE1        IF EQUIPMENT UNDEFINED
07221  M01S00595.274l797 +++|          LDN    1
07222  M01S00596.274l797 +++| CLE2     RAD    LE          UPDATE LAST EQUIPMENT
07223  M01S00597.274l797 +++|          STD    T5
07224  M01S00598.274l797 +++|          LDN    UECF        SEND COUNT TO BUFFER PP
07225  M01S00599.274l797 +++|          RJM    IBF
07226  M01S00600.274l797 +++|          UJN    CLEX        RETURN
07227  M01S00601.274l797 +++| CML      SPACE  4,10
07228  M01S00602.274l797 +++|**        CML - CHECK MASS STORAGE LIMIT.
07229  M01S00603.274l797 +++|*
07230  M01S00604.274l797 +++|*         ENTRY  (CN - CN+4) = CURRENT EQUIPMENT DEFINITION.
Line S00222 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
07231  M01S00222.284l847 +++|*                (EBUT - EBUT+4) = PREVIOUS EQUIPMENT DEFINITION.
Line S00605 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
07232  M01S00605.274l797 +++|
07233  M01S00606.274l797 +++|
Line S00607 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
07234  M02S00607.284l847 ---| CML2     AOM    MSLM        ADVANCE MASS STORAGE LIMIT
Line S00223 Modification History
M01 (Added by) 284l847
M02 (Removed by) set82
Seq #  *Modification Id* Act 
----------------------------+
07235  M02S00223.set82   ---| CML1     SOM    MSLM
Line S00001 Modification History
M01 (Added by) set82
Seq #  *Modification Id* Act 
----------------------------+
07236  M01S00001.set82   +++| CML2     SOM    MSLM
Line S00608 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
07237  M01S00608.274l797 +++|
07238  M01S00609.274l797 +++| CML      SUBR               ENTRY/EXIT
07239  M01S00610.274l797 +++|          LDI    ES
07240  M01S00611.274l797 +++|          LMD    CN          CHECK REDEFINITION
07241  M01S00612.274l797 +++|          SHN    0-13
07242  M01S00613.274l797 +++|          ZJN    CMLX        IF NO CHANGE IN STATUS
Line S00002 Modification History
M01 (Added by) set82
Seq #  *Modification Id* Act 
----------------------------+
07243  M01S00002.set82   +++|          LDD    CN          CHECK MASS STORAGE
07244  M01S00003.set82   +++|          SHN    0-13
07245  M01S00004.set82   +++|          ZJN    CML1        IF NOT MASS STORAGE
Line S00614 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
07246  M02S00614.284l847 ---|          LDD    CN
07247  M02S00615.284l847 ---|          SHN    0-13
07248  M02S00616.284l847 ---|          ZJN    CML2        IF NEW EQUIPMENT NOT MASS STORAGE
Line S00617 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
07249  M01S00617.274l797 +++|          LDM    MSLM
Line S00618 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
07250  M02S00618.284l847 ---|          ZJN    CML1        IF MASS STORAGE LIMIT
07251  M02S00619.284l847 ---|          SOM    MSLM
07252  M02S00620.284l847 ---|          UJN    CMLX        RETURN
07253  M02S00621.284l847 ---|
07254  M02S00622.284l847 ---| CML1     LDC    CMLB        SET ERROR MESSAGE
Line S00224 Modification History
M01 (Added by) 284l847
M02 (Removed by) set82
Seq #  *Modification Id* Act 
----------------------------+
07255  M02S00224.set82   ---|          NJN    CML1        IF NOT MASS STORAGE LIMIT
Line S00005 Modification History
M01 (Added by) set82
Seq #  *Modification Id* Act 
----------------------------+
07256  M01S00005.set82   +++|          NJN    CML2        IF NOT MASS STORAGE LIMIT
Line S00225 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
07257  M01S00225.284l847 +++|          LDC    CMLB        SET ERROR MESSAGE
Line S00623 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
07258  M01S00623.274l797 +++|          JMP    ILL1        DISPLAY ERROR
Line S00006 Modification History
M01 (Added by) set82
Seq #  *Modification Id* Act 
----------------------------+
07259  M01S00006.set82   +++|
07260  M01S00007.set82   +++| CML1     AOM    MSLM        ADVANCE MASS STORAGE LIMIT
07261  M01S00008.set82   +++|          UJN    CMLX        RETURN
Line S00624 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
07262  M01S00624.274l797 +++|
07263  M01S00625.274l797 +++| CMLB     DATA   C*MS LIMIT EXCEEDED.*
07264  M01S00626.274l797 +++| EDC      SPACE  4,20
07265  M01S00627.274l797 +++|**        EDC - ENTER ISMD CHANNELS.
07266  M01S00628.274l797 +++|*
07267  M01S00629.274l797 +++|*         ENTRY  (CN - CN+4) = EQUIPMENT ENTRY.
07268  M01S00630.274l797 +++|*                (EQ) = CURRENT EST ORDINAL.
07269  M01S00631.274l797 +++|*
07270  M01S00632.274l797 +++|*         EXIT   (EQ) = CURRENT EST ORDINAL.
07271  M01S00633.274l797 +++|*                IF DEVICE IS AN ISMD, A SEARCH IS MADE FOR THE *CM*
07272  M01S00634.274l797 +++|*                   EQUIPMENT WHICH CORRESPONDS TO THE FIRST UNIT - IF
07273  M01S00635.274l797 +++|*                   FOUND, THE CHANNEL NUMBERS ARE SET IN THE ISMD
07274  M01S00636.274l797 +++|*                   ENTRY.
07275  M01S00637.274l797 +++|*
07276  M01S00638.274l797 +++|*         USES   T1, T2, T3, CM - CM+4.
07277  M01S00639.274l797 +++|*
07278  M01S00640.274l797 +++|*         CALLS  EEB.
07279  M01S00641.274l797 +++|
07280  M01S00642.274l797 +++|
07281  M01S00643.274l797 +++| EDC      SUBR               ENTRY/EXIT
07282  M01S00644.274l797 +++|          LCN    0
07283  M01S00645.274l797 +++|          STD    T5
07284  M01S00646.274l797 +++| EDC1     AOD    T5          ADVANCE INDEX
07285  M01S00647.274l797 +++|          LDM    TFSD,T5
07286  M01S00648.274l797 +++|          ZJN    EDCX        IF END OF TABLE
07287  M01S00649.274l797 +++|          LMD    CN+3
07288  M01S00650.274l797 +++|          NJN    EDC1        IF NOT MATCHING DEVICE TYPE
07289  M01S00651.274l797 +++|          LDM    TDDB+DVUN+3 SAVE FIRST UNIT EQUIPMENT NUMBER
07290  M01S00652.274l797 +++|          LPN    70
07291  M01S00653.274l797 +++|          SHN    -3
07292  M01S00654.274l797 +++|          STD    T3
07293  M01S00655.274l797 +++|          LDM    TENB,T3
07294  M01S00656.274l797 +++|          ZJN    EDCX        IF NO *CM* DEFINED
07295  M01S00657.274l797 +++|          SHN    22-5
07296  M01S00658.274l797 +++|          ADD    EB
07297  M01S00659.274l797 +++|          SHN    6           READ CONTROL MODULE EST ENTRY
07298  M01S00660.274l797 +++|          CRD    CM
07299  M01S00661.274l797 +++|          LDD    CM+1        SET CHANNEL(S) INTO ISMD ENTRY
07300  M01S00662.274l797 +++|          STM    EBUT+1
07301  M01S00663.274l797 +++|          LDD    CM+2
07302  M01S00664.274l797 +++|          STM    EBUT+2
07303  M01S00665.274l797 +++|          RJM    EEB         ENTER EQUIPMENT ENTRY
07304  M01S00666.274l797 +++|          LJM    EDCX        RETURN
07305  M01S00667.274l797 +++| SDC      SPACE  4,15
07306  M01S00668.274l797 +++|**        SDC - SET ISMD CHANNELS.
07307  M01S00669.274l797 +++|*
07308  M01S00670.274l797 +++|*         ENTRY  (T1) = *CM* EQUIPMENT NUMBER.
07309  M01S00671.274l797 +++|*                (T2) = FIRST CHANNEL.
07310  M01S00672.274l797 +++|*                (T3) = SECOND CHANNEL.
07311  M01S00673.274l797 +++|*
07312  M01S00674.274l797 +++|*         EXIT   CHANNEL NUMBERS ARE SET IN ALL ISMD DEVICE ENTRIES
07313  M01S00675.274l797 +++|*                WHICH HAVE THE FIRST UNIT ON THIS *CM* EQUIPMENT.
07314  M01S00676.274l797 +++|*
07315  M01S00677.274l797 +++|*         USES   T5.
07316  M01S00678.274l797 +++|*
07317  M01S00679.274l797 +++|*         CALLS  EEB, SID, STA.
07318  M01S00680.274l797 +++|
07319  M01S00681.274l797 +++|
07320  M01S00682.274l797 +++| SDC2     LDD    T5          RESTORE *EQ* CONTENTS
07321  M01S00683.274l797 +++|          RJM    STA
07322  M01S00684.274l797 +++|
07323  M01S00685.274l797 +++| SDC      SUBR               ENTRY/EXIT
07324  M01S00686.274l797 +++|          LDD    EQ          SAVE CONTENTS OF *EQ*
07325  M01S00687.274l797 +++|          STD    T5
07326  M01S00688.274l797 +++|          RJM    EEB         SAVE *EBUT*
07327  M01S00689.274l797 +++|          LCN    0
07328  M01S00690.274l797 +++| SDC1     RJM    SID         SEARCH FOR ISMD DEVICE
07329  M01S00691.274l797 +++|          MJN    SDC2        IF NONE FOUND
07330  M01S00692.274l797 +++|          LDM    TDDB+DVUN+3  GET FIRST UNIT EQUIPMENT NUMBER
07331  M01S00693.274l797 +++|          LPN    70
07332  M01S00694.274l797 +++|          SHN    -3
07333  M01S00695.274l797 +++|          LMD    T1
07334  M01S00696.274l797 +++|          NJN    SDC1        IF NOT THIS *CM* EQUIPMENT NUMBER
07335  M01S00697.274l797 +++|          LDD    T2          SET CHANNEL NUMBERS
07336  M01S00698.274l797 +++|          STM    EBUT+1
07337  M01S00699.274l797 +++|          LDD    T3
07338  M01S00700.274l797 +++|          STM    EBUT+2
07339  M01S00701.274l797 +++|          RJM    EEB         ENTER EQUIPMENT ENTRY
07340  M01S00702.274l797 +++|          UJN    SDC1        FIND NEXT ISMD ENTRY
Line S00226 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
07341  M01S00226.284l847 +++| SMD      SPACE  4,10
07342  M01S00227.284l847 +++|**        SMD - SEARCH MASS STORAGE DEVICE TABLE *TMSD*.
07343  M01S00228.284l847 +++|*
07344  M01S00229.284l847 +++|*         ENTRY  (A) = EQUIPMENT TYPE (DEVICE MNEMONIC).
07345  M01S00230.284l847 +++|*
07346  M01S00231.284l847 +++|*         EXIT   (A) = (MS) = *TMSD* TABLE ADDRESS.
07347  M01S00232.284l847 +++|*                    = 0 IF ENTRY NOT FOUND.
07348  M01S00233.284l847 +++|*
07349  M01S00234.284l847 +++|*         USES   MS.
07350  M01S00235.284l847 +++|
07351  M01S00236.284l847 +++|
07352  M01S00237.284l847 +++| SMD1     LDN    TMSDL       ADVANCE TABLE ADDRESS
07353  M01S00238.284l847 +++|          RAD    MS
07354  M01S00239.284l847 +++| SMD2     LDI    MS          CHECK ENTRY
07355  M01S00240.284l847 +++|          ZJN    SMDX        IF END OF TABLE
07356  M01S00241.284l847 +++|          LMD    T0          COMPARE DEVICE TYPE
07357  M01S00242.284l847 +++|          LPC    3777
07358  M01S00243.284l847 +++|          NJN    SMD1        IF NO MATCH
07359  M01S00244.284l847 +++|          LDD    MS
07360  M01S00245.284l847 +++|
07361  M01S00246.284l847 +++| SMD      SUBR               ENTRY/EXIT
07362  M01S00247.284l847 +++|          STD    T0
07363  M01S00248.284l847 +++|          LDC    TMSD        SET TABLE ADDRESS
07364  M01S00249.284l847 +++|          STD    MS
07365  M01S00250.284l847 +++|          UJN    SMD2        ENTER LOOP
Line S00703 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
07366  M01S00703.274l797 +++| VKW      SPACE  4,10
07367  M01S00704.274l797 +++|**        VKW - VALIDATE KEYWORD.
07368  M01S00705.274l797 +++|*
07369  M01S00706.274l797 +++|*         ENTRY  (TA) = *TVRK* ENTRY ADDRESS.
07370  M01S00707.274l797 +++|*                (T3) = *TKWP* ENTRY ADDRESS.
07371  M01S00708.274l797 +++|*                (KA) = CHARACTER ADDRESS OF KEYWORD VALUE.
07372  M01S00709.274l797 +++|*
07373  M01S00710.274l797 +++|*         EXIT   (A) = (AB+4) = 0, IF NULL VALUE SPECIFIED.
07374  M01S00711.274l797 +++|*                TO *ILL* IF INCORRECT KEYWORD OR NULL VALUE SPECIFIED
07375  M01S00712.274l797 +++|*                AND NULL VALUE NOT ALLOWED.
07376  M01S00713.274l797 +++|*
07377  M01S00714.274l797 +++|*         USES   T5, T6, T7, AB+4.
07378  M01S00715.274l797 +++|*
07379  M01S00716.274l797 +++|*         CALLS  CSC.
07380  M01S00717.274l797 +++|
07381  M01S00718.274l797 +++|
07382  M01S00719.274l797 +++| VKW      SUBR               ENTRY/EXIT
07383  M01S00720.274l797 +++|          LDM    1,T3        GET KEYWORD BIT POSITION
07384  M01S00721.274l797 +++|          SHN    14
07385  M01S00722.274l797 +++|          LMD    TH
07386  M01S00723.274l797 +++|          ERRNZ  1000-SHNI   ADJUST IF VALUE CHANGES
07387  M01S00724.274l797 +++|          STM    VKWA
07388  M01S00725.274l797 +++|          SHN    -14         GET KEYWORD WORD OFFSET
07389  M01S00726.274l797 +++|          STD    T6
07390  M01S00727.274l797 +++|          ADD    TA          ADDRESS OF *TVRK* WORD
07391  M01S00728.274l797 +++|          STD    T5
07392  M01S00729.274l797 +++|          LDN    1           GENERATE KEYWORD BIT MASK
07393  M01S00730.274l797 +++| VKWA     SHN    **
07394  M01S00731.274l797 +++|          STD    T7
07395  M01S00732.274l797 +++|          STM    VKWB
07396  M01S00733.274l797 +++|          STM    VKWC
07397  M01S00734.274l797 +++|          LDI    T5          CHECK IF KEYWORD ALLOWED
07398  M01S00735.274l797 +++|          LPC    0
07399  M01S00736.274l797 +++| VKWB     EQU    *-1
07400  M01S00737.274l797 +++|          NJN    VKW2        IF KEYWORD IS ALLOWED
07401  M01S00738.274l797 +++| VKW1     JMP    ILL         PROCESS INCORRECT ENTRY
07402  M01S00739.274l797 +++|
07403  M01S00740.274l797 +++| VKW2     LDC    TRQP        SET KEYWORD SPECIFIED BIT
07404  M01S00741.274l797 +++|          RAD    T6
07405  M01S00742.274l797 +++|          LDI    T6
07406  M01S00743.274l797 +++|          LPC    0
07407  M01S00744.274l797 +++| VKWC     EQU    *-1
07408  M01S00745.274l797 +++|          NJN    VKW1        IF KEYWORD ALREADY PROCESSED
07409  M01S00746.274l797 +++|          LDD    T7
07410  M01S00747.274l797 +++|          RAI    T6
07411  M01S00748.274l797 +++|          RJM    CSC         CHECK FOR NULL VALUE
07412  M01S00749.274l797 +++|          NJN    VKW3        IF NOT NULL VALUE
07413  M01S00750.274l797 +++|          LDM    2,T3        CHECK *TKWP*
07414  M01S00751.274l797 +++|          SHN    21-5
07415  M01S00752.274l797 +++|          PJN    VKW1        IF NULL VALUE NOT ALLOWED
07416  M01S00753.274l797 +++|          LDN    0           CLEAR VALUE
07417  M01S00754.274l797 +++|          STD    AB+4
07418  M01S00755.274l797 +++| VKW3     LJM    VKWX        RETURN
07419  M01S00756.274l797 +++| STV      SPACE  4,10
07420  M01S00757.274l797 +++|**        STV - STORE KEYWORD VALUE.
07421  M01S00758.274l797 +++|*
07422  M01S00759.274l797 +++|*         ENTRY  (AB+4) = KEYWORD VALUE.
07423  M01S00760.274l797 +++|*                (T3) = ADDRESS OF KEYWORD PARAMETERS.
07424  M01S00761.274l797 +++|*                (CN - CN+4) = *EQDE* EST WORD.
07425  M01S00762.274l797 +++|*                (EBUT+5 - EBUT+11) = *EQAE* EST WORD.
07426  M01S00763.274l797 +++|*
07427  M01S00764.274l797 +++|*         EXIT   KEYWORD VALUE STORED IN EST ENTRY.
07428  M01S00765.274l797 +++|
07429  M01S00766.274l797 +++|
07430  M01S00767.274l797 +++| STV      SUBR               ENTRY/EXIT
07431  M01S00768.274l797 +++|          LDM    2,T3
07432  M01S00769.274l797 +++|          SHN    14          SET SHIFT COUNT
07433  M01S00770.274l797 +++|          LMD    TH
07434  M01S00771.274l797 +++|          ERRNZ  1000-SHNI   ADJUST IF VALUE CHANGES
07435  M01S00772.274l797 +++|          STM    STVB
07436  M01S00773.274l797 +++|          SHN    -14         SET EST ENTRY LOCATION
07437  M01S00774.274l797 +++|          LPN    37
07438  M01S00775.274l797 +++|          STD    T0
07439  M01S00776.274l797 +++|          SBN    5
07440  M01S00777.274l797 +++|          MJN    STV1        IF IN *EQDE* WORD
07441  M01S00778.274l797 +++|          LDC    EBUT
07442  M01S00779.274l797 +++|          UJN    STV2        PROCESS DATA
07443  M01S00780.274l797 +++|
07444  M01S00781.274l797 +++| STV1     LDN    CN
07445  M01S00782.274l797 +++| STV2     ADD    T0
07446  M01S00783.274l797 +++|          STD    T7
07447  M01S00784.274l797 +++|          LDM    3,T3        SET MASK
07448  M01S00785.274l797 +++|          STM    STVA
07449  M01S00786.274l797 +++|          LDI    T7          UPDATE EST ENTRY
07450  M01S00787.274l797 +++|          LPC    **
07451  M01S00788.274l797 +++| STVA     EQU    *-1
07452  M01S00789.274l797 +++|          STI    T7
07453  M01S00790.274l797 +++|          LDD    AB+4
07454  M01S00791.274l797 +++| STVB     SHN    **          POSITION KEYWORD VALUE
07455  M01S00792.274l797 +++|          RAI    T7          STORE KEYWORD VALUE
07456  M01S00793.274l797 +++|          UJN    STVX        RETURN
07457  M01S00794.274l797 +++|          TITLE  KEYWORD PROCESSORS.
07458  M01S00795.274l797 +++| AOK      SPACE  4,10
07459  M01S00796.274l797 +++|**        AOK - ASSEMBLE OCTAL KEYWORD VALUE.
07460  M01S00797.274l797 +++|*
07461  M01S00798.274l797 +++|*         ENTRY  (A) = 6/MINIMUM VALUE, 12/MAXIMUM VALUE+1
07462  M01S00799.274l797 +++|*
07463  M01S00800.274l797 +++|*         EXIT   TO *KWP5*, KEYWORD VALUE STORED.
07464  M01S00801.274l797 +++|*                TO *ILL* IF INCORRECT VALUE.
07465  M01S00802.274l797 +++|*
07466  M01S00803.274l797 +++|*         USES   T6, T7.
07467  M01S00804.274l797 +++|*
07468  M01S00805.274l797 +++|*         CALLS  CDR, STV.
07469  M01S00806.274l797 +++|
07470  M01S00807.274l797 +++|
07471  M01S00808.274l797 +++| AOK      BSS    0
07472  M01S00809.274l797 +++|          STD    T7          SAVE MAXIMUM VALUE+1
07473  M01S00810.274l797 +++|          SHN    -14
07474  M01S00811.274l797 +++|          STD    T6          SAVE MINIMUM VALUE
07475  M01S00812.274l797 +++|          RJM    CDR         ASSEMBLE KEYWORD VALUE
07476  M01S00813.274l797 +++|          LDD    AB+4
07477  M01S00814.274l797 +++|          SBD    T6
07478  M01S00815.274l797 +++|          PJN    AOK2        IF VALUE .GE. MINIMUM
07479  M01S00816.274l797 +++| AOK1     JMP    ILL         PROCESS INCORRECT ENTRY
07480  M01S00817.274l797 +++|
07481  M01S00818.274l797 +++| AOK2     LDD    AB+4
07482  M01S00819.274l797 +++|          SBD    T7
07483  M01S00820.274l797 +++|          PJN    AOK1        IF VALUE .GT. MAXIMUM
07484  M01S00821.274l797 +++|          RJM    STV         STORE VALUE
07485  M01S00822.274l797 +++|          JMP    KWP5        RETURN
07486  M01S00823.274l797 +++| PAP      SPACE  4,10
07487  M01S00824.274l797 +++|***       AP=N.
07488  M01S00825.274l797 +++|*
07489  M01S00826.274l797 +++|*         APRDECK NUMBER.
07490  M01S00827.274l797 +++|*         N = 0-77B.
07491  M01S00828.274l797 +++|
07492  M01S00829.274l797 +++|
07493  M01S00830.274l797 +++| PAP      DATA   H*AP*
07494  M01S00831.274l797 +++|          ZJN    PAP1        IF NULL VALUE
07495  M01S00832.274l797 +++|          RJM    CDR         ASSEMBLE APRDECK NUMBER
07496  M01S00833.274l797 +++|          LDD    AB+4
07497  M01S00834.274l797 +++|          SHN    -6
07498  M01S00835.274l797 +++|          ZJN    PAP1        IF .LE. 77B
07499  M01S00836.274l797 +++|          JMP    ILL         PROCESS INCORRECT ENTRY
07500  M01S00837.274l797 +++|
07501  M01S00838.274l797 +++| PAP1     LDD    AB+4        SET APRDECK NUMBER
07502  M01S00839.274l797 +++|          STM    TDDB+DVAP
07503  M01S00840.274l797 +++|          JMP    KWP5       RETURN
07504  M01S00841.274l797 +++| PCC      SPACE  4,10
07505  M01S00842.274l797 +++|***       CH=C1N/C2N.
07506  M01S00843.274l797 +++|*
07507  M01S00844.274l797 +++|*         CONCURRENT CHANNEL + PORT NUMBER.
07508  M01S00845.274l797 +++|*         C1 = PRIMARY CHANNEL.
07509  M01S00846.274l797 +++|*         C2 = SECONDARY CHANNEL.
07510  M01S00847.274l797 +++|*         N = A FOR PORT A.
07511  M01S00848.274l797 +++|*           = B FOR PORT B.
07512  M01S00849.274l797 +++|
07513  M01S00850.274l797 +++|
07514  M01S00851.274l797 +++| PCC      DATA   H*CH*
07515  M01S00852.274l797 +++|          LDN    0           PRESET PORT A DEFINITIONS
07516  M01S00853.274l797 +++|          STD    CN+1
07517  M01S00854.274l797 +++|          STD    CN+2
07518  M01S00855.274l797 +++|          LDN    CN+1        PRESET CHANNEL INDEX
07519  M01S00856.274l797 +++|          STD    T4
07520  M01S00857.274l797 +++| PCC1     RJM    CDR         ASSEMBLE CHANNEL NUMBER
07521  M01S00858.274l797 +++|          LMN    1RA
07522  M01S00859.274l797 +++|          ZJN    PCC2        IF PORT A SPECIFIED
07523  M01S00860.274l797 +++|          LMN    1RB&1RA
07524  M01S00861.274l797 +++|          NJN    PCC3        IF NOT PORT B (DEFAULT TO A)
07525  M01S00862.274l797 +++|          LDC    200         SET PORT B INDICATOR
07526  M01S00863.274l797 +++|          STI    T4
07527  M01S00864.274l797 +++| PCC2     AOD    KA          ADVANCE CHARACTER ADDRESS
07528  M01S00865.274l797 +++| PCC3     LDN    40          MARK CHANNEL CONCURRENT
07529  M01S00866.274l797 +++|          RAD    AB+4
07530  M01S00867.274l797 +++|          LMC    4000        MARK CHANNEL ACCESSIBLE
07531  M01S00868.274l797 +++|          RAI    T4          SET CHANNEL ENTRY
07532  M01S00869.274l797 +++|          LPN    37
07533  M01S00870.274l797 +++|          SBM    .CCHN
07534  M01S00871.274l797 +++|          MJN    PCC5        IF VALID CHANNEL NUMBER
07535  M01S00872.274l797 +++| PCC4     JMP    ILL         PROCESS INCORRECT ENTRY
07536  M01S00873.274l797 +++|
07537  M01S00874.274l797 +++| PCC5     LDM    TCST,AB+4
07538  M01S00875.274l797 +++|          ZJN    PCC6        IF CHANNEL IS NOT DOWN
07539  M01S00876.274l797 +++|          LDC    3000        MARK CHANNEL DOWN
07540  M01S00877.274l797 +++|          RAI    T4
07541  M01S00878.274l797 +++| PCC6     RJM    CSC         CHECK SEPARATOR CHARACTER
07542  M01S00879.274l797 +++|          NJN    PCC7        IF NOT VALID KEYWORD SEPARATOR
07543  M01S00880.274l797 +++|          LDD    CN+1        PRIMARY CHANNEL
07544  M01S00881.274l797 +++|          LMD    CN+2        SECONDARY CHANNEL
07545  M01S00882.274l797 +++|          LPN    77
07546  M01S00883.274l797 +++|          ZJN    PCC4        IF DUPLICATE CHANNELS
07547  M01S00884.274l797 +++|          JMP    KWP5        RETURN
07548  M01S00885.274l797 +++|
07549  M01S00886.274l797 +++| PCC7     LMN    1R/&1R,
07550  M01S00887.274l797 +++|          NJN    PCC4        IF NO OTHER CHANNEL
07551  M01S00888.274l797 +++|          AOD    KA
07552  M01S00889.274l797 +++|          AOD    T4
07553  M01S00890.274l797 +++|          LMN    CN+3
07554  M01S00891.274l797 +++|          ZJN    PCC4        IF MORE THAN TWO CHANNELS SPECIFIED
07555  M01S00892.274l797 +++|          LJM    PCC1        PROCESS SECOND CHANNEL
07556  M01S00893.274l797 +++| PCH      SPACE  4,10
07557  M01S00894.274l797 +++|***       CH=C1/C2.
07558  M01S00895.274l797 +++|*
07559  M01S00896.274l797 +++|*         CHANNEL NUMBER.
07560  M01S00897.274l797 +++|*         CN = 2, 4 OR 6, IF EQUIPMENT TYPE IS *DV* OR *DW*.
07561  M01S00898.274l797 +++|*         CN = 0-13B, 20-33B, FOR ALL OTHER EQUIPMENT TYPES.
07562  M01S00899.274l797 +++|*         CN = C0-C11B FOR CONCURRENT CHANNELS 0-11B.
07563  M01S00900.274l797 +++|
07564  M01S00901.274l797 +++|
07565  M01S00902.274l797 +++| PCH      DATA   H*CH*
07566  M01S00903.274l797 +++|          LDN    CN+1        SET CHANNEL BYTE ADDRESS
07567  M01S00904.274l797 +++|          STD    T4
07568  M01S00905.274l797 +++|          LDN    CN+1+2      SET MAXIMUM NUMBER OF CHANNELS ALLOWED
07569  M01S00906.274l797 +++|          STD    T3
07570  M01S00907.274l797 +++|          LDN    0           CLEAR CHANNEL BUFFER
07571  M01S00908.274l797 +++|          STD    CN+1
07572  M01S00909.274l797 +++|          STD    CN+2
07573  M01S00910.274l797 +++|          LDD    CN+3
07574  M01S00911.274l797 +++|          LMC    2RRM
07575  M01S00912.274l797 +++|          NJN    PCH3        IF NOT TYPE *RM*
07576  M01S00913.274l797 +++|          RJM    CDR
07577  M01S00914.274l797 +++|          LDD    AB+4
07578  M01S00915.274l797 +++|          SBN    15
07579  M01S00916.274l797 +++|          NJN    PCH6        IF INCORRECT CHANNEL NUMBER
07580  M01S00917.274l797 +++|          LDC    4000+CHMX
07581  M01S00918.274l797 +++|          LJM    PCH9        SET CHANNEL DATA
07582  M01S00919.274l797 +++|
07583  M01S00920.274l797 +++| PCH3     LMC    2RDV&2RRM
07584  M01S00921.274l797 +++|          ZJN    PCH4        IF TYPE *DV*
07585  M01S00922.274l797 +++|          LMN    1RW&1RV
07586  M01S00923.274l797 +++|          ZJN    PCH4        IF TYPE *DW*
07587  M01S00924.274l797 +++|          LDC    LDNI        SET FIRST CHANNEL
07588  M01S00925.274l797 +++|          STM    VCNA
07589  M01S00926.274l797 +++|          UJN    PCH7        ASSEMBLE FIRST CHANNEL NUMBER
07590  M01S00927.274l797 +++|
07591  M01S00928.274l797 +++| PCH4     LDC    VCP
07592  M01S00929.274l797 +++|          STM    PCHA
07593  M01S00930.274l797 +++| PCH5     LDD    T4
07594  M01S00931.274l797 +++|          SBD    T3
07595  M01S00932.274l797 +++|          MJN    PCH7        IF MORE CHANNELS ALLOWED
07596  M01S00933.274l797 +++| PCH6     JMP    ILL         PROCESS INCORRECT ENTRY
07597  M01S00934.274l797 +++|
07598  M01S00935.274l797 +++| PCH7     LDC    4000        SET CHANNEL ACCESSIBLE
07599  M01S00936.274l797 +++|          STI    T4
07600  M01S00937.274l797 +++|          LDI    KA          CHECK SEPARATOR
07601  M01S00938.274l797 +++|          SBN    1R8
07602  M01S00939.274l797 +++|          PJN    PCH6        IF NULL CHANNEL PARAMETER
07603  M01S00940.274l797 +++|          ADN    1R8-1RC
07604  M01S00941.274l797 +++|          NJN    PCH8        IF NOT A CONCURRENT CHANNEL
07605  M01S00942.274l797 +++|          LDN    40
07606  M01S00943.274l797 +++|          RAI    T4          SET CONCURRENCY ATTRIBUTE
07607  M01S00944.274l797 +++|          AOD    KA
07608  M01S00945.274l797 +++| PCH8     RJM    CDR         ASSEMBLE CHANNEL NUMBER
07609  M01S00946.274l797 +++|          RJM    VCN         VALIDATE CHANNEL NUMBER
07610  M01S00947.274l797 +++|*         RJM    VCP         (VALIDATE CHANNEL PAIR)
07611  M01S00948.274l797 +++| PCHA     EQU    *-1
07612  M01S00949.274l797 +++|          LDD    AB+4        APPEND CHANNEL NUMBER
07613  M01S00950.274l797 +++| PCH9     RAI    T4
07614  M01S00951.274l797 +++|          LPN    77          CHECK CHANNEL DATA
07615  M01S00952.274l797 +++|          STD    AB+4
07616  M01S00953.274l797 +++|          SBN    40
07617  M01S00954.274l797 +++|          MJN    PCH11       IF NOT A CONCURRENT CHANNEL
07618  M01S00955.274l797 +++|          SBM    .CCHN
07619  M01S00956.274l797 +++|          MJN    PCH11       IF VALID CHANNEL NUMBER
07620  M01S00957.274l797 +++| PCH10    JMP    ILL         PROCESS INCORRECT ENTRY
07621  M01S00958.274l797 +++|
07622  M01S00959.274l797 +++| PCH11    LDM    TCST,AB+4
07623  M01S00960.274l797 +++|          ZJN    PCH12       IF CHANNEL IS NOT DOWN
07624  M01S00961.274l797 +++|          LDC    3000        MARK CHANNEL DOWN
07625  M01S00962.274l797 +++|          RAI    T4
07626  M01S00963.274l797 +++| PCH12    RJM    CSC         CHECK SEPARATOR CHARACTER
07627  M01S00964.274l797 +++|          NJN    PCH13       IF INVALID KEYWORD SEPARATOR
07628  M01S00965.274l797 +++|          JMP    KWP5        RETURN
07629  M01S00966.274l797 +++|
07630  M01S00967.274l797 +++| PCH13    LMN    1R/&1R,
07631  M01S00968.274l797 +++|          NJN    PCH10       IF INVALID SEPARATOR
07632  M01S00969.274l797 +++|          AOD    T4
07633  M01S00970.274l797 +++|          AOD    KA
07634  M01S00971.274l797 +++|          LJM    PCH5        PROCESS NEXT CHANNEL
07635  M01S00972.274l797 +++| PEQ      SPACE  4,10
07636  M01S00973.274l797 +++|***       EQ=N.
07637  M01S00974.274l797 +++|*
07638  M01S00975.274l797 +++|*         EQUIPMENT (CONTROLLER) NUMBER.
07639  M01S00976.274l797 +++|*         N = 0-7.
07640  M01S00977.274l797 +++|
07641  M01S00978.274l797 +++|
07642  M01S00979.274l797 +++| PEQ      DATA   H*EQ*
07643  M01S00980.274l797 +++|          LDN    10          SET MAXIMUM VALUE + 1
07644  M01S00981.274l797 +++|          JMP    AOK         ASSEMBLE KEYWORD VALUE
07645  M01S00982.274l797 +++| PET      SPACE  4,20
07646  M01S00983.274l797 +++|***       ET=MT.
07647  M01S00984.274l797 +++|*         ET=MT/PT.  (*DP* TYPE EQUIPMENT ONLY).
07648  M01S00985.274l797 +++|*         ET=MT/PT/CT.  (*DP* TYPE EQUIPMENT ONLY).
07649  M01S00986.274l797 +++|*
07650  M01S00987.274l797 +++|*         EXTENDED MEMORY TYPE (DEFAULT = E1,D1).
07651  M01S00988.274l797 +++|*         MT = MEMORY TYPE.
07652  M01S00989.274l797 +++|*              E1 - ECS 1.
07653  M01S00990.274l797 +++|*              E2 - ECS 2.
07654  M01S00991.274l797 +++|*              LE - LCME.
07655  M01S00992.274l797 +++|*              EM - UEM.
07656  M01S00993.274l797 +++|*              ES - ESM.
07657  M01S00994.274l797 +++|*              SN - STORNET.
07658  M01S00995.274l797 +++|*         PT = PATH TYPE.
07659  M01S00996.274l797 +++|*              D1 - DC135 DDP (DEFAULT FOR MT = E1/E2).
07660  M01S00997.274l797 +++|*              D2 - DC145 PARITY ENHANCED DDP OR ESM LOW SPEED PORT.
07661  M01S00998.274l797 +++|*                   (DEFAULT FOR MT = ES OR SN).
07662  M01S00999.274l797 +++|*         CT = CPU TYPE.
07663  M01S01000.274l797 +++|*              NC - NO CPU COUPLER.
07664  M01S01001.274l797 +++|*                   (DEFAULT FOR MT = SN).
07665  M01S01002.274l797 +++|
07666  M01S01003.274l797 +++|
07667  M01S01004.274l797 +++| PET      DATA   H*ET*
07668  M01S01005.274l797 +++|          LDN    CFGL        GET HARDWARE MODE
07669  M01S01006.274l797 +++|          CRD    CM
07670  M01S01007.274l797 +++|          LDD    CM+3
07671  M01S01008.274l797 +++|          SHN    4-12
07672  M01S01009.274l797 +++|          LPN    20
07673  M01S01010.274l797 +++|          ADC    4511        4531 = EXTENDED, 4511 = ECS ADDRESSING
07674  M01S01011.274l797 +++|          STM    TMTO+ESMP+2
07675  M01S01012.274l797 +++|          LDC    TMTOL*10000+TMTO  CHECK MEMORY TYPE
07676  M01S01013.274l797 +++|          RJM    CET
07677  M01S01014.274l797 +++|          RJM    CSC         CHECK SEPARATOR CHARACTER
07678  M01S01015.274l797 +++|          ZJN    PET3        IF NO PATH TYPE/CPU TYPE SPECIFIED
07679  M01S01016.274l797 +++|          LMN    1R/&1R,
07680  M01S01017.274l797 +++|          ZJN    PET2        IF CORRECT SEPARATOR
07681  M01S01018.274l797 +++| PET1     JMP    ILL         PROCESS INCORRECT ENTRY
07682  M01S01019.274l797 +++|
07683  M01S01020.274l797 +++| PET2     LDD    CN+3
07684  M01S01021.274l797 +++|          LMC    2RDP
07685  M01S01022.274l797 +++|          NJN    PET1        IF NOT TYPE *DP*
07686  M01S01023.274l797 +++|          AOD    KA
07687  M01S01024.274l797 +++|          LDI    KA
07688  M01S01025.274l797 +++|          LMN    1R/
07689  M01S01026.274l797 +++|          ZJN    PET4        IF NULL PATH TYPE
07690  M01S01027.274l797 +++|          LDC    TPTOL*10000+TPTO  CHECK PATH TYPE
07691  M01S01028.274l797 +++|          RJM    CET
07692  M01S01029.274l797 +++|          RJM    CSC         CHECK SEPARATOR CHARACTER
07693  M01S01030.274l797 +++| PET3     ZJN    PET5        IF NO CPU TYPE
07694  M01S01031.274l797 +++|          LMN    1R/&1R,
07695  M01S01032.274l797 +++|          NJN    PET1        IF NOT CORRECT SEPARATOR
07696  M01S01033.274l797 +++| PET4     AOD    KA
07697  M01S01034.274l797 +++|          LDC    TCTOL*10000+TCTO  CHECK CPU TYPE
07698  M01S01035.274l797 +++|          RJM    CET
07699  M01S01036.274l797 +++| PET5     JMP    KWP5        RETURN
07700  M01S01037.274l797 +++|          SPACE  4,10
07701  M01S01038.274l797 +++|**        EXTENDED MEMORY TYPE OPTION TABLES.
07702  M01S01039.274l797 +++|*
07703  M01S01040.274l797 +++|*         ENTRY = 3 WORDS
07704  M01S01041.274l797 +++|*T,       12/ OP,12/ MASK,1/D,2/ R,3/ MT,3/ CT,3/ PT
Figure

0235689101112232429 PT CT MT RD MASK OP3035 OP

07705  M01S01042.274l797 +++|*
07706  M01S01043.274l797 +++|*         OP = MNEMONIC.
07707  M01S01044.274l797 +++|*         MASK = *DILL* BYTE 3 MASK.
07708  M01S01045.274l797 +++|*         R = RESERVED.
07709  M01S01046.274l797 +++|*         D = DEVICE SUPPORTS DIRECT TRANSFER.
07710  M01S01047.274l797 +++|*         MT = MEMORY TYPE.
07711  M01S01048.274l797 +++|*              0 = RESERVED.
07712  M01S01049.274l797 +++|*              1 = E1 (ECS 1).
07713  M01S01050.274l797 +++|*              2 = E2 (ECS 2).
07714  M01S01051.274l797 +++|*              3 = LE (LCME).
07715  M01S01052.274l797 +++|*              4 = EM (UEM).
07716  M01S01053.274l797 +++|*              5 = ES (ESM).
07717  M01S01054.274l797 +++|*              6 = SN (STORNET).
07718  M01S01055.274l797 +++|*              7 = RESERVED.
07719  M01S01056.274l797 +++|*
07720  M01S01057.274l797 +++|*         CT = CPU TYPE
07721  M01S01058.274l797 +++|*              0 = NO CPU PATH.
07722  M01S01059.274l797 +++|*              1 = ECS MODE.
07723  M01S01060.274l797 +++|*              2 = LCME.
07724  M01S01061.274l797 +++|*              3 = ESM MODE.
07725  M01S01062.274l797 +++|*              4 = UEM CPU INTERFACE.
07726  M01S01063.274l797 +++|*              5 - 7 = RESERVED.
07727  M01S01064.274l797 +++|*
07728  M01S01065.274l797 +++|*         PT = PP PATH TYPE.
07729  M01S01066.274l797 +++|*              0 = NO DDP.
07730  M01S01067.274l797 +++|*              1 = DC145 PARITY ENHANCED DDP
07731  M01S01068.274l797 +++|*                  OR ESM LOW SPEED PORT.
07732  M01S01069.274l797 +++|*              2 = DC135 DDP.
07733  M01S01070.274l797 +++|*              3-7 = RESERVED
07734  M01S01071.274l797 +++|
07735  M01S01072.274l797 +++|
07736  M01S01073.274l797 +++| TMTO     BSS    0           TABLE OF MEMORY TYPE OPTIONS
07737  M01S01074.274l797 +++|          CON    2RE1,0,4112  ECS 1, DC135 DDP
07738  M01S01075.274l797 +++|          CON    2RE2,0,4212  ECS 2, DC135 DDP
07739  M01S01076.274l797 +++|          CON    2RLE,0,4320  LCME
07740  M01S01077.274l797 +++|          CON    2REM,0,4440  UEM
07741  M01S01078.274l797 +++| ESMP     EQU    *-TMTO      POINTER FOR ESM ENTRY
07742  M01S01079.274l797 +++|          CON    2RES,0,4511  ESM, LSP
07743  M01S01080.274l797 +++|          CON    2RSN,0,0601  STORNET
07744  M01S01081.274l797 +++| TMTOL    EQU    *-TMTO
07745  M01S01082.274l797 +++|
07746  M01S01083.274l797 +++| TPTO     BSS    0           TABLE OF PATH TYPE OPTIONS
07747  M01S01084.274l797 +++|          CON    2RD1,-7,2   DC135 DDP
07748  M01S01085.274l797 +++|          CON    2RD2,-7,1   DC145 PARITY ENHANCED DDP
07749  M01S01086.274l797 +++| TPTOL    EQU    *-TPTO
07750  M01S01087.274l797 +++|
07751  M01S01088.274l797 +++| TCTO     BSS    0           TABLE OF CPU TYPE OPTIONS
07752  M01S01089.274l797 +++|          CON    2RNC,-4077,1  NO CPU COUPLER
07753  M01S01090.274l797 +++| TCTOL    EQU    *-TCTO
07754  M01S01091.274l797 +++| PIB      SPACE  4,10
07755  M01S01092.274l797 +++|***       IB=N.
07756  M01S01093.274l797 +++|*
07757  M01S01094.274l797 +++|*         INSTALLATION BYTE.
07758  M01S01095.274l797 +++|*         N = 0B - 7777B.
07759  M01S01096.274l797 +++|
07760  M01S01097.274l797 +++|
07761  M01S01098.274l797 +++| PIB      DATA   H*IB*
07762  M01S01099.274l797 +++|          RJM    AOD         ASSEMBLE INSTALLATION BYTE VALUE
07763  M01S01100.274l797 +++|          STM    EBUT+5
07764  M01S01101.274l797 +++|          JMP    KWP5        RETURN
07765  M01S01102.274l797 +++| PMA      SPACE  4,10
07766  M01S01103.274l797 +++|***       MA=STATUS.
07767  M01S01104.274l797 +++|*
07768  M01S01105.274l797 +++|*         EXTENDED MEMORY MAINTENANCE MODE.
07769  M01S01106.274l797 +++|*         STATUS = *ON* OR *OFF*.
07770  M01S01107.274l797 +++|
07771  M01S01108.274l797 +++|
07772  M01S01109.274l797 +++| PMA      DATA   H*MA*
07773  M01S01110.274l797 +++|          RJM    AST         ASSEMBLE MAINTENANCE MODE STATUS
07774  M01S01111.274l797 +++|          SHN    21-0
07775  M01S01112.274l797 +++|          PJN    PMA1        IF *ON* OR *OFF*
07776  M01S01113.274l797 +++|          JMP    ILL         PROCESS INCORRECT ENTRY
07777  M01S01114.274l797 +++|
07778  M01S01115.274l797 +++| PMA1     LDM    TDDB+DVED   SET STATUS
07779  M01S01116.274l797 +++|          SHN    23-11
07780  M01S01117.274l797 +++|          SCN    2
07781  M01S01118.274l797 +++|          LMD    AB+4
07782  M01S01119.274l797 +++|          LMN    2
07783  M01S01120.274l797 +++|          SHN    11-1
07784  M01S01121.274l797 +++|          STM    TDDB+DVED
07785  M01S01122.274l797 +++|          JMP    KWP5        RETURN
07786  M01S01123.274l797 +++| PMC      SPACE  4,10
07787  M01S01124.274l797 +++|***       MC=N.
07788  M01S01125.274l797 +++|*
07789  M01S01126.274l797 +++|*         ESM SIDE DOOR PORT CHANNEL NUMBER.
07790  M01S01127.274l797 +++|*         N = 0-13B, 20B-33B.
07791  M01S01128.274l797 +++|
07792  M01S01129.274l797 +++|
07793  M01S01130.274l797 +++| PMC      DATA   H*MC*
07794  M01S01131.274l797 +++|          RJM    CDR         ASSEMBLE CHANNEL NUMBER
07795  M01S01132.274l797 +++|          LDC    LDNI        SET FIRST CHANNEL
07796  M01S01133.274l797 +++|          STM    VCNA
07797  M01S01134.274l797 +++|          RJM    VCN         VALIDATE CHANNEL NUMBER
07798  M01S01135.274l797 +++|          RJM    STV         STORE VALUE
07799  M01S01136.274l797 +++|          JMP    KWP5        RETURN
Line S00251 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
07800  M01S00251.284l847 +++| PPN      SPACE  4,10
07801  M01S00252.284l847 +++|***       PN=N.
07802  M01S00253.284l847 +++|*
07803  M01S00254.284l847 +++|*         PARTITION NUMBER.
07804  M01S00255.284l847 +++|*         PN = 1-17B
07805  M01S00256.284l847 +++|
07806  M01S00257.284l847 +++| PPN      DATA   H*PN*
07807  M01S00258.284l847 +++|          RJM    AOD         ASSEMBLE PARTITION NUMBER
07808  M01S00259.284l847 +++|          LDM    MSSL,MS
07809  M01S00260.284l847 +++|          LPN    17B
07810  M01S00261.284l847 +++|          ADN    1
07811  M01S00262.284l847 +++|          SBD    AB+4
07812  M01S00263.284l847 +++|          SBM    PEIB        CHECK NUMBER OF PARTITIONS
07813  M01S00264.284l847 +++|          MJN    PPN1        IF PARTITION OUT OF RANGE
07814  M01S00265.284l847 +++|          LDD    AB+4        SAVE FIRST PARTITION NUMBER
07815  M01S00266.284l847 +++|          STM    PEIC
07816  M01S00267.284l847 +++|          AOM    PEIA        INDICATE *PN* PARAMETER PROCESSED.
07817  M01S00268.284l847 +++|          JMP    KWP5        RETURN
07818  M01S00269.284l847 +++|
07819  M01S00270.284l847 +++| PPN1     JMP    ILL         PROCESS INCORRECT ENTRY
Line S01137 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
07820  M01S01137.274l797 +++| PST      SPACE  4,10
07821  M01S01138.274l797 +++|***       ST=STATUS.
07822  M01S01139.274l797 +++|*
07823  M01S01140.274l797 +++|*         DEVICE STATUS.
07824  M01S01141.274l797 +++|*         STATUS = *ON* OR *IDLE* OR *OFF* OR *DOWN*.
07825  M01S01142.274l797 +++|*
07826  M01S01143.274l797 +++|*         *ON* OR *IDLE* = EQUIPMENT AVAILABLE FOR ACCESS.
07827  M01S01144.274l797 +++|*         *OFF* OR *DOWN* = EQUIPMENT UNAVAILABLE FOR ACCESS.
07828  M01S01145.274l797 +++|*
07829  M01S01146.274l797 +++|*         *OFF* OR *DOWN* IS NOT VALID FOR AN EQUIPMENT WHICH IS
07830  M01S01147.274l797 +++|*         DEFINED AS A SYSTEM, FAMILY, OR CHECKPOINT DEVICE.
07831  M01S01148.274l797 +++|
07832  M01S01149.274l797 +++|
07833  M01S01150.274l797 +++| PST      DATA   H*ST*
07834  M01S01151.274l797 +++|          RJM    AST         ASSEMBLE STATUS
07835  M01S01152.274l797 +++|          ZJN    PST3        IF *ON*
07836  M01S01153.274l797 +++|          LPN    2
07837  M01S01154.274l797 +++|          NJN    PST2        IF *OFF* OR *DOWN*
07838  M01S01155.274l797 +++|          UJN    PST3        PROCESS *IDLE*
07839  M01S01156.274l797 +++|
07840  M01S01157.274l797 +++| PST1     JMP    ILL         PROCESS INCORRECT ENTRY
07841  M01S01158.274l797 +++|
07842  M01S01159.274l797 +++| PST2     LDD    CN
07843  M01S01160.274l797 +++|          SHN    21-12
07844  M01S01161.274l797 +++|          MJN    PST1        IF SYSTEM DEVICE
07845  M01S01162.274l797 +++|          LDM    .PFNL+3
07846  M01S01163.274l797 +++|          SBD    EQ
07847  M01S01164.274l797 +++|          ZJN    PST1        IF FAMILY EQUIPMENT
07848  M01S01165.274l797 +++|          LDM    TDDB+DVPR
07849  M01S01166.274l797 +++|          LPN    2
07850  M01S01167.274l797 +++|          NJN    PST1        IF CHECKPOINT DEVICE
07851  M01S01168.274l797 +++| PST3     RJM    STV         STORE VALUE
07852  M01S01169.274l797 +++|          JMP    KWP5        RETURN
07853  M01S01170.274l797 +++| PSZ      SPACE  4,10
07854  M01S01171.274l797 +++|***       SZ=N.
07855  M01S01172.274l797 +++|*
07856  M01S01173.274l797 +++|*         SIZE OF EXTENDED MEMORY.
07857  M01S01174.274l797 +++|*         N = VALUE  (ECS 1 AVAILABLE)  (ECS 2, ESM, OR LCME AVAILABLE)
07858  M01S01175.274l797 +++|*             400B   (125K)             (131K)
07859  M01S01176.274l797 +++|*             1000B  (250K)             (262K)
07860  M01S01177.274l797 +++|*             2000B  (500K)             (524K)
07861  M01S01178.274l797 +++|*             4000B  (1000K)            (1048K)
07862  M01S01179.274l797 +++|*             10000B (2000K)            (2096K)
07863  M01S01180.274l797 +++|*
07864  M01S01181.274l797 +++|*         N = 10B (4K) THROUGH 10000B-MINCM (2000K-MINCM) FOR UEM.
07865  M01S01182.274l797 +++|*
07866  M01S01183.274l797 +++|*         FOR UEM, ECS 2, LCM AND ESM, SZ MAY BE ANY VALUE BETWEEN AND
07867  M01S01184.274l797 +++|*         INCLUDING 10B (4K WORDS) AND 10000B (2M WORDS).  THE SUM OF
07868  M01S01185.274l797 +++|*         UEM SIZE + NVE SIZE + MINCM SIZE (65K USED IF NOT SPECIFIED)
07869  M01S01186.274l797 +++|*         MUST BE .LE. THE PHYSICAL MAIN MEMORY SIZE RETURNED BY *CTI*.
07870  M01S01187.274l797 +++|*
07871  M01S01188.274l797 +++|*         FOR UEM AND ESM, *SZ* MAY BE UP TO 100000B (16M WORDS).
07872  M01S01189.274l797 +++|
07873  M01S01190.274l797 +++|
07874  M01S01191.274l797 +++| PSZ      DATA   H*SZ*
07875  M01S01192.274l797 +++|          RJM    AOD         ASSEMBLE SIZE
07876  M01S01193.274l797 +++|          STM    TDDB+DVES+1
07877  M01S01194.274l797 +++|          LDD    AB+3
07878  M01S01195.274l797 +++|          STM    TDDB+DVES
07879  M01S01196.274l797 +++|          SCN    17
07880  M01S01197.274l797 +++|          NJN    PSZ1        IF TOO MANY DIGITS
07881  M01S01198.274l797 +++|          LDM    EBUT+7
07882  M01S01199.274l797 +++|          LPC    300
07883  M01S01200.274l797 +++|          STD    T1          SAVE PREVIOUS XM SHIFT
07884  M01S01201.274l797 +++|          LDD    AB+3
07885  M01S01202.274l797 +++|          SHN    14
07886  M01S01203.274l797 +++|          LMD    AB+4
07887  M01S01204.274l797 +++|          SBN    10
07888  M01S01205.274l797 +++|          PJN    PSZ2        IF .GE. 10K
07889  M01S01206.274l797 +++| PSZ1     JMP    ILL         PROCESS INCORRECT ENTRY
07890  M01S01207.274l797 +++|
07891  M01S01208.274l797 +++| PSZ2     ADN    10-1
07892  M01S01209.274l797 +++|          SHN    -14
07893  M01S01210.274l797 +++|          ZJN    PSZ5        IF .LE. 2M WORDS
07894  M01S01211.274l797 +++|          SHN    -1
07895  M01S01212.274l797 +++|          ZJN    PSZ4        IF .LE. 4M WORDS
07896  M01S01213.274l797 +++|          SHN    -1
07897  M01S01214.274l797 +++|          ZJN    PSZ3        IF .LE. 8M WORDS
07898  M01S01215.274l797 +++|          SHN    -1
07899  M01S01216.274l797 +++|          NJN    PSZ1        IF .GT. 16M WORDS
07900  M01S01217.274l797 +++|          LDN    1
07901  M01S01218.274l797 +++| PSZ3     ADN    1
07902  M01S01219.274l797 +++| PSZ4     ADN    1
07903  M01S01220.274l797 +++| PSZ5     SHN    6
07904  M01S01221.274l797 +++|          SBD    T1
07905  M01S01222.274l797 +++|          MJN    PSZ6        IF PREVIOUS SHIFT OKAY
07906  M01S01223.274l797 +++|          RAM    EBUT+7
07907  M01S01224.274l797 +++| PSZ6     JMP    KWP5        RETURN
07908  M01S01225.274l797 +++| PTS      SPACE  4,10
07909  M01S01226.274l797 +++|***       TS=N.
07910  M01S01227.274l797 +++|*
07911  M01S01228.274l797 +++|*         TRACK SIZE FOR EXTENDED MEMORY.
07912  M01S01229.274l797 +++|*         N = VALUE  (TRACK SIZE IN SECTORS)
07913  M01S01230.274l797 +++|*             20     (20B)
07914  M01S01231.274l797 +++|*             40     (40B)
07915  M01S01232.274l797 +++|*             100    (100B)
07916  M01S01233.274l797 +++|*             200    (200B)
07917  M01S01234.274l797 +++|*
07918  M01S01235.274l797 +++|*         EXTENDED MEMORY MAY BE ALLOCATED IN TRACKS OF 20B, 40B, 100B
07919  M01S01236.274l797 +++|*         AND 200B SECTORS, ALLOWING THE SIZE OF EXTENDED MEMORY TO
07920  M01S01237.274l797 +++|*         EXCEED THE PREVIOUS 2M WORD LIMIT AND EXTEND TO 16MW.
07921  M01S01238.274l797 +++|
07922  M01S01239.274l797 +++|
07923  M01S01240.274l797 +++| PTS      DATA   H*TS*
07924  M01S01241.274l797 +++|          LDM    EBUT+7      SAVE PREVIOUS XM SHIFT
07925  M01S01242.274l797 +++|          LPC    300
07926  M01S01243.274l797 +++|          STD    T3
07927  M01S01244.274l797 +++|          RJM    AOD         ASSEMBLE TRACK SIZE
07928  M01S01245.274l797 +++|          SBN    20
07929  M01S01246.274l797 +++|          ZJN    PTS3        IF 20B
07930  M01S01247.274l797 +++|          SBN    40-20
07931  M01S01248.274l797 +++|          ZJN    PTS2        IF 40B
07932  M01S01249.274l797 +++|          SBN    100-40
07933  M01S01250.274l797 +++|          ZJN    PTS1        IF 100B
07934  M01S01251.274l797 +++|          SBD    HN
07935  M01S01252.274l797 +++|          NJN    PTS4        IF NOT 200B
07936  M01S01253.274l797 +++|          LDN    1
07937  M01S01254.274l797 +++| PTS1     ADN    1
07938  M01S01255.274l797 +++| PTS2     ADN    1
07939  M01S01256.274l797 +++|          SHN    6
07940  M01S01257.274l797 +++|          SBD    T3
07941  M01S01258.274l797 +++|          MJN    PTS3        IF PREVIOUS SHIFT OKAY
07942  M01S01259.274l797 +++|          RAM    EBUT+7
07943  M01S01260.274l797 +++| PTS3     JMP    KWP5        RETURN
07944  M01S01261.274l797 +++|
07945  M01S01262.274l797 +++| PTS4     JMP    ILL         PROCESS INCORRECT ENTRY
07946  M01S01263.274l797 +++| PUN      SPACE  4,10
07947  M01S01264.274l797 +++|***       UN=U1.
07948  M01S01265.274l797 +++|*         UN=U1/.../UN.
07949  M01S01266.274l797 +++|*         UN=U1-UN.  (HORIZONTALLY CONTIGUOUS UNITS)
07950  M01S01267.274l797 +++|*
07951  M01S01268.274l797 +++|*         UNIT NUMBER.
07952  M01S01269.274l797 +++|*         UN = 0-77B (MAXIMUM UNIT NUMBER AND NUMBER OF UNITS
07953  M01S01270.274l797 +++|*              ALLOWED ARE DEVICE TYPE DEPENDENT.)
07954  M01S01271.274l797 +++|
07955  M01S01272.274l797 +++| PUN      DATA   H*UN*
07956  M01S01273.274l797 +++|          LDI    KA
07957  M01S01274.274l797 +++|          SBN    1R8
07958  M01S01275.274l797 +++|          PJN    PUN1        IF NULL UNIT PARAMETER
07959  M01S01276.274l797 +++|          RJM    CDR         ASSEMBLE UNIT NUMBER
Line S01277 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
07960  M02S01277.284l847 ---|          LDD    CN
07961  M02S01278.284l847 ---|          SHN    21-13
07962  M02S01279.284l847 ---|          MJN    PUN5        IF MASS STORAGE DEVICE
Line S01280 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
07963  M01S01280.274l797 +++|          RJM    CSC
Line S00271 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
07964  M01S00271.284l847 +++|          ZJN    PUN3        IF SINGLE UNIT SPECIFIED
07965  M01S00272.284l847 +++|          LMN    1R/&1R,
07966  M01S00273.284l847 +++|          ZJN    PUN3        IF MULTIPLE UNITS SPECIFIED
07967  M01S00274.284l847 +++|          LMN    1R-&1R/
Line S01281 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
07968  M01S01281.274l797 +++|          NJN    PUN1        IF INCORRECT SEPARATOR
Line S01282 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
07969  M02S01282.284l847 ---|          LDM    2,MS
07970  M02S01283.284l847 ---|          SHN    -6
07971  M02S01284.284l847 ---|          SBD    AB+4
07972  M02S01285.284l847 ---|          PJN    PUN2        IF UNIT NUMBER .LE. LIMIT
07973  M02S01286.284l847 ---| PUN1     JMP    ILL         PROCESS INCORRECT ENTRY
07974  M02S01287.284l847 ---|
07975  M02S01288.284l847 ---| PUN2     LDD    CN+3        CHECK DEVICE TYPE
07976  M02S01289.284l847 ---|          SBK    2RCS
07977  M02S01290.284l847 ---|          MJN    PUN3        IF NOT *CS*
07978  M02S01291.284l847 ---|          SBN    1RT-1RS+1
07979  M02S01292.284l847 ---|          PJN    PUN3        IF NOT *CT*
07980  M02S01293.284l847 ---|          LDD    AB+4
07981  M02S01294.284l847 ---|          SHN    3           POSITION UNIT NUMBER
07982  M02S01295.284l847 ---|          STD    AB+4
07983  M02S01296.284l847 ---|          LDD    CN+4
07984  M02S01297.284l847 ---|          SCN    30
07985  M02S01298.284l847 ---|          UJN    PUN4        STORE UNIT NUMBER
07986  M02S01299.284l847 ---|
07987  M02S01300.284l847 ---| PUN3     LDD    CN+4        SET UNIT NUMBER FOR *MT* OR *NT*
07988  M02S01301.284l847 ---|          SCN    17
07989  M02S01302.284l847 ---| PUN4     ADD    AB+4
07990  M02S01303.284l847 ---|          STD    CN+4
07991  M02S01304.284l847 ---|          JMP    KWP5        RETURN
07992  M02S01305.284l847 ---|
07993  M02S01306.284l847 ---| PUN5     RJM    CSC
07994  M02S01307.284l847 ---|          ZJN    PUN6        IF SINGLE UNIT SPECIFIED
07995  M02S01308.284l847 ---|          LMN    1R/&1R,
07996  M02S01309.284l847 ---|          ZJN    PUN6        IF MULTIPLE UNITS SPECIFIED
07997  M02S01310.284l847 ---|          LMN    1R-&1R/
07998  M02S01311.284l847 ---|          NJN    PUN7        IF INCORRECT SEPARATOR
Line S01312 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
07999  M01S01312.274l797 +++|          LDD    AB+4        SAVE FIRST UNIT NUMBER
08000  M01S01313.274l797 +++|          STD    T6
08001  M01S01314.274l797 +++|          AOD    KA
08002  M01S01315.274l797 +++|          RJM    CDR         ASSEMBLE LAST UNIT NUMBER
08003  M01S01316.274l797 +++|          RJM    CSC
Line S01317 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08004  M02S01317.284l847 ---|          NJN    PUN7        IF INCORRECT SEPARATOR
08005  M02S01318.284l847 ---|          LDD    AB+4        SET LAST UNIT NUMBER
Line S00275 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08006  M01S00275.284l847 +++|          ZJN    PUN2        IF NOT INCORRECT SEPARATOR
08007  M01S00276.284l847 +++| PUN1     JMP    ILL         PROCESS INCORRECT ENTRY
08008  M01S00277.284l847 +++|
08009  M01S00278.284l847 +++| PUN2     LDD    AB+4        SET LAST UNIT NUMBER
Line S01319 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08010  M01S01319.274l797 +++|          RAM    SUNA
08011  M01S01320.274l797 +++|          LDD    T6
08012  M01S01321.274l797 +++|          SBD    AB+4
Line S01322 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08013  M02S01322.284l847 ---|          PJN    PUN7        IF INCORRECT RANGE
Line S00279 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08014  M01S00279.284l847 +++|          PJN    PUN1        IF INCORRECT RANGE
Line S01323 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08015  M01S01323.274l797 +++|          RAD    AB+4        RESET FIRST UNIT NUMBER
Line S01324 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08016  M02S01324.284l847 ---| PUN6     RJM    SUL         SET UNIT LIST
Line S00280 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08017  M01S00280.284l847 +++| PUN3     LDM    MSUL,MS     SET UP MAXIMUM UNIT NUMBER
08018  M01S00281.284l847 +++|          LPN    77
08019  M01S00282.284l847 +++|          RAM    SUNC
08020  M01S00283.284l847 +++|          LDC    DVUNL*10000B+TDDB+DVUN  DESCRIPTOR TABLE WORD/COUNT
08021  M01S00284.284l847 +++|          RJM    SUL         SET UNIT LIST
Line S01325 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08022  M01S01325.274l797 +++|          LDM    MSUL,MS     CHECK UNIT COUNT
08023  M01S01326.274l797 +++|          SHN    -6
08024  M01S01327.274l797 +++|          LPN    7
08025  M01S01328.274l797 +++|          SBD    T6
Line S01329 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08026  M02S01329.284l847 ---|          PJN    PUN8        IF VALID UNIT COUNT
08027  M02S01330.284l847 ---| PUN7     JMP    ILL         PROCESS INCORRECT ENTRY
08028  M02S01331.284l847 ---|
08029  M02S01332.284l847 ---| PUN8     LDD    T6          SAVE UNIT COUNT-1
Line S00285 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08030  M01S00285.284l847 +++|          MJN    PUN1        IF INCORRECT UNIT COUNT
08031  M01S00286.284l847 +++|          LDD    T6          SAVE UNIT COUNT-1
Line S01333 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08032  M01S01333.274l797 +++|          STD    CN+4
Line S01334 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08033  M02S01334.284l847 ---|          LDM    MSAI,MS
08034  M02S01335.284l847 ---|          LPN    77
08035  M02S01336.284l847 ---|          ZJN    PUN9        IF NOT *LDAM* TYPE DEVICE
Line S00287 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08036  M01S00287.284l847 +++|          LDM    MSNT,MS
08037  M01S00288.284l847 +++|          SHN    0-13
08038  M01S00289.284l847 +++|          ZJN    PUN4        IF NOT *LDAM* TYPE DEVICE
Line S01337 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08039  M01S01337.274l797 +++|          LDD    CN          SET *LDAM* STATUS IN EST
08040  M01S01338.274l797 +++|          LPC    7577
08041  M01S01339.274l797 +++|          ADC    200
08042  M01S01340.274l797 +++|          STD    CN
Line S01341 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08043  M02S01341.284l847 ---| PUN9     JMP    KWP5        RETURN
Line S00290 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08044  M01S00290.284l847 +++| PUN4     JMP    KWP5        RETURN
Line S01342 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08045  M01S01342.274l797 +++|          TITLE  MISCELLANEOUS KEYWORD SUBROUTINES.
08046  M01S01343.274l797 +++|          AODSUB
08047  M01S01344.274l797 +++| AST      SPACE  4,15
08048  M01S01345.274l797 +++|**        AST - ASSEMBLE STATUS.
08049  M01S01346.274l797 +++|*
08050  M01S01347.274l797 +++|*         EXIT   (A) = (AB+4) = STATUS.
08051  M01S01348.274l797 +++|*                      0 = ON.
08052  M01S01349.274l797 +++|*                      1 = IDLE.
08053  M01S01350.274l797 +++|*                      2 = OFF.
08054  M01S01351.274l797 +++|*                      3 = DOWN.
08055  M01S01352.274l797 +++|*
08056  M01S01353.274l797 +++|*         USES   KB, ST.
08057  M01S01354.274l797 +++|*
08058  M01S01355.274l797 +++|*         CALLS  AKL7.
08059  M01S01356.274l797 +++|
08060  M01S01357.274l797 +++|
08061  M01S01358.274l797 +++| AST1     DATA   C*DOWN*
08062  M01S01359.274l797 +++|          LDN    3
08063  M01S01360.274l797 +++|          UJN    AST5        SET *DOWN* STATUS
08064  M01S01361.274l797 +++|
08065  M01S01362.274l797 +++| AST2     DATA   C*OFF*
08066  M01S01363.274l797 +++|          LDN    2
08067  M01S01364.274l797 +++|          UJN    AST5        SET *OFF* STATUS
08068  M01S01365.274l797 +++|
08069  M01S01366.274l797 +++| AST3     DATA   C*IDLE*
08070  M01S01367.274l797 +++|          LDN    1
08071  M01S01368.274l797 +++|          UJN    AST5        SET *IDLE* STATUS
08072  M01S01369.274l797 +++|
08073  M01S01370.274l797 +++| AST4     DATA   C*ON*
08074  M01S01371.274l797 +++|          LDN    0
08075  M01S01372.274l797 +++| AST5     STD    AB+4        SET STATUS
08076  M01S01373.274l797 +++|
08077  M01S01374.274l797 +++| AST      SUBR               ENTRY/EXIT
08078  M01S01375.274l797 +++|          LDC    ASTA-1
08079  M01S01376.274l797 +++|          STD    ST          SET SYNTAX TABLE ADDRESS
08080  M01S01377.274l797 +++|          LDD    KA
08081  M01S01378.274l797 +++|          STD    KB
08082  M01S01379.274l797 +++|          LJM    AKL7        ASSEMBLE STATUS
08083  M01S01380.274l797 +++|
08084  M01S01381.274l797 +++|
08085  M01S01382.274l797 +++| ASTA     CON    AST4
08086  M01S01383.274l797 +++|          CON    AST2
08087  M01S01384.274l797 +++|          CON    AST1
08088  M01S01385.274l797 +++|          CON    AST3
08089  M01S01386.274l797 +++|          CON    0           END OF STATUS SYNTAX TABLE
08090  M01S01387.274l797 +++|          CDRSUB
08091  M01S01388.274l797 +++| CET      SPACE  4,10
08092  M01S01389.274l797 +++|**        CET - CHECK EXTENDED MEMORY TYPE.
08093  M01S01390.274l797 +++|*
08094  M01S01391.274l797 +++|*         ENTRY  (A) = 6/TL,12/TA.
08095  M01S01392.274l797 +++|*                      TL = TABLE LENGTH.
08096  M01S01393.274l797 +++|*                      TA = FWA OF TABLE.
08097  M01S01394.274l797 +++|*
08098  M01S01395.274l797 +++|*         EXIT   OPTION MERGED INTO *DILL* BYTE 3.
08099  M01S01396.274l797 +++|*                TO *ILL* IF ERROR.
08100  M01S01397.274l797 +++|*                (KA) ADVANCED.
08101  M01S01398.274l797 +++|*
08102  M01S01399.274l797 +++|*         USES   AB, T1, T7.
08103  M01S01400.274l797 +++|
08104  M01S01401.274l797 +++|
08105  M01S01402.274l797 +++| CET      SUBR               ENTRY/EXIT
08106  M01S01403.274l797 +++|          STD    T7
08107  M01S01404.274l797 +++|          SHN    -14
08108  M01S01405.274l797 +++|          ADD    T7          SET LWA+1 OF TABLE
08109  M01S01406.274l797 +++|          STD    T1
08110  M01S01407.274l797 +++|          LDI    KA          ASSEMBLE NAME
08111  M01S01408.274l797 +++|          SHN    6
08112  M01S01409.274l797 +++|          LMM    1,KA
08113  M01S01410.274l797 +++|          STD    AB
08114  M01S01411.274l797 +++|          LDN    2           ADVANCE CHARACTER ADDRESS
08115  M01S01412.274l797 +++|          RAD    KA
08116  M01S01413.274l797 +++| CET1     LCN    3           SEARCH OPTION TABLE
08117  M01S01414.274l797 +++|          RAD    T1
08118  M01S01415.274l797 +++|          SBD    T7
08119  M01S01416.274l797 +++|          PJN    CET3        IF MORE OPTIONS
08120  M01S01417.274l797 +++| CET2     JMP    ILL         PROCESS INCORRECT ENTRY
08121  M01S01418.274l797 +++|
08122  M01S01419.274l797 +++| CET3     LDI    T1
08123  M01S01420.274l797 +++|          LMD    AB
08124  M01S01421.274l797 +++|          NJN    CET1        IF OPTION NOT FOUND
08125  M01S01422.274l797 +++|          LDM    2,T1        CHECK MAINFRAME REQUIREMENTS
08126  M01S01423.274l797 +++|          SHN    -6
08127  M01S01424.274l797 +++|          LPN    7
08128  M01S01425.274l797 +++|          SBN    3
08129  M01S01426.274l797 +++|          MJN    CET6        IF ECS OR PATH TYPE/CPU TYPE OPTION
08130  M01S01427.274l797 +++|          ZJN    CET4        IF LCME
08131  M01S01428.274l797 +++|          SBN    4-3
08132  M01S01429.274l797 +++|          NJN    CET6        IF NOT UEM
08133  M01S01430.274l797 +++|          LDD    CN+3
08134  M01S01431.274l797 +++|          LMC    2RDE
08135  M01S01432.274l797 +++|          NJN    CET2        IF UEM AND NOT TYPE *DE*
08136  M01S01433.274l797 +++|          LDD    HO
08137  M01S01434.274l797 +++|          SHN    21-13
08138  M01S01435.274l797 +++|          PJN    CET6        IF CM EXTENSION ON MAINFRAME
08139  M01S01436.274l797 +++|          UJN    CET2        PROCESS INCORRECT ENTRY
08140  M01S01437.274l797 +++|
08141  M01S01438.274l797 +++| CET4     LDD    HO
08142  M01S01439.274l797 +++|          SHN    21-11
08143  M01S01440.274l797 +++|          PJN    CET2        IF NOT CYBER 176
08144  M01S01441.274l797 +++| CET6     LDM    1,T1        SET MASK
08145  M01S01442.274l797 +++|          STM    CETA
08146  M01S01443.274l797 +++|          LDM    TDDB+DVED   MERGE NEW OPTION INTO *DILL* BYTE 3
08147  M01S01444.274l797 +++|          LPC    **
08148  M01S01445.274l797 +++| CETA     EQU    *-1
08149  M01S01446.274l797 +++|          LMM    2,T1
08150  M01S01447.274l797 +++|          STM    TDDB+DVED
08151  M01S01448.274l797 +++|          LJM    CETX        RETURN
08152  M01S01449.274l797 +++| CSC      SPACE  4,10
08153  M01S01450.274l797 +++|**        CSC - CHECK SEPARATOR CHARACTER.
08154  M01S01451.274l797 +++|*
08155  M01S01452.274l797 +++|*         ENTRY  (KA) = ADDRESS OF SEPARATOR CHARACTER
08156  M01S01453.274l797 +++|*
08157  M01S01454.274l797 +++|*         EXIT   (A) = 0 IF SEPARATOR CHARACTER IS *,* OR *.*.
08158  M01S01455.274l797 +++|
08159  M01S01456.274l797 +++|
08160  M01S01457.274l797 +++| CSC      SUBR               ENTRY/EXIT
08161  M01S01458.274l797 +++|          LDI    KA
08162  M01S01459.274l797 +++|          LMN    1R.
08163  M01S01460.274l797 +++|          ZJN    CSCX        IF *.*
08164  M01S01461.274l797 +++|          LMN    1R,&1R.
08165  M01S01462.274l797 +++|          UJN    CSCX        RETURN
Line S00291 Modification History
M01 (Added by) 284l847
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
08166  M02S00291.ns2783  ---| SPE      SPACE  4,20
08167  M02S00292.ns2783  ---|**        SPE - SYNCHRONIZE PARTITIONS AND ENTER EQUIPMENT.
08168  M02S00293.ns2783  ---|*
08169  M02S00294.ns2783  ---|*         ENTRY  (EBUT) = EQUIPMENT EST ENTRY.
08170  M02S00295.ns2783  ---|*                (TDDB) = MST ENTRY IF MASS STORAGE.
08171  M02S00296.ns2783  ---|*                (EB) = EBUF ADDRESS.
08172  M02S00297.ns2783  ---|*                (EQ) = DEVICE ENTRY TABLE NUMBER.
08173  M02S00298.ns2783  ---|*                (ET) = TDDE ADDRESS.
08174  M02S00299.ns2783  ---|*
08175  M02S00300.ns2783  ---|*         EXIT   (EBUT) ENTRY IN EBUF.
08176  M02S00301.ns2783  ---|*                (TDDB) ENTRY IN TDDE IF MASS STORAGE.
08177  M02S00302.ns2783  ---|*
08178  M02S00303.ns2783  ---|*         USES   CM, T1.
08179  M02S00304.ns2783  ---|*
08180  M02S00305.ns2783  ---|*         CALLS  EEB.
08181  M02S00306.ns2783  ---|
08182  M02S00307.ns2783  ---|
08183  M02S00308.ns2783  ---| SPE8     RJM    EEB         ENTER EQUIPMENT INTO BUFFER
08184  M02S00309.ns2783  ---|
08185  M02S00310.ns2783  ---| SPE      SUBR               ENTRY/EXIT
08186  M02S00311.ns2783  ---|          LDI    ES
08187  M02S00312.ns2783  ---|          SHN    21-13
08188  M02S00313.ns2783  ---|          PJN    SPE8        IF NOT MASS STORAGE
08189  M02S00314.ns2783  ---|          SHN    21-5-21+13
08190  M02S00315.ns2783  ---|          PJN    SPE8        IF NOT A BUFFERED DEVICE
08191  M02S00316.ns2783  ---|          LDM    EBUT+10
08192  M02S00317.ns2783  ---|          SHN    21-13
08193  M02S00318.ns2783  ---|          PJN    SPE8        IF NOT A PARTITIONED DEVICE
08194  M02S00319.ns2783  ---|          LDD    LE
08195  M02S00320.ns2783  ---|          STD    T1
08196  M02S00321.ns2783  ---| SPE1     SOD    T1
08197  M02S00322.ns2783  ---|          ZJN    SPE8        IF SEARCH COMPLETED
08198  M02S00323.ns2783  ---|          SHN    22-5
08199  M02S00324.ns2783  ---|          ADD    EB          (EBUF ADDRESS)
08200  M02S00325.ns2783  ---|          SHN    6
08201  M02S00326.ns2783  ---|          CRM    SPEA,ON     READ EQUIPMENT ENTRY
08202  M02S00327.ns2783  ---|          LDM    EBUT+3
08203  M02S00328.ns2783  ---|          LMM    SPEA+3
08204  M02S00329.ns2783  ---|          NJN    SPE1        IF NOT THE SAME DEVICE TYPE
08205  M02S00330.ns2783  ---|          LDM    EBUT+4
08206  M02S00331.ns2783  ---|          LMM    SPEA+4
08207  M02S00332.ns2783  ---|          LPC    MLFPR
08208  M02S00333.ns2783  ---|          ZJN    SPE1        IF *INITIALIZE,FP* FLAGS ARE THE SAME
08209  M02S00334.ns2783  ---|          LDC    SPEA        COMPARE CHANNEL ENTRIES
08210  M02S00335.ns2783  ---|          STD    CM
08211  M02S00336.ns2783  ---| SPE3     AOD    CM
08212  M02S00337.ns2783  ---|          LMC    SPEA+3
08213  M02S00338.ns2783  ---|          ZJN    SPE1        IF ALL OTHER DEVICE CHANNELS CHECKED
08214  M02S00339.ns2783  ---|          LDD    ES
08215  M02S00340.ns2783  ---|          STD    T0
08216  M02S00341.ns2783  ---| SPE4     AOD    T0
08217  M02S00342.ns2783  ---|          LMC    EBUT+3
08218  M02S00343.ns2783  ---|          ZJN    SPE3        IF ALL CURRENT DEVICE CHANNELS CHECKED
08219  M02S00344.ns2783  ---|          LDI    T0          CURRENT CHANNEL
08220  M02S00345.ns2783  ---|          ZJN    SPE4        IF NO CHANNEL ENTRY
08221  M02S00346.ns2783  ---|          LMI    CM          OTHER DEVICE CHANNEL
08222  M02S00347.ns2783  ---|          LPC    4277
08223  M02S00348.ns2783  ---|          NJN    SPE4        IF CHANNELS ARE NOT THE SAME
08224  M02S00349.ns2783  ---|          LDD    ET          READ *TDDB* ENTRY
08225  M02S00350.ns2783  ---|          SHN    4
08226  M02S00351.ns2783  ---|          ADD    T1
08227  M02S00352.ns2783  ---|          SHN    2
08228  M02S00353.ns2783  ---|          ADD    T1
08229  M02S00354.ns2783  ---|          CRM    SPEB,DV
08230  M02S00355.ns2783  ---|          LDM    TDDB+DVPR   COMPARE EQUIPMENT NUMBER
08231  M02S00356.ns2783  ---|          LMM    SPEB+DVPR
08232  M02S00357.ns2783  ---|          SHN    -11
08233  M02S00358.ns2783  ---|          ZJN    SPE6        IF EQUIPMENT NUMBERS MATCH
08234  M02S00359.ns2783  ---|          LDM    TDDB+DVPR
08235  M02S00360.ns2783  ---|          SHN    21-5
08236  M02S00361.ns2783  ---|          PJN    SPE5        IF NO SECOND EQUIPMENT
08237  M02S00362.ns2783  ---|          SHN    11-0
08238  M02S00363.ns2783  ---|          LMM    SPEB+DVPR
08239  M02S00364.ns2783  ---|          SHN    -11
08240  M02S00365.ns2783  ---|          ZJN    SPE6        IF EQUIPMENT NUMBERS MATCH
08241  M02S00366.ns2783  ---| SPE5     LDM    SPEB+DVPR
08242  M02S00367.ns2783  ---|          SHN    21-5
08243  M02S00368.ns2783  ---|          PJN    SPE7        IF NO SECOND EQUIPMENT
08244  M02S00369.ns2783  ---|          SHN    11-0
08245  M02S00370.ns2783  ---|          LMM    TDDB+DVPR
08246  M02S00371.ns2783  ---|          SHN    -11
08247  M02S00372.ns2783  ---|          NJN    SPE7        IF NO MATCH
08248  M02S00373.ns2783  ---| SPE6     LDM    TDDB+DVUN+3 COMPARE UNIT NUMBER
08249  M02S00374.ns2783  ---|          LMM    SPEB+DVUN+3
08250  M02S00375.ns2783  ---|          NJN    SPE7        IF NO MATCH
08251  M02S00376.ns2783  ---|          LDM    EBUT+4
08252  M02S00377.ns2783  ---|          LPN    17
08253  M02S00378.ns2783  ---|          LMC    MLFPR+MLIAL
08254  M02S00379.ns2783  ---|          STM    EBUT+4
08255  M02S00380.ns2783  ---|          LDM    SPEA+4
08256  M02S00381.ns2783  ---|          LPN    17
08257  M02S00382.ns2783  ---|          LMC    MLFPR+MLIAL
08258  M02S00383.ns2783  ---|          STM    SPEA+4
08259  M02S00384.ns2783  ---|          LDD    T1
08260  M02S00385.ns2783  ---|          SHN    22-5
08261  M02S00386.ns2783  ---|          ADD    EB          (EBUF ADDRESS)
08262  M02S00387.ns2783  ---|          SHN    6
08263  M02S00388.ns2783  ---|          CWM    SPEA,ON
08264  M02S00389.ns2783  ---| SPE7     UJP    SPE1        CHECK FOR MORE ENTRIES
08265  M02S00390.ns2783  ---|
08266  M02S00391.ns2783  ---| SPEA     BSS    5           TEMPORARY EBUF ENTRY
08267  M02S00392.ns2783  ---| SPEB     BSS    TDDCL*5     TEMPORARY TDDE ENTRY
Line S01463 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08268  M01S01463.274l797 +++| SUL      SPACE  4,10
Line S01464 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08269  M02S01464.284l847 ---|**        SUL - SET UNIT LIST.
Line S00393 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08270  M01S00393.284l847 +++|**        SUL - SET UNIT LIST.
Line S01465 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08271  M01S01465.274l797 +++|*
Line S01466 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08272  M02S01466.284l847 ---|*         ENTRY  (AB+4) = FIRST UNIT NUMBER.
Line S00394 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08273  M01S00394.284l847 +++|*         ENTRY  (A) = 6/LIST WORD COUNT, 12/ LIST WORD ADDRESS.
08274  M01S00395.284l847 +++|*                (AB+4) = FIRST UNIT NUMBER.
Line S01467 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08275  M01S01467.274l797 +++|*
Line S01468 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08276  M02S01468.284l847 ---|*         EXIT   (T6) = UNIT COUNT - 1.
08277  M02S01469.284l847 ---|*                UNIT LIST SET IN *TDDB*.
Line S00396 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08278  M01S00396.284l847 +++|*         EXIT   (T6) = UNIT COUNT - 1.
08279  M01S00397.284l847 +++|*                UNIT LIST SET IN SPECIFIED ADDRESS.
Line S01470 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08280  M01S01470.274l797 +++|*
Line S01471 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08281  M02S01471.284l847 ---|*         USES   T5, T6.
Line S00398 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08282  M01S00398.284l847 +++|*         USES   T0, T5, T6.
Line S01472 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08283  M01S01472.274l797 +++|*
08284  M01S01473.274l797 +++|*         CALLS  SUN.
08285  M01S01474.274l797 +++|
08286  M01S01475.274l797 +++|
08287  M01S01476.274l797 +++| SUL      SUBR               ENTRY/EXIT
Line S01477 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08288  M02S01477.284l847 ---|          LDC    TDDB+DVUN+3 SET UNIT LIST POSITION
Line S00399 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08289  M01S00399.284l847 +++|          STM    SULA        FWA OF LIST
Line S01478 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08290  M01S01478.274l797 +++|          STD    T5
Line S01479 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08291  M02S01479.284l847 ---|          LDN    0
Line S00400 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08292  M01S00400.284l847 +++|          SHN    -14         NUMBER OF WORDS
08293  M01S00401.284l847 +++|          RAD    T5          LWA+1 OF LIST
08294  M01S00402.284l847 +++|          LDN    0           INITIALIZE UNIT COUNT
Line S01480 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08295  M01S01480.274l797 +++|          STD    T6
Line S01481 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08296  M02S01481.284l847 ---|          STI    T5          CLEAR UNIT LIST
08297  M02S01482.284l847 ---|          STM    -1,T5
08298  M02S01483.284l847 ---|          STM    -2,T5
08299  M02S01484.284l847 ---|          STM    -3,T5
Line S00403 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08300  M01S00403.284l847 +++| SUL1     SOD    T5
08301  M01S00404.284l847 +++|          SBM    SULA
08302  M01S00405.284l847 +++|          MJP    ILL         IF TOO MANY ENTRIES FOR LIST
Line S01485 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08303  M01S01485.274l797 +++|          LDD    AB+4
Line S01486 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08304  M02S01486.284l847 ---| SUL1     STI    T5          SET LOWER UNIT
08305  M02S01487.284l847 ---|          RJM    SUN         GET NEXT UNIT
08306  M02S01488.284l847 ---|          MJN    SULX        IF END OF UNITS
08307  M02S01489.284l847 ---|          SHN    6           SET UPPER UNIT
Line S00406 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08308  M01S00406.284l847 +++|          STI    T5          SET LOWER UNIT
08309  M01S00407.284l847 +++|          RJM    SUN         GET NEXT UNIT
08310  M01S00408.284l847 +++|          MJN    SUL2        IF END OF LIST
08311  M01S00409.284l847 +++|          SHN    6           SET UPPER ENTRY
Line S01490 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08312  M01S01490.274l797 +++|          RAI    T5
Line S01491 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08313  M02S01491.284l847 ---|          SOD    T5          DECREMENT INDEX
08314  M02S01492.284l847 ---|          RJM    SUN         GET NEXT UNIT
08315  M02S01493.284l847 ---|          MJN    SULX        IF END OF UNITS
08316  M02S01494.284l847 ---|          UJN    SUL1        LOOP
Line S00410 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08317  M01S00410.284l847 +++|          RJM    SUN         GET NEXT UNIT
08318  M01S00411.284l847 +++|          PJN    SUL1        IF NOT END OF LIST
08319  M01S00412.284l847 +++| SUL2     SOD    T5
08320  M01S00413.284l847 +++|          SBM    SULA
08321  M01S00414.284l847 +++|          MJN    SULX        IF ALL DONE WITH LIST
08322  M01S00415.284l847 +++|          LDN    0           CLEAR EMPTY LIST ENTRIES
08323  M01S00416.284l847 +++|          STI    T5
08324  M01S00417.284l847 +++|          UJN    SUL2        CHECK IF DONE
08325  M01S00418.284l847 +++|
08326  M01S00419.284l847 +++|
08327  M01S00420.284l847 +++| SULA     BSS    1           TABLE ADDRESS STORAGE
Line S01495 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08328  M01S01495.274l797 +++| SUN      SPACE  4,20
Line S01496 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08329  M02S01496.284l847 ---|**        SUN - SET UNIT NUMBER.
Line S00421 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08330  M01S00421.284l847 +++|**        SUN - SET UNIT NUMBER.
Line S01497 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08331  M01S01497.274l797 +++|*
08332  M01S01498.274l797 +++|*         ENTRY  (MS) = *TMSD* ADDRESS.
Line S01499 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08333  M02S01499.284l847 ---|*                (AB+4) = CURRENT UNIT NUMBER.
Line S00422 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08334  M01S00422.284l847 +++|*                (AB+4) = CURRENT UNIT NUMBER.
Line S01500 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08335  M01S01500.274l797 +++|*
Line S01501 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08336  M02S01501.284l847 ---|*         EXIT   (A) = (AB+4) = NEXT UNIT NUMBER.
08337  M02S01502.284l847 ---|*                    = -1 IF END OF UNITS.
08338  M02S01503.284l847 ---|*                (T6) = (T6) + 1 IF NEXT UNIT FOUND.
Line S00423 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08339  M01S00423.284l847 +++|*         EXIT   (A) = (AB+4) = NEXT UNIT NUMBER.
08340  M01S00424.284l847 +++|*                    = -1 IF END OF UNITS.
08341  M01S00425.284l847 +++|*                (T6) = (T6) + 1 IF NEXT UNIT FOUND.
Line S01504 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08342  M01S01504.274l797 +++|*                TO *ILL* IF ERROR.
08343  M01S01505.274l797 +++|*
08344  M01S01506.274l797 +++|*         USES   AB+4, KA, T6.
08345  M01S01507.274l797 +++|*
08346  M01S01508.274l797 +++|*         CALLS  CDR, CSC.
08347  M01S01509.274l797 +++|
08348  M01S01510.274l797 +++|
08349  M01S01511.274l797 +++| SUN3     SBD    AB+4
Line S01512 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08350  M02S01512.284l847 ---|          ZJN    SUN4        IF END OF UNITS
Line S00426 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08351  M01S00426.284l847 +++|          ZJN    SUN4        IF END OF ENTRIES
Line S01513 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08352  M01S01513.274l797 +++|          AOD    T6
08353  M01S01514.274l797 +++|          AOD    AB+4
08354  M01S01515.274l797 +++|          ADN    1
08355  M01S01516.274l797 +++| SUN4     SBN    1
08356  M01S01517.274l797 +++|
08357  M01S01518.274l797 +++| SUN      SUBR               ENTRY/EXIT
08358  M01S01519.274l797 +++|          LDD    AB+4
08359  M01S01520.274l797 +++| SUNB     LPN    0
Line S01521 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08360  M02S01521.284l847 ---|          NJN    SUN1        IF UNIT OUT OF RANGE
08361  M02S01522.284l847 ---|          LDM    MSUL,MS
08362  M02S01523.284l847 ---|          LPN    77
Line S00427 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08363  M01S00427.284l847 +++|          NJN    SUN1        IF NUMBER OUT OF RANGE
08364  M01S00428.284l847 +++| SUNC     LDN    0           MAXIMUM VALUE
Line S01524 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08365  M01S01524.274l797 +++|          SBD    AB+4
Line S01525 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08366  M02S01525.284l847 ---|          MJN    SUN1        IF UNIT NUMBER .GT. LIMIT
Line S00429 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08367  M01S00429.284l847 +++|          MJN    SUN1        IF NUMBER .GT. LIMIT
Line S01526 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08368  M01S01526.274l797 +++| SUNA     LDN    0
Line S01527 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08369  M02S01527.284l847 ---|          NJN    SUN3        IF RANGE OF UNITS
Line S00430 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08370  M01S00430.284l847 +++|          NJN    SUN3        IF RANGE OF ENTRIES
Line S01528 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08371  M01S01528.274l797 +++|          RJM    CSC
Line S01529 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08372  M02S01529.284l847 ---|          ZJN    SUN4        IF END OF UNITS
Line S00431 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08373  M01S00431.284l847 +++|          ZJN    SUN4        IF END OF ENTRIES
Line S01530 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08374  M01S01530.274l797 +++|          LMN    1R/&1R,
Line S01531 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08375  M02S01531.284l847 ---|          ZJN    SUN2        IF MORE UNITS
Line S00432 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08376  M01S00432.284l847 +++|          ZJN    SUN2        IF MORE ENTRIES
Line S01532 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08377  M01S01532.274l797 +++| SUN1     JMP    ILL         PROCESS INCORRECT ENTRY
08378  M01S01533.274l797 +++|
08379  M01S01534.274l797 +++| SUN2     AOD    KA
08380  M01S01535.274l797 +++|          LDI    KA
08381  M01S01536.274l797 +++|          SBN    1R8
Line S01537 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08382  M02S01537.284l847 ---|          PJN    SUN1        IF NULL UNIT NUMBER
08383  M02S01538.284l847 ---|          RJM    CDR         ASSEMBLE NEXT UNIT NUMBER
Line S00433 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08384  M01S00433.284l847 +++|          PJN    SUN1        IF NULL ENTRY
08385  M01S00434.284l847 +++|          RJM    CDR         ASSEMBLE NEXT ENTRY
Line S01539 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08386  M01S01539.274l797 +++|          AOD    T6
08387  M01S01540.274l797 +++|          LDD    AB+4
08388  M01S01541.274l797 +++|          UJN    SUNX        RETURN
08389  M01S01542.274l797 +++| VCP      SPACE  4,10
08390  M01S01543.274l797 +++|**        VCP - VALIDATE CHANNEL PAIR.
08391  M01S01544.274l797 +++|*
08392  M01S01545.274l797 +++|*         ENTRY  (AB+4) = CHANNEL PAIR NUMBER.
08393  M01S01546.274l797 +++|*
08394  M01S01547.274l797 +++|*         EXIT   TO *ILL* IF INCORRECT CHANNEL NUMBER.
08395  M01S01548.274l797 +++|*
08396  M01S01549.274l797 +++|*         USES   T1.
08397  M01S01550.274l797 +++|
08398  M01S01551.274l797 +++|
08399  M01S01552.274l797 +++| VCP2     LDD    T1
08400  M01S01553.274l797 +++|          SHN    1
08401  M01S01554.274l797 +++|          SBD    AB+4
08402  M01S01555.274l797 +++|          NJN    VCP1        IF NOT VALID CHANNEL PAIR NUMBER
08403  M01S01556.274l797 +++|
08404  M01S01557.274l797 +++| VCP      SUBR               ENTRY/EXIT
08405  M01S01558.274l797 +++|          LDN    4
08406  M01S01559.274l797 +++|          STD    T1
08407  M01S01560.274l797 +++| VCP1     SOD    T1
08408  M01S01561.274l797 +++|          NJN    VCP2        IF MORE VALID CHANNEL PAIRS
08409  M01S01562.274l797 +++|          JMP    ILL         PROCESS INCORRECT ENTRY
08410  M01S01563.274l797 +++| VCN      SPACE  4,10
08411  M01S01564.274l797 +++|**        VCN - VALIDATE CHANNEL NUMBER.
08412  M01S01565.274l797 +++|*
08413  M01S01566.274l797 +++|*         ENTRY  (AB+4) = CHANNEL NUMBER.
08414  M01S01567.274l797 +++|*
08415  M01S01568.274l797 +++|*         EXIT   TO *ILL* IF INCORRECT CHANNEL NUMBER.
08416  M01S01569.274l797 +++|
08417  M01S01570.274l797 +++|
08418  M01S01571.274l797 +++| VCN2     ADN    20
08419  M01S01572.274l797 +++|          SBM    .CHN
08420  M01S01573.274l797 +++|          PJN    VCN1        IF NOT LEGAL CHANNEL
08421  M01S01574.274l797 +++|
08422  M01S01575.274l797 +++| VCN      SUBR               ENTRY/EXIT
08423  M01S01576.274l797 +++| VCNA     LDN    0
08424  M01S01577.274l797 +++|          ZJN    VCN0        IF FIRST CHANNEL
08425  M01S01578.274l797 +++|          LDD    AB+4
08426  M01S01579.274l797 +++|          ZJN    VCN1        IF .EQ. 0
08427  M01S01580.274l797 +++| VCN0     AOM    VCNA
08428  M01S01581.274l797 +++|          LDD    AB+4        GET CHANNEL NUMBER
08429  M01S01582.274l797 +++|          SBN    14
08430  M01S01583.274l797 +++|          MJN    VCNX        IF .LE. 13B
08431  M01S01584.274l797 +++|          SBN    20-14
08432  M01S01585.274l797 +++|          PJN    VCN2        IF .GE. 20B
08433  M01S01586.274l797 +++| VCN1     JMP    ILL         PROCESS INCORRECT ENTRY
08434  M01S01587.274l797 +++| TVRK     SPACE  4,10
08435  M01S01588.274l797 +++|****      TVRK - TABLE OF VALID AND REQUIRED KEYWORDS.
08436  M01S01589.274l797 +++|
08437  M01S01590.274l797 +++| TVRK     BSS    0
08438  M01S01591.274l797 +++|          TBKW   DA,(ST,UN,CH,AP,IB),(UN,CH)
08439  M01S01592.274l797 +++| TVRKL    EQU    *-TVRK
08440  M01S01593.274l797 +++|          TBKW   DB,(ST,UN,CH,AP,IB),(UN,CH)
08441  M01S01594.274l797 +++|          TBKW   DC,(ST,UN,CH,AP,IB),(UN,CH)
08442  M01S01595.274l797 +++|          TBKW   DD,(ST,UN,AP,IB),(UN)
08443  M01S01596.274l797 +++|          TBKW   DE,(ST,MA,ET,SZ,AP,MC,TS,IB),(SZ)
08444  M01S01597.274l797 +++|          TBKW   DF,(ST,UN,CH,AP,IB),(UN,CH)
08445  M01S01598.274l797 +++|          TBKW   DG,(ST,UN,AP,IB),(UN)
08446  M01S01599.274l797 +++|          TBKW   DH,(ST,UN,CH,AP,IB),(UN,CH)
08447  M01S01600.274l797 +++|          TBKW   DI,(ST,UN,CH,AP,IB),(UN,CH)
08448  M01S01601.274l797 +++|          TBKW   DJ,(ST,UN,CH,AP,IB),(UN,CH)
08449  M01S01602.274l797 +++|          TBKW   DK,(ST,UN,CH,AP,IB),(UN,CH)
08450  M01S01603.274l797 +++|          TBKW   DL,(ST,UN,CH,AP,IB),(UN,CH)
08451  M01S01604.274l797 +++|          TBKW   DM,(ST,UN,CH,AP,IB),(UN,CH)
08452  M01S01605.274l797 +++|          TBKW   DN,(ST,EQ,UN,CH,AP,IB),(UN,CH)
08453  M01S01606.274l797 +++|          TBKW   DP,(ST,MA,ET,SZ,CH,AP,MC,TS,IB),(SZ,CH)
08454  M01S01607.274l797 +++|          TBKW   DQ,(ST,UN,CH,AP,IB),(UN,CH)
Line S00003 Modification History
M01 (Added by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
08455  M01S00003.ns2776  +++|          TBKW   DR,(ST,UN,CH,AP,IB),(UN,CH)
Line S01608 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08456  M01S01608.274l797 +++|          TBKW   DV,(ST,UN,CH,AP,IB),(UN,CH)
08457  M01S01609.274l797 +++|          TBKW   DW,(ST,UN,CH,AP,IB),(UN,CH)
08458  M01S01610.274l797 +++|          TBKW   DX,(ST,UN,CH,AP,IB),(UN,CH)
08459  M01S01611.274l797 +++|          TBKW   DY,(ST,UN,CH,AP,IB),(UN,CH)
08460  M01S01612.274l797 +++|          TBKW   DZ,(ST,UN,CH,AP,IB),(UN,CH)
08461  M01S01613.274l797 +++|          TBKW   EA,(ST,EQ,UN,CH,AP,IB),(EQ,UN,CH)
08462  M01S01614.274l797 +++|          TBKW   EB,(ST,EQ,UN,CH,AP,IB),(EQ,UN,CH)
08463  M01S01615.274l797 +++|          TBKW   EC,(ST,EQ,UN,CH,AP,IB),(EQ,UN,CH)
08464  M01S01616.274l797 +++|          TBKW   ED,(ST,EQ,UN,CH,AP,IB),(EQ,UN,CH)
08465  M01S01617.274l797 +++|          TBKW   EE,(ST,EQ,UN,CH,AP,IB),(EQ,UN,CH)
08466  M01S01618.274l797 +++|          TBKW   EF,(ST,EQ,UN,CH,AP,IB),(EQ,UN,CH)
Line S00007 Modification History
M01 (Added by) ns2768
Seq #  *Modification Id* Act 
----------------------------+
08467  M01S00007.ns2768  +++|          TBKW   EG,(ST,EQ,UN,CH,AP,IB),(EQ,UN,CH)
08468  M01S00008.ns2768  +++|          TBKW   EH,(ST,EQ,UN,CH,AP,IB),(EQ,UN,CH)
Line S00435 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08469  M01S00435.284l847 +++|          TBKW   EI,(ST,EQ,UN,CH,AP,IB,PN),(EQ,UN,CH)
08470  M01S00436.284l847 +++|          TBKW   EJ,(ST,EQ,UN,CH,AP,IB,PN),(EQ,UN,CH)
08471  M01S00437.284l847 +++|          TBKW   EK,(ST,EQ,UN,CH,AP,IB,PN),(EQ,UN,CH)
08472  M01S00438.284l847 +++|          TBKW   EL,(ST,EQ,UN,CH,AP,IB,PN),(EQ,UN,CH)
08473  M01S00439.284l847 +++|          TBKW   EM,(ST,EQ,UN,CH,AP,IB,PN),(EQ,UN,CH)
08474  M01S00440.284l847 +++|          TBKW   EN,(ST,EQ,UN,CH,AP,IB,PN),(EQ,UN,CH)
08475  M01S00441.284l847 +++|          TBKW   EO,(ST,EQ,UN,CH,AP,IB),(EQ,UN,CH)
08476  M01S00442.284l847 +++|          TBKW   EP,(ST,EQ,UN,CH,AP,IB),(EQ,UN,CH)
08477  M01S00443.284l847 +++|          TBKW   ES,(ST,EQ,UN,CH,AP,IB,PN),(EQ,UN,CH)
08478  M01S00444.284l847 +++|          TBKW   EU,(ST,EQ,UN,CH,AP,IB,PN),(EQ,UN,CH)
08479  M01S00445.284l847 +++|          TBKW   EV,(ST,EQ,UN,CH,AP,IB,PN),(EQ,UN,CH)
08480  M01S00446.284l847 +++|          TBKW   EW,(ST,EQ,UN,CH,AP,IB,PN),(EQ,UN,CH)
Line S01619 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08481  M01S01619.274l797 +++|          CON    0           END OF TABLE
08482  M01S01620.274l797 +++|
08483  M01S01621.274l797 +++|****
08484  M01S01622.274l797 +++| TKWP     SPACE  4,10
08485  M01S01623.274l797 +++|****      TKWP - TABLE OF KEYWORD PARAMETERS.
08486  M01S01624.274l797 +++|
08487  M01S01625.274l797 +++|
08488  M01S01626.274l797 +++| TKWP     BSS    0
08489  M01S01627.274l797 +++|          TBKP   AP,1,DVAP,00B,0000B   APRDECK NUMBER
08490  M01S01628.274l797 +++| TKWPL    EQU    *-TKWP
08491  M01S01629.274l797 +++| TKWPA    TBKP   CH,0,1,00B,7777B      CHANNEL(S)
08492  M01S01630.274l797 +++| TKWPB    TBKP   EQ,0,4,11B,0777B      EQUIPMENT (CONTROLLER) NUMBER
08493  M01S01631.274l797 +++|          TBKP   ET,0,DVED,00B,7777B   EXTENDED MEMORY TYPE
08494  M01S01632.274l797 +++|          TBKP   IB,0,5,00B,0000B      INSTALLATION BYTE
08495  M01S01633.274l797 +++|          TBKP   MA,0,DVED,11B,6777B   MAINTENANCE MODE
08496  M01S01634.274l797 +++|          TBKP   MC,0,7,00B,7700B      MAINTENANCE CHANNEL
Line S00447 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08497  M01S00447.284l847 +++|          TBKP   PN,0,10B,6,6077B      PARTITION NUMBER
Line S01635 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08498  M01S01635.274l797 +++|          TBKP   ST,0,0,0,7774B        STATUS
08499  M01S01636.274l797 +++|          TBKP   SZ,0,DVNT,00B,0000B   EXTENDED MEMORY SIZE
08500  M01S01637.274l797 +++|          TBKP   TS,0,0,00B,0000B      EXTENDED MEMORY TRACK SIZE
08501  M01S01638.274l797 +++|          TBKP   UN,0,4,00B,7777B      UNIT NUMBER(S)
08502  M01S01639.274l797 +++|          CON    0           END OF TABLE
08503  M01S01640.274l797 +++|
08504  M01S01641.274l797 +++|****
08505  M01S01642.274l797 +++| TRQP     SPACE  4,10
08506  M01S01643.274l797 +++|**        TRQP - TABLE OF REQUIRED PARAMETERS.
08507  M01S01644.274l797 +++|*
08508  M01S01645.274l797 +++|*         (TRQP) .NE. 0 IF INITIAL ENTRY OF THIS EQUIPMENT.
08509  M01S01646.274l797 +++|*         (TRQP+1)-(TRQP+KTWC) = REQUIRED KEYWORDS - BIT CORRESPONDING
08510  M01S01647.274l797 +++|*         TO *TVRK* BITS SET WHEN KEYWORD IS SPECIFIED.
08511  M01S01648.274l797 +++|
08512  M01S01649.274l797 +++| TRQP     BSSZ   KTWC+1
Line S00448 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
08513  M01S00448.284l847 +++| TBLM     SPACE  4,10
08514  M01S00449.284l847 +++|**        TBLM - GENERATE TABLE OF MASS STORAGE PROCESSING PARAMETERS.
08515  M01S00450.284l847 +++|*
08516  M01S00451.284l847 +++|*         TBLM   EQ
08517  M01S00452.284l847 +++|*
08518  M01S00453.284l847 +++|*         ENTRY  (EQ) = MASS STORAGE EQUIPMENT MNEMONIC.
08519  M01S00454.284l847 +++|
08520  M01S00455.284l847 +++|
08521  M01S00456.284l847 +++|          PURGMAC  TBLM
08522  M01S00457.284l847 +++|
08523  M01S00458.284l847 +++| TBLM     MACRO  EQ
08524  M01S00459.284l847 +++| DT_EQ    VFD    1/SD_EQ,11/2R_EQ
08525  M01S00460.284l847 +++|          CON    /EQ1/P_EQ
08526  M01S00461.284l847 +++|          VFD    1/LDAM_EQ,11/NT_EQ
08527  M01S00462.284l847 +++|          VFD    3/BF_EQ,3/PK_EQ-1,6/NU_EQ-1
08528  M01S00463.284l847 +++|          CON    CT_EQ
08529  M01S00464.284l847 +++|          VFD    1/TT_EQ,11/SL_EQ+PNUN_EQ-1
08530  M01S00465.284l847 +++|          VFD    6/DI_EQ,6/2R"DRN_EQ"-1RD*100
08531  M01S00466.284l847 +++|          VFD    6/C"FW_EQ",6/AI_EQ
08532  M01S00467.284l847 +++|          CON    CYPN_EQ
08533  M01S00468.284l847 +++|
08534  M01S00469.284l847 +++| TBLM     ENDM
08535  M01S00470.284l847 +++| TMSD     SPACE  4,10
08536  M01S00471.284l847 +++|**        TMSD - TABLE OF MASS STORAGE DEVICES.
08537  M01S00472.284l847 +++|*         ENTRY = TMSDL WORDS.
08538  M01S00473.284l847 +++|
08539  M01S00474.284l847 +++|*         THE ENTRIES IN *TMSD* ARE REFERENCED WITH THE FOLLOWING TAGS.
08540  M01S00475.284l847 +++|
08541  M01S00476.284l847 +++|
08542  M01S00477.284l847 +++| TMSD     BSS    0
08543  M01S00478.284l847 +++|          LOC    0
08544  M01S00479.284l847 +++|
08545  M01S00480.284l847 +++|          BSS    1           1/  SHARED FLAG, 11/ DEVICE MNEMONIC
08546  M01S00481.284l847 +++| MSPR     BSS    1           12/ PROCESSOR ADDRESS
08547  M01S00482.284l847 +++| MSNT     BSS    1           1/  LDAM FLAG, 11/ NUMBER OF TRACKS
08548  M01S00483.284l847 +++| MSUL     BSS    1           3/  FLAGS, 3/ MAX PACKS, 6/ MAX UNIT NO.
08549  M01S00484.284l847 +++| MSCT     BSS    1           12/ DEFAULT NUMBER OF CATALOG TRACKS
08550  M01S00485.284l847 +++| MSSL     BSS    1           1/  FULL TRACK FLAG,
08551  M01S00486.284l847 +++|*                            11/ SECTOR LIMIT + MAX PARTITION NO.
08552  M01S00487.284l847 +++| MSDI     BSS    1           6/  DRIVER INDEX,
08553  M01S00488.284l847 +++|*                            6/  DRIVER NAME (LAST CHARACTER)
08554  M01S00489.284l847 +++| MSAI     BSS    1           6/  CONTROLWARE LOAD, 6/  ALGORITHM INDEX
08555  M01S00490.284l847 +++| MSCP     BSS    1           12/ CYLINDERS PER PARTITION
08556  M01S00491.284l847 +++| TMSDL    BSS    0           TABLE LENGTH
08557  M01S00492.284l847 +++|          ORG    TMSD
08558  M01S00493.284l847 +++|
08559  M01S00494.284l847 +++|
08560  M01S00495.284l847 +++|          LIST   G
08561  M01S00496.284l847 +++|          TBL    "MSEQ"
08562  M01S00497.284l847 +++|          PURGMAC  TBLM
08563  M01S00498.284l847 +++|          LIST   *
08564  M01S00499.284l847 +++|
08565  M01S00500.284l847 +++|          CON    0           END OF TABLE
08566  M01S00501.284l847 +++|
Line S01650 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08567  M01S01650.274l797 +++|          SPACE  4,10
08568  M01S01651.274l797 +++|          QUAL   *
08569  M01S01652.274l797 +++|
08570  M01S01653.274l797 +++| EQ1S     EQU    *+4-EQXO    *EQ1* SIZE
08571  M01S01654.274l797 +++| EQ1L     EQU    EQ1S/5+77   *EQ1* OVERLAY LENGTH
08572  M01S01655.274l797 +++|
08573  M01S01656.274l797 +++|          ERRNG  7777-*-4    OVERFLOW WHEN LOADING *EQ1*
08574  M01S01657.274l797 +++|          TTL    SET/EQ2 - PROCESS NON-MASS STORAGE *EQXXX=* ENTRY.
08575  M01S01658.274l797 +++|          TITLE
08576  M01S01659.274l797 +++|          IDENT  EQ2,/EQ2/EQM
08577  M01S01660.274l797 +++|          QUAL   EQ2
08578  M01S01661.274l797 +++|          ORG    EQXO
08579  M01S01662.274l797 +++|*COMMENT  SET - PROCESS NON-MASS STORAGE *EQXXX=* ENTRY.
Line S01663 Modification History
M01 (Added by) 274l797
M02 (Removed by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
08580  M02S01663.281l803 ---|          COMMENT  COPYRIGHT CONTROL DATA CORP. 1982.
Line S00005 Modification History
M01 (Added by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
08581  M01S00005.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
Line S01664 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08582  M01S01664.274l797 +++|          SPACE  4,10
08583  M01S01665.274l797 +++|**        MICRO DEFINITIONS.
08584  M01S01666.274l797 +++|
08585  M01S01667.274l797 +++| KWM      MICRO  1,,*CH,CW,DR,EQ,FC,IB,ID,LS,ND,NT,PA,PI,PS,PT,SA,ST,TF,
08586  M01S01668.274l797 +++|,TN,UN,W0,W1*
08587  M01S01669.274l797 +++|
08588  M01S01670.274l797 +++|.A        MICCNT KWM
08589  M01S01671.274l797 +++|.A        SET    .A+1
08590  M01S01672.274l797 +++| KWMC     EQU    .A/3        KEYWORD COUNT
08591  M01S01673.274l797 +++|
08592  M01S01674.274l797 +++|.A        SET    KWMC+11D
08593  M01S01675.274l797 +++| KTWC     EQU    .A/12D      KEYWORD TABLE WORD COUNT
08594  M01S01676.274l797 +++|          TITLE  EQUIPMENT DEFINITIONS.
08595  M01S01677.274l797 +++| EQM      SPACE  4,10
08596  M01S01678.274l797 +++|***       EQXXX=TY,P1=V1,...,PN=VN.
08597  M01S01679.274l797 +++|*
08598  M01S01680.274l797 +++|*         SET NON MASS STORAGE EQUIPMENT XXX WITH
08599  M01S01681.274l797 +++|*
08600  M01S01682.274l797 +++|*                TY = TYPE (2 CHARACTERS)
08601  M01S01683.274l797 +++|*
08602  M01S01684.274l797 +++|*         DEVICE TYPES SUPPORTED -
08603  M01S01685.274l797 +++|*
08604  M01S01686.274l797 +++|*                AT = ACS CARTRIDGE MAGNETIC TAPE DRIVE.
08605  M01S01687.274l797 +++|*                CC = 6683 SATELLITE COUPLER.
08606  M01S01688.274l797 +++|*                CI = *CYBIS* DEVICE.
08607  M01S01689.274l797 +++|*                CM = CONTROL MODULE.
08608  M01S01690.274l797 +++|*                CP = 415 CARD PUNCH.
08609  M01S01691.274l797 +++|*                CR = 405 CARD READER.
08610  M01S01692.274l797 +++|*                CT = CARTRIDGE MAGNETIC TAPE DRIVE.
08611  M01S01693.274l797 +++|*                D1 = *CYBIS* DEVICE.
08612  M01S01694.274l797 +++|*                D2 = *CYBIS* DEVICE.
08613  M01S01695.274l797 +++|*                D3 = *CYBIS* DEVICE.
08614  M01S01696.274l797 +++|*                D4 = *CYBIS* DEVICE.
08615  M01S01697.274l797 +++|*                LQ = 512 LINE PRINTER.
08616  M01S01698.274l797 +++|*                LR = 580-12 LINE PRINTER.
08617  M01S01699.274l797 +++|*                LS = 580-16 LINE PRINTER.
08618  M01S01700.274l797 +++|*                LT = 580-20 LINE PRINTER.
08619  M01S01701.274l797 +++|*                LX = 5870 NON-IMPACT PRINTER.
08620  M01S01702.274l797 +++|*                LY = 5970 NON-IMPACT PRINTER.
08621  M01S01703.274l797 +++|*                MP = MAP III.
08622  M01S01704.274l797 +++|*                MT = 7-TRACK MAGNETIC TAPE DRIVE.
08623  M01S01705.274l797 +++|*                NC = NAD.
08624  M01S01706.274l797 +++|*                ND = CDNA MAINFRAME INTERFACE (MDI).
08625  M01S01707.274l797 +++|*                NI = *CYBIS* DEVICE.
08626  M01S01708.274l797 +++|*                NO = *CYBIS* DEVICE.
08627  M01S01709.274l797 +++|*                NP = 255X NETWORK PROCESSING UNIT.
08628  M01S01710.274l797 +++|*                NT = 9-TRACK MAGNETIC TAPE DRIVE.
08629  M01S01711.274l797 +++|*                OD = OPTICAL DISK
08630  M01S01712.274l797 +++|*                RM = TWO PORT MULTIPLEXER.
08631  M01S01713.274l797 +++|*                RP = RING PORT.
08632  M01S01714.274l797 +++|*                SP = *CYBIS* DEVICE.
08633  M01S01715.274l797 +++|*                SS = MSE M860 CONTROLLER.
08634  M01S01716.274l797 +++|*                TT = TIME-SHARING MULTIPLEXER.
08635  M01S01717.274l797 +++|*                     NOTE - THE TERMINAL DRIVER SCANS ONLY THE FIRST
08636  M01S01718.274l797 +++|*                            *N* NUMBER OF PORTS (ZERO THRU *N*)
08637  M01S01719.274l797 +++|*                            SPECIFIED BY THE *PT=* KEYWORD WHEN THE
08638  M01S01720.274l797 +++|*                            DEVICE TYPE (TY) IS *TT*.  IF NO *PT=*
08639  M01S01721.274l797 +++|*                            KEYWORD IS GIVEN, ALL 64 PORTS ARE
08640  M01S01722.274l797 +++|*                            SCANNED.
Proceed to Part 5
cdc/nos2.source/opl.opl871/deck/set.004.txt ยท Last modified: (external edit)