Seq # *Modification Id* Act
----------------------------+
Line S00058 Modification History
M01 (Added by) ns2644
Seq # *Modification Id* Act
----------------------------+
06862 M01S00058.ns2644 +++| LDN BMLL RESTORE PREVIOUS PARAMETERS
06863 M00S05493.set +++| CRM EMTY,ON
06864 M00S05494.set +++| JMP ERR DISPLAY ERROR
06865 M00S05495.set +++|
06866 M00S05496.set +++| ECS8 LDD EN
06867 M00S05497.set +++| NJN ECS9 IF CPU PATH EQUIPMENT PREVIOUSLY SET
06868 M00S05498.set +++| LDD EQ
06869 M00S05499.set +++| STD EN
06870 M00S05500.set +++| ECS9 LDM TDDB+DVED
06871 M00S05501.set +++| SHN -6
06872 M00S05502.set +++| LPN 7
06873 M00S05503.set +++| STM EMTY
06874 M00S05504.set +++| LDD T5 SET XM SHIFT COUNT
06875 M00S05505.set +++| STM EMSC
06876 M00S05506.set +++| LDM TDDB+DVNT COMPUTE FIELD LENGTH
06877 M00S05507.set +++| SHN 6
06878 M00S05508.set +++| ADM TDDB+DVNT
06879 M00S05509.set +++| ADN 37 ROUND UP
06880 M00S05510.set +++| SHN -5
06881 M00S05511.set +++| STM EMFL XM FL / *EMBS*
06882 M00S05512.set +++| ECS10 LDD EQ
06883 M00S05513.set +++| LMN LDEQ
06884 M00S05514.set +++| NJN ECS11 IF NOT POSSIBLE LINK DEVICE
06885 M00S05515.set +++| LDD T5
06886 M00S05516.set +++| STM LDSH
06887 M00S05517.set +++| LDM TDDB+DVED
06888 M00S05518.set +++| LPN 70
06889 M00S05519.set +++| LMN 40
06890 M00S05520.set +++| ZJN ECS11 IF UEM
06891 M00S05521.set +++| LDN LDEQ SET POSSIBLE LINK DEVICE
06892 M00S05522.set +++| STD PD
06893 M00S05523.set +++| ECS11 LJM ECSX RETURN
06894 M00S05524.set +++|
06895 M00S05525.set +++| PDE EQU ECS *DE* PROCESSOR
06896 M00S05526.set +++| PDP EQU ECS *DP* PROCESSOR
Line S00376 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
06897 M01S00376.274l797 +++| PDC SPACE 4,10
06898 M01S00377.274l797 +++|*** EQXXX=DC.
06899 M01S00378.274l797 +++|
06900 M01S00379.274l797 +++|
06901 M01S00380.274l797 +++| PDC1 RJM KWP PROCESS KEYWORDS
06902 M01S00381.274l797 +++|
06903 M01S00382.274l797 +++| PDC SUBR ENTRY/EXIT
06904 M01S00383.274l797 +++| LDC MABL CHECK PP SPEED
06905 M01S00384.274l797 +++| CRD CM
06906 M01S00385.274l797 +++| LDD CM+4
06907 M01S00386.274l797 +++| SBN 2
06908 M01S00387.274l797 +++| PJN PDC1 IF 4X PP SPEED
06909 M01S00388.274l797 +++| JMP ILL PROCESS KEYWORDS
06910 M01S00389.274l797 +++| PDD SPACE 4,10
06911 M01S00390.274l797 +++|*** EQXXX=DD.
06912 M01S00391.274l797 +++|* EQXXX=DG.
06913 M01S00392.274l797 +++|
06914 M01S00393.274l797 +++| PDD1 LDN 37 PRESET NO CHANNELS SPECIFIED
06915 M01S00394.274l797 +++| STD CN+1
06916 M01S00395.274l797 +++| LDN 4 SET LIMIT TEST FOR DRIVE NUMBER
06917 M01S00396.274l797 +++| RAM SUNB
06918 M01S00397.274l797 +++| RJM KWP PROCESS KEYWORDS
06919 M01S00398.274l797 +++|
06920 M01S00399.274l797 +++| PDD SUBR ENTRY/EXIT
06921 M01S00400.274l797 +++| LDM ISPF
06922 M01S00401.274l797 +++| SHN 21-13
06923 M01S00402.274l797 +++| PJN PDD1 IF CYBER 810/815/825/830
06924 M01S00403.274l797 +++| JMP ILL PROCESS INCORRECT ENTRY
06925 M01S00404.274l797 +++|
06926 M01S00405.274l797 +++|
06927 M01S00406.274l797 +++| PDG EQU PDD *DG* PROCESSOR
06928 M01S00407.274l797 +++| PDF SPACE 4,10
06929 M01S00408.274l797 +++|*** EQXXX=DF.
06930 M01S00409.274l797 +++|* EQXXX=DH.
06931 M01S00410.274l797 +++|* EQXXX=DN.
06932 M01S00411.274l797 +++|* EQXXX=EA.
06933 M01S00412.274l797 +++|* EQXXX=EB.
06934 M01S00413.274l797 +++|* EQXXX=EC.
06935 M01S00414.274l797 +++|* EQXXX=ED.
06936 M01S00415.274l797 +++|* EQXXX=EE.
06937 M01S00416.274l797 +++|* EQXXX=EF.
Line S00003 Modification History
M01 (Added by) ns2768
Seq # *Modification Id* Act
----------------------------+
06938 M01S00003.ns2768 +++|* EQXXX=EG.
06939 M01S00004.ns2768 +++|* EQXXX=EH.
Line S00122 Modification History
M01 (Added by) 284l847
Seq # *Modification Id* Act
----------------------------+
06940 M01S00122.284l847 +++|* EQXXX=EO.
06941 M01S00123.284l847 +++|* EQXXX=EP.
Line S00417 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
06942 M01S00417.274l797 +++|
06943 M01S00418.274l797 +++|
06944 M01S00419.274l797 +++| PDF1 LDC PCC SET CHANNEL PROCESSOR
06945 M01S00420.274l797 +++| STM TKWPA
06946 M01S00421.274l797 +++| LDM TKWPB+2 *EQ* DEFINITION PARAMETERS
06947 M01S00422.274l797 +++| SCN 37
06948 M01S00423.274l797 +++| LMN TDDB-EBUT+DVPR SET LOCATION FOR CONTROLLER NUMBER
06949 M01S00424.274l797 +++| STM TKWPB+2
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
0 2 3 5 6 8 9 10 11 12 23 24 29 PT CT MT R D MASK OP 30 35 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"