Seq # *Modification Id* Act
----------------------------+
05116 M01S02979.286l859 ---| SA2 CATH+FCBS
Line S02980 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05117 M02S02980.286l859 ---| BX6 X1 SET IAF MESSAGE ADDRESS
Line S00236 Modification History
M01 (Added by) ns22000
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05118 M02S00236.286l859 ---| BX6 X1 SET IAPF MESSAGE ADDRESS
Line S02981 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05119 M01S02981.286l859 ---| LX2 59-11
05120 M01S02982.286l859 ---| SA6 IDMA
05121 M01S02983.286l859 ---| PL X2,IDM1 IF INDIRECT ACCESS FILE
Line S02984 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05122 M02S02984.286l859 ---| SA2 CATH+FCEO GET RESIDENCY DEVICE
Line S00237 Modification History
M01 (Added by) ns22000
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05123 M02S00237.286l859 ---| SA2 CATH+FCDN GET RESIDENCY DEVICE
Line S02985 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05124 M02S02985.286l859 ---| LX6 -18 SET DAF MESSAGE ADDRESS
Line S00238 Modification History
M01 (Added by) ns22000
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05125 M02S00238.286l859 ---| LX6 -18 SET DAPF MESSAGE ADDRESS
Line S02986 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05126 M01S02986.286l859 ---| MX7 -6
05127 M01S02987.286l859 ---| LX2 -36
05128 M01S02988.286l859 ---| BX1 -X7*X2
05129 M01S02989.286l859 ---| SA6 A6
05130 M01S02990.286l859 ---| ZR X1,IDM1 IF FILE RESIDENT ON MASTER DEVICE
05131 M01S02991.286l859 ---| BX7 -X7*X2 SET RESIDENCY DEVICE
05132 M01S02992.286l859 ---| SX0 CATH SET CATALOG ADDRESS
05133 M01S02993.286l859 ---| SA7 A7+
05134 M01S02994.286l859 ---| RJ CDS SET RESIDENCY EQUIPMENT
05135 M01S02995.286l859 ---| SA7 MPEQ
05136 M01S02996.286l859 ---|
05137 M01S02997.286l859 ---|* SET FILE POSITION PARAMETERS.
05138 M01S02998.286l859 ---|
05139 M01S02999.286l859 ---| IDM1 SA1 DBUFH SET BAD SECTOR NUMBER
05140 M01S03000.286l859 ---| MX2 -12
05141 M01S03001.286l859 ---| LX1 -24
05142 M01S03002.286l859 ---| BX6 -X2*X1
05143 M01S03003.286l859 ---| LX1 -12 SET BAD TRACK NUMBER
05144 M01S03004.286l859 ---| BX7 -X2*X1
05145 M01S03005.286l859 ---| SA6 MPSC
05146 M01S03006.286l859 ---| SA7 MPTK
05147 M01S03007.286l859 ---|
05148 M01S03008.286l859 ---|* ISSUE MESSAGES.
05149 M01S03009.286l859 ---|
05150 M01S03010.286l859 ---| SA1 MPPN
05151 M01S03011.286l859 ---| SB6 MSPN
05152 M01S03012.286l859 ---| NZ X1,IDM2 IF PACK NAME SPECIFIED
05153 M01S03013.286l859 ---| SB6 MSFM
05154 M01S03014.286l859 ---| IDM2 SA1 IDMA BUILD MESSAGE WITH DEVICE DESCRIPTION
05155 M01S03015.286l859 ---| EDITS B6,X1
05156 M01S03016.286l859 ---| SX6 B1+ SET ERRLOG FLAG
05157 M01S03017.286l859 ---| SA6 ELFG
05158 M01S03018.286l859 ---| RJ SEM SEND ERROR MESSAGE
05159 M01S03019.286l859 ---| SA1 IDMA BUILD MESSAGE WITH FILE DESCRIPTION
05160 M01S03020.286l859 ---| EDITS MSPR,X1
05161 M01S03021.286l859 ---| RJ SEM SEND ERROR MESSAGE
05162 M01S03022.286l859 ---| EQ IDMX RETURN
Line S03023 Modification History
M01 (Removed by) pfdum12
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05163 M02S03023.286l859 ---|* MACROS EDITS.
Line S03024 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05164 M01S03024.286l859 ---|
05165 M01S03025.286l859 ---| IDMA BSS 1 MESSAGE ADDRESS SAVE AREA
Line S03026 Modification History
M01 (Removed by) pfdum12
Seq # *Modification Id* Act
----------------------------+
05166 M01S03026.pfdum12 ---| PAE SPACE 4,55
Line S03027 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05167 M01S03027.286l859 ---| IRS SPACE 4,20
Line S01044 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
05168 M01S01044.286l859 +++| IFM SPACE 4,10
05169 M01S01045.286l859 +++|** IFM - ISSUE FILE COUNT MESSAGES.
05170 M01S01046.286l859 +++|*
05171 M01S01047.286l859 +++|* EXIT FILES PROCESSED COUNTS ISSUED TO DAYFILE.
05172 M01S01048.286l859 +++|*
05173 M01S01049.286l859 +++|* USES X = 1, 2, 5, 6.
05174 M01S01050.286l859 +++|* A = 1, 2, 5, 6.
05175 M01S01051.286l859 +++|*
05176 M01S01052.286l859 +++|* CALLS IFC.
05177 M01S01053.286l859 +++|
05178 M01S01054.286l859 +++|
05179 M01S01055.286l859 +++| IFM SUBR ENTRY/EXIT
05180 M01S01056.286l859 +++| SA1 CPAR+/COMSPFS/CPIP
05181 M01S01057.286l859 +++| SA5 IFMD
05182 M01S01058.286l859 +++| NZ X1,IFM2 IF PROCESSING INHIBITED
05183 M01S01059.286l859 +++| SA5 IFMA
05184 M01S01060.286l859 +++| RJ IFC ISSUE FILE COUNT MESSAGES
05185 M01S01061.286l859 +++| SA1 CPAR+/COMSPFS/CPOP
05186 M01S01062.286l859 +++| SA2 CPAR+/COMSPFS/CPDT
05187 M01S01063.286l859 +++| SA5 IFMB
05188 M01S01064.286l859 +++| LX1 59-53
05189 M01S01065.286l859 +++| NG X1,IFM1 IF PURGE OPTION SPECIFIED
05190 M01S01066.286l859 +++| SA5 IFMC
05191 M01S01067.286l859 +++| ZR X2,IFMX IF NOT DESTAGE DUMP
05192 M01S01068.286l859 +++| IFM1 SA1 PRFC
05193 M01S01069.286l859 +++| SA2 PPFC
05194 M01S01070.286l859 +++| IX6 X1-X2
05195 M01S01071.286l859 +++| SA6 NPFC SET FILES NOT POST PROCESSED
05196 M01S01072.286l859 +++| IFM2 RJ IFC ISSUE FILE COUNT MESSAGES
05197 M01S01073.286l859 +++| EQ IFMX RETURN
05198 M01S01074.286l859 +++|
05199 M01S01075.286l859 +++|
05200 M01S01076.286l859 +++| IFMA BSS 0 NORMAL PROCESSING MESSAGE TABLE
05201 M01S01077.286l859 +++| VFD 1/1,1/0,22/0,18/DUMS,18/PRFC
05202 M01S01078.286l859 +++| VFD 1/1,1/0,22/0,18/POMS,18/POFC
05203 M01S01079.286l859 +++| VFD 1/0,1/0,22/0,18/STMS,18/STFC
05204 M01S01080.286l859 +++| VFD 1/1,1/0,22/0,18/SEMS,18/SEFC
05205 M01S01081.286l859 +++| VFD 1/1,1/0,22/0,18/DEMS,18/PEFC
05206 M01S01082.286l859 +++| CON 0 END OF TABLE
05207 M01S01083.286l859 +++|
05208 M01S01084.286l859 +++| IFMB BSS 0 DUMP WITH PURGE MESSAGE TABLE
05209 M01S01085.286l859 +++| VFD 1/1,1/0,22/0,18/PGMS,18/PPFC
05210 M01S01086.286l859 +++| VFD 1/0,1/0,22/0,18/NPMS,18/NPFC
05211 M01S01087.286l859 +++| CON 0 END OF TABLE
05212 M01S01088.286l859 +++|
05213 M01S01089.286l859 +++| IFMC BSS 0 DESTAGE DUMP MESSAGE TABLE
05214 M01S01090.286l859 +++| VFD 1/1,1/0,22/0,18/DSMS,18/PPFC
05215 M01S01091.286l859 +++| VFD 1/0,1/0,22/0,18/NDMS,18/NPFC
05216 M01S01092.286l859 +++| CON 0 END OF TABLE
05217 M01S01093.286l859 +++|
05218 M01S01094.286l859 +++| IFMD BSS 0 INHIBITED PROCESSING MESSAGE TABLE
05219 M01S01095.286l859 +++| VFD 1/1,1/0,22/0,18/SDMS,18/PRFC
05220 M01S01096.286l859 +++| VFD 1/1,1/0,22/0,18/SPMS,18/POFC
05221 M01S01097.286l859 +++| CON 0 END OF TABLE
05222 M01S01098.286l859 +++| IRF SPACE 4,10
05223 M01S01099.286l859 +++|** IRF - INITILIZE RESCAN FILES.
05224 M01S01100.286l859 +++|*
05225 M01S01101.286l859 +++|* EXIT *REQS* FILE FLUSHED, REWOUND, AND RENAMED TO *RESS*.
05226 M01S01102.286l859 +++|* OLD *RESS* FILE RETURNED.
05227 M01S01103.286l859 +++|*
05228 M01S01104.286l859 +++|* USES X - 0, 1, 2, 6.
05229 M01S01105.286l859 +++|* A - 1, 2, 6.
05230 M01S01106.286l859 +++|*
05231 M01S01107.286l859 +++|* MACROS READ, RECALL, RENAME, REWIND, WRITEF.
05232 M01S01108.286l859 +++|
05233 M01S01109.286l859 +++|
05234 M01S01110.286l859 +++| IRF SUBR ENTRY/EXIT
05235 M01S01111.286l859 +++| WRITEF REQS,R FLUSH REQUEST FILE BUFFER
05236 M01S01112.286l859 +++| RENAME REQS,RESS CREATE SCREEN FILE FROM REQUEST FILE
05237 M01S01113.286l859 +++| REWIND RESS
05238 M01S01114.286l859 +++| RECALL REQS
05239 M01S01115.286l859 +++| SA1 IRFA RESTORE LFN IN *REQS* FET
05240 M01S01116.286l859 +++| SA2 REQS
05241 M01S01117.286l859 +++| MX0 -18
05242 M01S01118.286l859 +++| BX6 -X0*X2
05243 M01S01119.286l859 +++| BX6 X1+X6
05244 M01S01120.286l859 +++| SA6 A2
05245 M01S01121.286l859 +++| READ RESS
05246 M01S01122.286l859 +++| EQ IRFX RETURN
05247 M01S01123.286l859 +++|
05248 M01S01124.286l859 +++|
05249 M01S01125.286l859 +++| IRFA CON 0LZZZZZG5 ORIGINAL *REQS* FILE NAME
05250 M01S01126.286l859 +++| IRS SPACE 4,15
05251 M00S03028.pfdump +++|** IRS - INITIALIZE RESCAN FOR STAGED FILES.
05252 M00S03029.pfdump +++|*
05253 M00S03030.pfdump +++|* ENTRY CATALOG TRACK INTERLOCK SET.
05254 M00S03031.pfdump +++|*
Line S03032 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05255 M01S03032.286l859 ---|* EXIT (SCAN) = 1 -- RESCAN MODE.
05256 M01S03033.286l859 ---|* (NFSR) = NUMBER FILE STAGINGS REQUESTED CLEARED.
05257 M01S03034.286l859 ---|* (NNAR) = NUMBER *NOT ACTIVE* RESPONSES CLEARED.
Line S03035 Modification History
M01 (Removed by) 253l688
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05258 M02S03035.286l859 ---|* (RESW - RESW+3) = FIRST RESCAN FILE SCREEN ENTRY.
Line S00312 Modification History
M01 (Added by) 253l688
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05259 M02S00312.286l859 ---|* (RSTS)= CATALOG TRACK AND SECTOR TO START RESCAN.
Line S03036 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05260 M01S03036.286l859 ---|* ABORTS DUMP, IF RESCAN SCREEN FILE HAS READ ERROR
05261 M01S03037.286l859 ---|* OR PREMATURE END OF FILE.
05262 M01S03038.286l859 ---|* CATALOG TRACK INTERLOCK CLEARED DURING EXECUTION
05263 M01S03039.286l859 ---|* OF THIS ROUTINE IS RESET UPON EXIT.
Line S01127 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
05264 M01S01127.286l859 +++|* EXIT (X6) = 1 IF TO RESCAN CATALOG TRACK.
05265 M01S01128.286l859 +++|* (X7) = INITIAL CATALOG TRACK INDEX IF TO RESCAN TRACK.
05266 M01S01129.286l859 +++|* CATALOG TRACK INTERLOCK SET.
05267 M00S03040.pfdump +++|*
Line S03041 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05268 M01S03041.286l859 ---|* USES X - 1, 5, 6, 7.
05269 M01S03042.286l859 ---|* A - 5, 6, 7.
05270 M01S03043.286l859 ---|* B - 2.
Line S01130 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
05271 M01S01130.286l859 +++|* USES X - 1, 2, 3, 5, 6, 7.
05272 M01S01131.286l859 +++|* A - 1, 2, 3, 6.
05273 M01S01132.286l859 +++|* B - 2.
05274 M00S03044.pfdump +++|*
Line S03045 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05275 M01S03045.286l859 ---|* CALLS DLY, OPN.
Line S01133 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
05276 M01S01133.286l859 +++|* CALLS CFE, IRF, SRS.
05277 M00S03046.pfdump +++|*
Line S03047 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05278 M01S03047.286l859 ---|* MACROS MESSAGE, MOVE, PCINT, READW.
Line S01134 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
05279 M01S01134.286l859 +++|* MACROS CALLPFU, MESSAGE, MOVE, PCINT, RECALL, READW.
05280 M00S03048.pfdump +++|
05281 M00S03049.pfdump +++|
05282 M00S03050.pfdump +++| IRS SUBR ENTRY/EXIT
Line S01135 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
05283 M01S01135.286l859 +++|
05284 M01S01136.286l859 +++|* CLEAR CATALOG TRACK INTERLOCK AND ISSUE STATUS MESSAGE.
05285 M01S01137.286l859 +++|
05286 M00S03051.pfdump +++| PCINT CATS,CTCC CLEAR CATALOG TRACK INTERLOCK
Line S03052 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05287 M01S03052.286l859 ---| SA1 SCAN
05288 M01S03053.286l859 ---| NZ X1,IRS1 IF ALREADY IN RESCAN MODE
Line S03054 Modification History
M01 (Removed by) v23l617
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05289 M02S03054.286l859 ---| MESSAGE MSGS DISPLAY *WAIT FOR MSS FILE STAGINGS*
Line S00164 Modification History
M01 (Added by) v23l617
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05290 M02S00164.286l859 ---| MESSAGE MSGS *WAIT FOR FILE STAGING*
Line S03055 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05291 M01S03055.286l859 ---| IRS1 SA5 IDSA+/COMSPFS/ADM1
05292 M01S03056.286l859 ---| MOVE 4,MSGS,X5
Line S01138 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
05293 M01S01138.286l859 +++| RJ IRF INITIALIZE RESCAN FILES
05294 M01S01139.286l859 +++| MESSAGE MSGS,1 *WAITING FOR STAGED FILES*
05295 M01S01140.286l859 +++| SA3 IDSA+/COMSPFS/ADMS
05296 M01S01141.286l859 +++| MOVE 3,MSGS,X3 SET STATUS MESSAGE IN *K* DISPLAY
05297 M01S01142.286l859 +++| SX6 RESC
05298 M01S01143.286l859 +++| RJ SRS SELECT RIGHT SCREEN
05299 M00S03057.pfdump +++|
Line S03058 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05300 M01S03058.286l859 ---|* INITIALIZE RESCAN FOR STAGED FILES.
Line S01144 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
05301 M01S01144.286l859 +++|* DELAY FOR FILE STAGING.
05302 M00S03059.pfdump +++|
Line S03060 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05303 M01S03060.286l859 ---| BX6 X6-X6
05304 M01S03061.286l859 ---| SA6 NFSR CLEAR NUMBER FILE STAGINGS REQUESTED
05305 M01S03062.286l859 ---| SA6 NNAR CLEAR NUMBER *NOT ACTIVE* RESPONSES
05306 M01S03063.286l859 ---| SX7 B1
05307 M01S03064.286l859 ---| SA7 SCAN SET RESCAN MODE
05308 M01S03065.286l859 ---| RJ OPN INITIALIZE DUMP SYSTEM FILES
Line S03066 Modification History
M01 (Removed by) 253l688
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05309 M02S03066.286l859 ---| READW RESS,RESW,RSEL INITIALIZE RESCAN SELECTION SCREEN
Line S00313 Modification History
M01 (Added by) 253l688
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05310 M02S00313.286l859 ---| READW RESS,RESE,2 INITIALIZE RESCAN SELECTION SCREEN
Line S03067 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05311 M01S03067.286l859 ---| ZR X1,IRS2 IF TRANSFER COMPLETE
05312 M01S03068.286l859 ---| SX1 MSGX *PFDUMP - READ ERROR ON RESS - ABORT.*
Line S03069 Modification History
M01 (Removed by) 253l688
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05313 M02S03069.286l859 ---| EQ AEP ABORT
Line S00314 Modification History
M01 (Added by) 253l688
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05314 M02S00314.286l859 ---| EQ ABT ABORT
Line S01145 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
05315 M01S01145.286l859 +++| SX5 DFAC SET NUMBER OF RECALLS TO WAIT
05316 M01S01146.286l859 +++| IRS1 SA1 /COMSPFS/KIN GET K-DISPLAY INPUT
05317 M01S01147.286l859 +++| SA2 IRSA
05318 M01S01148.286l859 +++| SX6 B0
05319 M01S01149.286l859 +++| SA6 A1+ CLEAR INPUT
05320 M01S01150.286l859 +++| BX2 X1-X2
05321 M01S01151.286l859 +++| ZR X2,IRS2 IF *SKIP* ENTERED
05322 M01S01152.286l859 +++| RECALL
05323 M01S01153.286l859 +++| SX5 X5-1
05324 M01S01154.286l859 +++| NZ X5,IRS1 IF MORE DELAY
05325 M00S03070.pfdump +++|
Line S03071 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05326 M01S03071.286l859 ---|* DELAY RESCAN TO ALLOW TIME FOR STAGED FILE RELINKAGE.
Line S01155 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
05327 M01S01155.286l859 +++|* INITIALIZE RESCAN OF CATALOG TRACK.
05328 M00S03072.pfdump +++|
Line S03073 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05329 M01S03073.286l859 ---| IRS2 SB2 DFAC INITIALIZE DELAY LOOP CONTROLS
05330 M01S03074.286l859 ---| RJ DLY DELAY
05331 M01S03075.286l859 ---| PCINT CATS,CTSC SET CATALOG TRACK INTERLOCK
Line S01156 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
05332 M01S01156.286l859 +++| READW RESS,RESE,2 READ FIRST RESCAN REQUEST
05333 M01S01157.286l859 +++| RETURN CATS,R RETURN OLD CATALOG FILE
05334 M01S01158.286l859 +++| SA1 RSTS
05335 M01S01159.286l859 +++| SA2 CATS+FTPM
05336 M01S01160.286l859 +++| MX6 24
05337 M01S01161.286l859 +++| SX7 5
05338 M01S01162.286l859 +++| LX1 12
05339 M01S01163.286l859 +++| BX6 X6*X2 PRESERVE EST ORDINAL AND FIRST TRACK
05340 M01S01164.286l859 +++| BX1 X1+X7 MERGE CURRENT TRACK/SECTOR AND STATUS
05341 M01S01165.286l859 +++| BX6 X6+X1
05342 M01S01166.286l859 +++| SA6 A2 SET FST PARAMETERS
05343 M01S01167.286l859 +++| CALLPFU CATS,CTOL,R OPEN CATALOG FILE
05344 M01S01168.286l859 +++| SX5 B1 SET TO RESCAN TRACK
05345 M01S01169.286l859 +++| EQ IRS3 RESET TRACK INTERLOCK
05346 M00S03076.pfdump +++|
Line S03077 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05347 M01S03077.286l859 ---|* DISPLAY RESCAN MESSAGES.
Line S01170 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
05348 M01S01170.286l859 +++|* ISSUE MESSAGES FOR SKIPPED FILES.
05349 M00S03078.pfdump +++|
Line S03079 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05350 M01S03079.286l859 ---| SA5 IDSA+/COMSPFS/ADM2 DISPLAY RESCAN MESSAGE
05351 M01S03080.286l859 ---| MOVE 4,MSGT,X5
Line S03081 Modification History
M01 (Removed by) 241l630
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05352 M02S03081.286l859 ---| SA5 IDSA+/COMSPFS/ADE1 DISPLAY *GO* OPTION
05353 M02S03082.286l859 ---| MOVE 4,MSGU,X5
05354 M02S03083.286l859 ---| SA5 IDSA+/COMSPFS/ADE2 DISPLAY *SKIP* OPTION
05355 M02S03084.286l859 ---| MOVE 4,MSGV,X5
Line S00036 Modification History
M01 (Added by) 241l630
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05356 M02S00036.286l859 ---| SX6 RESC
05357 M02S00037.286l859 ---| RJ SRS SELECT RIGHT SCREEN
Line S01171 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
05358 M01S01171.286l859 +++| IRS2 READW RESS,RESE,2 READ STAGE REQUEST ENTRY
05359 M01S01172.286l859 +++| SX5 B0+ SET NO RESCAN
05360 M01S01173.286l859 +++| NZ X1,IRS3 IF END OF REQUESTS
05361 M01S01174.286l859 +++| SA1 RESE+1 SET FILE NAME AND USER INDEX
05362 M01S01175.286l859 +++| SB2 ERRT * STAGED FILE RESCAN TERMINATED ...*
05363 M01S01176.286l859 +++| RJ SFE SEND ERROR MESSAGE
05364 M01S01177.286l859 +++| RJ CFE COUNT FILE SKIPPED
05365 M01S01178.286l859 +++| EQ IRS2 READ NEXT ENTRY
05366 M01S01179.286l859 +++|
05367 M01S01180.286l859 +++|* CLEAR MESSAGE AND RESET CATALOG TRACK INTERLOCK.
05368 M01S01181.286l859 +++|
05369 M01S01182.286l859 +++| IRS3 SA3 IDSA+/COMSPFS/ADER CLEAR HELP MESSAGE
05370 M01S01183.286l859 +++| MOVE 4,MSGW,X3
05371 M01S01184.286l859 +++| PCINT CATS,CTSC RESET CATALOG TRACK INTERLOCK
05372 M01S01185.286l859 +++| SA1 RSIN
05373 M01S01186.286l859 +++| BX6 X5 SET RESCAN STATUS
05374 M01S01187.286l859 +++| BX7 X1 SET CATALOG INDEX FOR RESCAN
05375 M00S03085.pfdump +++| EQ IRSX RETURN
Line S01188 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
05376 M01S01188.286l859 +++|
05377 M01S01189.286l859 +++|
05378 M01S01190.286l859 +++| IRSA CON 0LSKIP *SKIP* KEYBOARD ENTRY
Line S03086 Modification History
M01 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
05379 M01S03086.253l688 ---| MCO SPACE 4,25
05380 M01S03087.253l688 ---|** MCO - MOVE CATALOG TO OUTPUT.
05381 M01S03088.253l688 ---|*
05382 M01S03089.253l688 ---|* ENTRY (B2) = CATALOG ADDRESS.
05383 M01S03090.253l688 ---|* (CONTH) = CONTROL WORD USED IN WRITING THE CATALOG
05384 M01S03091.253l688 ---|* ENTRY (PFC) TO THE ARCHIVE FILE.
05385 M01S03092.253l688 ---|*
05386 M01S03093.253l688 ---|*T CONTH 42/FILE NAME,3/,3/T,3/S,9/WC
Figure
CONTH
0 8 9 11 12 14 15 17 18 29 WC S T FILE NAME 30 59 FILE NAME
05387 M01S03094.253l688 ---|*
05388 M01S03095.253l688 ---|* T = CONTROL WORD TYPE (1).
05389 M01S03096.253l688 ---|* S = CONTROL WORD SUB-TYPE.
05390 M01S03097.253l688 ---|* 0 = *PFC ONLY* ENTRY.
05391 M01S03098.253l688 ---|* 1 = NORMAL ENTRY.
05392 M01S03099.253l688 ---|* WC = ENTRY WORD COUNT.
05393 M01S03100.253l688 ---|*
05394 M01S03101.253l688 ---|* EXIT CATALOG ENTRY WRITTEN TO OUTPUT.
05395 M01S03102.253l688 ---|*
05396 M01S03103.253l688 ---|* USES X - 1, 2, 6.
05397 M01S03104.253l688 ---|* A - 1, 2, 6.
05398 M01S03105.253l688 ---|*
05399 M01S03106.253l688 ---|* CALLS CDD.
05400 M01S03107.253l688 ---|*
Line S03108 Modification History
M01 (Removed by) v23l617
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
05401 M02S03108.253l688 ---|* MACROS EDCAT, WRITEH.
Line S00165 Modification History
M01 (Added by) v23l617
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
05402 M02S00165.253l688 ---|* MACROS EDCAT, MOVE, WRITEH.
Line S03109 Modification History
M01 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
05403 M01S03109.253l688 ---|
05404 M01S03110.253l688 ---|
05405 M01S03111.253l688 ---| MCO SUBR ENTRY/EXIT
05406 M01S03112.253l688 ---| SX6 B2+ SAVE CATALOG ADDRESS
05407 M01S03113.253l688 ---| SA6 MCOA
05408 M01S03114.253l688 ---| SA1 LNAC INCREMENT LINE NUMBER
05409 M01S03115.253l688 ---| SX6 X1+B1
05410 M01S03116.253l688 ---| SA6 A1
05411 M01S03117.253l688 ---| SA1 LNPP INCREMENT LINES / PAGE
Line S03118 Modification History
M01 (Removed by) v23l617
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
05412 M02S03118.253l688 ---| SX6 X1+4
Line S00166 Modification History
M01 (Added by) v23l617
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
05413 M02S00166.253l688 ---| SX6 X1+5
Line S03119 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
05414 M02S03119.253l688 ---| SX2 PGLM
Line S00239 Modification History
M01 (Added by) ns22000
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
05415 M02S00239.253l688 ---| SA2 A1+B1
Line S03120 Modification History
M01 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
05416 M01S03120.253l688 ---| IX2 X2-X6
05417 M01S03121.253l688 ---| PL X2,MCO1 IF NOT END OF PAGE
05418 M01S03122.253l688 ---|
05419 M01S03123.253l688 ---|* WRITE HEADER.
05420 M01S03124.253l688 ---|
05421 M01S03125.253l688 ---| SA1 PAGE
05422 M01S03126.253l688 ---| SX6 X1+B1
05423 M01S03127.253l688 ---| SA6 A1
05424 M01S03128.253l688 ---| RJ CDD
05425 M01S03129.253l688 ---| SA6 HPGE
05426 M01S03130.253l688 ---| WRITEH OUTPUT,HDR1A,7
05427 M01S03131.253l688 ---| WRITEH X2,HDR1B,7
05428 M01S03132.253l688 ---| WRITEH X2,HDR2,1
05429 M01S03133.253l688 ---| WRITEH X2,HDR3,FCELL
05430 M01S03134.253l688 ---| WRITEH X2,HDR4,FCELL
05431 M01S03135.253l688 ---| WRITEH X2,HDR5,FCELL
Line S03136 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
05432 M02S03136.253l688 ---| WRITEH X2,HDR2,1
05433 M02S03137.253l688 ---| SX6 B1
Line S00240 Modification History
M01 (Added by) ns22000
M02 (Removed by) v23l617
M03 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
05434 M03S00240.253l688 ---| SX6 6+4
Line S00167 Modification History
M01 (Added by) v23l617
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
05435 M02S00167.253l688 ---| WRITEH X2,HDR6,FCELB
05436 M02S00168.253l688 ---| SX6 7+5
Line S03138 Modification History
M01 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
05437 M01S03138.253l688 ---|
05438 M01S03139.253l688 ---|* WRITE DETAIL LINE.
05439 M01S03140.253l688 ---|
05440 M01S03141.253l688 ---| MCO1 SA6 LNPP
05441 M01S03142.253l688 ---| SA1 LNAC
05442 M01S03143.253l688 ---| SA2 MCOA
Line S03144 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
05443 M02S03144.253l688 ---| EDCAT X2,OUTL,X1,B1,B1
Line S00241 Modification History
M01 (Added by) ns22000
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
05444 M02S00241.253l688 ---| EDCAT X2,OUTL,X1,1,1,1
Line S03145 Modification History
M01 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
05445 M01S03145.253l688 ---| SA1 CONTH GET CATALOG ENTRY SUB-TYPE
05446 M01S03146.253l688 ---| MX6 3
05447 M01S03147.253l688 ---| LX6 11-59
05448 M01S03148.253l688 ---| BX6 X6*X1
05449 M01S03149.253l688 ---| SA1 =C/* PFC ONLY/
05450 M01S03150.253l688 ---| ZR X6,MCO2 IF *PFC ONLY* ENTRY WAS WRITTEN
05451 M01S03151.253l688 ---| SA1 =C/ /
05452 M01S03152.253l688 ---| MCO2 BX6 X1
05453 M01S03153.253l688 ---| SA6 AMSG
Line S00242 Modification History
M01 (Added by) ns22000
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
05454 M02S00242.253l688 ---| WRITEH OUTPUT,HDR2,1
Line S03154 Modification History
M01 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
05455 M01S03154.253l688 ---| WRITEH OUTPUT,OUTL,FCELL
05456 M01S03155.253l688 ---| WRITEH X2,OUTL+FCELL,FCELL
Line S03156 Modification History
M01 (Removed by) v23l617
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
05457 M02S03156.253l688 ---| WRITEH X2,OUTL+2*FCELL,FCELL+1
Line S00169 Modification History
M01 (Added by) v23l617
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
05458 M02S00169.253l688 ---| MOVE FCELL,OUTL+2*FCELL,COLN
05459 M02S00170.253l688 ---| WRITEH OUTPUT,COLN,FCELL+1
05460 M02S00171.253l688 ---| WRITEH X2,OUTL+3*FCELL,FCELB
Line S03157 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
05461 M02S03157.253l688 ---| WRITEH X2,HDR2,1
Line S03158 Modification History
M01 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
05462 M01S03158.253l688 ---| EQ MCOX RETURN
05463 M01S03159.253l688 ---|
05464 M01S03160.253l688 ---|
05465 M01S03161.253l688 ---| MCOA BSS 1 REGISTER HOLD AREA
05466 M01S03162.253l688 ---|
05467 M01S03163.253l688 ---|
Line S03164 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
05468 M02S03164.253l688 ---| PGLM EQU LINP-11 MAXIMUM NUMBER OF LINES PER PAGE
Line S03165 Modification History
M01 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
05469 M01S03165.253l688 ---| PAGE CON 1
05470 M01S03166.253l688 ---| LNAC CON 0
Line S03167 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
05471 M02S03167.253l688 ---| LNPP CON PGLM
Line S03168 Modification History
M01 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
05472 M01S03168.253l688 ---| HDR1A DATA 50H1 PFDUMP CATALOG OF
05473 M01S03169.253l688 ---| DATA 20H PAGE
05474 M01S03170.253l688 ---| HTYP EQU HDR1A+3
05475 M01S03171.253l688 ---| HPGE EQU HDR1A+6
05476 M01S03172.253l688 ---| HCIR DATA 20HCATALOG IMAGE RECORD
05477 M01S03173.253l688 ---| HTPE DATA 20HFILES DUMPED TO TAPE
05478 M01S03174.253l688 ---| HDR1B DATA 50H ON AT
05479 M01S03175.253l688 ---| HTMR DATA 20H
05480 M01S03176.253l688 ---| HDTR EQU HDR1B+2
05481 M01S03177.253l688 ---| HDR2 DATA 10H
05482 M00S03178.pfdump +++| MMC SPACE 4,10
05483 M00S03179.pfdump +++|** MMC - MOVE MEMORY VIA *CMU* OR REGISTERS.
05484 M00S03180.pfdump +++|*
05485 M00S03181.pfdump +++|* ENTRY (X1) = WORD COUNT OF MOVE.
05486 M00S03182.pfdump +++|* (X3) = ADDRESS TO MOVE FROM.
05487 M00S03183.pfdump +++|* (X6) = ADDRESS TO MOVE TO.
05488 M00S03184.pfdump +++|*
05489 M00S03185.pfdump +++|* USES X - 0, 1, 3, 6.
05490 M00S03186.pfdump +++|* A - 1, 3, 6.
05491 M00S03187.pfdump +++|* B - 5.
05492 M00S03188.pfdump +++|
05493 M00S03189.pfdump +++|
05494 M00S03190.pfdump +++| MMC SUBR ENTRY/EXIT
05495 M00S03191.pfdump +++| LX3 30 BUILD DESCRIPTOR WORD
05496 M00S03192.pfdump +++| BX6 X6+X3
05497 M00S03193.pfdump +++| SA3 MMCB GET ADDRESS INCREMENT
05498 M00S03194.pfdump +++| UX3,B5 X3 EXTRACT CHARACTER COUNT
05499 M00S03195.pfdump +++| PX6 X6,B5 SET CHARACTER COUNT UPPER FIELD
05500 M00S03196.pfdump +++| SB5 X1 SET WORD COUNT
05501 M00S03197.pfdump +++| BX1 X0 SAVE X0
05502 M00S03198.pfdump +++| MMC1 SA6 A3-B1 STORE DESCRIPTOR WORD
05503 M00S03199.pfdump +++| SB5 B5+X3 DECREMENT WORD COUNT
05504 M00S03200.pfdump +++| NG B5,MMC2 IF SHORT BLOCK TO MOVE
05505 M00S03201.pfdump +++| IM MMCA
05506 M00S03202.pfdump +++| IX6 X6-X3 INCREMENT ADDRESSES
05507 M00S03203.pfdump +++| GT B5,B0,MMC1 IF MORE DATA TO TRANSFER
05508 M00S03204.pfdump +++| BX0 X1 RESTORE X0
05509 M00S03205.pfdump +++| EQ MMCX RETURN
05510 M00S03206.pfdump +++|
05511 M00S03207.pfdump +++|* PROCESS BLOCK SHORTER THAN *NWCM* WORDS.
05512 M00S03208.pfdump +++|
05513 M00S03209.pfdump +++| MMC2 SX3 B5+NWCM RESET CHARACTER COUNT IN DESCRIPTOR
05514 M00S03210.pfdump +++| UX6 X6
05515 M00S03211.pfdump +++| LX0 X3,B1 COMPUTE CHARACTERS LEFT TO MOVE
05516 M00S03212.pfdump +++| LX3 3
05517 M00S03213.pfdump +++| IX3 X0+X3
05518 M00S03214.pfdump +++| MX0 4
05519 M00S03215.pfdump +++| LX3 -4
05520 M00S03216.pfdump +++| BX0 X0*X3 EXTRACT LOWER FIELD
05521 M00S03217.pfdump +++| SB5 2000B+X3 SET UPPER FIELD
05522 M00S03218.pfdump +++| LX0 -30
05523 M00S03219.pfdump +++| PX6 X6,B5
05524 M00S03220.pfdump +++| BX6 X6+X0
05525 M00S03221.pfdump +++| SA6 MMCA STORE DESCRIPTOR
05526 M00S03222.pfdump +++| IM MMCA
05527 M00S03223.pfdump +++| BX0 X1 RESTORE X0
05528 M00S03224.pfdump +++| EQ MMCX RETURN
05529 M00S03225.pfdump +++|
05530 M00S03226.pfdump +++| MMCA VFD 12/0 UPPER CHARACTER COUNT OF MOVE
05531 M00S03227.pfdump +++| VFD 18/0 ADDRESS TO MOVE FROM
05532 M00S03228.pfdump +++| VFD 4/0 LOWER CHARACTER COUNT FIELD
05533 M00S03229.pfdump +++| VFD 8/0
05534 M00S03230.pfdump +++| VFD 18/0 ADDRESS TO MOVE TO
05535 M00S03231.pfdump +++|
05536 M00S03232.pfdump +++| MMCB VFD 12/-NWCM*10D/20B,18/-NWCM,30/-NWCM ADDRESS INCREMENT
05537 M00S03233.pfdump +++| ERRNZ MMCB-MMCA-1 CODE DEPENDS ON LOCATION OF CELLS
05538 M00S03234.pfdump +++|
05539 M00S03235.pfdump +++| MMCL EQU *-MMC LENGTH OF CODE TO OVERLAY
05540 M00S03236.pfdump +++|
05541 M00S03237.pfdump +++|* THE FOLLOWING CODE IS USED WHEN NO *CMU* IS PRESENT.
05542 M00S03238.pfdump +++|
05543 M00S03239.pfdump +++| MOVE RMT
05544 M00S03240.pfdump +++| LOC MMC
05545 M00S03241.pfdump +++|
05546 M00S03242.pfdump +++|
05547 M00S03243.pfdump +++| MMC SUBR ENTRY/EXIT
05548 M00S03244.pfdump +++| SA3 X3 READ FIRST WORD TO MOVE
05549 M00S03245.pfdump +++| SB5 X1-10B SET WORD COUNT
05550 M00S03246.pfdump +++| SA1 X6-1 INITIALIZE STORE ADDRESS
05551 M00S03247.pfdump +++| BX6 X1
05552 M00S03248.pfdump +++| SA6 A1
05553 M00S03249.pfdump +++| NG B5,MMC4 IF LESS THAN 10B WORDS TO MOVE
05554 M00S03250.pfdump +++|
05555 M00S03251.pfdump +++|* REGISTER MOVE LOOP.
05556 M00S03252.pfdump +++|
05557 M00S03253.pfdump +++| MMC3 SA1 A3+B1
05558 M00S03254.pfdump +++| BX6 X3
05559 M00S03255.pfdump +++| SA6 A6+B1
05560 M00S03256.pfdump +++| SA3 A1+B1
05561 M00S03257.pfdump +++| BX6 X1
05562 M00S03258.pfdump +++| SA6 A6+B1
05563 M00S03259.pfdump +++| SA1 A3+B1
05564 M00S03260.pfdump +++| BX6 X3
05565 M00S03261.pfdump +++| SA6 A6+B1
05566 M00S03262.pfdump +++| SB5 B5-10B DECREMENT WORD COUNT
05567 M00S03263.pfdump +++| SA3 A1+B1
05568 M00S03264.pfdump +++| BX6 X1
05569 M00S03265.pfdump +++| SA6 A6+B1
05570 M00S03266.pfdump +++| SA1 A3+B1
05571 M00S03267.pfdump +++| BX6 X3
05572 M00S03268.pfdump +++| SA6 A6+B1
05573 M00S03269.pfdump +++| SA3 A1+B1
05574 M00S03270.pfdump +++| BX6 X1
05575 M00S03271.pfdump +++| SA6 A6+B1
05576 M00S03272.pfdump +++| SA1 A3+B1
05577 M00S03273.pfdump +++| BX6 X3
05578 M00S03274.pfdump +++| SA6 A6+B1
05579 M00S03275.pfdump +++| SA3 A1+B1
05580 M00S03276.pfdump +++| BX6 X1
05581 M00S03277.pfdump +++| SA6 A6+B1
05582 M00S03278.pfdump +++| PL B5,MMC3 IF MORE 10 WORD BLOCKS TO MOVE
05583 M00S03279.pfdump +++|
05584 M00S03280.pfdump +++|* MOVE REMAINDER OF DATA.
05585 M00S03281.pfdump +++|
05586 M00S03282.pfdump +++| MMC4 SB5 B5+10B
05587 M00S03283.pfdump +++| ZR B5,MMCX IF NO MORE DATA TO MOVE
05588 M00S03284.pfdump +++| MMC5 BX6 X3
05589 M00S03285.pfdump +++| SA3 A3+B1
05590 M00S03286.pfdump +++| SB5 B5-B1
05591 M00S03287.pfdump +++| SA6 A6+B1
05592 M00S03288.pfdump +++| GT B5,B0,MMC5 IF MORE DATA TO MOVE
05593 M00S03289.pfdump +++| EQ MMCX RETURN
05594 M00S03290.pfdump +++|
05595 M00S03291.pfdump +++| ERRPL *-MMC-MMCL CODE TOO LARGE TO OVERLAY *MMC*
05596 M00S03292.pfdump +++| LOC *O
05597 M00S03293.pfdump +++|
05598 M00S03294.pfdump +++| MOVE RMT
Line S01191 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
05599 M01S01191.286l859 +++| MRE SPACE 4,20
05600 M01S01192.286l859 +++|** MRE - MAKE DATA READ LIST ENTRY.
05601 M01S01193.286l859 +++|*
05602 M01S01194.286l859 +++|* ENTRY (A0) = CATALOG ADDRESS.
05603 M01S01195.286l859 +++|*
05604 M01S01196.286l859 +++|* EXIT (A0) = CATALOG ADDRESS.
05605 M01S01197.286l859 +++|* (X6) = 0 IF DATA LIST FULL.
05606 M01S01198.286l859 +++|* (X6) .NE. 0 IF DATA LIST NOT FULL.
05607 M01S01199.286l859 +++|* DATA READ LIST ENTRY MADE IF NO ERROR.
05608 M01S01200.286l859 +++|* (NDLE) = UPDATED COUNT OF READ LIST ENTRIES.
05609 M01S01201.286l859 +++|*
05610 M01S01202.286l859 +++|* USES X - 0, 1, 2, 3, 5, 6, 7.
05611 M01S01203.286l859 +++|* A - 1, 2, 6, 7.
05612 M01S01204.286l859 +++|* B - 2.
05613 M01S01205.286l859 +++|*
05614 M01S01206.286l859 +++|* CALLS CDS, CFE, SDE.
05615 M01S01207.286l859 +++|*
05616 M01S01208.286l859 +++|* MACROS MOVE.
05617 M01S01209.286l859 +++|
05618 M01S01210.286l859 +++|
05619 M01S01211.286l859 +++| MRE SUBR ENTRY/EXIT
05620 M01S01212.286l859 +++|
05621 M01S01213.286l859 +++|* SET BUFFER INDEX AND TRACK/SECTOR IN ENTRY.
05622 M01S01214.286l859 +++|
05623 M01S01215.286l859 +++| SA1 A0+FCBT
05624 M01S01216.286l859 +++| SA2 NDLE
05625 M01S01217.286l859 +++| MX0 -24
05626 M01S01218.286l859 +++| BX7 -X0*X1 TRACK AND SECTOR
05627 M01S01219.286l859 +++| SB2 X2 NEXT CATALOG INDEX
05628 M01S01220.286l859 +++| LX1 59-11
05629 M01S01221.286l859 +++| PX7 X7,B2 SET CATALOG INDEX AND TRACK/SECTOR
05630 M01S01222.286l859 +++| MX0 24
05631 M01S01223.286l859 +++| PL X1,MRE2 IF INDIRECT ACCESS FILE
05632 M01S01224.286l859 +++|
05633 M01S01225.286l859 +++|* PROCESS DIRECT ACCESS FILE.
05634 M01S01226.286l859 +++|
05635 M01S01227.286l859 +++| SA1 A0+FCDN
05636 M01S01228.286l859 +++| SA2 CPAR+/COMSPFS/CPDN
05637 M01S01229.286l859 +++| MX0 48
05638 M01S01230.286l859 +++| MX6 -6
05639 M01S01231.286l859 +++| LX1 -36
05640 M01S01232.286l859 +++| BX1 -X6*X1 DEVICE NUMBER
05641 M01S01233.286l859 +++| ZR X1,MRE1 IF FILE RESIDES ON MASTER DEVICE
05642 M01S01234.286l859 +++| SX2 X1+
05643 M01S01235.286l859 +++| MRE1 SX2 X2+4000B SET DIRECT ACCESS FLAG
05644 M01S01236.286l859 +++| BX7 X0*X7
05645 M01S01237.286l859 +++| BX7 X7+X2 SET DEVICE NUMBER IN LIST ENTRY
05646 M01S01238.286l859 +++| ZR X1,MRE3 IF FILE RESIDES ON MASTER DEVICE
05647 M01S01239.286l859 +++| RJ CDS CHECK DEVICE STATUS
05648 M01S01240.286l859 +++| NZ X6,MRE3 IF DEVICE FOUND
05649 M01S01241.286l859 +++| SX2 X1+ SET DEVICE NUMBER
05650 M01S01242.286l859 +++| SA1 A0+FCFN GET FILE NAME AND USER INDEX
05651 M01S01243.286l859 +++| SB2 ERDN * DEVICE NOT FOUND ...*
05652 M01S01244.286l859 +++| RJ SDE SEND ERROR MESSAGE
05653 M01S01245.286l859 +++| RJ CFE COUNT FILE SKIPPED
05654 M01S01246.286l859 +++| SX6 B1 SET DATA LIST NOT FULL
05655 M01S01247.286l859 +++| EQ MREX RETURN
05656 M01S01248.286l859 +++|
05657 M01S01249.286l859 +++|* PROCESS INDIRECT ACCESS FILE.
05658 M01S01250.286l859 +++|
05659 M01S01251.286l859 +++| MRE2 SA1 A0+FCLF
05660 M01S01252.286l859 +++| SX6 B1
05661 M01S01253.286l859 +++| LX6 24
05662 M01S01254.286l859 +++| BX7 X7+X6 SET FILE LENGTH ADJUSTMENT
05663 M01S01255.286l859 +++| BX1 X0*X1 FILE LENGTH
05664 M01S01256.286l859 +++| LX1 -12
05665 M01S01257.286l859 +++| IX7 X7+X1 SET FILE LENGTH IN ENTRY
05666 M01S01258.286l859 +++|
05667 M01S01259.286l859 +++|* PUT ENTRY IN LIST.
05668 M01S01260.286l859 +++|
05669 M01S01261.286l859 +++| MRE3 SA1 CADA
05670 M01S01262.286l859 +++| SA7 DLRB+B2 PUT READ LIST ENTRY IN TABLE
05671 M01S01263.286l859 +++| SX3 B2+
05672 M01S01264.286l859 +++| LX3 4 OFFSET IN *DLCB*
05673 M01S01265.286l859 +++| ERRNZ NWCE-20B
05674 M01S01266.286l859 +++| BX6 X1
05675 M01S01267.286l859 +++| SX3 DLCB+X3 CATALOG ADDRESS IN *DLCB*
05676 M01S01268.286l859 +++| SA6 DLDB+B2 SAVE DISK ADDRESS
05677 M01S01269.286l859 +++| MOVE NWCE,A0,X3 MOVE CATALOG ENTRY TO BUFFER
05678 M01S01270.286l859 +++| SX6 B2+B1 ADVANCE READ LIST ENTRY COUNT
05679 M01S01271.286l859 +++| SX7 B0
05680 M01S01272.286l859 +++| SA6 NDLE UPDATE ENTRY COUNT
05681 M01S01273.286l859 +++| SA7 DLRB+X6 WRITE TERMINATOR WORD
05682 M01S01274.286l859 +++| SX6 X6-DLEMX SET LIST FULL STATUS
05683 M01S01275.286l859 +++| EQ MREX RETURN
05684 M01S01276.286l859 +++| OPF SPACE 4,10
05685 M01S01277.286l859 +++|** OPF - OPEN PERMITS FILE.
05686 M01S01278.286l859 +++|*
05687 M01S01279.286l859 +++|* EXIT PERMITS FILE OPENED.
05688 M01S01280.286l859 +++|*
05689 M01S01281.286l859 +++|* USES X - 1, 2, 3, 6, 7.
05690 M01S01282.286l859 +++|* A - 1, 2, 7.
05691 M01S01283.286l859 +++|*
05692 M01S01284.286l859 +++|* MACROS CALLPFU.
05693 M01S01285.286l859 +++|
05694 M01S01286.286l859 +++|
05695 M01S01287.286l859 +++| OPF SUBR ENTRY/EXIT
05696 M01S01288.286l859 +++| SA2 MSTA
05697 M01S01289.286l859 +++| SA1 MAEQ
05698 M01S01290.286l859 +++| SA2 X2
05699 M01S01291.286l859 +++| MX6 -12
05700 M01S01292.286l859 +++| SX7 10005B FIRST SECTOR AND FILE STATUS
05701 M01S01293.286l859 +++| LX1 48
05702 M01S01294.286l859 +++| LX2 -24
05703 M01S01295.286l859 +++| BX7 X1+X7 MERGE EST ORDINAL, SECTOR, AND STATUS
05704 M01S01296.286l859 +++| BX3 -X6*X2 PERMITS FIRST TRACK
05705 M01S01297.286l859 +++| BX2 -X6*X2 SET CURRENT TRACK
05706 M01S01298.286l859 +++| LX3 36
05707 M01S01299.286l859 +++| LX2 24
05708 M01S01300.286l859 +++| BX7 X7+X3 MERGE FIRST TRACK
05709 M01S01301.286l859 +++| BX7 X7+X2 MERGE CURRENT TRACK
05710 M01S01302.286l859 +++| SA7 PETS+FTPM SET PARAMETER WORD
05711 M01S01303.286l859 +++| CALLPFU PETS,CTOL,R OPEN FILE
05712 M01S01304.286l859 +++| EQ OPFX RETURN
05713 M00S03295.pfdump +++| OPN SPACE 4,20
Line S03296 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05714 M01S03296.286l859 ---|** OPN - OPEN FILES.
Line S01305 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
05715 M01S01305.286l859 +++|** OPN - OPEN DEVICE FILES.
05716 M00S03297.pfdump +++|*
Line S03298 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05717 M01S03298.286l859 ---|* ENTRY (MDDS) = MASTER DEVICE DESCRIPTION.
Line S01306 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
05718 M01S01306.286l859 +++|* ENTRY (MSTA) = MASTER DEVICE *MSTT* ENTRY ADDRESS.
Line S03299 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
05719 M01S03299.ns22000 ---|* (MAEQ) = MASTER EQUIPMENT NUMBER.
Line S00243 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
05720 M01S00243.ns22000 +++|* (MAEQ) = MASTER DEVICE EST ORDINAL.
05721 M00S03300.pfdump +++|* (CPAR+/COMSPFS/CPDN) = MASTER DEVICE NUMBER.
Line S03301 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05722 M01S03301.286l859 ---|* (SCAN) = 0, IF NORMAL SCAN.
05723 M01S03302.286l859 ---|* = 1, IF RESCAN.
Line S03303 Modification History
M01 (Removed by) 253l688
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05724 M02S03303.286l859 ---|* (FRSG+RSFI) = *PF-ID* OF FIRST FILE FOR WHICH
05725 M02S03304.286l859 ---|* A STAGING REQUEST WAS ISSUED ON
05726 M02S03305.286l859 ---|* THE PREVIOUS SCAN.
Line S00315 Modification History
M01 (Added by) 253l688
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05727 M02S00315.286l859 ---|* (RSTS) = CATALOG TRACK AND SECTOR OF FIRST STAGE
05728 M02S00316.286l859 ---|* REQUEST ISSUED ON THE PREVIOUS SCAN.
05729 M00S03306.pfdump +++|*
05730 M00S03307.pfdump +++|* EXIT CATALOG, PERMIT AND DATA FILES OPENED.
05731 M00S03308.pfdump +++|*
Line S03309 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05732 M01S03309.286l859 ---|* USES X - 0, 1, 2, 5, 6, 7.
05733 M01S03310.286l859 ---|* A - 1, 2, 5, 6, 7.
Line S01307 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
05734 M01S01307.286l859 +++|* USES X - 1, 2, 3, 5, 6, 7.
05735 M01S01308.286l859 +++|* A - 1, 2, 5, 7.
05736 M00S03311.pfdump +++|*
Line S03312 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05737 M01S03312.286l859 ---|* CALLS WUC.
Line S01309 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
05738 M01S01309.286l859 +++|* CALLS OCF, OPF.
05739 M00S03313.pfdump +++|*
Line S03314 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05740 M01S03314.286l859 ---|* MACROS CALLPFU, READ, RENAME, RETURN, REWIND,
05741 M01S03315.286l859 ---|* SETFS, WRITE, WRITEF.
Line S01310 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
05742 M01S01310.286l859 +++|* MACROS CALLPFU.
05743 M00S03316.pfdump +++|
05744 M00S03317.pfdump +++|
05745 M00S03318.pfdump +++| OPN SUBR ENTRY/EXIT
Line S03319 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05746 M01S03319.286l859 ---| RJ WUC WAIT FOR NO PF UTILITY ACTIVITY ON DEVICE
05747 M01S03320.286l859 ---| SA1 SCAN
05748 M01S03321.286l859 ---| ZR X1,OPN1 IF NORMAL SCAN
05749 M00S03322.pfdump +++|
Line S03323 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05750 M01S03323.286l859 ---|* SET UP CATALOG FST ENTRY FOR RESCAN.
Line S01311 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
05751 M01S01311.286l859 +++|* OPEN CATALOG AND PERMITS FILES.
05752 M00S03324.pfdump +++|
Line S03325 Modification History
M01 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
05753 M01S03325.253l688 ---| SA1 FRSG+RSFI GET FIRST STAGING REQUEST TRACK/SECTOR
Line S00317 Modification History
M01 (Added by) 253l688
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05754 M02S00317.286l859 ---| SA1 RSTS GET FIRST STAGING REQUEST TRACK/SECTOR
05755 M02S00318.286l859 ---| SA2 OPNB GET INITIAL SCAN CATALOG FST ENTRY
Line S03326 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05756 M01S03326.286l859 ---| MX0 -24
Line S03327 Modification History
M01 (Removed by) 253l688
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05757 M02S03327.286l859 ---| SA2 OPNB GET INITIAL SCAN CATALOG FST ENTRY
05758 M02S03328.286l859 ---| BX1 -X0*X1 SET CURRENT TRACK/SECTOR = FIRST REQUEST
Line S03329 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05759 M01S03329.286l859 ---| LX0 35-23
05760 M01S03330.286l859 ---| LX1 35-23
05761 M01S03331.286l859 ---| BX6 X0*X2
Line S03332 Modification History
M01 (Removed by) 253l688
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05762 M02S03332.286l859 ---| BX6 X6+X1
Line S00319 Modification History
M01 (Added by) 253l688
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05763 M02S00319.286l859 ---| BX6 X6+X1 MERGE TRACK AND SECTOR
Line S03333 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05764 M01S03333.286l859 ---| SA6 CATS+FTPM
05765 M01S03334.286l859 ---| EQ OPN2 SET UP PERMITS FST ENTRY
Line S01312 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
05766 M01S01312.286l859 +++| RJ OCF OPEN CATALOG FILE
05767 M01S01313.286l859 +++| RJ OPF OPEN PERMITS FILE
05768 M00S03335.pfdump +++|
Line S03336 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05769 M01S03336.286l859 ---|* SET UP CATALOG FST ENTRY FOR NORMAL SCAN.
Line S01314 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
05770 M01S01314.286l859 +++|* OPEN DATA FILE.
05771 M00S03337.pfdump +++|
Line S03338 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05772 M01S03338.286l859 ---| OPN1 SA1 PDPM SET CATALOG DESCRIPTION PARAMETER
05773 M01S03339.286l859 ---| BX6 X1
05774 M01S03340.286l859 ---| SA6 CATS+FTPM
05775 M01S03341.286l859 ---| CALLPFU CATS,CTCT,R GET CATALOG TRACK PARAMETERS
05776 M01S03342.286l859 ---| SA1 CATS+FTPM
05777 M01S03343.286l859 ---| SX2 5
Line S03344 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05778 M02S03344.286l859 ---| MX0 -18
Line S00244 Modification History
M01 (Added by) ns22000
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05779 M02S00244.286l859 ---| MX0 -24
Line S03345 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05780 M01S03345.286l859 ---| BX1 -X0*X1 SET EQ AND FIRST TRACK
05781 M01S03346.286l859 ---| MX0 -12
05782 M01S03347.286l859 ---| BX6 -X0*X1 SET CURRENT TRACK
05783 M01S03348.286l859 ---| LX1 36
05784 M01S03349.286l859 ---| BX2 X2+X1 BUILD CATALOG TRACK FST ENTRY
05785 M01S03350.286l859 ---| LX6 24
05786 M01S03351.286l859 ---| BX6 X2+X6
05787 M01S03352.286l859 ---| SA6 A1
05788 M01S03353.286l859 ---| SA6 OPNB SAVE CATALOG FST ENTRY FOR RESCAN
Line S01315 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
05789 M01S01315.286l859 +++| SA2 MSTA
05790 M01S01316.286l859 +++| SA1 MAEQ
05791 M01S01317.286l859 +++| SA2 X2
05792 M01S01318.286l859 +++| MX6 -12
05793 M01S01319.286l859 +++| SX7 10005B FIRST SECTOR AND FILE STATUS
05794 M01S01320.286l859 +++| LX1 48
05795 M01S01321.286l859 +++| LX2 -48
05796 M01S01322.286l859 +++| BX7 X1+X7 MERGE EST ORDINAL, SECTOR, AND STATUS
05797 M01S01323.286l859 +++| BX3 -X6*X2 INDIRECT DATA CHAIN FIRST TRACK
05798 M01S01324.286l859 +++| BX2 -X6*X2 SET CURRENT TRACK
05799 M01S01325.286l859 +++| LX3 36
05800 M01S01326.286l859 +++| LX2 24
05801 M01S01327.286l859 +++| BX7 X7+X3 MERGE FIRST TRACK
05802 M01S01328.286l859 +++| BX7 X7+X2 MERGE CURRENT TRACK
05803 M01S01329.286l859 +++| SA7 DATA+FTPM
05804 M01S01330.286l859 +++| CALLPFU DATA,CTOL,R
05805 M00S03354.pfdump +++|
Line S03355 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05806 M01S03355.286l859 ---|* SET UP PERMITS FST ENTRY.
05807 M01S03356.286l859 ---|
05808 M01S03357.286l859 ---| OPN2 MX0 36 CLEAR *CATS* TRACKS AND SECTOR
05809 M01S03358.286l859 ---| SX1 B1 SET SECTOR FOR *PETS* AND *DATA*
05810 M01S03359.286l859 ---| LX0 47-59
05811 M01S03360.286l859 ---| LX1 12-0
05812 M01S03361.286l859 ---| BX6 -X0*X6
05813 M01S03362.286l859 ---| SA5 MDDS GET MASTER DEVICE DESCRIPTION
05814 M01S03363.286l859 ---| BX6 X6+X1
05815 M01S03364.286l859 ---| AX5 24 SET TRACK FOR *PETS*
05816 M01S03365.286l859 ---| MX0 48
05817 M01S03366.286l859 ---| BX1 -X0*X5
05818 M01S03367.286l859 ---| BX2 X1
05819 M01S03368.286l859 ---| LX1 36
05820 M01S03369.286l859 ---| LX2 24
05821 M01S03370.286l859 ---| BX7 X6+X1
05822 M01S03371.286l859 ---| BX7 X7+X2
05823 M01S03372.286l859 ---| SA7 PETS+FTPM
05824 M01S03373.286l859 ---|
05825 M01S03374.286l859 ---|* SET UP DATA FST ENTRY.
05826 M01S03375.286l859 ---|
05827 M01S03376.286l859 ---| AX5 24 SET TRACK FOR *DATA*
05828 M01S03377.286l859 ---| MX0 48
05829 M01S03378.286l859 ---| BX1 -X0*X5
05830 M01S03379.286l859 ---| BX2 X1
05831 M01S03380.286l859 ---| LX1 36
05832 M01S03381.286l859 ---| LX2 24
05833 M01S03382.286l859 ---| BX7 X6+X1
05834 M01S03383.286l859 ---| BX7 X7+X2
05835 M01S03384.286l859 ---| SA7 DATA+FTPM
05836 M01S03385.286l859 ---|
05837 M01S03386.286l859 ---|
05838 M01S03387.286l859 ---|* RETURN ANY EXISTING FILES.
05839 M01S03388.286l859 ---|
05840 M01S03389.286l859 ---| SA1 OPNA
05841 M01S03390.286l859 ---| SX6 B1
05842 M01S03391.286l859 ---| SA6 A1 SET FIRST TIME FLAG
05843 M01S03392.286l859 ---| ZR X1,OPN3 IF FIRST TIME THROUGH
05844 M01S03393.286l859 ---| RETURN CATS RETURN EXISTING FILES
05845 M01S03394.286l859 ---| RETURN PETS
05846 M01S03395.286l859 ---| RETURN DATA
05847 M01S03396.286l859 ---|
05848 M01S03397.286l859 ---|* CREATE RESCAN SELECTION SCREEN (*RESS*).
05849 M01S03398.286l859 ---|* FROM REQUEST FILE STAGING LIST (*REQS*).
05850 M01S03399.286l859 ---|
Line S03400 Modification History
M01 (Removed by) pfdum5
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05851 M02S03400.286l859 ---| WRITEF REQS FLUSH REQUEST FILE BUFFER
Line S00001 Modification History
M01 (Added by) pfdum5
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05852 M02S00001.286l859 ---| WRITEF REQS,R FLUSH REQUEST FILE BUFFER
Line S03401 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05853 M01S03401.286l859 ---| RENAME REQS,RESS CREATE SCREEN FILE FROM REQUEST FILE
05854 M01S03402.286l859 ---| REWIND RESS
05855 M01S03403.286l859 ---| SA1 OPNC RESTORE LFN IN *REQS* FET
05856 M01S03404.286l859 ---| SA2 REQS
05857 M01S03405.286l859 ---| MX0 -18
05858 M01S03406.286l859 ---| BX6 -X0*X2
05859 M01S03407.286l859 ---| BX6 X1+X6
05860 M01S03408.286l859 ---| SA6 A2
05861 M01S03409.286l859 ---|
05862 M01S03410.286l859 ---|* OPEN NEW FILES AND SET SPECIAL SYSTEM FILE STATUS.
05863 M01S03411.286l859 ---|
05864 M01S03412.286l859 ---| OPN3 CALLPFU CATS,CTOL,R
05865 M01S03413.286l859 ---| CALLPFU PETS,CTOL,R
05866 M01S03414.286l859 ---| CALLPFU DATA,CTOL,R
05867 M01S03415.286l859 ---| SETFS CATS,SSST
05868 M01S03416.286l859 ---| SETFS PETS,SSST
05869 M01S03417.286l859 ---| SETFS DATA,SSST
05870 M01S03418.286l859 ---| READ RESS
05871 M01S03419.286l859 ---| WRITE REQS
05872 M01S03420.286l859 ---|
05873 M00S03421.pfdump +++|* SET UP DATA FET FOR *PFU* READ LIST FUNCTION (CTRL).
Line S03422 Modification History
M01 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
05874 M01S03422.253l688 ---|*T FTPM 12/ 4000+DN,12/ FAM EQ,36/ 0
Figure
FTPM
0 29 0 30 35 36 47 48 59 0 FAM EQ 4000+DN
Line S00320 Modification History
M01 (Added by) 253l688
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05875 M02S00320.286l859 ---|*T FTPM 12/ 4000+DN,12/ FAM EQ,1/U,35/ 0
Figure
FTPM
0 29 0 30 34 35 36 47 48 59 0 U FAM EQ 4000+DN
05876 M00S03423.pfdump +++|
05877 M00S03424.pfdump +++| SA2 CPAR+/COMSPFS/CPDN SET MASTER DEVICE NUMBER
Line S03425 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
05878 M01S03425.ns22000 ---| SA1 MAEQ SET MASTER EQUIPMENT NUMBER
Line S00245 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
05879 M01S00245.ns22000 +++| SA1 MAEQ SET MASTER DEVICE EST ORDINAL
Line S00321 Modification History
M01 (Added by) 253l688
Seq # *Modification Id* Act
----------------------------+
05880 M01S00321.253l688 +++| SA5 CPAR+/COMSPFS/CPDT
05881 M00S03426.pfdump +++| SX7 X2+4000B
05882 M00S03427.pfdump +++| LX1 47-11
05883 M00S03428.pfdump +++| LX7 59-11
Line S03429 Modification History
M01 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
05884 M01S03429.253l688 ---| BX7 X7+X1
Line S00322 Modification History
M01 (Added by) 253l688
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05885 M02S00322.286l859 ---| ZR X5,OPN4 IF NOT DESTAGE DUMP
Line S01331 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
05886 M01S01331.286l859 +++| ZR X5,OPN1 IF NOT DESTAGE DUMP
Line S00323 Modification History
M01 (Added by) 253l688
Seq # *Modification Id* Act
----------------------------+
05887 M01S00323.253l688 +++| SX5 1 SET TO CHECK UPDATE MODE FILE BUSY
05888 M01S00324.253l688 +++| LX5 35-0
05889 M01S00325.253l688 +++| BX7 X7+X5
Line S00326 Modification History
M01 (Added by) 253l688
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05890 M02S00326.286l859 ---| OPN4 BX7 X7+X1
Line S01332 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
05891 M01S01332.286l859 +++| OPN1 BX7 X7+X1
05892 M00S03430.pfdump +++| SA7 DATA+FTPM
05893 M00S03431.pfdump +++| EQ OPNX RETURN
Line S03432 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05894 M01S03432.286l859 ---|
Line S00327 Modification History
M01 (Added by) 253l688
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05895 M02S00327.286l859 ---|
Line S03433 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05896 M01S03433.286l859 ---| OPNA BSSZ 1 FIRST TIME FLAG
05897 M01S03434.286l859 ---| OPNB BSSZ 1 HOLD AREA FOR INITIAL CATALOG FST ENTRY
Line S03435 Modification History
M01 (Removed by) pfdum20
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05898 M02S03435.286l859 ---| OPNC CON 4LREQS
Line S00001 Modification History
M01 (Added by) pfdum20
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05899 M02S00001.286l859 ---| OPNC CON 0LZZZZZG5 ORIGINAL *REQS* FILE NAME
Line S03436 Modification History
M01 (Removed by) 253l688
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05900 M02S03436.286l859 ---| PAE SPACE 4,35
Line S00328 Modification History
M01 (Added by) 253l688
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05901 M02S00328.286l859 ---| PAE SPACE 4,50
Line S03437 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05902 M01S03437.286l859 ---|** PAE - PROCESS ARCHIVE FILE ERROR.
Line S01333 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
05903 M01S01333.286l859 +++| PAF SPACE 4,10
05904 M01S01334.286l859 +++|** PAF - PROCESS ARCHIVE FILE OPERATION.
05905 M00S03438.pfdump +++|*
Line S03439 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05906 M01S03439.286l859 ---|* *PAE* WAITS FOR COMPLETION OF THE SPECIFIED FET AND
05907 M01S03440.286l859 ---|* THEN CHECKS FOR AN ERROR CODE. IF NO ERROR IS DETECTED, EXIT
Line S03441 Modification History
M01 (Removed by) 253l688
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05908 M02S03441.286l859 ---|* IS TO THE CALLER WITH (X6) = 0. EXIT IS TO *AEP* WITH AN
Line S00329 Modification History
M01 (Added by) 253l688
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05909 M02S00329.286l859 ---|* IS TO THE CALLER WITH (X6) = 0. EXIT IS TO *ABT* WITH AN
Line S03442 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05910 M01S03442.286l859 ---|* UNRECOVERED PARITY ABORT ERROR MESSAGE IF AN ERROR IS
05911 M01S03443.286l859 ---|* DETECTED AND ONE OF THE FOLLOWING CONDITIONS EXIST. OPERATOR
05912 M01S03444.286l859 ---|* ACTION IS SUPPRESSED, THE OPERATOR RESPONSE IS *K.END.*, OR
05913 M01S03445.286l859 ---|* AN ATTEMPT TO CLOSE THE BAD REEL OF TAPE FOLLOWING AN
05914 M01S03446.286l859 ---|* OPERATOR RESPONSE OF *K.GO.* IS UNSUCCESSFUL. A SUCCESSFUL
05915 M01S03447.286l859 ---|* ATTEMPT TO CLOSE THE BAD REEL OF TAPE WILL RESULT IN AN EXIT
05916 M01S03448.286l859 ---|* TO THE CALLER WITH (X6) = 1. IF BOTH THE ARCHIVE AND VERIFY
05917 M01S03449.286l859 ---|* FILES ARE ACTIVE, THE OPERATOR WILL BE GIVEN THE THIRD
05918 M01S03450.286l859 ---|* OPTION OF *K.DISABLE*. IF THIS OPTION IS SELECTED, THE FILE
05919 M01S03451.286l859 ---|* WITH THE ERROR WILL BE MARKED AS DISABLED, THE DUMP WILL
05920 M01S03452.286l859 ---|* CONTINUE ON THE REMAINING FILE ONLY, AND THE EXIT TO THE
05921 M01S03453.286l859 ---|* CALLER WILL BE WITH (X6) = -1. THE OPERATOR RESPONSE MUST
05922 M01S03454.286l859 ---|* MATCH ONE OF THE DISPLAYED OPTIONS BEFORE ANY ACTION WILL BE
05923 M01S03455.286l859 ---|* TAKEN.
05924 M01S03456.286l859 ---|*
05925 M01S03457.286l859 ---|* ENTRY (X2) = FET ADDRESS. SELECTS OPERATOR ACTION.
05926 M01S03458.286l859 ---|* = -FET ADDRESS. DESELECTS OPERATOR ACTION.
05927 M01S03459.286l859 ---|* (B6) = PARAMETER TO BE PRESERVED.
05928 M01S03460.286l859 ---|* (B7) = PARAMETER TO BE PRESERVED.
05929 M01S03461.286l859 ---|*
05930 M01S03462.286l859 ---|* EXIT (X6) = 0 IF NO ERROR ON FILE.
05931 M01S03463.286l859 ---|* = 1 IF ERROR ON FILE AND RECOVERY SUCCESSFUL.
05932 M01S03464.286l859 ---|* = -1 IF ERROR ON FILE AND *DISABLE* SELECTED.
05933 M01S03465.286l859 ---|* (B6) = PARAMETER PRESERVED FROM INPUT.
05934 M01S03466.286l859 ---|* (B7) = PARAMETER PRESERVED FROM INPUT.
05935 M01S03467.286l859 ---|* (DFFA) = FET ADDRESS OF DISABLED FILE, IF ERROR AND
05936 M01S03468.286l859 ---|* *DISABLE* OPTION IS SELECTED BY THE
05937 M01S03469.286l859 ---|* OPERATOR.
05938 M01S03470.286l859 ---|* (TAFA) = ARCHIVE OPEN FLAG = CLEARED ON UNSUCCESSFUL
05939 M01S03471.286l859 ---|* ERROR RECOVERY.
Line S03472 Modification History
M01 (Removed by) 253l688
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05940 M02S03472.286l859 ---|* EXIT TO *AEP* ON UNSUCCESSFUL ERROR RECOVERY.
Line S00330 Modification History
M01 (Added by) 253l688
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05941 M02S00330.286l859 ---|* EXIT TO *ABT* ON UNSUCCESSFUL ERROR RECOVERY.
Line S03473 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05942 M01S03473.286l859 ---|*
05943 M01S03474.286l859 ---|* USES X - 0, 1, 2, 3, 5, 6, 7.
05944 M01S03475.286l859 ---|* A - 1, 2, 3, 5, 6, 7.
05945 M01S03476.286l859 ---|* B - 2, 3, 6, 7.
05946 M01S03477.286l859 ---|*
05947 M01S03478.286l859 ---|* CALLS KIP, SFN.
05948 M01S03479.286l859 ---|*
05949 M01S03480.286l859 ---|* MACROS CLOSER, MESSAGE, MOVE, RECALL.
05950 M01S03481.286l859 ---|
05951 M01S03482.286l859 ---|
05952 M01S03483.286l859 ---| PAE SUBR ENTRY/EXIT
05953 M01S03484.286l859 ---|
05954 M01S03485.286l859 ---|* CHECK ERROR STATUS.
05955 M01S03486.286l859 ---|
05956 M01S03487.286l859 ---| BX6 X2 SAVE OPERATOR ACTION STATUS
05957 M01S03488.286l859 ---| PL X2,PAE1 IF OPERATOR ACTION WANTED
05958 M01S03489.286l859 ---| BX2 -X2
05959 M01S03490.286l859 ---| PAE1 SA6 PAEA
05960 M01S03491.286l859 ---| RECALL X2 WAIT OPERATION COMPLETE
05961 M01S03492.286l859 ---| SA1 X2 CHECK FET ERROR STATUS
05962 M01S03493.286l859 ---| SX3 36000B
05963 M01S03494.286l859 ---| BX6 X3*X1
05964 M01S03495.286l859 ---| ZR X6,PAEX IF NO ERROR
05965 M01S03496.286l859 ---| BX7 -X3*X1 CLEAR ERROR STATUS
05966 M01S03497.286l859 ---| SA7 X2
Line S00006 Modification History
M01 (Added by) pfdum12
M02 (Removed by) pfdu12a
M03 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05967 M03S00006.286l859 ---| SA1 AEPA
Line S00001 Modification History
M01 (Added by) pfdu12a
M02 (Removed by) 253l688
M03 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05968 M03S00001.286l859 ---| SA3 AEPA
Line S00331 Modification History
M01 (Added by) 253l688
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05969 M02S00331.286l859 ---| SA3 ABTA
Line S00007 Modification History
M01 (Added by) pfdum12
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05970 M02S00007.286l859 ---| BX6 X6-X6
Line S00008 Modification History
M01 (Added by) pfdum12
M02 (Removed by) pfdu12a
M03 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05971 M03S00008.286l859 ---| NZ X1,PAEX IF ABORT PROCESSING ACTIVE
Line S00002 Modification History
M01 (Added by) pfdu12a
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05972 M02S00002.286l859 ---| NZ X3,PAEX IF ABORT PROCESSING ACTIVE
Line S03498 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05973 M01S03498.286l859 ---| SX6 B6 SAVE PARAMETERS
05974 M01S03499.286l859 ---| SX7 B7
05975 M01S03500.286l859 ---| SA6 PAEB
05976 M01S03501.286l859 ---| SA7 PAEB+1
05977 M01S03502.286l859 ---|
05978 M01S03503.286l859 ---|* PROCESS OPERATOR ACTION.
05979 M01S03504.286l859 ---|
05980 M01S03505.286l859 ---| MX6 42 GET FILE NAME
05981 M01S03506.286l859 ---| BX1 X6*X1
05982 M01S03507.286l859 ---| RJ SFN SPACE FILL NAME
05983 M01S03508.286l859 ---| SX1 1R.&1R ADD PERIOD TO FILE NAME
05984 M01S03509.286l859 ---| LX1 12
05985 M01S03510.286l859 ---| BX6 X1-X6
05986 M01S03511.286l859 ---| SA6 MSGH+3 ADD FILE NAME TO MESSAGE
05987 M01S03512.286l859 ---| SA6 MSGAE+3
05988 M01S03513.286l859 ---| SA5 IDSA+/COMSPFS/ADM2 DISPLAY PARITY ERROR MESSAGE
05989 M01S03514.286l859 ---| MOVE 4,MSGH,X5
05990 M01S03515.286l859 ---| MESSAGE MSGH
05991 M01S03516.286l859 ---| SA1 PAEA
05992 M01S03517.286l859 ---| NG X1,PAE7 IF NO OPERATOR ACTION WANTED
Line S03518 Modification History
M01 (Removed by) 241l630
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05993 M02S03518.286l859 ---| SA5 IDSA+/COMSPFS/ADE1 DISPLAY *GO* OPTION
05994 M02S03519.286l859 ---| MOVE 4,MSGI,X5
Line S00038 Modification History
M01 (Added by) 241l630
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05995 M02S00038.286l859 ---| SX5 DSBL BLANK THE *DISABLE* MESSAGE
Line S03520 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
05996 M01S03520.286l859 ---| SA1 CPAR+/COMSPFS/CPVF
05997 M01S03521.286l859 ---| ZR X1,PAE2 IF NO VERIFY FILE SPECIFIED
05998 M01S03522.286l859 ---| SA1 DFFA
05999 M01S03523.286l859 ---| NZ X1,PAE2 IF FILE ALREADY DISABLED
Line S03524 Modification History
M01 (Removed by) 241l630
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
06000 M02S03524.286l859 ---| SA5 IDSA+/COMSPFS/ADE3 DISPLAY *DISABLE* OPTION
06001 M02S03525.286l859 ---| MOVE 4,MSGAC,X5
06002 M02S03526.286l859 ---| PAE2 SA5 IDSA+/COMSPFS/ADE2 DISPLAY *END* OPTION
06003 M02S03527.286l859 ---| MOVE 4,MSGJ,X5
Line S00039 Modification History
M01 (Added by) 241l630
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
06004 M02S00039.286l859 ---| SX5 DSLN DISPLAY THE *DISABLE* MESSAGE
06005 M02S00040.286l859 ---| PAE2 MOVE 4,X5,DSDS BLANK/DISPLAY THE *DISABLE* MESSAGE
06006 M02S00041.286l859 ---| SX6 TERR
06007 M02S00042.286l859 ---| RJ SRS SELECT RIGHT SCREEN
Line S03528 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
06008 M01S03528.286l859 ---| PAE3 SB3 PAE4 *K.GO.* PROCESSOR ADDRESS
06009 M01S03529.286l859 ---| SB2 PAE5 *K.ANYTHING ELSE.* PROCESSOR ADDRESS
06010 M01S03530.286l859 ---| EQ /COMSPFS/KIP PROCESS KEYBOARD RESPONSE
06011 M01S03531.286l859 ---|
06012 M01S03532.286l859 ---|* CLOSE BAD REEL. (*GO* SELECTED BY OPERATOR.)
06013 M01S03533.286l859 ---|
06014 M01S03534.286l859 ---| PAE4 SA2 PAEA RESTORE FET ADDRESS
06015 M01S03535.286l859 ---| CLOSER X2,UNLOAD,R SWITCH TO NEW REEL
06016 M01S03536.286l859 ---| SA1 X2 CHECK ERROR STATUS
06017 M01S03537.286l859 ---| SX3 36000B
06018 M01S03538.286l859 ---| BX6 X3*X1
06019 M01S03539.286l859 ---| NZ X6,PAE7 IF ERROR IN CLOSING OLD REEL
Line S03540 Modification History
M01 (Removed by) pfdum6
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
06020 M02S03540.286l859 ---| SA1 PAEB RESTORE PARAMETERS
06021 M02S03541.286l859 ---| SA3 A1+B1
06022 M02S03542.286l859 ---| SB6 X1
06023 M02S03543.286l859 ---| SB7 X3
Line S03544 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
06024 M01S03544.286l859 ---| SX6 B1 SET ERROR RESPONSE
06025 M01S03545.286l859 ---| EQ PAE9 CLEAR ERROR MESSAGES
06026 M01S03546.286l859 ---|
06027 M01S03547.286l859 ---|* DETERMINE OPERATOR RESPONSE.
06028 M01S03548.286l859 ---|
06029 M01S03549.286l859 ---| PAE5 SA1 DFFA GET DISABLE STATUS
06030 M01S03550.286l859 ---| SA2 /COMSPFS/KIN GET OPERATOR RESPONSE
06031 M01S03551.286l859 ---| SA3 PAED
06032 M01S03552.286l859 ---| NZ X1,PAE6 IF *DISABLE* NOT AVAILABLE
06033 M01S03553.286l859 ---| SA1 CPAR+/COMSPFS/CPVF
06034 M01S03554.286l859 ---| ZR X1,PAE6 IF NO VERIFY FILE SPECIFIED
06035 M01S03555.286l859 ---| MX0 42
06036 M01S03556.286l859 ---| BX3 X3-X2
06037 M01S03557.286l859 ---| BX3 X0*X3
06038 M01S03558.286l859 ---| ZR X3,PAE8 IF *DISABLE* ENTERED
06039 M01S03559.286l859 ---| PAE6 MX0 18
06040 M01S03560.286l859 ---| SA3 A3+B1
06041 M01S03561.286l859 ---| BX3 X3-X2
06042 M01S03562.286l859 ---| BX3 X0*X3
06043 M01S03563.286l859 ---| ZR X3,PAE7 IF *END* SELECTED
Line S03564 Modification History
M01 (Removed by) 241l630
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
06044 M02S03564.286l859 ---| SA5 IDSA+/COMSPFS/ADE4 DISPLAY ERROR MESSAGE
Line S00043 Modification History
M01 (Added by) 241l630
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
06045 M02S00043.286l859 ---| SA5 IDSA+/COMSPFS/ADER DISPLAY ERROR MESSAGE
Line S03565 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
06046 M01S03565.286l859 ---| MOVE 4,MSGAD,X5
06047 M01S03566.286l859 ---| EQ PAE3 GET OPERATOR RESPONSE
06048 M01S03567.286l859 ---|
06049 M01S03568.286l859 ---|* PROCESS UNRECOVERED PARITY ERROR ABORT. (*END* SELECTED.)
06050 M01S03569.286l859 ---|
06051 M01S03570.286l859 ---| PAE7 BX6 X6-X6 CLEAR OPEN ARCHIVE FILE FLAG
06052 M01S03571.286l859 ---| SA6 TAFA
06053 M01S03572.286l859 ---| SX1 MSGK SET UNRECOVERED PARITY ERROR MESSAGE
Line S03573 Modification History
M01 (Removed by) 253l688
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
06054 M02S03573.286l859 ---| EQ AEP ABORT DUMP
Line S00332 Modification History
M01 (Added by) 253l688
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
06055 M02S00332.286l859 ---| EQ ABT ABORT DUMP
Line S03574 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
06056 M01S03574.286l859 ---|
06057 M01S03575.286l859 ---|* PROCESS *DISABLE* OPTION.
06058 M01S03576.286l859 ---|
06059 M01S03577.286l859 ---| PAE8 SA2 PAEA GET FET ADDRESS
06060 M01S03578.286l859 ---| BX7 X2
06061 M01S03579.286l859 ---| SA7 DFFA SET DISABLED FILE
06062 M01S03580.286l859 ---| MESSAGE MSGAE ISSUE *OPERATOR DISABLED* MESSAGE
06063 M01S03581.286l859 ---| SX6 -B1 SET *DISABLE* EXIT
06064 M01S03582.286l859 ---|
06065 M01S03583.286l859 ---|* CLEAR ERROR MESSAGE DISPLAY AREA.
06066 M01S03584.286l859 ---|
06067 M01S03585.286l859 ---| PAE9 SA6 PAEC SAVE EXIT STATUS
06068 M01S03586.286l859 ---| SA5 IDSA+/COMSPFS/ADM2
06069 M01S03587.286l859 ---| MOVE 4,MSGW,X5
Line S03588 Modification History
M01 (Removed by) 241l630
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
06070 M02S03588.286l859 ---| SA5 IDSA+/COMSPFS/ADE1
06071 M02S03589.286l859 ---| MOVE 4,MSGW,X5
06072 M02S03590.286l859 ---| SA5 IDSA+/COMSPFS/ADE2
06073 M02S03591.286l859 ---| MOVE 4,MSGW,X5
06074 M02S03592.286l859 ---| SA5 IDSA+/COMSPFS/ADE3
06075 M02S03593.286l859 ---| MOVE 4,MSGW,X5
06076 M02S03594.286l859 ---| SA5 IDSA+/COMSPFS/ADE4
Line S00044 Modification History
M01 (Added by) 241l630
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
06077 M02S00044.286l859 ---| SA5 IDSA+/COMSPFS/ADER
Line S03595 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
06078 M01S03595.286l859 ---| MOVE 4,MSGW,X5
06079 M01S03596.286l859 ---| SA1 PAEC
06080 M01S03597.286l859 ---| BX6 X1 SET EXIT STATUS
Line S00001 Modification History
M01 (Added by) pfdum6
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
06081 M02S00001.286l859 ---| SA1 PAEB RESTORE PARAMETERS
06082 M02S00002.286l859 ---| SA3 A1+B1
06083 M02S00003.286l859 ---| SB6 X1
06084 M02S00004.286l859 ---| SB7 X3
Line S03598 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
06085 M01S03598.286l859 ---| EQ PAEX RETURN
06086 M01S03599.286l859 ---|
06087 M01S03600.286l859 ---| PAEA BSS 1 OPERATOR ACTION STATUS
06088 M01S03601.286l859 ---| PAEB BSS 2 PARAMETER SAVE AREA
06089 M01S03602.286l859 ---| PAEC CON 0 EXIT STATUS
06090 M01S03603.286l859 ---| PAED DATA 7LDISABLE
06091 M01S03604.286l859 ---| DATA 3LEND
06092 M01S03605.286l859 ---| PAF SPACE 4,30
06093 M01S03606.286l859 ---|** PAF - PROCESS ARCHIVE FILE OPERATION.
06094 M01S03607.286l859 ---|*
06095 M01S03608.286l859 ---|* *PAF* PERFORMS THE FUNCTION INDICATED BY (B2) ON THE
06096 M01S03609.286l859 ---|* ARCHIVE FILE AND ALSO ON THE ARCHIVE VERIFY FILE IF THE
06097 M01S03610.286l859 ---|* VERIFY OPTION WAS SPECIFIED FOR THE DUMP.
06098 M01S03611.286l859 ---|*
06099 M01S03612.286l859 ---|* ENTRY (B2) = FUNCTION CODE.
06100 M01S03613.286l859 ---|* -1 = WRITE WORDS ON ARCHIVE FILE.
06101 M01S03614.286l859 ---|* (B6) = WORKING BUFFER ADDRESS.
06102 M01S03615.286l859 ---|* (B7) = WORD COUNT.
06103 M01S03616.286l859 ---|* 0 = WRITE EOR ON ARCHIVE FILE.
06104 M01S03617.286l859 ---|* (B6) = RECORD LEVEL NUMBER (0 OR 17B).
06105 M01S03618.286l859 ---|* (B7) = -1.
06106 M01S03619.286l859 ---|* 1 = SKIP FILES FORWARD ON ARCHIVE FILE.
06107 M01S03620.286l859 ---|* (B6) = FILE COUNT TO SKIP.
06108 M01S03621.286l859 ---|* 2 = FLUSH ARCHIVE FILE BUFFER.
06109 M01S03622.286l859 ---|* (B6) = FIRST PARAMETER.
06110 M01S03623.286l859 ---|* (B7) = SECOND PARAMETER.
06111 M01S03624.286l859 ---|* (DFFA) = FET ADDRESS OF FILE DISABLED BY OPERATOR.
06112 M01S03625.286l859 ---|* = 0 IF NONE PREVIOUSLY DISABLED.
Line S01335 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
06113 M01S01335.286l859 +++|* ENTRY (B6) = FIRST PARAMETER FOR *CWWRITE* MACRO.
06114 M01S01336.286l859 +++|* (B7) = SECOND PARAMETER FOR *CWWRITE* MACRO.
06115 M00S03626.pfdump +++|*
06116 M00S03627.pfdump +++|* USES X - 1, 2, 6, 7.
06117 M00S03628.pfdump +++|* A - 1, 2, 6, 7.
06118 M00S03629.pfdump +++|* B - 6, 7.
06119 M00S03630.pfdump +++|*
Line S03631 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
06120 M01S03631.286l859 ---|* CALLS FCW, PAE.
06121 M01S03632.286l859 ---|*
06122 M01S03633.286l859 ---|* MACROS CWWRITE, SKIPFF.
Line S01337 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
06123 M01S01337.286l859 +++|* MACROS CWWRITE.
06124 M00S03634.pfdump +++|
06125 M00S03635.pfdump +++|
06126 M00S03636.pfdump +++| PAF SUBR ENTRY/EXIT
Line S03637 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
06127 M01S03637.286l859 ---|
06128 M01S03638.286l859 ---|* PROCESS *WRITEW*, *WRITER* OR *WRITEF* REQUEST.
06129 M01S03639.286l859 ---|
06130 M01S03640.286l859 ---| GE B2,B1,PAF4 IF *SKIPFF* OR *FLUSH* REQUEST
06131 M01S03641.286l859 ---| SA1 DFFA
06132 M01S03642.286l859 ---| SX1 X1-TAPE
06133 M01S03643.286l859 ---| ZR X1,PAF3 IF ARCHIVE FILE DISABLED
06134 M00S03644.pfdump +++| SX6 B6 SAVE PARAMETERS
06135 M00S03645.pfdump +++| SX7 B7
06136 M00S03646.pfdump +++| SA6 PAFA
06137 M00S03647.pfdump +++| SA7 PAFA+1
Line S03648 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
06138 M01S03648.286l859 ---| PAF1 CWWRITE TAPE,B6,B7 WRITE DATA TO ARCHIVE FILE
06139 M01S03649.286l859 ---| ZR B7,PAF2 IF NO ERROR ON WRITE
06140 M01S03650.286l859 ---| RJ PAE PROCESS ARCHIVE FILE ERROR
06141 M01S03651.286l859 ---| PL X6,PAF1 IF FILE NOT DISABLED
06142 M01S03652.286l859 ---| PAF2 SA1 CPAR+/COMSPFS/CPVF
Line S01338 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
06143 M01S01338.286l859 +++| CWWRITE TAPE,B6,B7 WRITE DATA TO ARCHIVE FILE
06144 M01S01339.286l859 +++| SA1 CPAR+/COMSPFS/CPVF
06145 M00S03653.pfdump +++| ZR X1,PAFX IF NO VERIFY FILE SPECIFIED
Line S03654 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
06146 M01S03654.286l859 ---| SA2 DFFA
06147 M01S03655.286l859 ---| SX2 X2-PFVER
06148 M01S03656.286l859 ---| ZR X2,PAFX IF VERFIY FILE DISABLED
06149 M00S03657.pfdump +++| SA1 PAFA RESTORE PARAMETERS
06150 M00S03658.pfdump +++| SA2 PAFA+1
Line S03659 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
06151 M01S03659.286l859 ---| SB6 X1+
06152 M01S03660.286l859 ---| SB7 X2+
06153 M01S03661.286l859 ---| PAF3 CWWRITE PFVER,B6,B7 WRITE DATA TO ARCHIVE VERIFY FILE
06154 M01S03662.286l859 ---| ZR B7,PAFX IF NO ERROR ON WRITE
06155 M01S03663.286l859 ---| RJ PAE PROCESS ARCHIVE VERIFY FILE ERROR
06156 M01S03664.286l859 ---| NG X6,PAFX IF FILE DISABLED
06157 M01S03665.286l859 ---| EQ PAF3 WRITE REMAINING DATA
06158 M01S03666.286l859 ---|
06159 M01S03667.286l859 ---|* PROCESS *SKIPFF* REQUEST.
06160 M01S03668.286l859 ---|
06161 M01S03669.286l859 ---| PAF4 GT B2,B1,PAF6 IF NOT *SKIPFF* REQUEST
06162 M01S03670.286l859 ---| SKIPFF TAPE,B6 SKIP FILES ON ARCHIVE FILE
06163 M01S03671.286l859 ---| SA1 CPAR+/COMSPFS/CPVF
06164 M01S03672.286l859 ---| ZR X1,PAF5 IF NO VERIFY FILE SPECIFIED
06165 M01S03673.286l859 ---| SKIPFF PFVER,B6,R SKIP FILES ON ARCHIVE VERIFY FILE
06166 M01S03674.286l859 ---| BX2 -X2 FLAG NO OPERATOR ACTION
06167 M01S03675.286l859 ---| RJ PAE PROCESS ARCHIVE VERIFY FILE ERROR
06168 M01S03676.286l859 ---| PAF5 SX2 -TAPE PROCESS ARCHIVE FILE ERROR
06169 M01S03677.286l859 ---| RJ PAE
06170 M01S03678.286l859 ---| EQ PAFX EXIT IF NO ERROR
06171 M01S03679.286l859 ---|
06172 M01S03680.286l859 ---|* PROCESS *FLUSH* REQUEST.
06173 M01S03681.286l859 ---|
06174 M01S03682.286l859 ---| PAF6 SA1 DFFA
06175 M01S03683.286l859 ---| SX1 X1-TAPE
06176 M01S03684.286l859 ---| ZR X1,PAF8 IF ARCHIVE FILE DISABLED
06177 M01S03685.286l859 ---| PAF7 SX2 TAPE FLUSH ARCHIVE FILE BUFFER
06178 M01S03686.286l859 ---| RJ FCW
06179 M01S03687.286l859 ---| SX2 TAPE
06180 M01S03688.286l859 ---| RJ PAE
06181 M01S03689.286l859 ---| NG X6,PAF8 IF FILE DISABLED
06182 M01S03690.286l859 ---| NZ X6,PAF7 IF ERROR ON ARCHIVE FILE
06183 M01S03691.286l859 ---| SA1 CPAR+/COMSPFS/CPVF
06184 M01S03692.286l859 ---| ZR X1,PAFX IF NO VERIFY FILE SPECIFIED
06185 M01S03693.286l859 ---| SA2 DFFA
06186 M01S03694.286l859 ---| SX2 X2-PFVER
06187 M01S03695.286l859 ---| ZR X2,PAFX IF VERIFY FILE DISABLED
06188 M01S03696.286l859 ---| PAF8 SX2 PFVER
06189 M01S03697.286l859 ---| RJ FCW FLUSH VERIFY FILE BUFFER
06190 M01S03698.286l859 ---| SX2 PFVER
06191 M01S03699.286l859 ---| RJ PAE
06192 M01S03700.286l859 ---| NG X6,PAFX IF FILE DISABLED
06193 M01S03701.286l859 ---| NZ X6,PAF8 IF ERROR ON VERIFY FILE
Line S01340 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
06194 M01S01340.286l859 +++| SB6 X1
06195 M01S01341.286l859 +++| SB7 X2
06196 M01S01342.286l859 +++| CWWRITE PFVER,B6,B7 WRITE DATA TO ARCHIVE VERIFY FILE
06197 M00S03702.pfdump +++| EQ PAFX RETURN
06198 M00S03703.pfdump +++|
06199 M00S03704.pfdump +++| PAFA BSS 2 PARAMETER SAVE AREA
Line S03705 Modification History
M01 (Removed by) 242l642
Seq # *Modification Id* Act
----------------------------+
06200 M01S03705.242l642 ---| PCE SPACE 4,30
Line S00041 Modification History
M01 (Added by) 242l642
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
06201 M02S00041.253l688 ---| PCE SPACE 4,20
Line S03706 Modification History
M01 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
06202 M01S03706.253l688 ---|** PCE - PROCESS CATALOG FILE ERRORS.
06203 M01S03707.253l688 ---|*
06204 M01S03708.253l688 ---|* ENTRY (B3) = FWA OF CATALOG ENTRIES.
Line S00001 Modification History
M01 (Added by) ns2383
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
06205 M02S00001.253l688 ---|* (B3) = 0 IF NO SECTOR READ DUE TO ERROR.
Line S03709 Modification History
M01 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
06206 M01S03709.253l688 ---|* (B6) = LWA+1 OF CATALOG ENTRIES.
Line S03710 Modification History
M01 (Removed by) ns2383
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
06207 M02S03710.253l688 ---|* (X6) = *CIO* TRAILER CONTROL WORD.
Line S00002 Modification History
M01 (Added by) ns2383
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
06208 M02S00002.253l688 ---|* (X6) = *CIO* TRAILER CONTROL WORD
06209 M02S00003.253l688 ---|* (IF (B3)=0, CONTROL WORD FOR LAST SECTOR READ).
Line S03711 Modification History
M01 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
06210 M01S03711.253l688 ---|* (X7) = CATALOG FET ADDRESS.
06211 M01S03712.253l688 ---|* (CPAR+/COMSPFS/CPDN) = MASTER DEVICE NUMBER.
06212 M01S03713.253l688 ---|* (MPCT) = CURRENT CATALOG TRACK.
06213 M01S03714.253l688 ---|*
06214 M01S03715.253l688 ---|* EXIT ERROR MESSAGES ISSUED FOR EACH OF THE AFFECTED
06215 M01S03716.253l688 ---|* CATALOG ENTRIES.
Line S03717 Modification History
M01 (Removed by) 242l642
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
06216 M02S03717.253l688 ---|* ERROR IDLE STATUS SET FOR THE AFFECTED EQUIPMENT.
Line S03718 Modification History
M01 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
06217 M01S03718.253l688 ---|* FET ERROR STATUS CLEARED FROM CATALOG FET.
06218 M01S03719.253l688 ---|*
06219 M01S03720.253l688 ---|* USES X - 1, 2, 3, 6, 7.
06220 M01S03721.253l688 ---|* A - 1, 2, 6, 7.
06221 M01S03722.253l688 ---|* B - 3, 6.
06222 M01S03723.253l688 ---|*
Line S03724 Modification History
M01 (Removed by) 242l642
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
06223 M02S03724.253l688 ---|* CALLS SEI, SEM.
Line S00042 Modification History
M01 (Added by) 242l642
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
06224 M02S00042.253l688 ---|* CALLS SEM.
Line S03725 Modification History
M01 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
06225 M01S03725.253l688 ---|*
06226 M01S03726.253l688 ---|* MACROS EDITS.
06227 M01S03727.253l688 ---|
06228 M01S03728.253l688 ---|
06229 M01S03729.253l688 ---| PCE SUBR ENTRY/EXIT
06230 M01S03730.253l688 ---| SA7 PCEA SAVE FET ADDRESS
06231 M01S03731.253l688 ---| SX7 B3 SAVE FWA
06232 M01S03732.253l688 ---| SA7 PCEB
06233 M01S03733.253l688 ---| SX7 B6 SAVE LWA+1
06234 M01S03734.253l688 ---| SA7 PCEC
06235 M01S03735.253l688 ---| MX3 -12 SET SECTOR NUMBER
06236 M01S03736.253l688 ---| BX7 -X3*X6
Line S03737 Modification History
M01 (Removed by) ns2383
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
06237 M02S03737.253l688 ---| SA7 MPSC
Line S00004 Modification History
M01 (Added by) ns2383
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
06238 M02S00004.253l688 ---| NZ B3,PCE0 IF SECTOR READ
06239 M02S00005.253l688 ---| SX7 X7+B1 INCREMENT SECTOR NUMBER
06240 M02S00006.253l688 ---| BX7 -X3*X7
06241 M02S00007.253l688 ---| PCE0 SA7 MPSC
Line S03738 Modification History
M01 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
06242 M01S03738.253l688 ---| LX6 11-23 SET TRACK NUMBER
06243 M01S03739.253l688 ---| BX7 -X3*X6
06244 M01S03740.253l688 ---| SA7 MPTK
Line S03741 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
06245 M02S03741.253l688 ---| LX6 11-23 SET EQUIPMENT NUMBER
Line S00246 Modification History
M01 (Added by) ns22000
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
06246 M02S00246.253l688 ---| LX6 11-23 SET EST ORDINAL
Line S03742 Modification History
M01 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
06247 M01S03742.253l688 ---| BX7 -X3*X6
06248 M01S03743.253l688 ---| SA7 MPEQ
06249 M01S03744.253l688 ---| SA1 CPAR+/COMSPFS/CPDN SET DEVICE NUMBER
06250 M01S03745.253l688 ---| BX6 X1
06251 M01S03746.253l688 ---| SA6 MPDN
06252 M01S03747.253l688 ---| SA1 MPPN
06253 M01S03748.253l688 ---| SB6 MSPN SET PACK NAME SKELETON
06254 M01S03749.253l688 ---| NZ X1,PCE1 IF PACK NAME SPECIFIED
06255 M01S03750.253l688 ---| SB6 MSCT SET CATALOG TRACK SKELETON
06256 M01S03751.253l688 ---| PCE1 EDITS B6,MES1 GENERATE CATALOG READ ERROR MESSAGE
06257 M01S03752.253l688 ---| SX6 B1+ SET ERRLOG FLAG
06258 M01S03753.253l688 ---| SA6 ELFG
06259 M01S03754.253l688 ---| RJ SEM SEND ERROR MESSAGE
Line S03755 Modification History
M01 (Removed by) 242l642
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
06260 M02S03755.253l688 ---| RJ SEI SET ERROR IDLE STATUS
Line S03756 Modification History
M01 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
06261 M01S03756.253l688 ---| SA1 PCEB INITIALIZE CATALOG ENTRY INDEX
06262 M01S03757.253l688 ---| SB3 X1
Line S00008 Modification History
M01 (Added by) ns2383
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
06263 M02S00008.253l688 ---| ZR B3,PCE4 IF NO SECTOR READ DUE TO ERROR
Line S03758 Modification History
M01 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
06264 M01S03758.253l688 ---| PCE2 SA1 B3+FCUI SET USER INDEX
06265 M01S03759.253l688 ---| MX3 -18
06266 M01S03760.253l688 ---| BX6 -X3*X1
06267 M01S03761.253l688 ---| BX7 X3*X1 SET FILE NAME
06268 M01S03762.253l688 ---| ZR X6,PCE3 IF NULL CATALOG ENTRY (HOLE)
06269 M01S03763.253l688 ---| SA6 MPUI
06270 M01S03764.253l688 ---| SA7 MPFN
06271 M01S03765.253l688 ---| EDITS MSFN,MES1 GENERATE MESSAGE WITH FILE NAME
06272 M01S03766.253l688 ---| RJ SEM SEND ERROR MESSAGE
06273 M01S03767.253l688 ---| PCE3 SA1 PCEB INCREMENT CATALOG ENTRY INDEX
06274 M01S03768.253l688 ---| SA2 PCEC
Line S03769 Modification History
M01 (Removed by) ns2383
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
06275 M02S03769.253l688 ---| SB3 X1+B1
Line S00009 Modification History
M01 (Added by) ns2383
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
06276 M02S00009.253l688 ---| SB3 X1+NWCE
Line S03770 Modification History
M01 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
06277 M01S03770.253l688 ---| SX6 B3
06278 M01S03771.253l688 ---| SA6 PCEB SAVE INDEX
06279 M01S03772.253l688 ---| SB6 X2
06280 M01S03773.253l688 ---| LT B3,B6,PCE2 IF MORE CATALOG ENTRIES
Line S03774 Modification History
M01 (Removed by) ns2383
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
06281 M02S03774.253l688 ---| SA2 PCEA CLEAR FET ERROR STATUS
Line S00010 Modification History
M01 (Added by) ns2383
M02 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
06282 M02S00010.253l688 ---| PCE4 SA2 PCEA CLEAR FET ERROR STATUS
06283 M02S00011.253l688 ---| SA2 X2
Line S03775 Modification History
M01 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
06284 M01S03775.253l688 ---| SX7 36000B
06285 M01S03776.253l688 ---| BX6 -X7*X2
06286 M01S03777.253l688 ---| BX7 X7-X7 CLEAR DETAILED ERROR STATUS
06287 M01S03778.253l688 ---| SA6 A2+
06288 M01S03779.253l688 ---| SA7 A2+6
06289 M01S03780.253l688 ---| EQ PCEX RETURN
06290 M01S03781.253l688 ---|
06291 M01S03782.253l688 ---| PCEA BSS 1 FET ADDRESS SAVE AREA
06292 M01S03783.253l688 ---| PCEB BSS 1 FWA OF CATALOG ENTRIES - SAVE AREA
06293 M01S03784.253l688 ---| PCEC BSS 1 LWA+1 OF CATALOG ENTRIES - SAVE AREA
06294 M01S03785.253l688 ---| PCI SPACE 4,15
06295 M01S03786.253l688 ---|** PCI - PROCESS CATALOG TRACK INTERLOCK.
06296 M01S03787.253l688 ---|*
06297 M01S03788.253l688 ---|* ENTRY (X6) = ADDRESS OF FET TO PROCESS INTERLOCK WITH.
06298 M01S03789.253l688 ---|* (X7) = *PFU* FUNCTION CODE TO PROCESS INTERLOCK WITH.
06299 M01S03790.253l688 ---|*
06300 M01S03791.253l688 ---|* EXIT *PFU* CALLED TO PROCESS INTERLOCK.
06301 M01S03792.253l688 ---|* INTERLOCK MESSAGE POSTED AT LINE 2 OF THE CONTROL
06302 M01S03793.253l688 ---|* POINT AND ON THE *K* DISPLAY BEFORE INTERLOCKING
06303 M01S03794.253l688 ---|* AND CLEARED AFTER.
06304 M01S03795.253l688 ---|*
06305 M01S03796.253l688 ---|* USES X - 1, 2, 3.
06306 M01S03797.253l688 ---|* A - 1, 2, 3, 6, 7.
06307 M01S03798.253l688 ---|*
06308 M01S03799.253l688 ---|* MACROS CALLPFU, MESSAGE, MOVE, RECALL.
06309 M01S03800.253l688 ---|
06310 M01S03801.253l688 ---|
06311 M01S03802.253l688 ---| PCI SUBR ENTRY/EXIT
06312 M01S03803.253l688 ---| SA6 PCIA SAVE FET ADDRESS
06313 M01S03804.253l688 ---| SA7 PCIB SAVE *PFU* FUNCTION CODE
06314 M01S03805.253l688 ---| RECALL X6 WAIT FOR FET NON BUSY
06315 M01S03806.253l688 ---| SA3 IDSA+/COMSPFS/ADM1
06316 M01S03807.253l688 ---| MOVE 4,MSGC,X3 *WAIT FOR CATALOG INTERLOCK.*
06317 M01S03808.253l688 ---| MESSAGE MSGC,2,R
06318 M01S03809.253l688 ---| SA2 PCIA GET FET ADDRESS
06319 M01S03810.253l688 ---| SA1 PCIB GET *PFU* FUNCTION CODE
06320 M01S03811.253l688 ---| CALLPFU X2,X1,R PROCESS CATALOG TRACK INTERLOCK
06321 M01S03812.253l688 ---| SA3 IDSA+/COMSPFS/ADM1
06322 M01S03813.253l688 ---| MOVE 4,MSGL,X3 CLEAR INTERLOCK MESSAGE
06323 M01S03814.253l688 ---| MESSAGE (=C**),2,R
06324 M01S03815.253l688 ---| EQ PCIX RETURN
06325 M01S03816.253l688 ---|
06326 M01S03817.253l688 ---|
06327 M01S03818.253l688 ---| PCIA BSS 1 TEMPORARY FET ADDRESS STORAGE
06328 M01S03819.253l688 ---| PCIB BSS 1 TEMPORARY PFU FUNCTION CODE STORAGE
Line S03820 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
06329 M01S03820.286l859 ---| PCT SPACE 4,20
06330 M01S03821.286l859 ---|** PCT - PROCESS CATALOG TRACK.
Line S01343 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
06331 M01S01343.286l859 +++| PAR SPACE 4,15
06332 M01S01344.286l859 +++|** PAR - POSITION ALTERNATE STORAGE TAPE TO NEXT RECORD.
06333 M00S03822.pfdump +++|*
Line S03823 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
06334 M01S03823.286l859 ---|* ENTRY FILE *CATS* POSITIONED TO THE BEGINNING OF THE
06335 M01S03824.286l859 ---|* CATALOG TRACK TO BE PROCESSED.
Line S03825 Modification History
M01 (Removed by) ns21000
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
06336 M02S03825.286l859 ---|* (LMSK) = 0, IF NORMAL DUMP PASS.
Line S00021 Modification History
M01 (Added by) ns21000
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
06337 M02S00021.286l859 ---|* (LFDP) = 0, IF NORMAL DUMP PASS.
Line S03826 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
06338 M01S03826.286l859 ---|* .NE. 0, IF LOCK FILE DUMP PASS --
06339 M01S03827.286l859 ---|* (X7) = FWA OF LOCK FILE PFC-S.
06340 M01S03828.286l859 ---|* (X6) = LWA+1 OF LOCK FILE PFC-S.
Line S00022 Modification History
M01 (Added by) ns21000
M02 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
06341 M02S00022.286l859 ---|* (B3) = FWA OF LOCK FILE PFC-S.
Line S01345 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
06342 M01S01345.286l859 +++|* EXIT ALTERNATE STORAGE TAPE POSITIONED TO START OF NEXT
06343 M01S01346.286l859 +++|* RECORD IF NOT CURRENTLY AT EOF OR EOI.
06344 M01S01347.286l859 +++|* (X1) .LT. 0 IF CURRENTLY AT EOF OR EOI.
06345 M01S01348.286l859 +++|* (CWSW) = 0 IF NOT AT EOF OR EOI.
06346 M00S03829.pfdump +++|*
Line S03830 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
06347 M01S03830.286l859 ---|* EXIT ALL FILES MEETING THE SELECTION CRITERIA AND CATALOGED
06348 M01S03831.286l859 ---|* ON THIS TRACK HAVE BEEN DUMPED TO THE ARCHIVE FILE.
Line S01349 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
06349 M01S01349.286l859 +++|* USES X - 6.
06350 M01S01350.286l859 +++|* A - 6.
06351 M00S03832.pfdump +++|*
Line S03833 Modification History
M01 (Removed by) 286l859
Seq # *Modification Id* Act
----------------------------+
06352 M01S03833.286l859 ---|* USES X - 1, 2, 6, 7.
06353 M01S03834.286l859 ---|* A - 1, 6, 7.
06354 M01S03835.286l859 ---|* B - 3, 6.
Line S01351 Modification History
M01 (Added by) 286l859
Seq # *Modification Id* Act
----------------------------+
06355 M01S01351.286l859 +++|* MACROS CWREAD.
06356 M01S01352.286l859 +++|
06357 M01S01353.286l859 +++|
06358 M01S01354.286l859 +++| PAR SUBR ENTRY/EXIT
06359 M01S01355.286l859 +++| PAR1 CWREAD AST,DBUFH,DBUFHL
06360 M01S01356.286l859 +++| ZR X7,PAR2 IF NO READ ERROR
06361 M01S01357.286l859 +++| ZR B7,PAR1 IF TRANSFER COMPLETE
06362 M01S01358.286l859 +++| PAR2 ZR X1,PAR1 IF NOT EOR/EOF/EOI
06363 M01S01359.286l859 +++| NG X1,PARX IF EOF/EOI