Seq # *Modification Id* Act
----------------------------+
| Line S08072 Modification History |
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act
----------------------------+
11963 M01S08072.274l797 ---|* AN EXTENDED MEMORY DEVICE CANNOT BE REMOVEABLE.
| Line S02169 Modification History |
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act
----------------------------+
11964 M01S02169.274l797 +++|* DEVICES *DE*, *DP*, *DV* AND *DW* CANNOT BE REMOVABLE.
11965 M00S08073.set +++|* THE FOLLOWING SPECIFICATIONS ARE NOT ALLOWED FOR
11966 M00S08074.set +++|* REMOVABLE DEVICES AND IF SPECIFIED PREVIOUSLY WILL
11967 M00S08075.set +++|* CAUSE *INCORRECT ENTRY* FOR THIS ENTRY.
11968 M00S08076.set +++|*
11969 M00S08077.set +++|* *ASR*
11970 M00S08078.set +++|* *SYSTEM*
11971 M00S08079.set +++|* *TEMP*
11972 M00S08080.set +++|* *FAMILY*
11973 M00S08081.set +++|* *DAYFILE*
11974 M00S08082.set +++|* *ACCOUNT*
11975 M00S08083.set +++|* *ERRLOG*
11976 M00S08084.set +++|* *SCKP*
11977 M00S08085.set +++|
11978 M00S08086.set +++|
11979 M00S08087.set +++| REM DATA C*REMOVE=*
11980 M00S08088.set +++| SOD KA
11981 M00S08089.set +++| REM1 RJM GNE GET NEXT EST ORDINAL
11982 M00S08090.set +++| NJN REM2 IF MORE EQUIPMENT
11983 M00S08091.set +++| JMP KBR RETURN
11984 M00S08092.set +++|
11985 M00S08093.set +++| REM2 PJN REM3 IF NOT MASS STORAGE
11986 M00S08094.set +++| LPC 2000S6
11987 M00S08095.set +++| ADM TDDB+DVFA
11988 M00S08096.set +++| ZJN REM4 IF NOT SYSTEM OR FILE ALLOCATION DEVICE
11989 M00S08097.set +++| REM3 RJM IRE PROCESS INCORRECT RANGE
11990 M00S08098.set +++|
11991 M00S08099.set +++| REM4 LDM TDDB+DVPR CHECK CHECKPOINT DEVICE
11992 M00S08100.set +++| LPN 2
11993 M00S08101.set +++| NJN REM3 IF SYSTEM CHECKPOINT DEVICE
11994 M00S08102.set +++| LDM EBUT+4
11995 M00S08103.set +++| LPN 10
11996 M00S08104.set +++| NJN REM3 IF ALTERNATE SYSTEM DEVICE
| Line S08105 Modification History |
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act
----------------------------+
11997 M01S08105.274l797 ---| LDD AB+4 CHECK FOR LINK DEVICE
11998 M01S08106.274l797 ---| LMD EN
11999 M01S08107.274l797 ---| ZJN REM3 IF EXTENDED MEMORY (OR MMF LINK DEVICE)
12000 M00S08108.set +++| LDD AB+4
12001 M00S08109.set +++| LMM .PFNL+3
12002 M00S08110.set +++| ZJN REM3 IF DEFAULT FAMILY DEVICE
12003 M00S08111.set +++| LDN DFBFL-1+MDLL
12004 M00S08112.set +++| STD T1
12005 M00S08113.set +++| REM5 LDM DFBF,T1
12006 M00S08114.set +++| LPC 777
12007 M00S08115.set +++| LMD AB+4
12008 M00S08116.set +++| ZJN REM3 IF DAYFILE DEVICE
12009 M00S08117.set +++| SOD T1
12010 M00S08118.set +++| PJN REM5 IF NOT END OF DAYFILES
| Line S02170 Modification History |
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act
----------------------------+
12011 M01S02170.274l797 +++| LDN REML-1 CHECK TABLE OF NON-REMOVABLE DEVICES
12012 M01S02171.274l797 +++| STD T1
12013 M01S02172.274l797 +++| REM6 LDM REMA,T1 CHECK NEXT TABLE ENTRY
12014 M01S02173.274l797 +++| LMM EBUT+3
12015 M01S02174.274l797 +++| ZJN REM3 IF DEVICE CANNOT BE REMOVABLE
12016 M01S02175.274l797 +++| SOD T1
12017 M01S02176.274l797 +++| PJN REM6 IF NOT END OF TABLE
12018 M00S08119.set +++| LDI ES
12019 M00S08120.set +++| LPC 7377
12020 M00S08121.set +++| LMC 400
12021 M00S08122.set +++| STI ES
| Line S08123 Modification History |
M01 (Removed by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
12022 M01S08123.284l847 ---| RJM EEB RETURN EQUIPMENT ENTRY TO TABLES
| Line S00511 Modification History |
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
12023 M01S00511.284l847 +++| RJM SPE RETURN EQUIPMENT ENTRY TO TABLES
12024 M00S08124.set +++| LJM REM1 MORE EQUIPMENT TO PROCESS
| Line S02177 Modification History |
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act
----------------------------+
12025 M01S02177.274l797 +++|
12026 M01S02178.274l797 +++|
12027 M01S02179.274l797 +++| REMA BSS 0 DEVICES THAT CANNOT BE REMOVABLE
12028 M01S02180.274l797 +++| CON 2RDE
12029 M01S02181.274l797 +++| CON 2RDP
12030 M01S02182.274l797 +++| CON 2RDV
12031 M01S02183.274l797 +++| CON 2RDW
12032 M01S02184.274l797 +++| REML EQU *-REMA LENGTH OF TABLE
12033 M01S02185.274l797 +++|
12034 M00S08125.set +++| CKP SPACE 4,10
12035 M00S08126.set +++|*** SCKP=X,Y,...,Z.
12036 M00S08127.set +++|*
12037 M00S08128.set +++|* *CKP* ASSIGNS THE CHECKPOINT ATTRIBUTE TO DEVICES WITH EST
12038 M00S08129.set +++|* ORDINALS X, Y, ..., Z. CHECKPOINT DEVICES MUST BE
12039 M00S08130.set +++|* NON-REMOVABLE AND CANNOT BE EXTENDED MEMORY DEVICES.
12040 M00S08131.set +++|
12041 M00S08132.set +++|
12042 M00S08133.set +++| CKP DATA C*SCKP=*
12043 M00S08134.set +++| SOD KA
12044 M00S08135.set +++| CKP1 RJM GNE GET NEXT EST ORDINAL
12045 M00S08136.set +++| NJN CKP2 IF MORE EQUIPMENT
12046 M00S08137.set +++| JMP KBR RETURN
12047 M00S08138.set +++|
12048 M00S08139.set +++| CKP2 PJN CKP3 IF NOT MASS STORAGE DEVICE
12049 M00S08140.set +++| SHN 13-10
12050 M00S08141.set +++| MJN CKP3 IF REMOVABLE DEVICE
12051 M00S08142.set +++| LDM EBUT+3
12052 M00S08143.set +++| LMC 2RDE
12053 M00S08144.set +++| ZJN CKP3 IF EM DEVICE
12054 M00S08145.set +++| LMK 2RDP&2RDE
12055 M00S08146.set +++| ZJN CKP3 IF EM DEVICE
12056 M00S08147.set +++| LDM TDDB+DVPR SET CHECKPOINT DEVICE BIT IN SKELETAL MST
12057 M00S08148.set +++| SCN 2
12058 M00S08149.set +++| LMN 2
12059 M00S08150.set +++| STM TDDB+DVPR BACK INTO MST BUFFER
| Line S08151 Modification History |
M01 (Removed by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
12060 M01S08151.284l847 ---| RJM EEB UPDATE EQUIPMENT DEFINITION
| Line S00512 Modification History |
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
12061 M01S00512.284l847 +++| RJM SPE UPDATE EQUIPMENT DEFINITION
12062 M00S08152.set +++| UJN CKP1 CHECK FOR MORE EQUIPMENT
12063 M00S08153.set +++|
12064 M00S08154.set +++| CKP3 RJM IRE PROCESS INCORRECT ENTRY
12065 M00S08155.set +++| SHD SPACE 4,10
12066 M00S08156.set +++|*** SHARE=X1,X2,...,XN.
12067 M00S08157.set +++|*
12068 M00S08158.set +++|* DEFINE X1,X2,...,XN AS SHARED DEVICES.
12069 M00S08159.set +++|* XN MUST BE MASS STORAGE AND OF TYPE FLAGGED IN *TMSD*.
12070 M00S08160.set +++|*
12071 M00S08161.set +++|* NOTE THIS ENTRY IS NOT ALLOWED FOLLOWING *PRESET*.
12072 M00S08162.set +++|
12073 M00S08163.set +++|
12074 M00S08164.set +++| SHD DATA C*SHARE=*
12075 M00S08165.set +++| LDD LD
12076 M00S08166.set +++| SHN 0-13
12077 M00S08167.set +++| NJN SHD2 IF ISD PRESENT
| Line S08168 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
12078 M01S08168.283l840 ---| LDM SETD
| Line S00125 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
12079 M01S00125.283l840 +++| LDM PRSF
12080 M00S08169.set +++| NJN SHD2 IF LINK DEVICE PRESET
12081 M00S08170.set +++| SOD KA
12082 M00S08171.set +++| LDD TH
12083 M00S08172.set +++| RJM DSC DEVICE STATUS CHECK
12084 M00S08173.set +++| LDN LDEQ SET LINK DEVICE NUMBER
12085 M00S08174.set +++| STD LD
12086 M00S08175.set +++| JMP KBR RETURN
12087 M00S08176.set +++|
12088 M00S08177.set +++| SHD2 JMP ILL PROCESS INCORRECT ENTRY
12089 M00S08178.set +++| SYSTEM SPACE 4,10
12090 M00S08179.set +++|*** SYSTEM=X,Y,...,Z.
12091 M00S08180.set +++|* SET SYSTEM DEVICES TO X, Y, ..., Z.
12092 M00S08181.set +++|* X - Z MAY BE ANY NON REMOVABLE MASS STORAGE DEVICE.
12093 M00S08182.set +++|* IF NONE IS SPECIFIED, THE FIRST MASS STORAGE
12094 M00S08183.set +++|* DEVICE IS USED AS A DEFAULT.
12095 M00S08184.set +++|* ALL EQUIPMENTS SPECIFIED MUST BE OF SAME TYPE.
12096 M00S08185.set +++|* X - Z EST ORDINALS MUST BE .LT. 40.
12097 M00S08186.set +++|*
12098 M00S08187.set +++|* ENTRY IS NOT ALLOWED IF
12099 M00S08188.set +++|* ST = *OFF*
12100 M00S08189.set +++|* *REMOVE*
12101 M00S08190.set +++|* *ASR*
12102 M00S08191.set +++|
12103 M00S08192.set +++|
12104 M00S08193.set +++| SYS DATA C*SYSTEM=*
12105 M00S08194.set +++| SOD KA
12106 M00S08195.set +++| SYS1 RJM GNE GET NEXT EST ORDINAL
12107 M00S08196.set +++| NJN SYS2 IF MORE EQUIPMENT
12108 M00S08197.set +++| JMP KBR RETURN
12109 M00S08198.set +++|
12110 M00S08199.set +++| SYS2 PJN SYS3 IF NOT MASS STORAGE
12111 M00S08200.set +++| SHN 21-12-21+13
12112 M00S08201.set +++| MJN SYS1 IF ALREADY SYSTEM DEVICE
12113 M00S08202.set +++| LPC 402S7
12114 M00S08203.set +++| NJN SYS3 IF OFF/DOWN/REMOVABLE
12115 M00S08204.set +++| LDM EBUT+4
12116 M00S08205.set +++| SHN 21-3
12117 M00S08206.set +++| MJN SYS3 IF ALTERNATE SYSTEM DEVICE
12118 M00S08207.set +++| LDD EQ
12119 M00S08208.set +++| SHN -5
12120 M00S08209.set +++| NJN SYS3 IF EQUIPMENT OUT OF RANGE
12121 M00S08210.set +++| LDM SYDC
12122 M00S08211.set +++| ZJN SYS4 IF NO PREVIOUS SYSTEM DEVICES
12123 M00S08212.set +++| LMN MXSY
12124 M00S08213.set +++| ZJN SYS3 IF MAXIMUM SYSTEM DEVICE COUNT
12125 M00S08214.set +++| LDM EBUT+3
12126 M00S08215.set +++| LMM SYDT
12127 M00S08216.set +++| NJN SYS3 IF NOT SAME DEVICE TYPE
12128 M00S08217.set +++| LDM EBUT+4
12129 M00S08218.set +++| LMM SYNU
12130 M00S08219.set +++| LPN 7
12131 M00S08220.set +++| ZJN SYS5 IF SAME UNIT COUNT
12132 M00S08221.set +++| SYS3 RJM IRE PROCESS INCORRECT RANGE
12133 M00S08222.set +++|
12134 M00S08223.set +++| SYS4 LDM EBUT+3 SET SYSTEM DEVICE TYPE
12135 M00S08224.set +++| STM SYDT
12136 M00S08225.set +++| LDM EBUT+4
12137 M00S08226.set +++| STM SYNU
12138 M00S08227.set +++| SYS5 LDC 2000 SET SYSTEM DEVICE STATUS
12139 M00S08228.set +++| RAI ES
12140 M00S08229.set +++| LDN 1 SET *TSDS* ALLOCATION STATUS
12141 M00S08230.set +++| SHN TSDS
12142 M00S08231.set +++| RAM TDDB+DVFA
| Line S08232 Modification History |
M01 (Removed by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
12143 M01S08232.284l847 ---| RJM EEB RETURN EQUIPMENT ENTRIES
| Line S00513 Modification History |
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
12144 M01S00513.284l847 +++| RJM SPE RETURN EQUIPMENT ENTRIES
12145 M00S08233.set +++| AOM SYDC INCREMENT SYSTEM DEVICE COUNT
12146 M00S08234.set +++| LJM SYS1 CHECK FOR ADDITIONAL SYSTEM DEVICES
12147 M00S08235.set +++| THD SPACE 4,10
12148 M00S08236.set +++|*** THRESHOLD,OP=XXXX,X1,X2,...,XN.
12149 M00S08237.set +++|*
12150 M00S08238.set +++|* OP = VF TO SET VALIDATION FAILURE THRESHOLD.
12151 M00S08239.set +++|* RA TO SET RESTRICT ACTIVITY THRESHOLD.
12152 M00S08240.set +++|* LS TO SET LOW SPACE THRESHOLD.
12153 M00S08241.set +++|* RE TO SET RECOVERED ERROR THRESHOLD.
12154 M00S08242.set +++|* UE TO SET UNRECOVERED ERROR THRESHOLD.
12155 M00S08243.set +++|* XXXX = THRESHOLD VALUE.
12156 M00S08244.set +++|* X1,X2,...,XN = EST ORDINALS OF MS DEVICES.
12157 M00S08245.set +++|
12158 M00S08246.set +++|
12159 M00S08247.set +++| THD DATA C*THRESHOLD,*
12160 M00S08248.set +++| LDC TTHD
12161 M00S08249.set +++| RJM SOT SEARCH TABLE FOR THRESHOLD OPTION
12162 M00S08250.set +++| STD T6
12163 M00S08251.set +++| LDI KA CHECK SEPARATOR
12164 M00S08252.set +++| LMN 1R=
12165 M00S08253.set +++| NJN THD1 IF NOT *=*
12166 M00S08254.set +++| AOD KA
12167 M00S08255.set +++| RJM AOD ASSEMBLE THRESHOLD VALUE
12168 M00S08256.set +++| STD T7
12169 M00S08257.set +++| SHN 0-13
12170 M00S08258.set +++| NJN THD1 IF VALUE TOO LARGE
12171 M00S08259.set +++| LDI KA CHECK NEXT SEPARATOR
12172 M00S08260.set +++| LMN 1R,
12173 M00S08261.set +++| ZJN THD3 IF VALID SYNTAX
12174 M00S08262.set +++| THD1 JMP ILL INCORRECT ENTRY
12175 M00S08263.set +++|
12176 M00S08264.set +++| THD2 PJN THD1 IF NOT MASS STORAGE DEVICE
12177 M00S08265.set +++| LDD T7 SET ERROR THRESHOLD
12178 M00S08266.set +++| STM TDDB+DVTH,T6
| Line S08267 Modification History |
M01 (Removed by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
12179 M01S08267.284l847 ---| RJM EEB UPDATE EQUIPMENT DEFINITION
| Line S00514 Modification History |
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
12180 M01S00514.284l847 +++| RJM SPE UPDATE EQUIPMENT DEFINITION
12181 M00S08268.set +++| THD3 RJM GNE CHECK NEXT EST ORDINAL
12182 M00S08269.set +++| NJN THD2 IF ANOTHER DEVICE SPECIFIED
12183 M00S08270.set +++| JMP KBR RETURN
12184 M00S08271.set +++|
12185 M00S08272.set +++|
12186 M00S08273.set +++|** TTHD - TABLE OF THRESHOLD IDENTIFIERS.
12187 M00S08274.set +++|
12188 M00S08275.set +++|
12189 M00S08276.set +++| TTHD INDEX
12190 M00S08277.set +++| INDEX DVVF-DVTH,2RVF VERIFICATION FAILURES
12191 M00S08278.set +++| INDEX DVRA-DVTH,2RRA RESTRICTED ACTIVITY
12192 M00S08279.set +++| INDEX DVLS-DVTH,2RLS LOW SPACE
12193 M00S08280.set +++| INDEX DVRE-DVTH,2RRE RECOVERED ERRORS
12194 M00S08281.set +++| INDEX DVUE-DVTH,2RUE UNRECOVERED ERRORS
12195 M00S08282.set +++| INDEX 5
12196 M00S08283.set +++| CON 0
| Line S08284 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
12197 M01S08284.283l840 ---| PRS SPACE 4,10
12198 M01S08285.283l840 ---|*** PRESET,N.
12199 M01S08286.283l840 ---|*
12200 M01S08287.283l840 ---|* PRESET LINK DEVICE FOR MULTI-MAINFRAME OPERATION.
12201 M01S08288.283l840 ---|* N = OPTIONAL PARAMETER SPECIFYING MAXIMUM
12202 M01S08289.283l840 ---|* NUMBER OF SHARED DEVICES (N < 377B)
12203 M01S08290.283l840 ---|*
12204 M01S08291.283l840 ---|* PRESET=X,Y,...,Z.
12205 M01S08292.283l840 ---|* PRESET=X-Z.
12206 M01S08293.283l840 ---|*
12207 M01S08294.283l840 ---|* PRESET TABLES ON INDEPENDENT SHARED DEVICES X,Y,...,Z.
12208 M01S08295.283l840 ---|*
12209 M01S08296.283l840 ---|* THIS ENTRY IS ALLOWED ONLY FROM THE KEYBOARD.
12210 M01S08297.283l840 ---|
12211 M01S08298.283l840 ---|
12212 M01S08299.283l840 ---| PRS DATA C*PRESET*
12213 M01S08300.283l840 ---| LDD RS
12214 M01S08301.283l840 ---| NJN PRS1 IF NOT LEVEL 0 DEADSTART
12215 M01S08302.283l840 ---| LDI KA
12216 M01S08303.283l840 ---| LMN 1R=
12217 M01S08304.283l840 ---| ZJN PRS5 IF PRESETTING ISHARED DEVICES
12218 M01S08305.283l840 ---| RJM CLD ASSURE LINK DEVICE DEFINED
12219 M01S08306.283l840 ---| ZJN PRS1 IF NO SHARED DEVICES
12220 M01S08307.283l840 ---| LDI KA
12221 M01S08308.283l840 ---| LMN 1R.
12222 M01S08309.283l840 ---| ZJN PRS3 IF NO OPTIONAL PARAMETER
12223 M01S08310.283l840 ---| LMN 1R,&1R.
12224 M01S08311.283l840 ---| ZJN PRS2 IF VALID SEPARATOR
12225 M01S08312.283l840 ---| PRS1 JMP ILL PROCESS INCORRECT ENTRY
12226 M01S08313.283l840 ---|
12227 M01S08314.283l840 ---| PRS2 AOD KA SKIP SEPARATOR
12228 M01S08315.283l840 ---| RJM ASD ASSEMBLE DIGITS
12229 M01S08316.283l840 ---| SBK 377
12230 M01S08317.283l840 ---| PJN PRS1 IF DEVICE COUNT TOO LARGE
12231 M01S08318.283l840 ---| LDD AB+4
12232 M01S08319.283l840 ---| SBD NS
12233 M01S08320.283l840 ---| MJN PRS1 IF .LT. NUMBER OF SHARED DEVICES
12234 M01S08321.283l840 ---| PRS3 ADD NS
12235 M01S08322.283l840 ---| ADN 1 ALLOW FOR *DAT* TABLES
12236 M01S08323.283l840 ---| STM SETD
12237 M01S08324.283l840 ---| PRS4 JMP KBR RETURN
12238 M01S08325.283l840 ---|
12239 M01S08326.283l840 ---| PRS5 LDD LD
12240 M01S08327.283l840 ---| SHN 0-13
12241 M01S08328.283l840 ---| ZJN PRS1 IF NOT ISHARED ENVIRONMENT
12242 M01S08329.283l840 ---| PRS6 RJM GNE GET NEXT EST ORDINAL
12243 M01S08330.283l840 ---| ZJN PRS4 IF END OF COMMAND
12244 M01S08331.283l840 ---| PJN PRS1 IF NOT MASS STORAGE
12245 M01S08332.283l840 ---| SHN 13-4
12246 M01S08333.283l840 ---| PJN PRS1 IF NOT ISHARED DEVICES
12247 M01S08334.283l840 ---| LDM DVPR+TDDB
12248 M01S08335.283l840 ---| SCN 1
12249 M01S08336.283l840 ---| LMN 1 SET PRESET FLAG
12250 M01S08337.283l840 ---| STM DVPR+TDDB
12251 M01S08338.283l840 ---| RJM EEB RETURN EQUIPMENT ENTRIES
12252 M01S08339.283l840 ---| UJN PRS6 NEXT ORDINAL
12253 M00S08340.set +++| UEM SPACE 4,10
12254 M00S08341.set +++|*** UEMIN.
12255 M00S08342.set +++|*
12256 M00S08343.set +++|* TOGGLE FULL INITIALIZE STATUS FOR *UEM* EQUIPMENT
12257 M00S08344.set +++|* ON LEVEL 0 DEADSTART.
12258 M00S08345.set +++|
12259 M00S08346.set +++|
12260 M00S08347.set +++| UEM DATA C*UEMIN.*
12261 M00S08348.set +++| LDD EN CHECK FOR UEM PRESENT
12262 M00S08349.set +++| RJM STA
12263 M00S08350.set +++| ZJN UEM1 IF EXTENDED MEMORY EQUIPMENT UNDEFINED
12264 M00S08351.set +++| LDM EMTY
12265 M00S08352.set +++| LMN 4
12266 M00S08353.set +++| ZJN UEM2 IF MEMORY TYPE *UEM*
12267 M00S08354.set +++| UEM1 JMP ILL PROCESS INCORRECT ENTRY
12268 M00S08355.set +++|
12269 M00S08356.set +++| UEM2 LDD RS
12270 M00S08357.set +++| NJN UEM3 IF RECOVERY DEADSTART
12271 M00S08358.set +++| LDM EBUT+4
12272 M00S08359.set +++| LPC MLIAL+17
12273 M00S08360.set +++| LMC MLIAL SET FULL INITIALIZE REQUESTED
12274 M00S08361.set +++| STM EBUT+4
12275 M00S08362.set +++| RJM EEB UPDATE EQUIPMENT SPECIFICATION
12276 M00S08363.set +++| UEM3 JMP KBR RETURN
| Line S00231 Modification History |
M01 (Added by) | ns2644 |
Seq # *Modification Id* Act
----------------------------+
12277 M01S00231.ns2644 +++| UPC SPACE 4,10
12278 M01S00232.ns2644 +++|*** UP,CH=C1,C2,...,CN.
12279 M01S00233.ns2644 +++|*
12280 M01S00234.ns2644 +++|* UP SPECIFIED CHANNELS PREVIOUSLY DOWNED.
12281 M01S00235.ns2644 +++|*
12282 M01S00236.ns2644 +++|* C1 - CN = CHANNEL NUMBER TO BE UPPED. A PREFIX OF
12283 M01S00237.ns2644 +++|* *C* DESIGNATES A CONCURRENT CHANNEL.
12284 M01S00238.ns2644 +++|
12285 M01S00239.ns2644 +++|
12286 M01S00240.ns2644 +++| UPC DATA C*UP,*
12287 M01S00241.ns2644 +++| LDN 0 INDICATE *UP* PROCESSING
12288 M01S00242.ns2644 +++| UJP DWN1 JOIN COMMON *UP*/*DOWN* PROCESSING
12289 M00S08364.set +++| XM SPACE 4,20
12290 M00S08365.set +++|*** XM=MID,IIII,UUUUU,EM.
12291 M00S08366.set +++|* ALLOCATE EXTENDED MEMORY WHERE -
12292 M00S08367.set +++|*
12293 M00S08368.set +++|* MID = MACHINE ID.
12294 M00S08369.set +++|* IIII = NUMBER OF WORDS/1000B TO ALLOCATE FOR 819/DEMA/895
12295 M00S08370.set +++|* BUFFERS. MINIMUM = 40B (16K WORDS).
12296 M00S08371.set +++|* MAXIMUM = 37770B (8M WORDS).
12297 M00S08372.set +++|* = 0 IF NO BUFFERS DESIRED.
12298 M00S08373.set +++|* UUUUU = NUMBER OF WORDS/1000B TO ALLOCATE FOR USER XM.
12299 M00S08374.set +++|* MAXIMUM = 77740B.
12300 M00S08375.set +++|* EM = IF PRESENT, FORCE USER EXTENDED MEMORY TO UEM.
12301 M00S08376.set +++|*
12302 M00S08377.set +++|* XM=MID.
12303 M00S08378.set +++|* CLEAR ALLOCATION FOR MACHINE *ID*.
12304 M00S08379.set +++|
12305 M00S08380.set +++|
12306 M00S08381.set +++| AXM DATA C*XM=*
12307 M00S08382.set +++| LDC SHNI+3 PRESET SHIFT INSTRUCTION
12308 M00S08383.set +++| ADM EMSC
12309 M00S08384.set +++| STM AXMA
12310 M00S08385.set +++| LDN ZERL INITIALIZE TABLE ENTRY
12311 M00S08386.set +++| CRD CN
12312 M00S08387.set +++| SOD KA
12313 M00S08388.set +++| RJM A2C ASSEMBLE MACHINE ID
| Line S08389 Modification History |
M01 (Removed by) | set62 |
Seq # *Modification Id* Act
----------------------------+
12314 M01S08389.set62 ---| ZJP .ILL IF NOT SPECIFIED
| Line S00001 Modification History |
M01 (Added by) | set62 |
Seq # *Modification Id* Act
----------------------------+
12315 M01S00001.set62 +++| AXM0 ZJP .ILL IF NOT SPECIFIED
12316 M00S08390.set +++| STD CN
12317 M00S08391.set +++| LDN 1
12318 M00S08392.set +++| RJM AVS ASSEMBLE IOB SIZE
12319 M00S08393.set +++| ZJN AXM1 IF NO IOB SIZE SPECIFIED
12320 M00S08394.set +++| STD CN+4
12321 M00S08395.set +++| RJM CFT CONVERT TO TRACK COUNT
12322 M00S08396.set +++| SHN 6
12323 M00S08397.set +++| ADD T0
12324 M00S08398.set +++| SHN -5
12325 M00S08399.set +++| SBD CN+4
12326 M00S08400.set +++| SHN 0-21
12327 M00S08401.set +++| RAD T0
12328 M00S08402.set +++| STD CN+3
12329 M00S08403.set +++| AXM1 LDN 0
12330 M00S08404.set +++| RJM AVS ASSEMBLE USER XM SIZE
12331 M00S08405.set +++| STD CN+2
| Line S08406 Modification History |
M01 (Removed by) | set62 |
Seq # *Modification Id* Act
----------------------------+
12332 M01S08406.set62 ---| RJM A2C ASSEMBLE OPTIONAL *EM* PARAMETER
| Line S00002 Modification History |
M01 (Added by) | set62 |
Seq # *Modification Id* Act
----------------------------+
12333 M01S00002.set62 +++| ZJN AXM1.1 IF VALUE NOT SPECIFIED
| Line S00029 Modification History |
M01 (Added by) | ns2633 |
Seq # *Modification Id* Act
----------------------------+
12334 M01S00029.ns2633 +++| LDM VEFL
12335 M01S00030.ns2633 +++| ZJN AXM1.1 IF *VE* NOT SPECIFIED
| Line S00003 Modification History |
M01 (Added by) | set62 |
Seq # *Modification Id* Act
----------------------------+
12336 M01S00003.set62 +++| LDM VEMZ
| Line S00004 Modification History |
M01 (Added by) | set62 |
M02 (Removed by) | ns2633 |
Seq # *Modification Id* Act
----------------------------+
12337 M02S00004.ns2633 ---| SHN 21-13
12338 M02S00005.ns2633 ---| PJN AXM1.1 IF *VE* NOT SPECIFIED
12339 M02S00006.ns2633 ---| SHN 6
12340 M02S00007.ns2633 ---| SCN 77
12341 M02S00008.ns2633 ---| LMM VEMZ+1
| Line S00031 Modification History |
M01 (Added by) | ns2633 |
Seq # *Modification Id* Act
----------------------------+
12342 M01S00031.ns2633 +++| ADM VEMZ+1
| Line S00009 Modification History |
M01 (Added by) | set62 |
Seq # *Modification Id* Act
----------------------------+
12343 M01S00009.set62 +++| ZJN AXM0 IF *VE=.* SPECIFIED
12344 M01S00010.set62 +++| AXM1.1 RJM A2C ASSEMBLE OPTIONAL *EM* PARAMETER
12345 M00S08407.set +++| LMC 2REM
12346 M00S08408.set +++| NJN AXM2 IF NO *EM* PARAMETER
12347 M00S08409.set +++| LDM EMTY
12348 M00S08410.set +++| LMN 4
12349 M00S08411.set +++| ZJN AXM2 IF UEM EST ENTRY PRESENT
12350 M00S08412.set +++| AOD CN+1 SET USER XM IN UEM
12351 M00S08413.set +++|
12352 M00S08414.set +++|* VALIDATE ENTRIES ARE CONSISTENT FOR MAINFRAME AND EM TYPE.
12353 M00S08415.set +++|
12354 M00S08416.set +++| AXM2 LDD ID
12355 M00S08417.set +++| LMD CN
12356 M00S08418.set +++| NJN AXM6 IF NOT FOR THIS MACHINE
12357 M00S08419.set +++|
12358 M00S08420.set +++|* *EM* REQUIRES CME MACHINE.
12359 M00S08421.set +++|
12360 M00S08422.set +++| LDD CN+1
12361 M00S08423.set +++| ZJN AXM3 IF NOT *EM*
12362 M00S08424.set +++| LDD HO
12363 M00S08425.set +++| SHN 21-13
12364 M00S08426.set +++| MJN AXM5 IF NOT CME
12365 M00S08427.set +++|
12366 M00S08428.set +++|* I/O BUFFERS REQUIRE CPU ACCESS EQUIPMENT.
12367 M00S08429.set +++|
12368 M00S08430.set +++| AXM3 LDD CN+4
12369 M00S08431.set +++| ZJN AXM4 IF NO I/O BUFFERS
12370 M00S08432.set +++| LDD EN
12371 M00S08433.set +++| ZJN AXM5 IF NO CPU ACCESS EQUIPMENT
12372 M00S08434.set +++|
12373 M00S08435.set +++|* USER XM REQUIRES CPU ACCESS, UNLESS IT-S IN UEM WITH NO EST.
12374 M00S08436.set +++|
12375 M00S08437.set +++| AXM4 LDD CN+2
12376 M00S08438.set +++| ZJN AXM8 IF NO USER XM
12377 M00S08439.set +++| LDD EN
12378 M00S08440.set +++| NJN AXM8 IF CPU ACCESS EQUIPMENT
12379 M00S08441.set +++| LDD CN+1
12380 M00S08442.set +++| NJN AXM8 IF *EM*
12381 M00S08443.set +++| AXM5 JMP ILL
12382 M00S08444.set +++|
12383 M00S08445.set +++|* VALIDATE ENTRIES FOR ANOTHER MACHINE.
12384 M00S08446.set +++|* I/O BUFFERS OR USER XM REQUIRES LINK DEVICE.
12385 M00S08447.set +++|
12386 M00S08448.set +++| AXM6 LDD CN+4
12387 M00S08449.set +++| ADD CN+2
12388 M00S08450.set +++| ZJN AXM7 IF NO I/O BUFFERS OR USER XM
12389 M00S08451.set +++| LDD PD
12390 M00S08452.set +++| ZJN AXM5 IF NO LINK DEVICE
12391 M00S08453.set +++| LDN 0
12392 M00S08454.set +++| AXM7 STD CN+1 CLEAR POSSIBLE USER XM IN UEM FLAG
12393 M00S08455.set +++|
12394 M00S08456.set +++|* LOCATE PROPER ENTRY IN TABLE.
12395 M00S08457.set +++|
12396 M00S08458.set +++| AXM8 LDN 0
12397 M00S08459.set +++| STD T3 CLEAR POINTER TO EMPTY SLOT
12398 M00S08460.set +++| STD T4
12399 M00S08461.set +++| LDD CN
12400 M00S08462.set +++| LMD ID
12401 M00S08463.set +++| ZJN AXM11 IF ENTRY FOR THIS MACHINE, USE FIRST SLOT
12402 M00S08464.set +++|
12403 M00S08465.set +++|* SEARCH EXTENDED MEMORY ALLOCATION TABLE FOR MATCHING ID
12404 M00S08466.set +++|* OR EMPTY SLOT.
12405 M00S08467.set +++|
12406 M00S08468.set +++| AXM9 LDN 5
12407 M00S08469.set +++| RAD T4 ADVANCE SEARCH
12408 M00S08470.set +++| ADK -TAXML
12409 M00S08471.set +++| MJN AXM10 IF NOT END OF TABLE
12410 M00S08472.set +++| LDD T3
12411 M00S08473.set +++| ZJN AXM5 IF NO FREE ENTRY
12412 M00S08474.set +++| STD T4
12413 M00S08475.set +++| LJM AXM15 MOVE ENTRY TO TABLE
12414 M00S08476.set +++|
12415 M00S08477.set +++| AXM10 LDM TAXM,T4
12416 M00S08478.set +++| LMD CN
12417 M00S08479.set +++| ZJN AXM15 IF MATCHING ENTRY FOUND
12418 M00S08480.set +++| LMD CN
12419 M00S08481.set +++| NJN AXM9 IF SLOT USED
12420 M00S08482.set +++| LDD T3
12421 M00S08483.set +++| NJN AXM9 IF FREE ENTRY FOUND
12422 M00S08484.set +++| LDD T4
12423 M00S08485.set +++| STD T3 SAVE POINTER TO EMPTY SLOT
12424 M00S08486.set +++| UJN AXM9 LOOP
12425 M00S08487.set +++|
12426 M00S08488.set +++|* PROCESS ENTRY FOR THIS MACHINE.
12427 M00S08489.set +++|
12428 M00S08490.set +++| AXM11 LDD T5 SET SHIFT COUNT FROM *AVS*
12429 M00S08491.set +++| STM UESC
12430 M00S08492.set +++| LDM EMTY
12431 M00S08493.set +++| LMN 4
12432 M00S08494.set +++| ZJN AXM15 IF UEM PRESENT, PRESERVE ITS SIZE
12433 M00S08495.set +++| LDD CN+1
12434 M00S08496.set +++| NJN AXM13 IF INTERNAL USER EXTENDED MEMORY SPECIFIED
12435 M00S08497.set +++| LDM TAXM+1 CHECK PRIOR *XM* ENTRY
12436 M00S08498.set +++| ZJN AXM15 IF NO PRIOR INTERNAL USER EM DEFINITION
12437 M00S08499.set +++| LDN 0
12438 M00S08500.set +++| UJN AXM14 CLEAR UEM SIZE
12439 M00S08501.set +++|
12440 M00S08502.set +++| AXM13 LDD CN+2 GET USER EXTENDED MEMORY SIZE
12441 M00S08503.set +++| AXMA SHN 3 CONVERT BACK TO 100B WORD BLOCKS
12442 M00S08504.set +++|* SHN 3+EMSC (EMSC = EXTENDED MEMORY SHIFT COUNT)
12443 M00S08505.set +++| AXM14 STM UEMZ+1 SET/CLEAR UEM REQUIRED SIZE
12444 M00S08506.set +++| SHN -14
12445 M00S08507.set +++| STM UEMZ
12446 M00S08508.set +++|
12447 M00S08509.set +++|* ENTER *XM* ENTRY IN *TAXM* TABLE.
12448 M00S08510.set +++|
12449 M00S08511.set +++| AXM15 LDN CN
12450 M00S08512.set +++| STD T1
12451 M00S08513.set +++| LDD CN+2
12452 M00S08514.set +++| ADD CN+4
12453 M00S08515.set +++| NJN AXM16 IF NOT CLEARING ENTRY
12454 M00S08516.set +++| STD CN CLEAR MACHINE ID
12455 M00S08517.set +++| AXM16 LDI T1 MOVE ENTRY TO *TAXM* TABLE
12456 M00S08518.set +++| STM TAXM,T4
12457 M00S08519.set +++| AOD T4
12458 M00S08520.set +++| AOD T1
12459 M00S08521.set +++| SBN CN+5
12460 M00S08522.set +++| NJN AXM16 IF MORE BYTES TO MOVE
12461 M00S08523.set +++| RJM CMS
12462 M00S08524.set +++| ZJN AXM17 IF NO ERROR
12463 M00S08525.set +++| JMP ERR ERROR EXIT
12464 M00S08526.set +++|
12465 M00S08527.set +++| AXM17 JMP KBR RETURN
12466 M00S08528.set +++| TITLE MISCELLANEOUS SUBROUTINES.
12467 M00S08529.set +++| ACM SPACE 4,10
12468 M00S08530.set +++|** ACM - ADJUST CENTRAL MEMORY.
12469 M00S08531.set +++|*
12470 M00S08532.set +++|* EXIT (FL - FL+1) = EXECUTION FIELD LENGTH.
12471 M00S08533.set +++|*
12472 M00S08534.set +++|* USES T1 - T4.
12473 M00S08535.set +++|
12474 M00S08536.set +++|
12475 M00S08537.set +++| ACM SUBR ENTRY/EXIT
12476 M00S08538.set +++| LDD FL
12477 M00S08539.set +++| STM MCMS
12478 M00S08540.set +++| LDD FL+1 SAVE MINCM VALUE
12479 M00S08541.set +++| STM MCMS+1
12480 M00S08542.set +++| LCN 0 SET MAXIMUM NOS FL TO 2097088
12481 M00S08543.set +++| STD T2
12482 M00S08544.set +++| LPN 7
12483 M00S08545.set +++| STD T1
| Line S08546 Modification History |
M01 (Removed by) | set61 |
Seq # *Modification Id* Act
----------------------------+
12484 M01S08546.set61 ---| ACM1 LDM VEMZ
| Line S00002 Modification History |
M01 (Added by) | set61 |
M02 (Removed by) | ns2633 |
Seq # *Modification Id* Act
----------------------------+
12485 M02S00002.ns2633 ---| LDM VEMZ
| Line S08547 Modification History |
M01 (Removed by) | ns2633 |
Seq # *Modification Id* Act
----------------------------+
12486 M01S08547.ns2633 ---| LPN 77
12487 M01S08548.ns2633 ---| STD T0
12488 M00S08549.set +++| LDM UEMZ+1
12489 M00S08550.set +++| ADM UEMZ
| Line S08551 Modification History |
M01 (Removed by) | set61 |
Seq # *Modification Id* Act
----------------------------+
12490 M01S08551.set61 ---| ZJN ACM2 IF NO UEM DEFINED
| Line S00003 Modification History |
M01 (Added by) | set61 |
Seq # *Modification Id* Act
----------------------------+
12491 M01S00003.set61 +++| ZJN ACM1 IF NO UEM DEFINED
12492 M00S08552.set +++| LDD MZ+1
12493 M00S08553.set +++| LPN 7 ADJUST FOR 1000B WORD UEM BOUNDARY
| Line S08554 Modification History |
M01 (Removed by) | set61 |
Seq # *Modification Id* Act
----------------------------+
12494 M01S08554.set61 ---| ACM2 STD T4
12495 M01S08555.set61 ---| LDD MZ AMOUNT OF CM NOT ALLOCATED TO NOS/VE OR UEM
| Line S00004 Modification History |
M01 (Added by) | set61 |
Seq # *Modification Id* Act
----------------------------+
12496 M01S00004.set61 +++| ACM1 STD T4
| Line S00005 Modification History |
M01 (Added by) | set61 |
M02 (Removed by) | ns2633 |
Seq # *Modification Id* Act
----------------------------+
12497 M02S00005.ns2633 ---| LDD MZ MEMORY NOT ALLOCATED TO NOS/VE OR UEM
| Line S08556 Modification History |
M01 (Removed by) | ns2633 |
Seq # *Modification Id* Act
----------------------------+
12498 M01S08556.ns2633 ---| SHN 14
12499 M01S08557.ns2633 ---| ADD MZ+1
12500 M01S08558.ns2633 ---| SBM VEMZ+1
12501 M01S08559.ns2633 ---| SBM UEMZ+1
| Line S00032 Modification History |
M01 (Added by) | ns2633 |
Seq # *Modification Id* Act
----------------------------+
12502 M01S00032.ns2633 +++| LDM VEMZ+1 FIND MEMORY NOT ALLOCATED TO VE OR UEM
12503 M01S00033.ns2633 +++| ADM UEMZ+1
12504 M01S00034.ns2633 +++| RAD T4
12505 M01S00035.ns2633 +++| SHN -14
12506 M01S00036.ns2633 +++| ADM VEMZ
12507 M01S00037.ns2633 +++| ADM UEMZ
12508 M01S00038.ns2633 +++| STD T3
12509 M01S00039.ns2633 +++| LDD MZ+1
12510 M00S08560.set +++| SBD T4
12511 M00S08561.set +++| STD FL+1
| Line S08562 Modification History |
M01 (Removed by) | ns2633 |
Seq # *Modification Id* Act
----------------------------+
12512 M01S08562.ns2633 ---| SHN -14
12513 M01S08563.ns2633 ---| SBD T0
12514 M01S08564.ns2633 ---| SBM UEMZ
| Line S00040 Modification History |
M01 (Added by) | ns2633 |
Seq # *Modification Id* Act
----------------------------+
12515 M01S00040.ns2633 +++| PJN ACM1.1 IF NO BORROW
12516 M01S00041.ns2633 +++| AOD T3 ADJUST FOR BORROW
12517 M01S00042.ns2633 +++| AOD FL+1
12518 M01S00043.ns2633 +++| ACM1.1 LDD MZ
12519 M01S00044.ns2633 +++| SBD T3
12520 M00S08565.set +++| STD FL
| Line S08566 Modification History |
M01 (Removed by) | set61 |
Seq # *Modification Id* Act
----------------------------+
12521 M01S08566.set61 ---| ZJN ACM2.1 IF LESS THAN 262K MEMORY
| Line S00006 Modification History |
M01 (Added by) | set61 |
M02 (Removed by) | ns2633 |
Seq # *Modification Id* Act
----------------------------+
12522 M02S00006.ns2633 ---| ZJN ACM2 IF LESS THAN 262K MEMORY
| Line S08567 Modification History |
M01 (Removed by) | ns2633 |
Seq # *Modification Id* Act
----------------------------+
12523 M01S08567.ns2633 ---|* LDN PSNI
12524 M01S08568.ns2633 ---| STM ACMA
| Line S08569 Modification History |
M01 (Removed by) | set61 |
M02 (Removed by) | ns2633 |
Seq # *Modification Id* Act
----------------------------+
12525 M02S08569.ns2633 ---| ACM2.1 SHN 14
| Line S00007 Modification History |
M01 (Added by) | set61 |
M02 (Removed by) | ns2633 |
Seq # *Modification Id* Act
----------------------------+
12526 M02S00007.ns2633 ---| ACM2 SHN 14
| Line S08570 Modification History |
M01 (Removed by) | ns2633 |
Seq # *Modification Id* Act
----------------------------+
12527 M01S08570.ns2633 ---| ADD FL+1
| Line S00045 Modification History |
M01 (Added by) | ns2633 |
Seq # *Modification Id* Act
----------------------------+
12528 M01S00045.ns2633 +++| LDD T1 COMPARE WITH MAXIMUM USABLE NOS FL
12529 M01S00046.ns2633 +++| STD T3
12530 M01S00047.ns2633 +++| LDD FL+1
12531 M00S08571.set +++| SBD T2
| Line S08572 Modification History |
M01 (Removed by) | ns2633 |
Seq # *Modification Id* Act
----------------------------+
12532 M01S08572.ns2633 ---| ACMA MJN ACM4 IF LESS THAN 262K MEMORY
12533 M01S08573.ns2633 ---|* PSN (MEMORY LARGER THAN 262K)
12534 M00S08574.set +++| STD T4
| Line S08575 Modification History |
M01 (Removed by) | ns2633 |
Seq # *Modification Id* Act
----------------------------+
12535 M01S08575.ns2633 ---| SHN -14
12536 M01S08576.ns2633 ---| SBD T1
| Line S00048 Modification History |
M01 (Added by) | ns2633 |
Seq # *Modification Id* Act
----------------------------+
12537 M01S00048.ns2633 +++| PJN ACM2 IF NO BORROW
12538 M01S00049.ns2633 +++| AOD T3 ADJUST FOR BORROW
12539 M01S00050.ns2633 +++| AOD T4
12540 M01S00051.ns2633 +++| ACM2 LDD FL
12541 M01S00052.ns2633 +++| SBD T3
12542 M00S08577.set +++| STD T3
12543 M00S08578.set +++| MJN ACM4 IF NO UNUSED MEMORY AVAILABLE FOR NOS/VE
| Line S08579 Modification History |
M01 (Removed by) | ns2633 |
Seq # *Modification Id* Act
----------------------------+
12544 M01S08579.ns2633 ---| SHN 14
12545 M01S08580.ns2633 ---| ADD T4
12546 M01S08581.ns2633 ---| ZJN ACM4 IF NO UNUSED MEMORY AVAILABLE FOR NOS/VE
12547 M01S08582.ns2633 ---| LDM VEMZ
| Line S00053 Modification History |
M01 (Added by) | ns2633 |
Seq # *Modification Id* Act
----------------------------+
12548 M01S00053.ns2633 +++| LDM VEFL
12549 M00S08583.set +++| ZJN ACM3 IF NOS/VE NOT DEFINED
12550 M00S08584.set +++| LDD T4
12551 M00S08585.set +++| RAM VEMZ+1 ADJUST NOS/VE MEMORY SIZE
12552 M00S08586.set +++| SHN -14
12553 M00S08587.set +++| ADD T3
12554 M00S08588.set +++| RAM VEMZ
12555 M00S08589.set +++| ACM3 LDD T1 ADJUST NOS MEMORY SIZE
12556 M00S08590.set +++| STD FL
12557 M00S08591.set +++| LDD T2
12558 M00S08592.set +++| STD FL+1
12559 M00S08593.set +++| ACM4 LDD FL
12560 M00S08594.set +++| ZJN ACM5 IF MACHINE FL .LT. 262K
12561 M00S08595.set +++| LDD HO
12562 M00S08596.set +++| SHN 0-13
12563 M00S08597.set +++| ZJN ACM5 IF CME MAINFRAME
| Line S08598 Modification History |
M01 (Removed by) | ns2633 |
Seq # *Modification Id* Act
----------------------------+
12564 M01S08598.ns2633 ---| LCN 0
| Line S00054 Modification History |
M01 (Added by) | ns2633 |
Seq # *Modification Id* Act
----------------------------+
12565 M01S00054.ns2633 +++| LCN 0 SET NOS MEMORY SIZE TO 262K - 100B
12566 M00S08599.set +++| STD FL+1
| Line S08600 Modification History |
M01 (Removed by) | ns2633 |
Seq # *Modification Id* Act
----------------------------+
12567 M01S08600.ns2633 ---| LDN 0 SET FL TO 262K - 100B
| Line S00055 Modification History |
M01 (Added by) | ns2633 |
Seq # *Modification Id* Act
----------------------------+
12568 M01S00055.ns2633 +++| LDN 0
12569 M00S08601.set +++| STD FL
| Line S08602 Modification History |
M01 (Removed by) | set76 |
Seq # *Modification Id* Act
----------------------------+
12570 M01S08602.set76 ---| ACM5 LDD FL
| Line S00001 Modification History |
M01 (Added by) | set76 |
Seq # *Modification Id* Act
----------------------------+
12571 M01S00001.set76 +++| ACM5 LDD FL+1
12572 M01S00002.set76 +++| ADM UEMZ+1
12573 M01S00003.set76 +++| SHN -14
12574 M01S00004.set76 +++| ADD FL
12575 M00S08603.set +++| ADM UEMZ
12576 M00S08604.set +++| SHN -3
| Line S08605 Modification History |
M01 (Removed by) | ns2499 |
Seq # *Modification Id* Act
----------------------------+
12577 M01S08605.ns2499 ---| NJN ACM7 IF EXPANDED MODE NEEDED
| Line S00009 Modification History |
M01 (Added by) | ns2499 |
Seq # *Modification Id* Act
----------------------------+
12578 M01S00009.ns2499 +++| NJN ACM6 IF EXPANDED MODE NEEDED
12579 M00S08606.set +++| LDM EMSC
12580 M00S08607.set +++| ADD TH
12581 M00S08608.set +++| ERRNZ SHNI-1000
12582 M00S08609.set +++| STM ACMB
12583 M00S08610.set +++| LDM EMFL
12584 M00S08611.set +++| ZJN ACM7 IF EXPANDED MODE NOT NEEDED
12585 M00S08612.set +++| ACMB SHN 0
12586 M00S08613.set +++|* SHN EMSC
12587 M00S08614.set +++| SBN 1
12588 M00S08615.set +++| SHN -14 CHECK FOR EMFL GT 2MW
12589 M00S08616.set +++| ZJN ACM7 IF EXPANDED MODE NOT NEEDED
12590 M00S08617.set +++| ACM6 LDK PSNI
12591 M00S08618.set +++| STM ACMD
12592 M00S08619.set +++| LDM CMDL GET MODEL NUMBER
12593 M00S08620.set +++| SBN 40
| Line S08621 Modification History |
M01 (Removed by) | ns2499 |
Seq # *Modification Id* Act
----------------------------+
12594 M01S08621.ns2499 ---| ZJN ACM11 IF CYBER 835
| Line S00010 Modification History |
M01 (Added by) | ns2499 |
Seq # *Modification Id* Act
----------------------------+
12595 M01S00010.ns2499 +++| ZJP ACM11 IF CYBER 835
12596 M01S00011.ns2499 +++| SBN 77-40
12597 M01S00012.ns2499 +++| PJN ACM10 IF CYBER 990
12598 M00S08622.set +++| LDM C8XX
12599 M00S08623.set +++| ZJN ACM8 IF CYBER 800 TYPE MAINFRAME
| Line S00001 Modification History |
M01 (Added by) | set63 |
Seq # *Modification Id* Act
----------------------------+
12600 M01S00001.set63 +++| LDD HO
12601 M01S00002.set63 +++| SHN 21-13
12602 M01S00003.set63 +++| PJN ACM8 IF CYBER 865/875
| Line S08624 Modification History |
M01 (Removed by) | ns2499 |
Seq # *Modification Id* Act
----------------------------+
12603 M01S08624.ns2499 ---| LDC PJNI+ACM12-ACMC
| Line S00013 Modification History |
M01 (Added by) | ns2499 |
Seq # *Modification Id* Act
----------------------------+
12604 M01S00013.ns2499 +++| LDC PJNI+ACM13-ACMC
12605 M00S08625.set +++| STM ACMC ERROR, IF ECS AND .GT. 2MW XM
12606 M00S08626.set +++| ACM7 LDM CMDL
12607 M00S08627.set +++| SBN 77
12608 M00S08628.set +++| PJN ACM10 IF CYBER 990
12609 M00S08629.set +++| LDD HO
12610 M00S08630.set +++| LPC 100 CHECK FOR A CYBER 170 TYPE MAINFRAME
12611 M00S08631.set +++| NJN ACM9 IF NOT A CYBER 170 TYPE MAINFRAME
12612 M00S08632.set +++| LDN CFGL
12613 M00S08633.set +++| CRD CM
12614 M00S08634.set +++| LDD CM+3
12615 M00S08635.set +++| SHN 21-12 GET ESM MODE BIT
12616 M00S08636.set +++| ACMC PJN ACM9 IF ECS AND NOT ESM
| Line S08637 Modification History |
M01 (Removed by) | ns2499 |
Seq # *Modification Id* Act
----------------------------+
12617 M01S08637.ns2499 ---|* PJN ACM12 IF ECS AND .GT. 2MW XM
| Line S00014 Modification History |
M01 (Added by) | ns2499 |
Seq # *Modification Id* Act
----------------------------+
12618 M01S00014.ns2499 +++|* PJN ACM13 (IF ECS MODE AND .GT. 2MW)
12619 M00S08638.set +++| ACM8 LDN 1 SET EXPANDED ADDRESSING MODE
12620 M00S08639.set +++| STM EMAF
12621 M00S08640.set +++| ACM9 LJM ACMX RETURN
12622 M00S08641.set +++|
12623 M00S08642.set +++| ACM10 LDM C9LM
| Line S08643 Modification History |
M01 (Removed by) | ns2499 |
Seq # *Modification Id* Act
----------------------------+
12624 M01S08643.ns2499 ---| NJN ACM13 IF LARGE CYBER 990 MICROCODE PRESENT
| Line S00015 Modification History |
M01 (Added by) | ns2499 |
Seq # *Modification Id* Act
----------------------------+
12625 M01S00015.ns2499 +++| NJN ACM15 IF LARGE CYBER 990
12626 M00S08644.set +++| ACMD UJN ACM9 RETURN
12627 M00S08645.set +++|* PSN (IF .GE. 2MW CM)
12628 M00S08646.set +++| ACM11 LDD FL SUBTRACT UEM FROM CM
12629 M00S08647.set +++| SBM UEMZ
12630 M00S08648.set +++| STD FL
12631 M00S08649.set +++| SBM MCMS CHECK FOR TOO LITTLE MEMORY AVAILABLE
| Line S08650 Modification History |
M01 (Removed by) | ns2499 |
Seq # *Modification Id* Act
----------------------------+
12632 M01S08650.ns2499 ---| MJN ACM12 IF MORE EM REQUESTED THAN MEMORY AVAILABLE
| Line S00016 Modification History |
M01 (Added by) | ns2499 |
Seq # *Modification Id* Act
----------------------------+
12633 M01S00016.ns2499 +++| MJN ACM13 IF MORE XM REQUESTED THAN AVAILABLE
12634 M00S08651.set +++| LDD FL
12635 M00S08652.set +++| SHN 14
12636 M00S08653.set +++| ADD FL+1
12637 M00S08654.set +++| SBM UEMZ+1
12638 M00S08655.set +++| STD FL+1
12639 M00S08656.set +++| SHN -14
12640 M00S08657.set +++| STD FL
12641 M00S08658.set +++| SHN 14
12642 M00S08659.set +++| ADD FL+1
12643 M00S08660.set +++| SBM MCMS+1 CHECK FOR TOO LITTLE MEMORY AVAILABLE
| Line S08661 Modification History |
M01 (Removed by) | ns2499 |
Seq # *Modification Id* Act
----------------------------+
12644 M01S08661.ns2499 ---| PJN ACM9 IF VALID CM VALUE REMAINS
12645 M01S08662.ns2499 ---| ACM12 LDC 2RXM
| Line S00017 Modification History |
M01 (Added by) | ns2499 |
Seq # *Modification Id* Act
----------------------------+
12646 M01S00017.ns2499 +++| ACM12 PJN ACM9 IF VALID MEMORY SIZE REMAINING
12647 M01S00018.ns2499 +++| ACM13 LDC 2RXM
12648 M00S08663.set +++| STM CMSA
12649 M00S08664.set +++| LDC CMSA
| Line S08665 Modification History |
M01 (Removed by) | ns2499 |
Seq # *Modification Id* Act
----------------------------+
12650 M01S08665.ns2499 ---| LJM DDE DISPLAY *XM ALLOCATION ERROR*
12651 M01S08666.ns2499 ---|
12652 M01S08667.ns2499 ---| ACM13 LDM UEMZ CHECK FOR UEM PRESENT
12653 M01S08668.ns2499 ---| SHN 14
12654 M01S08669.ns2499 ---| ADM UEMZ+1
12655 M01S08670.ns2499 ---| ZJN ACM12 IF NO UEM AVAILABLE
12656 M01S08671.ns2499 ---| LJM ACMX RETURN
| Line S00019 Modification History |
M01 (Added by) | ns2499 |
M02 (Removed by) | set61 |
Seq # *Modification Id* Act
----------------------------+
12657 M02S00019.set61 ---| ACM14 LJM DDE DISPLAY ERROR MESSAGE
| Line S00008 Modification History |
M01 (Added by) | set61 |
Seq # *Modification Id* Act
----------------------------+
12658 M01S00008.set61 +++| ACM14 LJM DSE DISPLAY ERROR MESSAGE AND HANG
| Line S00020 Modification History |
M01 (Added by) | ns2499 |
Seq # *Modification Id* Act
----------------------------+
12659 M01S00020.ns2499 +++|
12660 M01S00021.ns2499 +++| ACM15 LDM TAXM+2
12661 M01S00022.ns2499 +++| NJN ACM12 IF USER XM PRESENT
12662 M01S00023.ns2499 +++| LDC ACME
12663 M01S00024.ns2499 +++| UJN ACM14 DISPLAY ERROR MESSAGE
12664 M01S00025.ns2499 +++|
12665 M01S00026.ns2499 +++|
12666 M01S00027.ns2499 +++| ACME DATA C*USER XM REQUIRED.*
12667 M01S00028.ns2499 +++|
12668 M01S00029.ns2499 +++| ERRPL ACM13-ACMC-40 JUMP OUT OF RANGE
| Line S02186 Modification History |
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act
----------------------------+
12669 M01S02186.274l797 +++| AODSUB
12670 M01S02187.274l797 +++| ASDSUB
12671 M01S02188.274l797 +++| ASNSUB
12672 M00S08672.set +++| AVS SPACE 4,10
12673 M00S08673.set +++|** AVS - ASSEMBLE AND VALIDATE SIZE PARAMETER.
12674 M00S08674.set +++|*
12675 M00S08675.set +++|* ENTRY (A) = 0 IF PROCESSING USER EM SIZE.
12676 M00S08676.set +++|* = 1 IF PROCESSING IO BUFFER SIZE.
12677 M00S08677.set +++|* (KA) = CURRENT CHARACTER STRING ADDRESS.
12678 M00S08678.set +++|*
12679 M00S08679.set +++|* EXIT (A) = 0 IF END OF STRING, ELSE ASSEMBLED SIZE/*EMBS*.
12680 M00S08680.set +++|* (T5) = USER EM SHIFT COUNT REQUIRED FOR USER EM SIZE
12681 M00S08681.set +++|* TO FIT IN 11 BITS.
12682 M00S08682.set +++|*
12683 M00S08683.set +++|* ERROR TO *ILL* IF INCORRECT SIZE ENTRY.
12684 M00S08684.set +++|*
12685 M00S08685.set +++|* CALLS AOD.
12686 M00S08686.set +++|
12687 M00S08687.set +++|
12688 M00S08688.set +++| AVS6 LDD LD
12689 M00S08689.set +++| LPC 777
12690 M00S08690.set +++| NJN AVS7 IF LINK DEVICE DEFINED
12691 M00S08691.set +++| LDM EMSC
12692 M00S08692.set +++| STM LDSH USE EM DEVICE WITH CPU ACCESS
12693 M00S08693.set +++| AVS7 LDC SHNI+3
12694 M00S08694.set +++| SBM EMSC
12695 M00S08695.set +++| STM AVSA
12696 M00S08696.set +++| LDD AB+3 RETURN SIZE PARAMETER VALUE
12697 M00S08697.set +++| SHN 14
12698 M00S08698.set +++| LMD AB+4
12699 M00S08699.set +++| AVSA SHN 3 ALLOW FOR BLOCKING FACTOR
12700 M00S08700.set +++|* SHN 3-EMSC
12701 M00S08701.set +++| ADN 7
12702 M00S08702.set +++| SHN -3
12703 M00S08703.set +++| STD T0
12704 M00S08704.set +++| SHN -14
12705 M00S08705.set +++| NJN AVS1 IF VALUE TOO LARGE
12706 M00S08706.set +++| LDD T0
12707 M00S08707.set +++|
12708 M00S08708.set +++| AVS SUBR ENTRY/EXIT
12709 M00S08709.set +++| STD T5
12710 M00S08710.set +++| LDI KA
12711 M00S08711.set +++| SBN 1R.
12712 M00S08712.set +++| ZJN AVSX IF NO ENTRY
12713 M00S08713.set +++| AOD KA ADVANCE CHARACTER ADDRESS
12714 M00S08714.set +++| RJM AOD ASSEMBLE SIZE PARAMETER
12715 M00S08715.set +++| LDD AB+3 VALIDATE SIZE PARAMETER
12716 M00S08716.set +++| SCN 7
12717 M00S08717.set +++| NJN AVS1 IF SIZE TOO LARGE
12718 M00S08718.set +++| LDD T5
12719 M00S08719.set +++| ZJN AVS2 IF PROCESSING USER XM SIZE
12720 M00S08720.set +++| LDD AB+3
12721 M00S08721.set +++| SHN 14
12722 M00S08722.set +++| LMD AB+4
12723 M00S08723.set +++| ZJN AVSX IF NO IOB SIZE SPECIFIED
12724 M00S08724.set +++| SBN 40
12725 M00S08725.set +++| MJN AVS1 IF IOB SIZE .LT. 16K WORDS
12726 M00S08726.set +++| SBK 37771-40
12727 M00S08727.set +++| MJN AVS5 IF IOB SIZE .LT. 8M WORDS
12728 M00S08728.set +++| AVS1 JMP ILL PROCESS INCORRECT ENTRY
12729 M00S08729.set +++|
12730 M00S08730.set +++| AVS2 LDD AB+3
12731 M00S08731.set +++| SHN 14
12732 M00S08732.set +++| LMD AB+4
12733 M00S08733.set +++| ADC -77741
12734 M00S08734.set +++| PJN AVS1 IF USER XM SIZE .GT. MAXIMUM
12735 M00S08735.set +++| ADC 77741
12736 M00S08736.set +++| SHN -13
12737 M00S08737.set +++| ZJN AVS4 IF .LE. 1M WORDS
12738 M00S08738.set +++| AVS3 STD T0
12739 M00S08739.set +++| AOD T5 INCREASE EM SHIFT COUNT
12740 M00S08740.set +++| LDD T0
12741 M00S08741.set +++| SHN -1
12742 M00S08742.set +++| NJN AVS3 IF XM SIZE NOT YET DETERMINED
12743 M00S08743.set +++| AVS4 LDD EN
12744 M00S08744.set +++| NJN AVS5 IF XM DEVICE DEFINED
12745 M00S08745.set +++| LDD T5
12746 M00S08746.set +++| ZJN AVS5 IF NO SHIFT REQUIRED
12747 M00S08747.set +++| SBN 1
12748 M00S08748.set +++| STM EMSC
12749 M00S08749.set +++| AVS5 UJP AVS6 RETURN SIZE PARAMETER VALUE
12750 M00S08750.set +++| A2C SPACE 4,10
12751 M00S08751.set +++|** A2C - ASSEMBLE TWO CHARACTER VALUE.
12752 M00S08752.set +++|*
12753 M00S08753.set +++|* ENTRY KA = CURRENT CHARACTER STRING ADDRESS.
12754 M00S08754.set +++|*
12755 M00S08755.set +++|* EXIT (A) = VALUE ASSEMBLED.
12756 M00S08756.set +++|* TO *ILL* IF SEPARATOR NOT *.* OR *,* OR IF
12757 M00S08757.set +++|* VALUE LONGER THAN TWO CHARACTERS.
12758 M00S08758.set +++|*
12759 M00S08759.set +++|* CALLS ASN.
12760 M00S08760.set +++|
12761 M00S08761.set +++|
12762 M00S08762.set +++| A2C1 LDD CM RETURN VALUE
12763 M00S08763.set +++|
12764 M00S08764.set +++| A2C SUBR
12765 M00S08765.set +++| LDI KA
12766 M00S08766.set +++| SBN 1R.
12767 M00S08767.set +++| ZJN A2CX IF NOTHING TO ASSEMBLE
12768 M00S08768.set +++| LDN 3
12769 M00S08769.set +++| RJM ASN ASSEMBLE VALUE
12770 M00S08770.set +++| ZJN A2C1 IF .LE. 2 CHARACTERS AND PROPER SEPARATOR
12771 M00S08771.set +++| JMP ILL PROCESS INCORRECT ENTRY
12772 M00S08772.set +++| CDD SPACE 4,10
12773 M00S08773.set +++|** CDD - CHECK DEADSTART DISK.
12774 M00S08774.set +++|*
12775 M00S08775.set +++|* ENTRY (DF) = DEADSTART FUNCTION.
12776 M00S08776.set +++|* (DH) = DEADSTART CHANNEL.
12777 M00S08777.set +++|*
12778 M00S08778.set +++|* EXIT (A) = 0 IF DEADSTART DEVICE.
12779 M00S08779.set +++|
12780 M00S08780.set +++|
12781 M00S08781.set +++| CDD SUBR ENTRY/EXIT
12782 M00S08782.set +++| LDD DF
12783 M00S08783.set +++| LPC 700
12784 M00S08784.set +++| NJN CDDX IF NOT DISK DEADSTART
12785 M00S08785.set +++| LDI ES
12786 M00S08786.set +++| SHN -6
12787 M00S08787.set +++| LPN 42
12788 M00S08788.set +++| CDD1 LMN 42
12789 M00S08789.set +++| NJN CDDX IF NOT MASS STORAGE / *LDAM* DEVICE
12790 M00S08790.set +++| LDM EBUT+1
12791 M00S08791.set +++| LMD DH
12792 M00S08792.set +++| LPN 77
12793 M00S08793.set +++| ZJN CDD2 IF MATCH ON PRIMARY CHANNEL
12794 M00S08794.set +++| LDM EBUT+2
12795 M00S08795.set +++| ZJN CDD1 IF NO SECONDARY CHANNEL
12796 M00S08796.set +++| LMD DH
12797 M00S08797.set +++| LPN 77
12798 M00S08798.set +++| NJN CDDX IF NO MATCH ON SECONDARY CHANNEL
12799 M00S08799.set +++| CDD2 LDD DF
12800 M00S08800.set +++| LPN 77
12801 M00S08801.set +++| LMM TDDB+DVUN+3
12802 M00S08802.set +++| UJN CDDX RETURN
| Line S02189 Modification History |
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act
----------------------------+
12803 M01S02189.274l797 +++| CDRSUB
12804 M00S08803.set +++| CDT SPACE 4,10
12805 M00S08804.set +++|** CDT - CHECK DEADSTART TAPE.
12806 M00S08805.set +++|*
12807 M00S08806.set +++|* ENTRY (DF) = DEADSTART FUNCTION.
12808 M00S08807.set +++|* (DH) = DEADSTART CHANNEL.
12809 M00S08808.set +++|*
12810 M00S08809.set +++|* EXIT (A) = 0 IF DEADSTART DEVICE.
12811 M00S08810.set +++|
12812 M00S08811.set +++|
12813 M00S08812.set +++| CDT SUBR ENTRY/EXIT
12814 M00S08813.set +++| LDM EBUT+3 CHECK EQUIPMENT TYPE
12815 M00S08814.set +++| SHN 14
12816 M00S08815.set +++| LMC 1LT+1RN
12817 M00S08816.set +++| ZJN CDT2 IF *NT*
12818 M00S08817.set +++| CDT1 LMN 1RM&1RN
12819 M00S08818.set +++| NJN CDTX IF NOT *MT*
12820 M00S08819.set +++| CDT2 LDM EBUT+4
12821 M00S08820.set +++| LMD DF CHECK CONNECT CODE
12822 M00S08821.set +++| LPC 7017
12823 M00S08822.set +++| NJN CDTX IF NO MATCH ON EQUIPMENT AND UNIT
12824 M00S08823.set +++| LDM EBUT+1 CHECK 1ST CHANNEL
12825 M00S08824.set +++| LMD DH
12826 M00S08825.set +++| LPN 37
12827 M00S08826.set +++| ZJN CDTX IF MATCH ON 1ST CHANNEL
12828 M00S08827.set +++| LDM EBUT+2
12829 M00S08828.set +++| ZJN CDT1 IF NO SECOND CHANNEL
12830 M00S08829.set +++| LMD DH
12831 M00S08830.set +++| LPN 37
12832 M00S08831.set +++| UJN CDTX RETURN
12833 M00S08832.set +++| CEM SPACE 4,10
12834 M00S08833.set +++|** CEM - CHECK FOR MASS STORAGE.
12835 M00S08834.set +++|*
12836 M00S08835.set +++|* EXIT (A) = (EBUT) WITH BIT 13 SHIFTED TO SIGN POSITION.
12837 M00S08836.set +++|* (MS) = *TMSD* TABLE ADDRESS.
12838 M00S08837.set +++|* (AB+4) = EST ORDINAL.
12839 M00S08838.set +++|
12840 M00S08839.set +++|
12841 M00S08840.set +++| CEM2 LDD AB+4 FETCH EQUIPMENT DEFINITION
12842 M00S08841.set +++| RJM STA
| Line S08842 Modification History |
M01 (Removed by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
12843 M01S08842.284l847 ---| LDM EBUT+3 SET *TMSO* ADDRESS
12844 M01S08843.284l847 ---| RJM SMT
12845 M00S08844.set +++| LDI ES
12846 M00S08845.set +++| SHN 21-13
12847 M00S08846.set +++| PJN CEM1 IF NOT MASS STORAGE
12848 M00S08847.set +++|
12849 M00S08848.set +++| CEM SUBR ENTRY/EXIT
12850 M00S08849.set +++| AOD KA
12851 M00S08850.set +++| RJM AOD ASSEMBLE EST ORDINAL
12852 M00S08851.set +++| SBD LE
12853 M00S08852.set +++| MJN CEM2 IF VALID EST ORDINAL
12854 M00S08853.set +++| CEM1 JMP ILL PROCESS INCORRECT ENTRY
12855 M00S08854.set +++| CLD SPACE 4,10
12856 M00S08855.set +++|** CLD - CHECK LINK DEVICE DEFINED FOR MMF OPERATION.
12857 M00S08856.set +++|*
12858 M00S08857.set +++|* EXIT (A) = 0 IF NO SHARED DEVICES.
12859 M00S08858.set +++|*
12860 M00S08859.set +++|* ERROR TO *DDE*.
12861 M00S08860.set +++|*
12862 M00S08861.set +++|* NOTES IF (NS) .NE. 0 AND A LINK DEVICE IS DEFINED
12863 M00S08862.set +++|* CORRECTLY, SHARED STATUS WILL BE SET IF THE
12864 M00S08863.set +++|* LINK DEVICE IS NOT ALREADY SHARED.
12865 M00S08864.set +++|*
12866 M00S08865.set +++|* CALLS EEB, STA.
12867 M00S08866.set +++|
12868 M00S08867.set +++|
12869 M00S08868.set +++| CLD SUBR ENTRY/EXIT
12870 M00S08869.set +++| LDD LD
12871 M00S08870.set +++| LMC 4000
12872 M00S08871.set +++| ZJN CLDX IF ISD PRESENT
12873 M00S08872.set +++| LDD NS
12874 M00S08873.set +++| ZJN CLDX IF NO SHARED DEVICES
12875 M00S08874.set +++| LDN LDEQ CHECK LINK DEVICE TYPE
12876 M00S08875.set +++| RJM STA
12877 M00S08876.set +++| ZJN CLD4 IF NO EQUIPMENT DEFINED
12878 M00S08877.set +++| LDM TDDB+DVED CHECK EXTENDED MEMORY TYPE
12879 M00S08878.set +++| SHN -6
12880 M00S08879.set +++| LPN 7
12881 M00S08880.set +++| ZJN CLD3 IF NOT EXTENDED MEMORY
12882 M00S08881.set +++| SBN 3
12883 M00S08882.set +++| ZJN CLD3 IF LCME
12884 M00S08883.set +++| LDI ES
12885 M00S08884.set +++| SHN 21-1
12886 M00S08885.set +++| MJN CLD3 IF DEVICE *OFF* OR *DOWN*
12887 M00S08886.set +++| SHN 2+21-11
12888 M00S08887.set +++| MJN CLDX IF SHARED STATUS SET PREVIOUSLY
12889 M00S08888.set +++| LDD TH SET SHARED STATUS
12890 M00S08889.set +++| RAI ES
12891 M00S08890.set +++| RJM EEB RETURN EQUIPMENT ENTRY
12892 M00S08891.set +++| AOD NS ADVANCE SHARED DEVICE COUNT
12893 M00S08892.set +++| UJP CLDX RETURN
12894 M00S08893.set +++|
12895 M00S08894.set +++| CLD3 LDN CLDB-CLDA SET ERROR MESSAGE ADDRESS
12896 M00S08895.set +++| CLD4 ADC CLDA
12897 M00S08896.set +++| LJM DDE DISPLAY DEADSTART ERROR
12898 M00S08897.set +++|
12899 M00S08898.set +++|
12900 M00S08899.set +++| CLDA DATA C*NO LINK DEVICE DEFINED.*
12901 M00S08900.set +++| CLDB DATA C*LINK DEVICE INCORRECTLY DEFINED.*
12902 M00S08901.set +++| CME SPACE 4,10
12903 M00S08902.set +++|** CME - CHECK *MMF* ENVIRONMENT.
12904 M00S08903.set +++|*
12905 M00S08904.set +++|* ERROR TO *DDE*.
12906 M00S08905.set +++|*
12907 M00S08906.set +++|* CALLS CLD.
12908 M00S08907.set +++|
12909 M00S08908.set +++|
12910 M00S08909.set +++| CME SUBR ENTRY/EXIT
12911 M00S08910.set +++| RJM CLD
12912 M00S08911.set +++| ZJN CMEX IF NOT ECS MMF ENVIRONMENT
12913 M00S08912.set +++| LDM EBUT+4
12914 M00S08913.set +++| SCN 17
12915 M00S08914.set +++| ZJN CMEX IF LINK DEVICE NOT BEING INITIALIZED
| Line S08915 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
12916 M01S08915.283l840 ---| LDM SETD
| Line S00126 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
12917 M01S00126.283l840 +++| LDM PRSF
12918 M00S08916.set +++| NJN CMEX IF PRESET SPECIFIED
12919 M00S08917.set +++| LDC CMEA
12920 M00S08918.set +++| LJM DDE DISPLAY DEADSTART ERROR
12921 M00S08919.set +++|
12922 M00S08920.set +++|
12923 M00S08921.set +++| CMEA DATA C*INITIALIZE OF LINK DEVICE REQUIRES PRESET.*
12924 M00S08922.set +++| COD SPACE 4,10
12925 M00S08923.set +++|** COD - CONVERT OCTAL TO DISPLAY CODE.
12926 M00S08924.set +++|*
12927 M00S08925.set +++|* ENTRY (A) = FWA OF ERROR MESSAGE.
12928 M00S08926.set +++|* (EQ) = EST ORDINAL OF INCORRECT EQUIPMENT.
12929 M00S08927.set +++|*
12930 M00S08928.set +++|* EXIT (KM) = ERROR MESSAGE ADDRESS.
12931 M00S08929.set +++|
12932 M00S08930.set +++|
12933 M00S08931.set +++| COD SUBR ENTRY/EXIT
12934 M00S08932.set +++| STD KM
12935 M00S08933.set +++| LDD EQ UNPACK FIRST TWO DIGITS
12936 M00S08934.set +++| SHN -3
12937 M00S08935.set +++| STD T0
12938 M00S08936.set +++| SHN 3
12939 M00S08937.set +++| LMD T0
12940 M00S08938.set +++| SCN 70
12941 M00S08939.set +++| ADC 2R00 CONVERT DIGIT
12942 M00S08940.set +++| STM 1,KM
12943 M00S08941.set +++| LDD EQ UNPACK THIRD DIGIT
12944 M00S08942.set +++| LPN 7
12945 M00S08943.set +++| SHN 6
12946 M00S08944.set +++| ADC 2R0 CONVERT DIGIT
12947 M00S08945.set +++| STM 2,KM
12948 M00S08946.set +++| UJN CODX RETURN
12949 M00S08947.set +++| DCM SPACE 4,10
12950 M00S08948.set +++|** DCM - DISPLAY CONVERTED MESSAGE.
12951 M00S08949.set +++|*
12952 M00S08950.set +++|* ENTRY (A) = ADDRESS OF ERROR MESSAGE.
12953 M00S08951.set +++|* (EQ) = EST ORDINAL OF INCORRECT EQUIPMENT.
12954 M00S08952.set +++|*
12955 M00S08953.set +++|* EXIT TO *DDE*.
12956 M00S08954.set +++|*
12957 M00S08955.set +++|* CALLS COD.
12958 M00S08956.set +++|
12959 M00S08957.set +++|
12960 M00S08958.set +++| DCM RJM COD CONVERT OCTAL TO DISPLAY
12961 M00S08959.set +++| LDD KM
12962 M00S08960.set +++|* UJN DDE
12963 M00S08961.set +++| ERRNZ DDE-* IF CODE NOT CONTIGUOUS
12964 M00S08962.set +++| DDE SPACE 4,10
12965 M00S08963.set +++|** DDE - DISPLAY DEADSTART ERROR.
12966 M00S08964.set +++|*
12967 M00S08965.set +++|* ENTRY (A) = ADDRESS OF ERROR MESSAGE.
12968 M00S08966.set +++|*
12969 M00S08967.set +++|* EXIT TO *ATD3*.
12970 M00S08968.set +++|
12971 M00S08969.set +++|
12972 M00S08970.set +++| DDE STD KM SET MESSAGE ADDRESS
12973 M00S08971.set +++| LDN 0
12974 M00S08972.set +++| STD DS FORCE DISPLAY
12975 M00S08973.set +++| STD DP
12976 M00S08974.set +++| LJM ATD3 PROCESS KEYBOARD ASSEMBLY
12977 M00S08975.set +++| DSC SPACE 4,10
12978 M00S08976.set +++|** DSC - DEVICE STATUS CHECK.
12979 M00S08977.set +++|*
12980 M00S08978.set +++|* ENTRY (A) = BITS TO SET IN BYTE 0 OF EST ENTRY.
12981 M00S08979.set +++|*
12982 M00S08980.set +++|* EXIT (MS) = *TMSD* BUFFER ADDRESS IF MASS STORAGE.
12983 M00S08981.set +++|* (AB+4) = EST ORDINAL.
12984 M00S08982.set +++|*
| Line S08983 Modification History |
M01 (Removed by) | ns2783 |
Seq # *Modification Id* Act
----------------------------+
12985 M01S08983.ns2783 ---|* CALLS CEM, EEB.
| Line S00146 Modification History |
M01 (Added by) | ns2783 |
Seq # *Modification Id* Act
----------------------------+
12986 M01S00146.ns2783 +++|* USES NS, T7.
12987 M01S00147.ns2783 +++|*
12988 M01S00148.ns2783 +++|* CALLS GNE, IRE, SPE.
12989 M00S08984.set +++|
12990 M00S08985.set +++|
12991 M00S08986.set +++| DSC SUBR ENTRY/EXIT
12992 M00S08987.set +++| STD T7
12993 M00S08988.set +++| DSC1 RJM GNE GET NEXT EST ORDINAL
12994 M00S08989.set +++| ZJN DSCX IF NO MORE EQUIPMENT
12995 M00S08990.set +++| PJN DSC3 IF NOT MASS STORAGE
12996 M00S08991.set +++| SHN 21-11-21+13
12997 M00S08992.set +++| MJN DSC1 IF ALREADY DEFINED AS SHARED
| Line S08993 Modification History |
M01 (Removed by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
12998 M01S08993.284l847 ---| LDI MS CHECK FOR VALID DEVICE TYPE
| Line S00515 Modification History |
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
12999 M01S00515.284l847 +++| LDM TDDB+DVCT CHECK FOR VALID DEVICE TYPE
13000 M00S08994.set +++| SHN 21-13
13001 M00S08995.set +++| PJN DSC3 IF INCORRECT DEVICE TYPE
13002 M00S08996.set +++| LDD T7
13003 M00S08997.set +++| RAI ES
13004 M00S08998.set +++| LPN 20
13005 M00S08999.set +++| ZJN DSC4 IF NOT INDEPENDENT SHARED DEVICE
13006 M00S09000.set +++| LDM EBUT+3
13007 M00S09001.set +++| LMC 2RDE
13008 M00S09002.set +++| ZJN DSC3 IF EXTENDED MEMORY
13009 M00S09003.set +++| LMK 2RDP&2RDE
13010 M00S09004.set +++| NJN DSC4 IF NOT EXTENDED MEMORY
13011 M00S09005.set +++| DSC3 RJM IRE PROCESS INCORRECT RANGE
13012 M00S09006.set +++|
| Line S09007 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
13013 M01S09007.283l840 ---| DSC4 AOD NS
13014 M01S09008.283l840 ---| LDM TDDB+DVFA CLEAR TEMP - NONSHARED STATUS
| Line S00127 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
13015 M01S00127.283l840 +++| DSC4 AOD NS INCREMENT SHARED DEVICE COUNT
13016 M01S00128.283l840 +++| LDI ES
13017 M01S00129.283l840 +++| LPN 40
13018 M01S00130.283l840 +++| ZJN DSC5 IF NOT BUFFERED DEVICE
13019 M01S00131.283l840 +++| AOM NSBD INCREMENT SHARED BUFFERED DEVICE COUNT
13020 M01S00132.283l840 +++| DSC5 LDM TDDB+DVFA CLEAR TEMP - NONSHARED STATUS
13021 M00S09009.set +++| LPC -4000
13022 M00S09010.set +++| STM TDDB+DVFA
| Line S09011 Modification History |
M01 (Removed by) | ns2783 |
Seq # *Modification Id* Act
----------------------------+
13023 M01S09011.ns2783 ---| RJM EEB RETURN EQUIPMENT ENTRY
| Line S00149 Modification History |
M01 (Added by) | ns2783 |
Seq # *Modification Id* Act
----------------------------+
13024 M01S00149.ns2783 +++| RJM SPE SYNCHRONIZE PARTITIONS AND ENTER EQUIPMENT
13025 M00S09012.set +++| UJP DSC1 PROCESS NEXT EQUIPMENT
| Line S09013 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
13026 M01S09013.283l840 ---| GNE SPACE 4,10
| Line S00133 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
13027 M01S00133.283l840 +++| GNE SPACE 4,15
13028 M00S09014.set +++|** GNE - GET NEXT EST ORDINAL.
13029 M00S09015.set +++|*
13030 M00S09016.set +++|* ENTRY (KA) = ADDRESS OF SEPARATOR.
13031 M00S09017.set +++|*
13032 M00S09018.set +++|* EXIT (A) = (EBUT) WITH BIT 13 SHIFTED TO SIGN POSITION,
13033 M00S09019.set +++|* IF MASS STORAGE EQUIPMENT.
13034 M00S09020.set +++|* = 1, IF NOT MASS STORAGE EQUIPMENT.
13035 M00S09021.set +++|* = 0, IF NO MORE EQUIPMENTS.
13036 M00S09022.set +++|* (EQ) = EST ORDINAL.
13037 M00S09023.set +++|*
13038 M00S09024.set +++|* USES AB+3, AB+4, EQ, KA.
13039 M00S09025.set +++|*
| Line S09026 Modification History |
M01 (Removed by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
13040 M01S09026.284l847 ---|* CALLS AOD, CDR, SMT, STA.
| Line S00516 Modification History |
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
13041 M01S00516.284l847 +++|* CALLS AOD, CDR, STA.
13042 M00S09027.set +++|
13043 M00S09028.set +++|
13044 M00S09029.set +++| GNE6 LDD AB+4
13045 M00S09030.set +++| STD EQ
13046 M00S09031.set +++| SBD LE
13047 M00S09032.set +++| MJN GNE7 IF VALID EST ORDINAL
13048 M00S09033.set +++| RJM IRE PROCESS INCORRECT RANGE
13049 M00S09034.set +++|
13050 M00S09035.set +++| GNE7 LDD AB+4
13051 M00S09036.set +++| RJM STA
13052 M00S09037.set +++| LDM EBUT+3
13053 M00S09038.set +++| NJN GNE8 IF ENTRY NOT NULL
13054 M00S09039.set +++| LDM GNEA
13055 M00S09040.set +++| NJN GNE1 IF PROCESSING A RANGE OF ORDINALS
13056 M00S09041.set +++| JMP ILL PROCESS INCORRECT ENTRY
13057 M00S09042.set +++|
| Line S09043 Modification History |
M01 (Removed by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
13058 M01S09043.284l847 ---| GNE8 RJM SMT
13059 M01S09044.284l847 ---| LDI ES
| Line S00517 Modification History |
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
13060 M01S00517.284l847 +++| GNE8 LDI ES
13061 M00S09045.set +++| SHN 21-13
13062 M00S09046.set +++| MJN GNEX IF MASS STORAGE
13063 M00S09047.set +++| LDN 1
13064 M00S09048.set +++|
13065 M00S09049.set +++| GNE SUBR ENTRY/EXIT
13066 M00S09050.set +++| LDM GNEA
13067 M00S09051.set +++| ZJN GNE2 IF NOT PROCESSING RANGE
13068 M00S09052.set +++| GNE1 AOD AB+4
13069 M00S09053.set +++| LDM GNEA
13070 M00S09054.set +++| SBD AB+4
13071 M00S09055.set +++| PJN GNE3 IF NOT END OF RANGE
13072 M00S09056.set +++| LDN 0
13073 M00S09057.set +++| STM GNEA
13074 M00S09058.set +++| GNE2 LDI KA
13075 M00S09059.set +++| LMN 1R. CHECK SEPARATOR
13076 M00S09060.set +++| ZJN GNEX IF *.*
13077 M00S09061.set +++| AOD KA
13078 M00S09062.set +++| RJM CDR ASSEMBLE EST ORDINAL
13079 M00S09063.set +++| LMN 1R, CHECK SEPARATOR
13080 M00S09064.set +++| ZJN GNE3 IF *,*
13081 M00S09065.set +++| LMN 1R.&1R,
13082 M00S09066.set +++| ZJN GNE3 IF *.*
13083 M00S09067.set +++| LMN 1R-&1R.
13084 M00S09068.set +++| NJN GNE4 IF NOT *-*
13085 M00S09069.set +++| LDD AB+4 SAVE EST ORDINAL
13086 M00S09070.set +++| STD EQ
13087 M00S09071.set +++| AOD KA
13088 M00S09072.set +++| RJM AOD ASSEMBLE LAST EST ORDINAL
13089 M00S09073.set +++| STM GNEA SAVE LAST EST ORDINAL
13090 M00S09074.set +++| SBK ESMX
13091 M00S09075.set +++| PJN GNE4 IF EST ORDINAL EXCEEDS MAXIMUM
13092 M00S09076.set +++| LDD EQ
13093 M00S09077.set +++| STD AB+4 RESTORE CURRENT EST ORDINAL
13094 M00S09078.set +++| SBM GNEA
13095 M00S09079.set +++| PJN GNE4 IF INCORRECT RANGE
13096 M00S09080.set +++| GNE3 LJM GNE6 READ EST ENTRY
13097 M00S09081.set +++|
13098 M00S09082.set +++| GNE4 JMP ILL PROCESS INCORRECT ENTRY
13099 M00S09083.set +++|
13100 M00S09084.set +++| GNEA CON 0 LAST EST ORDINAL IN RANGE
13101 M00S09085.set +++| IRE SPACE 4,10
13102 M00S09086.set +++|** IRE - INCORRECT RANGE ERROR.
13103 M00S09087.set +++|*
13104 M00S09088.set +++|* ENTRY (EQ) = EST ORDINAL OF INCORRECT EQUIPMENT.
13105 M00S09089.set +++|*
13106 M00S09090.set +++|* EXIT TO *ERR*.
13107 M00S09091.set +++|*
13108 M00S09092.set +++|* CALLS COD.
13109 M00S09093.set +++|
13110 M00S09094.set +++|
13111 M00S09095.set +++| IRE EQU *-1
13112 M00S09096.set +++| LDC IREA
13113 M00S09097.set +++| RJM COD
13114 M00S09098.set +++| JMP ERR
13115 M00S09099.set +++|
13116 M00S09100.set +++|
13117 M00S09101.set +++| IREA DATA C*EQXXX - INCORRECT ENTRY*
13118 M00S09102.set +++| SDF SPACE 4,10
13119 M00S09103.set +++|** SDF - SET DEFAULT MASS STORAGE DEVICE.
13120 M00S09104.set +++|*
13121 M00S09105.set +++|* EXIT (DFMS) = FIRST NONREMOVABLE MASS STORAGE DEVICE.
13122 M00S09106.set +++|*
13123 M00S09107.set +++|* ERROR TO *DDE*.
13124 M00S09108.set +++|*
13125 M00S09109.set +++|* USES EQ.
13126 M00S09110.set +++|*
13127 M00S09111.set +++|* CALLS STA.
13128 M00S09112.set +++|
13129 M00S09113.set +++|
13130 M00S09114.set +++| SDF3 LPC 402S6
13131 M00S09115.set +++| NJN SDF2 IF OFF/DOWN/REMOVABLE
13132 M00S09116.set +++| LDM EBUT+3
13133 M00S09117.set +++| LMC 2RDE
13134 M00S09118.set +++| ZJN SDF2 IF EXTENDED MEMORY
13135 M00S09119.set +++| LMK 2RDP&2RDE
13136 M00S09120.set +++| ZJN SDF2 IF EXTENDED MEMORY
13137 M00S09121.set +++| LDD EQ
13138 M00S09122.set +++| SBN 40
13139 M00S09123.set +++| PJN SDF2 IF ORDINAL OUT OF RANGE
13140 M00S09124.set +++| ADN 40
13141 M00S09125.set +++| STM DFMS SET DEFAULT DEVICE
13142 M00S09126.set +++|
13143 M00S09127.set +++| SDF SUBR ENTRY/EXIT
13144 M00S09128.set +++| LDN NOPE
13145 M00S09129.set +++| STD EQ
13146 M00S09130.set +++| SDF1 LDD EQ FETCH EQUIPMENT ENTRY
13147 M00S09131.set +++| RJM STA
13148 M00S09132.set +++| LDI ES
13149 M00S09133.set +++| SHN 21-13
13150 M00S09134.set +++| MJN SDF3 IF MASS STORAGE
13151 M00S09135.set +++| SDF2 AOD EQ INCREMENT ORDINAL
13152 M00S09136.set +++| LMD LE
13153 M00S09137.set +++| NJN SDF1 IF NOT END OF EST
13154 M00S09138.set +++| LDC SDFA
13155 M00S09139.set +++| LJM DDE DISPLAY DEADSTART ERROR
13156 M00S09140.set +++|
13157 M00S09141.set +++|
13158 M00S09142.set +++| SDFA DATA C*NO SYSTEM DEVICE DEFINED.*
13159 M00S09143.set +++| SDS SPACE 4,10
13160 M00S09144.set +++|** SDS - SEARCH FOR DEADSTART DEVICE.
13161 M00S09145.set +++|*
13162 M00S09146.set +++|* EXIT (AB+4) = EST ORDINAL OF DEADSTART DEVICE.
13163 M00S09147.set +++|*
13164 M00S09148.set +++|* ERROR TO *DDE*.
13165 M00S09149.set +++|*
13166 M00S09150.set +++|* USES AB+4.
13167 M00S09151.set +++|*
13168 M00S09152.set +++|* CALLS CDD, CDT, STA.
13169 M00S09153.set +++|
13170 M00S09154.set +++|
13171 M00S09155.set +++| SDS SUBR ENTRY/EXIT
13172 M00S09156.set +++| LDN NOPE
13173 M00S09157.set +++| STD AB+4
13174 M00S09158.set +++| SDS1 LDD AB+4 READ EQUIPMENT ENTRY
13175 M00S09159.set +++| RJM STA
13176 M00S09160.set +++| LDI ES
13177 M00S09161.set +++| LPN 3
13178 M00S09162.set +++| LMN 3
13179 M00S09163.set +++| ZJN SDS2 IF DEVICE *DOWN*
13180 M00S09164.set +++| RJM CDD CHECK DEADSTART DISK
13181 M00S09165.set +++| ZJN SDSX IF MS DEVICE IDENTIFIED
13182 M00S09166.set +++| RJM CDT CHECK DEADSTART TAPE
13183 M00S09167.set +++| ZJN SDSX IF TAPE UNIT FOUND
13184 M00S09168.set +++| SDS2 AOD AB+4 ADVANCE EST ORDINAL
13185 M00S09169.set +++| LMD LE
13186 M00S09170.set +++| NJN SDS1 IF NOT END OF EST
13187 M00S09171.set +++| LDC SDSA
13188 M00S09172.set +++| LJM DDE DISPLAY DEADSTART ERROR
13189 M00S09173.set +++|
13190 M00S09174.set +++|
13191 M00S09175.set +++| SDSA DATA C*DEADSTART DEVICE UNDEFINED.*
13192 M00S09176.set +++| SOT SPACE 4,15
13193 M00S09177.set +++|** SOT - SEARCH OPTION TABLE.
13194 M00S09178.set +++|*
13195 M00S09179.set +++|* ENTRY (A) = FWA OF PARAMETER TABLE.
13196 M00S09180.set +++|* ((KA - KA+1)) = PARAMETER NAME.
13197 M00S09181.set +++|*
13198 M00S09182.set +++|* EXIT (A) = INDEX OF ENTRY FOUND.
13199 M00S09183.set +++|* (T2) = TABLE ADDRESS OF ENTRY FOUND.
13200 M00S09184.set +++|* (T1) = ((T2)) = PARAMETER NAME.
13201 M00S09185.set +++|* (KA) = KEYBOARD BUFFER ADDRESS ADVANCED.
13202 M00S09186.set +++|*
13203 M00S09187.set +++|* USES T3.
13204 M00S09188.set +++|
13205 M00S09189.set +++|
13206 M00S09190.set +++| SOT2 LDN 2 ADVANCE BUFFER ADDRESS
13207 M00S09191.set +++| RAD KA
13208 M00S09192.set +++| LDD T2 RETURN WITH INDEX
13209 M00S09193.set +++| SBD T3
13210 M00S09194.set +++|
13211 M00S09195.set +++| SOT SUBR ENTRY/EXIT
13212 M00S09196.set +++| STD T2
13213 M00S09197.set +++| STD T3 SAVE FWA OF TABLE
13214 M00S09198.set +++| LDI KA
13215 M00S09199.set +++| SHN 6
13216 M00S09200.set +++| LMM 1,KA ASSEMBLE PARAMETER NAME
13217 M00S09201.set +++| STD T1
13218 M00S09202.set +++| LDI T2
13219 M00S09203.set +++| SOT1 LMD T1
13220 M00S09204.set +++| ZJN SOT2 IF MATCH FOUND
13221 M00S09205.set +++| AOD T2
13222 M00S09206.set +++| LDI T2
13223 M00S09207.set +++| NJN SOT1 IF NOT END OF TABLE
13224 M00S09208.set +++| JMP ILL INCORRECT ENTRY
| Line S00518 Modification History |
M01 (Added by) | 284l847 |
M02 (Removed by) | ns2783 |
Seq # *Modification Id* Act
----------------------------+
13225 M02S00518.ns2783 ---| SPE SPACE 4,20
13226 M02S00519.ns2783 ---|** SPE - SYNCHRONIZE PARTITIONS AND ENTER EQUIPMENT.
13227 M02S00520.ns2783 ---|*
13228 M02S00521.ns2783 ---|* ENTRY (EBUT) = EQUIPMENT EST ENTRY.
13229 M02S00522.ns2783 ---|* (TDDB) = MST ENTRY IF MASS STORAGE.
13230 M02S00523.ns2783 ---|* (EB) = EBUF ADDRESS.
13231 M02S00524.ns2783 ---|* (EQ) = DEVICE ENTRY TABLE NUMBER.
13232 M02S00525.ns2783 ---|* (ET) = TDDE ADDRESS.
13233 M02S00526.ns2783 ---|*
13234 M02S00527.ns2783 ---|* EXIT (EBUT) ENTRY IN EBUF.
13235 M02S00528.ns2783 ---|* (TDDB) ENTRY IN TDDE IF MASS STORAGE.
13236 M02S00529.ns2783 ---|*
13237 M02S00530.ns2783 ---|* USES CM, T1.
13238 M02S00531.ns2783 ---|*
13239 M02S00532.ns2783 ---|* CALLS EEB.
13240 M02S00533.ns2783 ---|
13241 M02S00534.ns2783 ---|
13242 M02S00535.ns2783 ---| SPE8 RJM EEB ENTER EQUIPMENT INTO BUFFER
13243 M02S00536.ns2783 ---|
13244 M02S00537.ns2783 ---| SPE SUBR ENTRY/EXIT
13245 M02S00538.ns2783 ---| LDI ES
13246 M02S00539.ns2783 ---| SHN 21-13
13247 M02S00540.ns2783 ---| PJN SPE8 IF NOT MASS STORAGE
13248 M02S00541.ns2783 ---| SHN 21-5-21+13
13249 M02S00542.ns2783 ---| PJN SPE8 IF NOT A BUFFERED DEVICE
13250 M02S00543.ns2783 ---| LDM EBUT+10
13251 M02S00544.ns2783 ---| SHN 21-13
13252 M02S00545.ns2783 ---| PJN SPE8 IF NOT A PARTITIONED DEVICE
13253 M02S00546.ns2783 ---| LDD LE
13254 M02S00547.ns2783 ---| STD T1
13255 M02S00548.ns2783 ---| SPE1 SOD T1
13256 M02S00549.ns2783 ---| ZJN SPE8 IF SEARCH COMPLETED
13257 M02S00550.ns2783 ---| SHN 22-5
13258 M02S00551.ns2783 ---| ADD EB (EBUF ADDRESS)
13259 M02S00552.ns2783 ---| SHN 6
13260 M02S00553.ns2783 ---| CRM SPEA,ON READ EQUIPMENT ENTRY
13261 M02S00554.ns2783 ---| LDM EBUT+3
13262 M02S00555.ns2783 ---| LMM SPEA+3
13263 M02S00556.ns2783 ---| NJN SPE1 IF NOT THE SAME DEVICE TYPE
13264 M02S00557.ns2783 ---| LDM EBUT+4
13265 M02S00558.ns2783 ---| LMM SPEA+4
13266 M02S00559.ns2783 ---| LPC MLFPR
13267 M02S00560.ns2783 ---| ZJN SPE1 IF *INITIALIZE,FP* FLAGS ARE THE SAME
13268 M02S00561.ns2783 ---| LDC SPEA COMPARE CHANNEL ENTRIES
13269 M02S00562.ns2783 ---| STD CM
13270 M02S00563.ns2783 ---| SPE3 AOD CM
13271 M02S00564.ns2783 ---| LMC SPEA+3
13272 M02S00565.ns2783 ---| ZJN SPE1 IF ALL OTHER DEVICE CHANNELS CHECKED
13273 M02S00566.ns2783 ---| LDD ES
13274 M02S00567.ns2783 ---| STD T0
13275 M02S00568.ns2783 ---| SPE4 AOD T0
13276 M02S00569.ns2783 ---| LMC EBUT+3
13277 M02S00570.ns2783 ---| ZJN SPE3 IF ALL CURRENT DEVICE CHANNELS CHECKED
13278 M02S00571.ns2783 ---| LDI T0 CURRENT CHANNEL
13279 M02S00572.ns2783 ---| ZJN SPE4 IF NO CHANNEL ENTRY
13280 M02S00573.ns2783 ---| LMI CM OTHER DEVICE CHANNEL
13281 M02S00574.ns2783 ---| LPC 4277
13282 M02S00575.ns2783 ---| NJN SPE4 IF CHANNELS ARE NOT THE SAME
13283 M02S00576.ns2783 ---| LDD ET READ *TDDB* ENTRY
13284 M02S00577.ns2783 ---| SHN 4
13285 M02S00578.ns2783 ---| ADD T1
13286 M02S00579.ns2783 ---| SHN 2
13287 M02S00580.ns2783 ---| ADD T1
13288 M02S00581.ns2783 ---| CRM SPEB,DV
13289 M02S00582.ns2783 ---| LDM TDDB+DVPR COMPARE EQUIPMENT NUMBER
13290 M02S00583.ns2783 ---| LMM SPEB+DVPR
13291 M02S00584.ns2783 ---| SHN -11
13292 M02S00585.ns2783 ---| ZJN SPE6 IF EQUIPMENT NUMBERS MATCH
13293 M02S00586.ns2783 ---| LDM TDDB+DVPR
13294 M02S00587.ns2783 ---| SHN 21-5
13295 M02S00588.ns2783 ---| PJN SPE5 IF NO SECOND EQUIPMENT
13296 M02S00589.ns2783 ---| SHN 11
13297 M02S00590.ns2783 ---| LMM SPEB+DVPR
13298 M02S00591.ns2783 ---| SHN -11
13299 M02S00592.ns2783 ---| ZJN SPE6 IF EQUIPMENT NUMBERS MATCH
13300 M02S00593.ns2783 ---| SPE5 LDM SPEB+DVPR
13301 M02S00594.ns2783 ---| SHN 21-5
13302 M02S00595.ns2783 ---| PJN SPE7 IF NO SECOND EQUIPMENT
13303 M02S00596.ns2783 ---| SHN 11
13304 M02S00597.ns2783 ---| LMM TDDB+DVPR
13305 M02S00598.ns2783 ---| SHN -11
13306 M02S00599.ns2783 ---| NJN SPE7 IF NO MATCH
13307 M02S00600.ns2783 ---| SPE6 LDM TDDB+DVUN+3 COMPARE UNIT NUMBER
13308 M02S00601.ns2783 ---| LMM SPEB+DVUN+3
13309 M02S00602.ns2783 ---| NJN SPE7 IF NO MATCH
13310 M02S00603.ns2783 ---| LDM EBUT+4
13311 M02S00604.ns2783 ---| LPN 17
13312 M02S00605.ns2783 ---| LMC MLFPR+MLIAL
13313 M02S00606.ns2783 ---| STM EBUT+4
13314 M02S00607.ns2783 ---| LDM SPEA+4
13315 M02S00608.ns2783 ---| LPN 17
13316 M02S00609.ns2783 ---| LMC MLFPR+MLIAL
13317 M02S00610.ns2783 ---| STM SPEA+4
13318 M02S00611.ns2783 ---| LDD T1
13319 M02S00612.ns2783 ---| SHN 22-5
13320 M02S00613.ns2783 ---| ADD EB (EBUF ADDRESS)
13321 M02S00614.ns2783 ---| SHN 6
13322 M02S00615.ns2783 ---| CWM SPEA,ON
13323 M02S00616.ns2783 ---| SPE7 UJP SPE1 CHECK FOR MORE ENTRIES
13324 M02S00617.ns2783 ---|
13325 M02S00618.ns2783 ---| SPEA BSS 5 TEMPORARY EBUF ENTRY
13326 M02S00619.ns2783 ---| SPEB BSS TDDCL*5 TEMPORARY TDDE ENTRY
13327 M00S09209.set +++| TITLE MISCELLANEOUS ENTRIES.
13328 M00S09210.set +++| AUT SPACE 4,10
13329 M00S09211.set +++|*** AUTOLOAD.
13330 M00S09212.set +++|* TOGGLE SELECTION OF AUTOLOADING OF MASS STORAGE CONTROLLERS.
13331 M00S09213.set +++|* INITIALLY AUTOLOADING IS SELECTED FOR ALL LEVELS OF
13332 M00S09214.set +++|* DEADSTART.
13333 M00S09215.set +++|*
13334 M00S09216.set +++|* THIS ENTRY IS ONLY ALLOWED FROM THE KEYBOARD.
13335 M00S09217.set +++|
13336 M00S09218.set +++|
13337 M00S09219.set +++| AUT DATA C*AUTOLOAD.*
13338 M00S09220.set +++| LDN 2
13339 M00S09221.set +++| UJN GRN1 TOGGLE AUTOLOAD STATUS
13340 M00S09222.set +++| GRN SPACE 4,10
13341 M00S09223.set +++|*** GRENADE.
13342 M00S09224.set +++|* TOGGLE SELECTION OF THE GRENADE OPERATION FOR MASS STORAGE
13343 M00S09225.set +++|* CONTROLLERS THAT ARE AUTOLOADED. INITIALLY THE GRENADE
13344 M00S09226.set +++|* OPERATION IS NOT SELECTED.
13345 M00S09227.set +++|*
13346 M00S09228.set +++|* THIS ENTRY IS ONLY ALLOWED FROM THE KEYBOARD.
13347 M00S09229.set +++|*
13348 M00S09230.set +++|* THE GRENADE OPERATION CAN INTERRUPT ACTIVITY ON A DRIVE
13349 M00S09231.set +++|* WHICH IS BEING ACCESSED FROM ANOTHER CONTROLLER.
13350 M00S09232.set +++|
13351 M00S09233.set +++|
13352 M00S09234.set +++| GRN DATA C*GRENADE.*
13353 M00S09235.set +++| LDN 1 TOGGLE GRENADE OPTION BIT
13354 M00S09236.set +++| GRN1 LMM DSTO
13355 M00S09237.set +++| STM DSTO
| Line S09238 Modification History |
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act
----------------------------+
13356 M01S09238.274l797 ---| GRN2 JMP KBR RETURN
| Line S02190 Modification History |
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act
----------------------------+
13357 M01S02190.274l797 +++| JMP KBR RETURN
13358 M00S09239.set +++| LBC SPACE 4,10
13359 M00S09240.set +++|*** LBC,AA,C1,C2,...,CN.
13360 M00S09241.set +++|*
13361 M00S09242.set +++|* LOAD CONTROLWARE RECORD TYPE *AA* ON CHANNELS C1 TO CN.
13362 M00S09243.set +++|
13363 M00S09244.set +++|
13364 M00S09245.set +++| LBC DATA C*LBC,*
13365 M00S09246.set +++| LDC TLBC
13366 M00S09247.set +++| RJM SOT SEARCH TABLE FOR CONTROLWARE OPTION
13367 M00S09248.set +++| STD T6
13368 M00S09249.set +++| LDI KA CHECK SEPARATOR
13369 M00S09250.set +++| LMN 1R,
13370 M00S09251.set +++| ZJN LBC3 IF VALID SYNTAX
13371 M00S09252.set +++| LBC2 JMP ILL PROCESS INCORRECT ENTRY
13372 M00S09253.set +++|
13373 M00S09254.set +++| LBC3 STD T3 CLEAR CONCURRENT CHANNEL FLAG
13374 M00S09255.set +++| AOD KA
13375 M00S09256.set +++| LDI KA CHECK FOR *C* PREFIX
13376 M00S09257.set +++| SBN 1RC
13377 M00S09258.set +++| NJN LBC4 IF NOT A CONCURRENT CHANNEL
13378 M00S09259.set +++| LDN 40 SET CONCURRENT CHANNEL FLAG
13379 M00S09260.set +++| STD T3
13380 M00S09261.set +++| AOD KA ADVANCE PAST *C*
13381 M00S09262.set +++| LBC4 RJM AOD CONVERT DIGITS
13382 M00S09263.set +++| SBN TCHSL
13383 M00S09264.set +++| PJN LBC2 IF INCORRECT CHANNEL
13384 M00S09265.set +++| LDD T3 MERGE CCH FLAG WITH CHANNEL NUMBER
13385 M00S09266.set +++| RAD AB+4
13386 M00S09267.set +++| LDD T6
13387 M00S09268.set +++| ZJN LBC5 IF NULL CONTROLWARE
| Line S09269 Modification History |
M01 (Removed by) | ns2776 |
Seq # *Modification Id* Act
----------------------------+
13388 M01S09269.ns2776 ---| LMD HN
| Line S00004 Modification History |
M01 (Added by) | ns2776 |
Seq # *Modification Id* Act
----------------------------+
13389 M01S00004.ns2776 +++| SBK CNSD
13390 M01S00005.ns2776 +++| ZJN LBC4.1 IF SUPPRESSED CONTROLWARE
13391 M01S00006.ns2776 +++| ADK CNSD
13392 M01S00007.ns2776 +++| LBC4.1 LMD HN
13393 M00S09270.set +++| LBC5 STM TCHS,AB+4
13394 M00S09271.set +++| LDI KA CHECK SEPARATOR
13395 M00S09272.set +++| LMN 1R,
13396 M00S09273.set +++| ZJN LBC3 IF NOT END OF CHANNELS
13397 M00S09274.set +++| RJM SCC SET CONTROLWARE TABLE IN CM
13398 M00S09275.set +++| JMP KBR RETURN
13399 M00S09276.set +++| SPACE 4,10
13400 M00S09277.set +++|** TLBC - TABLE OF CONTROLWARE RECORD TYPES TO LOAD.
13401 M00S09278.set +++|
13402 M00S09279.set +++|
13403 M00S09280.set +++| TLBC BSS 0
13404 M00S09281.set +++| DUP MXCLO,1
13405 M00S09282.set +++| CON 6060
13406 M00S09283.set +++| ORG TLBC
13407 M00S09284.set +++| TLBC INDEX
13408 M00S09285.set +++| INDEX CNNC,2RNC NULL CONTROLWARE
13409 M00S09286.set +++| INDEX CLHT,2RHT LOAD HALF TRACK CONTROLWARE
13410 M00S09287.set +++| INDEX CNHT,2RNH NO LOAD HALF TRACK CONTROLWARE
13411 M00S09288.set +++| INDEX CLFT,2RFT LOAD FULL TRACK CONTROLWARE
13412 M00S09289.set +++| INDEX CNFT,2RNF NO LOAD FULL TRACK CONTROLWARE
13413 M00S09290.set +++| INDEX CLFM,2RFM LOAD FMD CONTROLWARE
13414 M00S09291.set +++| INDEX CNFM,2RNM NO LOAD FMD CONTROLWARE
13415 M00S09292.set +++| INDEX CLAD,2RAD LOAD FSC ADAPTOR CONTROLWARE
13416 M00S09293.set +++| INDEX CNAD,2RNA NO LOAD FSC ADAPTOR CONTROLWARE
13417 M00S09294.set +++| INDEX CLPH,2RPH LOAD DEMA/PFMD CONTROLWARE
13418 M00S09295.set +++| INDEX CNPH,2RNP NO LOAD DEMA/PFMD CONTROLWARE
13419 M00S09296.set +++| INDEX CLID,2RID LOAD 7255 ADAPTOR CONTROLWARE
13420 M00S09297.set +++| INDEX CNID,2RNI NO LOAD 7255 ADAPTOR CONTROLWARE
13421 M00S09298.set +++| INDEX CLCC,2RCC LOAD 7165 ADAPTOR CONTROLWARE
13422 M00S09299.set +++| INDEX CNCC,2RCN NO LOAD 7165 ADAPTOR CONTROLWARE
13423 M00S09300.set +++| INDEX CNND,2RNN NO LOAD NAD CONTROLWARE
13424 M00S09301.set +++| INDEX CLM8,2RM8 LOAD M860 FSC CONTROLWARE
13425 M00S09302.set +++| INDEX CNM8,2RN8 NO LOAD M860 FSC CONTROLWARE
13426 M00S09303.set +++| INDEX CNCX,2RNX NO LOAD CCC/NIP CONTROLWARE
13427 M00S09304.set +++| INDEX CNCT,2RNT NO LOAD CCC/698 CONTROLWARE
| Line S00008 Modification History |
M01 (Added by) | ns2776 |
Seq # *Modification Id* Act
----------------------------+
13428 M01S00008.ns2776 +++| INDEX CNSD,2RSD SUPPRESS DEFAULT CONTROLWARE
13429 M00S09305.set +++| INDEX MXCLO
13430 M00S09306.set +++| CON 0 END OF TABLE
13431 M00S09307.set +++| RST SPACE 4,10
13432 M00S09308.set +++|*** RESET=X1,X2,...,XN.
13433 M00S09309.set +++|*
13434 M00S09310.set +++|* RESET CHARACTERISTICS FOR EQUIPMENTS X1, X2, ... ,XN.
13435 M00S09311.set +++|* ONLY THE INFORMATION ENTERED VIA THE *EQXXX=* COMMAND
13436 M00S09312.set +++|* WILL BE RETAINED.
13437 M00S09313.set +++|*
13438 M00S09314.set +++|* THIS ENTRY IS ONLY ALLOWED FROM THE KEYBOARD.
13439 M00S09315.set +++|
13440 M00S09316.set +++|
13441 M00S09317.set +++| RST DATA C*RESET=*
13442 M00S09318.set +++| SOD KA
13443 M00S09319.set +++| RST1 AOD KA
13444 M00S09320.set +++| RJM AOD ASSEMBLE EST ORDINAL
13445 M00S09321.set +++| ZJN RST2 IF EQUIPMENT ZERO
13446 M00S09322.set +++| SBD LE
13447 M00S09323.set +++| PJN RST2 IF INCORRECT EST ORDINAL
13448 M00S09324.set +++| LDD AB+4
13449 M00S09325.set +++| RJM STA SET TABLE ADDRESS
13450 M00S09326.set +++| LDM EBUT+3
13451 M00S09327.set +++| ZJN RST2 IF NULL ENTRY
13452 M00S09328.set +++| LDI ES
13453 M00S09329.set +++| SHN 21-3
13454 M00S09330.set +++| PJN RST3 IF NOT PSEUDO EQUIPMENT
13455 M00S09331.set +++| RST2 JMP ILL PROCESS INCORRECT ENTRY
13456 M00S09332.set +++|
| Line S09333 Modification History |
M01 (Removed by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
13457 M01S09333.284l847 ---| RST3 LDM EBUT+3
13458 M01S09334.284l847 ---| RJM SMT
13459 M01S09335.284l847 ---| ZJN RST4 IF NOT MASS STORAGE DEVICE
| Line S00620 Modification History |
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
13460 M01S00620.284l847 +++| RST3 SHN 22+21-13+3-21
13461 M01S00621.284l847 +++| PJN RST4 IF NOT MASS STORAGE DEVICE
13462 M00S09336.set +++| RJM RMD RESET MASS STORAGE DEVICE
13463 M00S09337.set +++| LDN 0 CLEAR *TDDB* INFORMATION
13464 M00S09338.set +++| STM TDDB+DVFA
13465 M00S09339.set +++| STM TDDB+DVDN
13466 M00S09340.set +++| CRM TDDB+DVPF,ON
13467 M00S09341.set +++| LDM TDDB+DVPR
13468 M00S09342.set +++| SCN 3
13469 M00S09343.set +++| STM TDDB+DVPR
13470 M00S09344.set +++| LDM EBUT+4 CLEAR EST INFORMATION
13471 M00S09345.set +++| LPN 7
13472 M00S09346.set +++| STM EBUT+4
13473 M00S09347.set +++| LDI ES
13474 M00S09348.set +++| LPC 4352
13475 M00S09349.set +++| STI ES
13476 M00S09350.set +++| RST4 LDI ES RESET *ON* STATUS
13477 M00S09351.set +++| SCN 3
13478 M00S09352.set +++| STI ES
13479 M00S09353.set +++| LDM EBUT+10 CLEAR ACCESS LEVELS
13480 M00S09354.set +++| SCN 77
13481 M00S09355.set +++| STM EBUT+10
13482 M00S09356.set +++| RJM EEB UPDATE EQUIPMENT ENTRY
13483 M00S09357.set +++| LDI KA
13484 M00S09358.set +++| LMN 1R.
13485 M00S09359.set +++| ZJN RST5 IF END OF LIST
13486 M00S09360.set +++| LJM RST1 PROCESS NEXT ENTRY
13487 M00S09361.set +++|
13488 M00S09362.set +++| RST5 JMP KBR RETURN
13489 M00S09363.set +++| CCN SPACE 4,10
13490 M00S09364.set +++|** CCN - CHECK CHANNEL NUMBERS.
13491 M00S09365.set +++|*
13492 M00S09366.set +++|* (EBUT - EBUT+4) = FIRST UNIT EST ENTRY.
13493 M00S09367.set +++|* (CN+1 - CN+2) = CONTROL MODULE CHANNEL(S).
13494 M00S09368.set +++|*
13495 M00S09369.set +++|* ERROR TO *DCM*.
13496 M00S09370.set +++|*
13497 M00S09371.set +++|* USES T7, CN+1.
13498 M00S09372.set +++|
13499 M00S09373.set +++|
13500 M00S09374.set +++| CCN2 LMD CN+1 REVERSE CHANNELS
13501 M00S09375.set +++| LMD CN+2
13502 M00S09376.set +++| NJN CCN1 IF NO CHANNEL MATCH
13503 M00S09377.set +++| LDD CN+1
13504 M00S09378.set +++| LMM EBUT+2
13505 M00S09379.set +++| NJN CCN1 IF NO CHANNEL MATCH
13506 M00S09380.set +++|
13507 M00S09381.set +++| CCN SUBR ENTRY/EXIT
13508 M00S09382.set +++| LDM EBUT+1
13509 M00S09383.set +++| LMD CN+1
13510 M00S09384.set +++| NJN CCN2 IF NO CHANNEL MATCH
13511 M00S09385.set +++| LDM EBUT+2
13512 M00S09386.set +++| LMD CN+2
13513 M00S09387.set +++| ZJN CCNX IF THE CHANNELS MATCH
13514 M00S09388.set +++| CCN1 LDC CCNA
13515 M00S09389.set +++| JMP DCM DISPLAY CONVERTED MESSAGE
13516 M00S09390.set +++|
13517 M00S09391.set +++|
13518 M00S09392.set +++| CCNA DATA C*EQXXX UNITS SPAN DIFFERENT CHANNELS*
13519 M00S09393.set +++| DDV SPACE 4,10
13520 M00S09394.set +++|** DDV - DOWN ISMD DEVICE.
13521 M00S09395.set +++|*
13522 M00S09396.set +++|* ENTRY (EBUT) = EBUF EQUIPMENT ENTRY.
13523 M00S09397.set +++|*
13524 M00S09398.set +++|* EXIT DEVICE DOWN AND OFF IF VALID FOR THIS DEVICE.
13525 M00S09399.set +++|*
13526 M00S09400.set +++|* ERROR TO *DCM*.
13527 M00S09401.set +++|*
13528 M00S09402.set +++|* CALLS CDD, EEB.
13529 M00S09403.set +++|
13530 M00S09404.set +++|
13531 M00S09405.set +++| DDV2 SHN 11-10
13532 M00S09406.set +++| PJN DDV1 IF NOT REMOVABLE
13533 M00S09407.set +++| LDM EBUT+4
13534 M00S09408.set +++| SCN 17
13535 M00S09409.set +++| NJN DDV1 IF INITIALIZATION REQUESTED
13536 M00S09410.set +++| RJM CDD
13537 M00S09411.set +++| ZJN DDV1 IF DEADSTART DEVICE
13538 M00S09412.set +++| LDI ES
13539 M00S09413.set +++| SCN 3
13540 M00S09414.set +++| LMN 3 SET DEVICE *OFF* AND *DOWN*
13541 M00S09415.set +++| STI ES
13542 M00S09416.set +++| RJM EEB ENTER EQUIPMENT ENTRY
13543 M00S09417.set +++|
13544 M00S09418.set +++| DDV SUBR ENTRY/EXIT
13545 M00S09419.set +++| LDI ES
13546 M00S09420.set +++| SHN 21-11
13547 M00S09421.set +++| PJN DDV2 IF NOT SHARED
13548 M00S09422.set +++| DDV1 LDC DDVA
13549 M00S09423.set +++| JMP DCM DISPLAY CONVERTED MESSAGE
13550 M00S09424.set +++|
13551 M00S09425.set +++|
13552 M00S09426.set +++| DDVA DATA C*EQXXX CAN NOT BE DOWNED*
| Line S09427 Modification History |
M01 (Removed by) | ns2795 |
Seq # *Modification Id* Act
----------------------------+
13553 M01S09427.ns2795 ---| FNL SPACE 4,10
13554 M01S09428.ns2795 ---|** FNL - FORCE CMTS CONTROLWARE NO LOAD.
13555 M01S09429.ns2795 ---|*
13556 M01S09430.ns2795 ---|* EXIT CHANNEL CONTROLWARE TABLE UPDATED.
13557 M01S09431.ns2795 ---|*
13558 M01S09432.ns2795 ---|* USES T0, T4.
13559 M01S09433.ns2795 ---|*
13560 M01S09434.ns2795 ---|* CALLS SFE.
13561 M01S09435.ns2795 ---|
13562 M01S09436.ns2795 ---|
13563 M01S09437.ns2795 ---| FNL SUBR ENTRY/EXIT
13564 M01S09438.ns2795 ---| LCN 0
13565 M01S09439.ns2795 ---| STD T4
13566 M01S09440.ns2795 ---| FNL1 AOD T4
13567 M01S09441.ns2795 ---| LDM TCMD,T4
13568 M01S09442.ns2795 ---| ZJN FNLX IF END OF TABLE
13569 M01S09443.ns2795 ---| LMC 1S17 SET INITIAL CALL
13570 M01S09444.ns2795 ---| FNL2 RJM SFE SEARCH FOR EQUIPMENT
13571 M01S09445.ns2795 ---| MJN FNL1 IF DEVICE NOT FOUND
13572 M01S09446.ns2795 ---| LDI ES CHECK FOR CMTS EQUIPMENT
13573 M01S09447.ns2795 ---| LPN 4
13574 M01S09448.ns2795 ---| ZJN FNL2 IF NOT CMTS EQUIPMENT
13575 M01S09449.ns2795 ---| LDM EBUT+1
13576 M01S09450.ns2795 ---| FNL3 SHN 14
13577 M01S09451.ns2795 ---| STD T0
13578 M01S09452.ns2795 ---| SHN -14
13579 M01S09453.ns2795 ---| STD T1
13580 M01S09454.ns2795 ---| LDN CNCT SET NO LOAD OF CCC/698 CONTROLWARE
13581 M01S09455.ns2795 ---| STM TCHS,T1
13582 M01S09456.ns2795 ---| LDD T0
13583 M01S09457.ns2795 ---| NJN FNL3 IF SECOND CHANNEL
13584 M01S09458.ns2795 ---| UJN FNL2 SEARCH FOR NEXT DEVICE
13585 M01S09459.ns2795 ---|
13586 M01S09460.ns2795 ---|
13587 M01S09461.ns2795 ---|** TCMD - TABLE OF CMTS DEVICE TYPES.
13588 M01S09462.ns2795 ---|*
13589 M01S09463.ns2795 ---|*T 12/ DEVICE MNEMONIC
13590 M01S09464.ns2795 ---|
13591 M01S09465.ns2795 ---|
13592 M01S09466.ns2795 ---| TCMD CON 2RMT
13593 M01S09467.ns2795 ---| CON 2RNT
13594 M01S09468.ns2795 ---| CON 0
13595 M00S09469.set +++| VCD SPACE 4,30
13596 M00S09470.set +++|** VCD - VALIDATE *CM* AND ISMD ENTRIES.
13597 M00S09471.set +++|*
13598 M00S09472.set +++|* ENTRY (ISPF) .LT. 0, IF NOT CYBER 810/815/825/830.
13599 M00S09473.set +++|*
13600 M00S09474.set +++|* EXIT (ISPF) = COUNT OF CONTROL MODULES DEFINED.
13601 M00S09475.set +++|* *CM* AND ISMD TYPE ENTRIES VALIDATED.
13602 M00S09476.set +++|* IF A *CM* DEVICE IS DEFINED AS DOWN, ALL CORRESPONDING
13603 M00S09477.set +++|* ISMD DEVICES ARE ALSO DOWNED.
13604 M00S09478.set +++|*
13605 M00S09479.set +++|* ERROR TO *DCM* IF ANY OF THE FOLLOWING IS TRUE.
13606 M00S09480.set +++|*
13607 M00S09481.set +++|* 1) NO *CM* ENTRY EXISTS FOR AN ISMD DEVICE.
13608 M00S09482.set +++|* 2) NO ISMD ENTRY EXISTS FOR A *CM* DEVICE.
13609 M00S09483.set +++|* 3) A MULTI-UNIT ISMD DEVICE SPANS *CM* DEVICES ON
13610 M00S09484.set +++|* DIFFERENT CHANNEL(S).
13611 M00S09485.set +++|* 4) UNIT NUMBERS FOR A GIVEN *CM* ARE NOT UNIQUE.
13612 M00S09486.set +++|* 5) A *CM* DEVICE IS DEFINED AS DOWN BUT A
13613 M00S09487.set +++|* CORRESPONDING ISMD DEVICE CAN NOT BE
13614 M00S09488.set +++|* DOWNED.
13615 M00S09489.set +++|* 6) AN ISMD DEVICE IS DEFINED WITH AN INCOMPATIBLE
13616 M00S09490.set +++|* CONTROL MODULE.
13617 M00S09491.set +++|*
13618 M00S09492.set +++|* USES T2, T5.
13619 M00S09493.set +++|*
13620 M00S09494.set +++|* CALLS SID, VUN.
13621 M00S09495.set +++|
13622 M00S09496.set +++|
13623 M00S09497.set +++| VCD SUBR ENTRY/EXIT
13624 M00S09498.set +++| LDM ISPF
13625 M00S09499.set +++| SHN 0-13
13626 M00S09500.set +++| NJN VCDX IF NOT CYBER 810/815/825/830
13627 M00S09501.set +++| STM ISPF CLEAR ISMD PRESENT FLAG
13628 M00S09502.set +++| CRM TUNB,ON CLEAR TABLE OF UNIT NUMBERS
13629 M00S09503.set +++| CRM TUNB+3,ON
13630 M00S09504.set +++| LDC ATD3 PRESET ERROR RETURN ADDRESS
13631 M00S09505.set +++| STM AKL
13632 M00S09506.set +++| LCN 0 SEARCH FOR ISMD DEVICE
13633 M00S09507.set +++| VCD1 RJM SID
13634 M00S09508.set +++| MJN VCD3 IF NO MORE FOUND
13635 M00S09509.set +++| LPN 7 SAVE NUMBER OF UNITS IN THIS DEVICE
13636 M00S09510.set +++| ADN 1
13637 M00S09511.set +++| STD T5
13638 M00S09512.set +++| LDC TDDB+DVUN+3 INITIALIZE UNIT LIST OFFSET
13639 M00S09513.set +++| STD T2
13640 M00S09514.set +++| VCD2 LDI T2 VALIDATE LOWER UNIT NUMBER
13641 M00S09515.set +++| LPN 77
13642 M00S09516.set +++| RJM VUN
13643 M00S09517.set +++| ZJN VCD1 IF END OF UNIT LIST FOR THIS DEVICE
13644 M00S09518.set +++| LDI T2 VALIDATE UPPER UNIT NUMBER
13645 M00S09519.set +++| SHN -6
13646 M00S09520.set +++| RJM VUN
13647 M00S09521.set +++| ZJN VCD1 IF END OF UNIT LIST FOR THIS DEVICE
13648 M00S09522.set +++| SOD T2
13649 M00S09523.set +++| UJN VCD2 PROCESS NEXT UNIT
13650 M00S09524.set +++|
13651 M00S09525.set +++| VCD3 LDN 8D CHECK *CM* ENTRIES
13652 M00S09526.set +++| STD T2
13653 M00S09527.set +++| VCD4 SOD T2
13654 M00S09528.set +++| MJP VCDX IF ALL *CM* ENTRIES CHECKED
13655 M00S09529.set +++| LDM TENB,T2
13656 M00S09530.set +++| ZJN VCD4 IF THIS *CM* NOT DEFINED
13657 M00S09531.set +++| STD EQ
13658 M00S09532.set +++| AOM ISPF
13659 M00S09533.set +++| LDM TUNB,T2
13660 M00S09534.set +++| NJN VCD4 IF AT LEAST ONE DRIVE DEFINED ON THIS *CM*
13661 M00S09535.set +++| LDC VCDA
13662 M00S09536.set +++| JMP DCM DISPLAY CONVERTED MESSAGE
13663 M00S09537.set +++|
13664 M00S09538.set +++| VCDA DATA C*EQXXX HAS NO DRIVE DEFINED*
13665 M00S09539.set +++| VUN SPACE 4,20
13666 M00S09540.set +++|** VUN - VALIDATE UNIT NUMBER.
13667 M00S09541.set +++|*
13668 M00S09542.set +++|* ENTRY (A) = UNIT NUMBER.
13669 M00S09543.set +++|* (T4) = *TFSD* INDEX SET BY *SID*.
13670 M00S09544.set +++|* (T5) = NUMBER OF UNITS LEFT TO PROCESS.
13671 M00S09545.set +++|*
13672 M00S09546.set +++|* EXIT (T5) DECREMENTED.
13673 M00S09547.set +++|* (A) = (T5).
13674 M00S09548.set +++|* CORRESPONDING *TUNB* ENTRY UPDATED.
13675 M00S09549.set +++|* ISMD DEVICE DOWNED IF *CM* IS DOWN.
13676 M00S09550.set +++|*
13677 M00S09551.set +++|* ERROR TO *DCM*.
13678 M00S09552.set +++|*
13679 M00S09553.set +++|* USES T1, T6, CM - CM+4, CN - CN+4.
13680 M00S09554.set +++|*
13681 M00S09555.set +++|* CALLS CCN, DDV.
13682 M00S09556.set +++|
13683 M00S09557.set +++|
13684 M00S09558.set +++| VUN3 RAM TUNB,T6
13685 M00S09559.set +++| RJM CCN ENSURE CHANNELS OF ALL UNITS MATCH
13686 M00S09560.set +++| LDD CN
13687 M00S09561.set +++| LPN 3
13688 M00S09562.set +++| LMN 3
13689 M00S09563.set +++| NJN VUN4 IF NOT *DOWN*
13690 M00S09564.set +++| RJM DDV
13691 M00S09565.set +++| VUN4 SOD T5 DECREMENT UNIT COUNT
13692 M00S09566.set +++|
13693 M00S09567.set +++| VUN SUBR ENTRY/EXIT
13694 M00S09568.set +++| SHN 21-2 SAVE *CM* NUMBER
13695 M00S09569.set +++| STD T6
13696 M00S09570.set +++| SHN 2-21 SAVE DRIVE NUMBER
13697 M00S09571.set +++| STD T1
13698 M00S09572.set +++| LDM TENB,T6
13699 M00S09573.set +++| ZJN VUN1 IF NO *CM* FOR THIS UNIT EXISTS
13700 M00S09574.set +++| SHN 22-5
13701 M00S09575.set +++| ADD EB
13702 M00S09576.set +++| SHN 6
13703 M00S09577.set +++| CRD CN FETCH EST ENTRY FOR CONTROL MODULE
13704 M00S09578.set +++| ADN EQAE
13705 M00S09579.set +++| CRD CM
13706 M00S09580.set +++| LDD CM+2
13707 M00S09581.set +++| LPN 37
13708 M00S09582.set +++| LMM VUNB,T4
13709 M00S09583.set +++| ZJN VUN2 IF *CM* TYPE CORRECT FOR THIS UNIT
13710 M00S09584.set +++| VUN1 LDC VUNC
13711 M00S09585.set +++| JMP DCM DISPLAY CONVERTED MESSAGE
13712 M00S09586.set +++|
13713 M00S09587.set +++| VUN2 LDM TUNB,T6 VERIFY THAT UNIT NUMBER IS UNIQUE
13714 M00S09588.set +++| LMM VUNA,T1
13715 M00S09589.set +++| SBM TUNB,T6
13716 M00S09590.set +++| PJP VUN3 IF UNIQUE UNIT NUMBER FOR THIS *CM*
13717 M00S09591.set +++| LDM TENB,T6 GET *CM* EST ORDINAL FOR MESSAGE
13718 M00S09592.set +++| STD EQ
13719 M00S09593.set +++| LDC VUND
13720 M00S09594.set +++| JMP DCM DISPLAY CONVERTED MESSAGE
13721 M00S09595.set +++|
13722 M00S09596.set +++| VUNA BSS 0 TABLE OF DRIVE NUMBER MASKS
13723 M00S09597.set +++| CON 1
13724 M00S09598.set +++| CON 2
13725 M00S09599.set +++| CON 4
13726 M00S09600.set +++| CON 10
13727 M00S09601.set +++|
13728 M00S09602.set +++| VUNB BSS 0
13729 M00S09603.set +++| CON CMCW
13730 M00S09604.set +++| CON C2CW
13731 M00S09605.set +++|
13732 M00S09606.set +++| VUNC DATA C/EQXXX UNIT DEFINED ON WRONG *CM*/
13733 M00S09607.set +++| VUND DATA C/EQXXX HAS DUPLICATE UNIT NUMBER/
13734 M00S09608.set +++|
13735 M00S09609.set +++|
13736 M00S09610.set +++| QUAL
13737 M00S09611.set +++| VAL$ EQU 1
13738 M00S09612.set +++| SCH$ EQU 1
13739 M00S09613.set +++| QUAL *
13740 M00S09614.set +++|*CALL COMSMLS
13741 M00S09615.set +++|*CALL COMPVLC
| Line S09616 Modification History |
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act
----------------------------+
13742 M01S09616.274l797 ---|
13743 M01S09617.274l797 ---| EQ2S EQU *+4-EQXO *EQ2* SIZE
13744 M01S09618.274l797 ---| EQ2L EQU EQ2S/5+77 *EQ2* OVERLAY LENGTH