Seq # *Modification Id* Act
----------------------------+
Line S00014 Modification History |
M01 (Added by) | 271l716 |
M02 (Removed by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
03992 M02S00014.284l847 ---| MX0 -9 MASK FOR *LSPT*
03993 M02S00015.284l847 ---| LX3 33-24
Line S00005 Modification History |
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
03994 M01S00005.284l847 +++| MX0 -6 MASK FOR PHYSICAL SECTORS/PHYSICAL TRACK
03995 M01S00006.284l847 +++| LX3 33-36
Line S00016 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
03996 M01S00016.271l716 +++| SA1 FRDB FETCH TRACK VALUE
03997 M01S00017.271l716 +++| BX2 -X0*X3
Line S00007 Modification History |
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
03998 M01S00007.284l847 +++| LX2 B7 CONVERT TO LOGICAL SECTORS/PHYSICAL TRACK
Line S00018 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
03999 M01S00018.271l716 +++| IX1 X2*X1 CONVERT TRACK VALUE TO LOGICAL SECTORS
Line S00019 Modification History |
M01 (Added by) | 271l716 |
M02 (Removed by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
04000 M02S00019.284l847 ---| LX3 24-12
Line S00008 Modification History |
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
04001 M01S00008.284l847 +++| LX3 36-12
Line S00020 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
04002 M01S00020.271l716 +++| IX6 X6+X1 ACCUMULATE LOGICAL SECTOR COUNT
04003 M01S00021.271l716 +++|
04004 M01S00022.271l716 +++|* MULTIPLY THE CYLINDER VALUE BY THE NUMBER OF LOGICAL
04005 M01S00023.271l716 +++|* SECTORS PER CYLINDER.
04006 M01S00024.271l716 +++|
04007 M01S00025.271l716 +++| SA1 FRDA FETCH CYLINDER VALUE
04008 M01S00026.271l716 +++| MX0 -12
Line S00027 Modification History |
M01 (Added by) | 271l716 |
M02 (Removed by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
04009 M02S00027.284l847 ---| BX2 -X0*X3 EXTRACT *LSCY*
Line S00009 Modification History |
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
04010 M01S00009.284l847 +++| BX2 -X0*X3 EXTRACT PHYSICAL SECTORS/CYLINDER
04011 M01S00010.284l847 +++| LX2 B7 CONVERT TO LOGICAL SECTORS/CYLINDER
Line S00028 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
04012 M01S00028.271l716 +++| IX1 X2*X1
04013 M01S00029.271l716 +++| LX3 12
04014 M01S00030.271l716 +++| IX6 X6+X1 ACCUMULATE LOGICAL SECTOR COUNT
04015 M01S00031.271l716 +++| BX3 -X0*X3
04016 M01S00032.271l716 +++|
04017 M01S00033.271l716 +++|* DIVIDE THE ACCUMULATED LOGICAL SECTOR COUNT BY THE
04018 M01S00034.271l716 +++|* SUM OF (LOGICAL + GAP) SECTORS PER LOGICAL TRACK.
04019 M01S00035.271l716 +++|
04020 M01S00036.271l716 +++| PX3 X3
04021 M01S00037.271l716 +++| PX6 X6
04022 M01S00038.271l716 +++| NX3 X3
04023 M01S00039.271l716 +++| FX6 X6/X3 QUOTIENT = LOGICAL TRACK NUMBER
04024 M01S00040.271l716 +++| UX6,B7 X6
04025 M01S00041.271l716 +++| LX6 B7
04026 M00S03892.msi +++| EQ CFER RETURN
04027 M00S03893.msi +++|
04028 M00S03894.msi +++|
04029 M00S03895.msi +++| FRDA BSS 1 CYLINDER NUMBER
04030 M00S03896.msi +++| FRDB BSS 1 TRACK NUMBER
04031 M00S03897.msi +++| TDTY SPACE 4,10
04032 M00S03898.msi +++|** TDTY - TABLE OF DEVICE TYPE PARAMETERS.
04033 M00S03899.msi +++|*
04034 M00S03900.msi +++|*T, TDTY 1/ PK,11/ MN,1/ TT,11/ SL,18/ FP,6/ AI,12/ CT
Figure
TDTY
04035 M00S03901.msi +++|*
04036 M00S03902.msi +++|* PK = PACK TYPE DEVICE FLAG.
04037 M00S03903.msi +++|* MN = DEVICE MNEMONIC.
04038 M00S03904.msi +++|* TT = TRACK TYPE, 0 = FULL TRACK, 1 = HALF TRACK.
04039 M00S03905.msi +++|* SL = SINGLE UNIT SECTOR LIMIT.
04040 M00S03906.msi +++|* FP = PHYSICAL DESCRIPTOR TABLE ENTRY.
04041 M00S03907.msi +++|* AI = *LDAM* ALGORITHM INDEX.
04042 M00S03908.msi +++|* CT = DEFAULT NUMBER OF CATALOG TRACKS.
04043 M00S03909.msi +++|
04044 M00S03910.msi +++|
04045 M00S03911.msi +++| PURGMAC TBLM
04046 M00S03912.msi +++| TBLM MACRO EQ
04047 M00S03913.msi +++| .A IFNE CYUN_EQ,0
04048 M00S03914.msi +++| VFD 1/1 SET ROTATING MASS STORAGE DEVICE
04049 M00S03915.msi +++| .A ELSE
04050 M00S03916.msi +++| VFD 1/0 SET LARGE MEMORY STORAGE DEVICE
04051 M00S03917.msi +++| .A ENDIF
04052 M00S03918.msi +++| VFD 11/2R_EQ,1/TT_EQ,11/SL_EQ
04053 M00S03919.msi +++| .B IFNE CYUN_EQ,0
04054 M00S03920.msi +++| VFD 18/PHY_EQ PHYSICAL DESCRIPTOR TABLE ENTRY
04055 M00S03921.msi +++| .B ELSE
04056 M00S03922.msi +++| VFD 18/0
04057 M00S03923.msi +++| .B ENDIF
04058 M00S03924.msi +++| VFD 6/AI_EQ,12/CT_EQ
04059 M00S03925.msi +++| ENDM
04060 M00S03926.msi +++|
04061 M00S03927.msi +++| LIST G
04062 M00S03928.msi +++| TDTY TBL "MSEQ"
04063 M00S03929.msi +++| LIST -G
04064 M00S03930.msi +++| CON 0 END OF TABLE
04065 M00S03931.msi +++| TPHY SPACE 4,10
04066 M00S03932.msi +++|** TPHY - PHYSICAL DESCRIPTOR TABLE.
04067 M00S03933.msi +++|*
Line S03934 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
04068 M01S03934.271l716 ---|*T, TPHY 12/CYUN, 6/PTCY, 9/PSPT, 3/LTCY, 12/PSLT, 3/GS, 1/HT, 14/
Figure
TPHY
Line S00042 Modification History |
M01 (Added by) | 271l716 |
M02 (Removed by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
04069 M02S00042.284l847 ---|*T, TPHY 12/CYUN, 6/PTCY, 6/PSPT, 3/CF, 9/LSPT, 12/LSCY, 12/LSLT
Figure
TPHY
Line S00011 Modification History |
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
04070 M01S00011.284l847 +++|*T, TPHY 12/CYPN, 6/PTCY, 6/PSPT, 3/CF, 9/UNUSED, 12/PSCY, 12/LSLT
Figure
TPHY
04071 M00S03935.msi +++|*
Line S03936 Modification History |
M01 (Removed by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
04072 M01S03936.284l847 ---|* CYUN = CYLINDERS PER UNIT.
Line S00012 Modification History |
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
04073 M01S00012.284l847 +++|* CYPN = CYLINDERS PER PARTITION.
04074 M00S03937.msi +++|* PTCY = PHYSICAL TRACKS PER CYLINDER.
04075 M00S03938.msi +++|* PSPT = PHYSICAL SECTORS PER PHYSICAL TRACK.
Line S03939 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
04076 M01S03939.271l716 ---|* LTCY = LOGICAL TRACKS PER CYLINDER.
04077 M01S03940.271l716 ---|* PSLT = PHYSICAL SECTORS PER LOGICAL TRACK, INCLUDING
04078 M01S03941.271l716 ---|* GAP SECTORS.
04079 M01S03942.271l716 ---|* GS = GAP SECTORS.
04080 M01S03943.271l716 ---|* HT = HALF TRACK DEVICE FLAG.
Line S00043 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
04081 M01S00043.271l716 +++|* CF = CONVERSION FACTOR.
Line S00044 Modification History |
M01 (Added by) | 271l716 |
M02 (Removed by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
04082 M02S00044.284l847 ---|* LSPT = LOGICAL SECTORS PER PHYSICAL TRACK.
04083 M02S00045.284l847 ---|* LSCY = LOGICAL SECTORS PER CYLINDER.
Line S00013 Modification History |
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
04084 M01S00013.284l847 +++|* PSCY = PHYSICAL SECTORS PER CYLINDER.
Line S00046 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
04085 M01S00046.271l716 +++|* LSLT = LOGICAL SECTORS PER LOGICAL TRACK, INCLUDING
04086 M01S00047.271l716 +++|* GAP SECTORS.
04087 M00S03944.msi +++|
04088 M00S03945.msi +++|
04089 M00S03946.msi +++| PURGMAC TBLM
04090 M00S03947.msi +++| TBLM MACRO EQ
04091 M00S03948.msi +++| IFNE CYUN_EQ,0
04092 M00S03949.msi +++|
Line S03950 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
04093 M01S03950.271l716 ---| PHY_EQ VFD 12/CYUN_EQ CYLINDERS/UNIT
04094 M01S03951.271l716 ---| VFD 6/PTCY_EQ PHYSICAL TRACKS/CYLINDER
04095 M01S03952.271l716 ---| VFD 9/PSPT_EQ PHYSICAL SECTORS/PHYSICAL TRACK
04096 M01S03953.271l716 ---| VFD 3/LTCY_EQ LOGICAL TRACKS/CYLINDER
04097 M01S03954.271l716 ---| VFD 12/PSLT_EQ PHYSICAL SECTORS/LOGICAL TRACK
04098 M01S03955.271l716 ---| VFD 3/GS_EQ GAP SECTORS/LOGICAL TRACK
04099 M01S03956.271l716 ---| VFD 1/TT_EQ HALF TRACK FLAG
04100 M01S03957.271l716 ---| VFD 14/0
Line S00048 Modification History |
M01 (Added by) | 271l716 |
M02 (Removed by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
04101 M02S00048.284l847 ---| PHY_EQ VFD 12/CYUN_EQ
Line S00014 Modification History |
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
04102 M01S00014.284l847 +++| PHY_EQ VFD 12/CYPN_EQ
Line S00049 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
04103 M01S00049.271l716 +++| VFD 6/PTCY_EQ
04104 M01S00050.271l716 +++| VFD 6/PSPT_EQ
Line S00051 Modification History |
M01 (Added by) | 271l716 |
M02 (Removed by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
04105 M02S00051.272l774 ---| VFD 3/CF_EQ
Line S00007 Modification History |
M01 (Added by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
04106 M01S00007.272l774 +++| VFD 3/CFS_EQ
Line S00052 Modification History |
M01 (Added by) | 271l716 |
M02 (Removed by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
04107 M02S00052.284l847 ---| VFD 9/LSPT_EQ
Line S00015 Modification History |
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
04108 M01S00015.284l847 +++| VFD 9/0 UNUSED
Line S00053 Modification History |
M01 (Added by) | 271l716 |
M02 (Removed by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
04109 M02S00053.272l774 ---| VFD 12/PSPT_EQ*PTCY_EQ*LSPS_EQ
Line S00008 Modification History |
M01 (Added by) | 272l774 |
M02 (Removed by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
04110 M02S00008.284l847 ---| .A SET PSPT_EQ*PTCY_EQ-SPSC_EQ
04111 M02S00009.284l847 ---| VFD 12/.A*LSPS_EQ
Line S00016 Modification History |
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act
----------------------------+
04112 M01S00016.284l847 +++| VFD 12/PSPT_EQ*PTCY_EQ-SPSC_EQ
Line S00054 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
04113 M01S00054.271l716 +++| VFD 12/SL_EQ+GS_EQ
04114 M00S03958.msi +++| ENDIF
04115 M00S03959.msi +++| ENDM
04116 M00S03960.msi +++|
04117 M00S03961.msi +++| LIST G
04118 M00S03962.msi +++| TPHY TBL "MSEQ"
04119 M00S03963.msi +++| LIST -G
04120 M00S03964.msi +++| TITLE COMMON DECKS.
04121 M00S03965.msi +++| SPACE 4
04122 M00S03966.msi +++|* COMMON DECKS.
04123 M00S03967.msi +++|
04124 M00S03968.msi +++|*CALL COMCARG
04125 M00S03969.msi +++|*CALL COMCDCP
04126 M00S03970.msi +++|*CALL COMCDXB
04127 M00S03971.msi +++|*CALL COMCMVE
04128 M00S03972.msi +++|*CALL COMCSFN
04129 M00S03973.msi +++|*CALL COMCUPC
04130 M00S03974.msi +++|*CALL COMCCOD
04131 M00S03975.msi +++|*CALL COMCVLC
04132 M00S03976.msi +++|
04133 M00S03977.msi +++|
04134 M00S03978.msi +++|* COMMON DECKS WHICH MAKE SYSTEM REQUESTS.
04135 M00S03979.msi +++|
04136 M00S03980.msi +++| QUAL SYSREQ
04137 M00S03981.msi +++| QUAL$ EQU 1
04138 M00S03982.msi +++|*CALL COMCCIO
04139 M00S03983.msi +++|*CALL COMCCPM
Line S00054 Modification History |
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
04140 M01S00054.253l688 +++|*CALL COMCLFM
04141 M00S03984.msi +++|*CALL COMCPFU
04142 M00S03985.msi +++|*CALL COMCQFM
04143 M00S03986.msi +++|*CALL COMCRSB
04144 M00S03987.msi +++|*CALL COMCSYS
04145 M00S03988.msi +++| QUAL *
04146 M00S03989.msi +++|
04147 M00S03990.msi +++| CIO= EQU /SYSREQ/CIO=
04148 M00S03991.msi +++| CPM= EQU /SYSREQ/CPM=
Line S00055 Modification History |
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
04149 M01S00055.253l688 +++| LFM= EQU /SYSREQ/LFM=
04150 M00S03992.msi +++| PFU EQU /SYSREQ/PFU
04151 M00S03993.msi +++| QFM EQU /SYSREQ/QFM
04152 M00S03994.msi +++| MSG= EQU /SYSREQ/MSG=
04153 M00S03995.msi +++| RCL= EQU /SYSREQ/RCL=
04154 M00S03996.msi +++| RSB= EQU /SYSREQ/RSB=
04155 M00S03997.msi +++| WNB= EQU /SYSREQ/WNB=
04156 M00S03998.msi +++| SYS= SPACE 4,15
04157 M00S03999.msi +++|** SYS= - PROCESS SYSTEM REQUEST.
04158 M00S04000.msi +++|*
04159 M00S04001.msi +++|* ENTRY (X6) = SYSTEM REQUEST.
04160 M00S04002.msi +++|*
04161 M00S04003.msi +++|* USES X - 1, 6, 7.
04162 M00S04004.msi +++|* A - 1, 7.
04163 M00S04005.msi +++|* B - 2.
04164 M00S04006.msi +++|*
04165 M00S04007.msi +++|* CALLS /SYSREQ/SYS=.
04166 M00S04008.msi +++|
04167 M00S04009.msi +++|
04168 M00S04010.msi +++| SYS= SUBR ENTRY/EXIT
04169 M00S04011.msi +++| RJ /SYSREQ/SYS=
04170 M00S04012.msi +++| SA1 PREQ
04171 M00S04013.msi +++| ZR X1,SYS=X IF NO PP REQUEST
04172 M00S04014.msi +++| BX7 X7-X7 CLEAR REQUEST WORD
04173 M00S04015.msi +++| SX6 X1-TPPRL-1 VERIFY REQUEST
04174 M00S04016.msi +++| SA7 A1
04175 M00S04017.msi +++| PL X6,SYS=X IF INCORRECT REQUEST
04176 M00S04018.msi +++| SB2 X1+TPPR-1
04177 M00S04019.msi +++| JP B2 EXIT TO REQUEST PROCESSOR
04178 M00S04020.msi +++|
04179 M00S04021.msi +++|
04180 M00S04022.msi +++|* TABLE OF PP REQUESTS.
04181 M00S04023.msi +++|
04182 M00S04024.msi +++| TPPR BSS 0
04183 M00S04025.msi +++| + EQ CLEAR CLEAR INITIALIZATION FLAGS
04184 M00S04026.msi +++| + EQ RERUN PROCESS RERUN
04185 M00S04027.msi +++| + EQ TKL PROCESS TRACK LIMIT
04186 M00S04028.msi +++| BSS 0
04187 M00S04029.msi +++| TPPRL EQU *-TPPR
04188 M00S04030.msi +++| TITLE KEYBOARD PROCESSOR.
04189 M00S04031.msi +++| KIP SPACE 4,10
04190 M00S04032.msi +++|** KIP - KEYBOARD PROCESSOR.
04191 M00S04033.msi +++|* *PKI* UNPACKS INPUT PARAMETERS FOR *MSI* FUNCTIONS.
04192 M00S04034.msi +++|*
04193 M00S04035.msi +++|* EXIT TO PKI2 IF NO INCORRECT FUNCTIONS ENCOUNTERED.
04194 M00S04036.msi +++|* TO PKIX IF *GO* ENTERED.
04195 M00S04037.msi +++|* TO PKI1 IF PAGING OCCURED.
04196 M00S04038.msi +++|* TO *CLEAR* OR *RERUN* IF APPROPRIATE COMMAND ENTERED.
04197 M00S04039.msi +++|* (B6) = NUMBER OF ARGUMENTS ENTERED.
04198 M00S04040.msi +++|* (X6) = 0 IF NO ERRORS IN UNPACKING OF ARGUMENTS.
04199 M00S04041.msi +++|*
04200 M00S04042.msi +++|* USES X - ALL.
04201 M00S04043.msi +++|* A - 1, 2, 3, 5, 6, 7.
04202 M00S04044.msi +++|* B - 2, 3, 6, 7.
04203 M00S04045.msi +++|*
04204 M00S04046.msi +++|* CALLS PGD, UPC.
04205 M00S04047.msi +++|*
04206 M00S04048.msi +++|* MACROS CONSOLE, MOVE, RECALL.
04207 M00S04049.msi +++|
04208 M00S04050.msi +++|
04209 M00S04051.msi +++| KIP BX6 X6-X6 CLEAR PARAMETER AREA
Line S04052 Modification History |
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
04210 M01S04052.286l859 ---| SB3 /COMSPFS/PARAML-1
Line S00003 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
04211 M01S00003.286l859 +++| SB3 PARAML-1
04212 M00S04053.msi +++| KIP1 SA6 PAR+B3
04213 M00S04054.msi +++| SB3 B3-B1 DECREMENT COUNT
04214 M00S04055.msi +++| NZ B3,KIP1 IF MORE WORDS TO CLEAR
04215 M00S04056.msi +++| SA6 I CLEAR INPUT BUFFER
04216 M00S04057.msi +++| SA6 A6+B1
04217 M00S04058.msi +++| CONSOLE KDCW
04218 M00S04059.msi +++| KIP2 RECALL
04219 M00S04060.msi +++| SA1 I
04220 M00S04061.msi +++| ZR X1,KIP2 IF INPUT NOT READY
04221 M00S04062.msi +++| MX0 6
04222 M00S04063.msi +++| BX3 X1*X0 SET ENTRY CONDITIONS FOR *PGD*
04223 M00S04064.msi +++| SX2 PAGA
04224 M00S04065.msi +++| SA5 FLFG
04225 M00S04066.msi +++| ZR X5,KIP2.1 IF INITIALIZE PROCESSING
04226 M00S04067.msi +++| SX2 PAGB
04227 M00S04068.msi +++| KIP2.1 BX4 X4-X4
04228 M00S04069.msi +++| SX1 KDCW
04229 M00S04070.msi +++| RJ PGD PAGE DISPLAY
04230 M00S04071.msi +++| ZR X4,PKI1 IF PAGING OCCURRED
04231 M00S04072.msi +++| MOVE 4,BLK,KBDS1+1
04232 M00S04073.msi +++| MOVE 4,BLK,KBDS2+1
04233 M00S04074.msi +++| SA1 I
04234 M00S04075.msi +++| BX0 X1
04235 M00S04076.msi +++| LX0 18
04236 M00S04077.msi +++| SA3 FADD FLAW KEYBOARD INPUT ADDRESS
04237 M00S04078.msi +++| SA5 FLFG
04238 M00S04079.msi +++| NZ X5,KIP3 IF FLAW PROCESSING
04239 M00S04080.msi +++| SA5 PAGA
04240 M00S04081.msi +++| LX5 30
04241 M00S04082.msi +++| SB2 X5
04242 M00S04083.msi +++| NE B2,B1,KIP3 IF CURRENT LEFT SCREEN INDEX IS 2
04243 M00S04084.msi +++| SA3 IADD
04244 M00S04085.msi +++| KIP3 SX5 X0-3RGO.
04245 M00S04086.msi +++| NZ X5,KIP3.1 IF NOT *GO*
04246 M00S04087.msi +++| SA1 BLK
04247 M00S04088.msi +++| KIP3.1 MOVE 4,I,X3
04248 M00S04089.msi +++| ZR X5,PKIX IF *GO* ENTERED
04249 M00S04090.msi +++| SA1 CLRM
04250 M00S04091.msi +++| LX0 -18
04251 M00S04092.msi +++| BX2 X1-X0
04252 M00S04093.msi +++| SA1 RERN
04253 M00S04094.msi +++| AX2 30
04254 M00S04095.msi +++| SX7 B1
04255 M00S04096.msi +++| ZR X2,KIP4 IF *CLEAR*
04256 M00S04097.msi +++| BX2 X1-X0
04257 M00S04098.msi +++| AX2 30
04258 M00S04099.msi +++| ZR X2,RERUN IF *RERUN*
04259 M00S04100.msi +++| SA5 CARD PROCESS COMMAND
04260 M00S04101.msi +++| SB7 PAR-1
04261 M00S04102.msi +++| RJ UPC UNPACK COMMAND
04262 M00S04103.msi +++| SB6 B6-B1 SKIP FIRST ARGUMENT
04263 M00S04104.msi +++| EQ PKI2 GO PROCESS ENTRY
04264 M00S04105.msi +++|
04265 M00S04106.msi +++| KIP4 SA7 CLF
04266 M00S04107.msi +++| EQ CLEAR ENTER CLEAR ROUTINE
04267 M00S04108.msi +++|
04268 M00S04109.msi +++| CARD DATA H*MSI,* COMMAND IMAGE
04269 M00S04110.msi +++| I BSSZ 8 KEYBOARD INPUT BUFFER
04270 M00S04111.msi +++| KDCW VFD 24/I,18/R,18/O K DISPLAY CONTROL WORD
04271 M00S04112.msi +++| FADD VFD 42/0,18/KBDS2+1 DISPLAY ADDRESS FOR FLAWING
04272 M00S04113.msi +++| IADD VFD 42/0,18/KBDS1+1 DISPLAY ADDRESS FOR INITIALIZING
04273 M00S04114.msi +++| BLK DIS 4,
04274 M00S04115.msi +++| CLRM DATA 5LCLEAR
04275 M00S04116.msi +++| RERN DATA 5LRERUN
04276 M00S04117.msi +++| SPACE 4,10
04277 M00S04118.msi +++|
04278 M00S04119.msi +++|* INITIALIZE PAGE TABLE.
04279 M00S04120.msi +++|
04280 M00S04121.msi +++| PAGA PAGT O,MSDS1,KBDS1 LEFT SCREEN PAGE 1
04281 M00S04122.msi +++| PAGT L,MSDS2,KBDS2 LEFT SCREEN PAGE 2
04282 M00S04123.msi +++| PAGT
04283 M00S04124.msi +++| PAGT R RIGHT SCREEN
04284 M00S04125.msi +++| PAGT *
04285 M00S04126.msi +++|
04286 M00S04127.msi +++|* FLAW PAGE TABLE.
04287 M00S04128.msi +++|
04288 M00S04129.msi +++| PAGB PAGT L,MSDS2,KBDS2 LEFT SCREEN
04289 M00S04130.msi +++| PAGT
04290 M00S04131.msi +++| PAGT R RIGHT SCREEN
04291 M00S04132.msi +++| PAGT *
04292 M00S04133.msi +++|
04293 M00S04134.msi +++| PGD HERE REMOTE BLOCK FROM *COMCDCP*
04294 M00S04135.msi +++| CDS SPACE 4,10
04295 M00S04136.msi +++|** CDC - CLEAR K-DISPLAY ENTRIES.
04296 M00S04137.msi +++|*
04297 M00S04138.msi +++|* USES X - 0, 1, 6, 7.
04298 M00S04139.msi +++|* A - 1, 6, 7.
04299 M00S04140.msi +++|* B - 2, 3.
04300 M00S04141.msi +++|
04301 M00S04142.msi +++|
04302 M00S04143.msi +++| CDS SUBR ENTRY/EXIT
04303 M00S04144.msi +++| SX7 LTDS+1 RESTORE *DAST*
04304 M00S04145.msi +++| SA7 DAST
04305 M00S04146.msi +++| SX7 LTDS+3 RESTORE *DASM*
04306 M00S04147.msi +++| SA7 DASM
04307 M00S04148.msi +++| SA1 BLK
04308 M00S04149.msi +++| SX7 1R0-1R
04309 M00S04150.msi +++| SB2 20B
04310 M00S04151.msi +++| LX7 -6
04311 M00S04152.msi +++| IX7 X1+X7
04312 M00S04153.msi +++| BX6 X1
04313 M00S04154.msi +++| SA1 DATB
04314 M00S04155.msi +++| CDS1 SA7 X1 CLEAR DISPLAY AREA
04315 M00S04156.msi +++| SA1 A1+B1
04316 M00S04157.msi +++| SB3 A1-DAST
04317 M00S04158.msi +++| NZ B3,CDS1 IF NOT END OF OPTIONS
04318 M00S04159.msi +++| SB3 X1 SAVE ADDRESS OF FLAW DISPLAY
04319 M00S04160.msi +++| BX7 X6
04320 M00S04161.msi +++| CDS2 SA6 B3
04321 M00S04162.msi +++| SA7 A6+B1
04322 M00S04163.msi +++| SB2 B2-B1
04323 M00S04164.msi +++| SB3 B3+6
04324 M00S04165.msi +++| NZ B2,CDS2 IF NOT END OF FLAW DISPLAY
04325 M00S04166.msi +++| SB2 20B
04326 M00S04167.msi +++| SB3 LTDS+1 BLANK OUT LEFT SCREEN
04327 M00S04168.msi +++| CDS3 SA6 B3
04328 M00S04169.msi +++| SA7 A6+B1
04329 M00S04170.msi +++| SA7 A7+B1
04330 M00S04171.msi +++| SA7 A7+B1
04331 M00S04172.msi +++| SB2 B2-B1
04332 M00S04173.msi +++| SB3 B3+6 INCREMENT TO NEXT LINE
04333 M00S04174.msi +++| NZ B2,CDS3 IF NOT LAST LINE
04334 M00S04175.msi +++| EQ CDSX RETURN
04335 M00S04176.msi +++| TITLE K-DISPLAY LINE NUMBERS.
04336 M00S04177.msi +++| SPACE 4
04337 M00S04178.msi +++| SPACE 4,10
04338 M00S04179.msi +++|* K-DISPLAY FOR THE LEFT SCREEN WHEN INITIALIZING DEVICES.
04339 M00S04180.msi +++|* THERE IS NO RIGHT SCREEN.
04340 M00S04181.msi +++|
04341 M00S04182.msi +++|
04342 M00S04183.msi +++|* EST ORDINALS THAT ARE SITE DEPENDENT.
04343 M00S04184.msi +++|
04344 M00S04185.msi +++| LVAL OCTMIC NOPE EST ORDINAL MINIMUM VALUE
04345 M00S04186.msi +++| UVAL OCTMIC ESMX-1 EST ORDINAL MAXIMUM VALUE
04346 M00S04187.msi +++| FVAL DECMIC PNFE FLAW ENTRIES MAXIMUM VALUE
04347 M00S04188.msi +++|
04348 M00S04189.msi +++| O VFD 18/0,18/KDTB,24/0 DISPLAY CONTROL WORD
04349 M00S04190.msi +++| KDL 1,T,(MASS STORAGE DEVICE INITIALIZATION )
04350 M00S04191.msi +++| KDL 54,T,(PAGE 1 OF 2)
04351 M00S04192.msi +++| KDL 1,K,(INITIALIZE EQUIPMENT)
04352 M00S04193.msi +++| OPDS KDL 1,K,( )
04353 M00S04194.msi +++| INDSA KDL 1,K,( )
04354 M00S04195.msi +++| TPDS KDL 1,H,(INITIALIZE REQUEST )
04355 M00S04196.msi +++| KDL 1,H,( OPTION DESCRIPTION)
04356 M00S04197.msi +++| EQDS KDL 1,K,( EQ = 0 EST ORDINAL OF DEVICE ("LVAL"-"UVAL")
04357 M00S04198.msi +++|,.)
04358 M00S04199.msi +++| FNDS KDL 1,K,( FM = 0 FAMILY NAME OR PACK NAME IF TY=X (1-7
04359 M00S04200.msi +++|, CHAR).)
04360 M00S04201.msi +++| DNDS KDL 1,K,( DN = 0 DEVICE NUMBER (1-77).)
04361 M00S04202.msi +++| UNDS KDL 1,K,( UN = 0 PRIVATE AUXILIARY DEVICE USER NAME (1
04362 M00S04203.msi +++|,-7 CHAR).)
04363 M00S04204.msi +++| TYDS KDL 1,K,( TY = 0 ACCESS TYPE (F OR X).)
04364 M00S04205.msi +++| LADS KDL 1,K,( LA = 0 LOWER ACCESS LEVEL (1-7 CHAR).)
04365 M00S04206.msi +++| UADS KDL 1,K,( UA = 0 UPPER ACCESS LEVEL (1-7 CHAR).)
04366 M00S04207.msi +++| DMDS KDL 1,K,( DM = 0 DEVICE MASK (0-377).)
04367 M00S04208.msi +++| SMDS KDL 1,K,( SM = 0 SECONDARY MASK (0-377).)
04368 M00S04209.msi +++| NCDS KDL 1,K,( NC = 0 CATALOG TRACKS (0-200).)
04369 M00S04210.msi +++| NPDS KDL 1,K,( NP = 0 NUMBER OF PACKS (1-7).)
04370 M00S04211.msi +++| MSDS1 KDL 1,M,( )
04371 M00S04212.msi +++| KBDS1 KDL 1,I,( )
04372 M00S04213.msi +++| CON 0 END OF DISPLAY
04373 M00S04214.msi +++| SPACE 4,10
04374 M00S04215.msi +++|* K-DISPLAY FOR THE LEFT SCREEN WHEN FLAWING DEVICES.
04375 M00S04216.msi +++|* THERE IS A RIGHT SCREEN.
04376 M00S04217.msi +++|
04377 M00S04218.msi +++|
04378 M00S04219.msi +++| L VFD 18/0,18/KDTB,24/0 DISPLAY CONTROL WORD
04379 M00S04220.msi +++| LNDS KDL 1,T,(CURRENT FLAW ENTRIES )
04380 M00S04221.msi +++| KDL 54,T,(PAGE 2 OF 2)
04381 M00S04222.msi +++| INDS KDL 1,K,( EQ = 0 EST ORDINAL OF DEVICE. )
04382 M00S04223.msi +++| KDL 1,H,( NUM VALUES ENTERED TRT OCTAL VALUES * = DUPLICAT
04383 M00S04224.msi +++|,E)
04384 M00S04225.msi +++| LTDS KDL 1,K,( 1 )
04385 M00S04226.msi +++| KDL 1,K,( 2 )
04386 M00S04227.msi +++| KDL 1,K,( 3 )
04387 M00S04228.msi +++| KDL 1,K,( 4 )
04388 M00S04229.msi +++| KDL 1,K,( 5 )
04389 M00S04230.msi +++| KDL 1,K,( 6 )
04390 M00S04231.msi +++| KDL 1,K,( 7 )
04391 M00S04232.msi +++| KDL 1,K,( 8 )
04392 M00S04233.msi +++| KDL 1,K,( 9 )
04393 M00S04234.msi +++| KDL 1,K,( 10 )
04394 M00S04235.msi +++| KDL 1,K,( 11 )
04395 M00S04236.msi +++| KDL 1,K,( 12 )
04396 M00S04237.msi +++| KDL 1,K,( 13 )
04397 M00S04238.msi +++| KDL 1,K,( 14 )
04398 M00S04239.msi +++| KDL 1,K,( )
04399 M00S04240.msi +++| MSDS2 KDL 1,M,( )
04400 M00S04241.msi +++| KBDS2 KDL 1,I,( )
04401 M00S04242.msi +++| CON 0 END OF DISPLAY
04402 M00S04243.msi +++| SPACE 4,10
04403 M00S04244.msi +++|* K-DISPLAY FOR THE RIGHT SCREEN WHEN FLAWING DEVICES.
04404 M00S04245.msi +++|* THERE IS A LEFT SCREEN.
04405 M00S04246.msi +++|
04406 M00S04247.msi +++|
04407 M00S04248.msi +++| R VFD 18/0,18/KDTB,24/0 DISPLAY CONTROL WORD
04408 M00S04249.msi +++| KDL 1,T,(MASS STORAGE DEVICE FLAWING)
04409 M00S04250.msi +++| KDL 1,H,(SLF, CLF, SPF AND CPF ENTRIES)
04410 M00S04251.msi +++| RTDS KDL 1,K,( )
04411 M00S04252.msi +++| KDL 1,K,( SLF = NNNN SET LOGICAL TRACK FLAW.)
04412 M00S04253.msi +++| KDL 1,K,( CLF = NNNN CLEAR LOGICAL TRACK FLAW.)
04413 M00S04254.msi +++| KDL 1,K,( SPF = XX SET PHYSICAL TRACK FLAW.)
04414 M00S04255.msi +++| KDL 1,H,( CPF = XX CLEAR PHYSICAL TRACK FLAW.)
04415 M00S04256.msi +++| KDL 1,K,( WHERE)
04416 M00S04257.msi +++| KDL 1,K,( NNNN = VALID LOGICAL TRACK NUMBER.)
04417 M00S04258.msi +++| KDL 1,K,( XX = C000,T00,S00 (CYLINDER,TRACK,SECTOR.)
04418 M00S04259.msi +++| KDL 1,H,( = A0000000 (ADDR/10B, FOR DE/DP ONLY.))
04419 M00S04260.msi +++| KDL 1,K,( NUMERIC VALUES ARE CONSIDERED OCTAL UNLESS THE)
04420 M00S04261.msi +++| KDL 1,K,( DIGITS 8 OR 9 APPEAR IN THE NUMBER, OR A *D* IS)
04421 M00S04262.msi +++| KDL 1,H,( APPENDED TO THE NUMBER.)
04422 M00S04263.msi +++| KDL 1,K,(SEE LEFT SCREEN FOR CURRENT ENTRIES,)
04423 M00S04264.msi +++| KDL 1,H,(UP TO "FVAL" ENTRIES ALLOWED.)
04424 M00S04265.msi +++| CON 0 END OF DISPLAY
04425 M00S04266.msi +++|
04426 M00S04267.msi +++|* Y - COORDINATE TABLE.
04427 M00S04268.msi +++|
04428 M00S04269.msi +++| KYCT KDL *
04429 M00S04270.msi +++| PRK HERE ASSEMBLE REMOTE BLOCK FROM COMCDCP HERE
04430 M00S04271.msi +++| KDTA DATA C*FLAW.* K-DISPLAY TITLE
04431 M00S04272.msi +++| KDTB DATA C*INITIALIZE.* K-DISPLAY TITLE
04432 M00S04273.msi +++| TITLE BUFFERS AND FLAGS
04433 M00S04274.msi +++| SPACE 4
04434 M00S04275.msi +++|** TABLES AND BUFFERS.
04435 M00S04276.msi +++|
04436 M00S04277.msi +++|
04437 M00S04278.msi +++| USE BUFFERS
04438 M00S04279.msi +++| UTL= BSS 0 SYSTEM UTILITY SPECIAL ENTRY POINT
04439 M00S04280.msi +++| SSJ= BSSZ SSJL
04440 M00S04281.msi +++| ESTB EQU * EST TABLE
04441 M00S04282.msi +++| ESTF EQU ESTB+ESMX*ESTE EST MST LINK TABLE
04442 M00S04283.msi +++| PKL EQU ESTF+ESMX PACK LINK TABLE
04443 M00S04284.msi +++| BUF EQU PKL+PKLL MST BUFFER
04444 M00S04285.msi +++| CATB EQU BUF+ESMX*MSTL BUFFER FOR CATALOG READS
04445 M00S04286.msi +++| SCRB EQU CATB+CATBL SCRATCH BUFFER
04446 M00S04287.msi +++| RFL= EQU SCRB+SCRBL
04447 M00S04288.msi +++| SPACE 4
04448 M00S04289.msi +++| END