Seq # *Modification Id* Act
----------------------------+
| Line S01065 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 253l688 |
M03 (Removed by) | ns2697 |
M04 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
04919 M04S01065.286l859 ---| SA2 X1
04920 M04S01066.286l859 ---| BX7 X1+X2
| Line S00131 Modification History |
M01 (Added by) | 253l688 |
M02 (Removed by) | ns2697 |
M03 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
04921 M03S00131.286l859 ---| SX7 B1+
04922 M03S00132.286l859 ---| SA2 X1 READ SELECTION ENTRY
04923 M03S00133.286l859 ---| LX7 17-0
04924 M03S00134.286l859 ---| BX7 X7+X2 MARK BY SETTING BIT 17
04925 M03S00135.286l859 ---| AX2 18
04926 M03S00136.286l859 ---| ZR X2,PCB12.1 IF NOT FILE NAME SELECTION
| Line S01067 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2697 |
M03 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
04927 M03S01067.286l859 ---| SA7 A2+
| Line S01068 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 253l688 |
M03 (Removed by) | ns2697 |
M04 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
04928 M04S01068.286l859 ---| SA1 CPAR+/COMSPFS/CPNP DECREMENT FILES REMAINING COUNT
| Line S00137 Modification History |
M01 (Added by) | 253l688 |
M02 (Removed by) | ns2697 |
M03 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
04929 M03S00137.286l859 ---| SA1 /COMSPFS/NFIS DECREMENT FILE SELECTION COUNT
| Line S01069 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2697 |
M03 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
04930 M03S01069.286l859 ---| SX7 X1-1
04931 M03S01070.286l859 ---| SA7 A1+
| Line S01071 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 253l688 |
M03 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
04932 M03S01071.286l859 ---| PCB12.1 SA1 CPAR+/COMSPFS/CPLO
04933 M03S01072.286l859 ---| PL X1,PCB12.2 IF CATALOG NOT REQUESTED
04934 M03S01073.286l859 ---| SB2 TCBF
04935 M03S01074.286l859 ---| RJ MCO
04936 M03S01075.286l859 ---| PCB12.2 SX6 B1 SET LOAD FLAG
| Line S00138 Modification History |
M01 (Added by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
04937 M02S00138.286l859 ---|
04938 M02S00139.286l859 ---|* WRITE CATALOG DATA TO OUTPUT AND SUMMARY FILES.
04939 M02S00140.286l859 ---|
| Line S00141 Modification History |
M01 (Added by) | 253l688 |
M02 (Removed by) | ns2697 |
M03 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
04940 M03S00141.286l859 ---| PCB12.1 SX6 TCBF SET CATALOG ENTRY ADDRESS
| Line S00304 Modification History |
M01 (Added by) | ns2697 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
04941 M02S00304.286l859 ---| SX6 TCBF SET CATALOG ENTRY ADDRESS
| Line S00142 Modification History |
M01 (Added by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
04942 M02S00142.286l859 ---| RJ OCD OUTPUT CATALOG DATA
04943 M02S00143.286l859 ---| SX6 B1 SET LOAD FLAG
| Line S01076 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
04944 M02S01076.286l859 ---| EQ PCBX RETURN
04945 M02S01077.286l859 ---|
04946 M02S01078.286l859 ---|* DETERMINE IF END OF INDEX LOAD.
04947 M02S01079.286l859 ---|
04948 M02S01080.286l859 ---| PCB13 SA5 DPCT
04949 M02S01081.286l859 ---| ZR X5,PCB4 IF NOT SELECTIVE LOAD
04950 M02S01082.286l859 ---| SA1 TCBF+FCUI CURRENT USER INDEX
04951 M02S01083.286l859 ---| RJ GCT GET CATALOG TRACK
04952 M02S01084.286l859 ---| NG X6,PCB4 IF USER INDEX DID NOT MAP TO A DEVICE MASK
04953 M02S01085.286l859 ---| IX6 X5-X6
04954 M02S01086.286l859 ---| SX7 B1
04955 M02S01087.286l859 ---| PL X6,PCB4 IF NOT PAST USER INDEX-S CATALOG TRACK
04956 M02S01088.286l859 ---| SA7 EOLF SET END OF LOAD FLAG
04957 M02S01089.286l859 ---| EQ PCB4 SKIP FILE
| Line S02599 Modification History |
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
04958 M01S02599.242l642 ---| PCE SPACE 4,30
| Line S00039 Modification History |
M01 (Added by) | 242l642 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
04959 M02S00039.253l688 ---| PCE SPACE 4,25
| Line S00144 Modification History |
M01 (Added by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
04960 M02S00144.286l859 ---| PCE SPACE 4,30
| Line S00589 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
04961 M01S00589.286l859 +++|
04962 M01S00590.286l859 +++|* PROCESS READ ERROR.
04963 M01S00591.286l859 +++|
04964 M01S00592.286l859 +++| PCB10 SA7 AREF INDICATE READ ERROR
04965 M01S00593.286l859 +++| EQ PCB9 SKIP FILE
04966 M01S00594.286l859 +++| PCE SPACE 4,25
04967 M00S02600.pfload +++|** PCE - PROCESS CATALOG ERROR.
04968 M00S02601.pfload +++|*
04969 M00S02602.pfload +++|* ENTRY (X6) = CATALOG READ OR WRITE ERROR MESSAGE ADDRESS.
04970 M00S02603.pfload +++|* (CPAR+/COMSPFS/CPDN) = MASTER DEVICE NUMBER.
04971 M00S02604.pfload +++|* (CCTR) = CURRENT CATALOG TRACK.
| Line S02605 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
04972 M01S02605.ns22000 ---|* (MAEQ) = MASTER EQUIPMENT NUMBER.
| Line S01090 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
04973 M01S01090.ns22000 +++|* (MAEQ) = MASTER DEVICE EST ORDINAL.
04974 M00S02606.pfload +++|* (*CATS* BUFFER) = CATALOG ENTRIES FOR FILES AFFECTED
04975 M00S02607.pfload +++|* BY THE ERROR. CONTROL WORD FOR
04976 M00S02608.pfload +++|* FIRST SECTOR IN BUFFER CONTAINS
04977 M00S02609.pfload +++|* TRACK AND SECTOR ADDRESS OF THE
04978 M00S02610.pfload +++|* ERROR.
04979 M00S02611.pfload +++|*
04980 M00S02612.pfload +++|* EXIT *PFU* DROPPED.
| Line S02613 Modification History |
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
04981 M01S02613.242l642 ---|* ERROR IDLE STATUS SET FOR MASTER EQUIPMENT.
| Line S00040 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
04982 M01S00040.242l642 +++|* IF A WRITE ERROR, ERROR IDLE STATUS IS SET FOR THE
04983 M01S00041.242l642 +++|* MASTER EQUIPMENT IF DATA ON THE CATALOG FILE HAS
04984 M01S00042.242l642 +++|* BEEN CORRUPTED.
04985 M00S02614.pfload +++|* UTILITY INTERLOCK CLEARED.
04986 M00S02615.pfload +++|* CATALOG ERROR MESSAGES ISSUED.
04987 M00S02616.pfload +++|*
04988 M00S02617.pfload +++|* USES X - 1, 2, 3, 6, 7.
04989 M00S02618.pfload +++|* A - 1, 2, 3, 6, 7.
04990 M00S02619.pfload +++|*
| Line S02620 Modification History |
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
04991 M01S02620.286l859 ---|* CALLS CIN, DUP, SEI, SEM.
04992 M01S02621.286l859 ---|*
04993 M01S02622.286l859 ---|* MACROS EDITS.
| Line S00595 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
04994 M01S00595.286l859 +++|* CALLS CIN, DUP, SEI, SFE.
04995 M00S02623.pfload +++|
04996 M00S02624.pfload +++|
04997 M00S02625.pfload +++| PCE SUBR ENTRY/EXIT
04998 M00S02626.pfload +++| SA6 PCEB SAVE MESSAGE ADDRESS
04999 M00S02627.pfload +++|
05000 M00S02628.pfload +++|* DROP *PFU*.
05001 M00S02629.pfload +++|
| Line S02630 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05002 M01S02630.ns22000 ---| BX6 X6-X6 CLEAR *CATALOG ENTRIES WRITTEN*
| Line S01091 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05003 M01S01091.ns22000 +++| SX6 B0+ CLEAR *CATALOG ENTRIES WRITTEN*
05004 M00S02631.pfload +++| SA6 CEWF
05005 M00S02632.pfload +++| RJ DUP DROP UTILITY PROCESSOR
05006 M00S02633.pfload +++|
05007 M00S02634.pfload +++|* IDENTIFY FAILING DEVICE.
05008 M00S02635.pfload +++|
| Line S02636 Modification History |
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05009 M01S02636.286l859 ---| SA1 CPAR+/COMSPFS/CPDN SET MASTER DEVICE NUMBER
05010 M01S02637.286l859 ---| SA2 CCTR SET CATALOG TRACK
05011 M01S02638.286l859 ---| BX6 X1
05012 M01S02639.286l859 ---| LX7 X2
05013 M01S02640.286l859 ---| SA6 MPDN
05014 M01S02641.286l859 ---| SA7 MPCT
| Line S02642 Modification History |
M01 (Removed by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05015 M02S02642.286l859 ---| SA1 MAEQ SET MASTER EQUIPMENT NUMBER
| Line S01092 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05016 M02S01092.286l859 ---| SA1 MAEQ SET MASTER DEVICE EST ORDINAL
| Line S02643 Modification History |
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05017 M01S02643.286l859 ---| SA3 CATS+3 GET CATALOG FILE OUT POINTER
05018 M01S02644.286l859 ---| BX6 X1
05019 M01S02645.286l859 ---| SA2 X3 GET CURRENT CONTROL WORD
05020 M01S02646.286l859 ---| MX3 -12
05021 M01S02647.286l859 ---| LX2 -24 SET CURRENT SECTOR
05022 M01S02648.286l859 ---| SA6 MPEQ
05023 M01S02649.286l859 ---| BX7 -X3*X2
05024 M01S02650.286l859 ---| LX2 -12 SET CURRENT TRACK
05025 M01S02651.286l859 ---| BX6 -X3*X2
05026 M01S02652.286l859 ---| SA7 MPSC
05027 M01S02653.286l859 ---| SA6 MPTK
05028 M01S02654.286l859 ---| SA1 SACD BUILD CATALOG ERROR MESSAGE
05029 M01S02655.286l859 ---| SA2 PCEB
05030 M01S02656.286l859 ---| EDITS X1,X2
05031 M01S02657.286l859 ---| SX6 B1 SET ERRLOG FLAG
05032 M01S02658.286l859 ---| SA6 ELFG
05033 M01S02659.286l859 ---| RJ SEM SEND ERROR MESSAGE
| Line S00043 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05034 M01S00043.242l642 +++| SA1 PCEB ERROR MESSAGE ADDRESS
| Line S00044 Modification History |
M01 (Added by) | 242l642 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05035 M02S00044.286l859 ---| SX1 X1-MES2
| Line S00596 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05036 M01S00596.286l859 +++| SX1 X1-ERCW
| Line S00045 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05037 M01S00045.242l642 +++| NZ X1,PCE0.1 IF NOT WRITE ERROR
05038 M01S00046.242l642 +++| SA1 CATS GET ERROR CODE FROM FET
05039 M01S00047.242l642 +++| MX2 -6
05040 M01S00048.242l642 +++| LX1 -12
05041 M01S00049.242l642 +++| BX1 -X2*X1 ERROR CODE
05042 M01S00050.242l642 +++| SX1 X1-FEWE
05043 M01S00051.242l642 +++| NZ X1,PCE0.1 IF DATA NOT TRANSFERRED TO DEVICE
| Line S00597 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05044 M01S00597.286l859 +++| SB2 ELWC * ERROR IDLE SET - PF CATALOG WRITE ...*
05045 M00S02660.pfload +++| RJ SEI SET ERROR IDLE STATUS
| Line S02661 Modification History |
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05046 M01S02661.242l642 ---| RJ CIN CLEAR UTILITY INTERLOCK
| Line S00052 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05047 M01S00052.242l642 +++| PCE0.1 RJ CIN CLEAR UTILITY INTERLOCK
05048 M00S02662.pfload +++|
05049 M00S02663.pfload +++|* LIST FILES IN CATALOG BUFFER.
05050 M00S02664.pfload +++|
05051 M00S02665.pfload +++| SA2 CATS+3 SET ADDRESS OF FIRST CONTROL WORD
05052 M00S02666.pfload +++| PCE1 SA1 CATS+2 CHECK IF MORE SECTORS IN BUFFER
05053 M00S02667.pfload +++| IX3 X2-X1
05054 M00S02668.pfload +++| MX6 -12
05055 M00S02669.pfload +++| PL X3,PCEX IF NO MORE SECTORS IN BUFFER
05056 M00S02670.pfload +++| SA1 X2 SET SECTOR WORD COUNT
05057 M00S02671.pfload +++| BX3 -X6*X1
05058 M00S02672.pfload +++| SX2 X2+1 SET ADDRESS OF NEXT CATALOG ENTRY
05059 M00S02673.pfload +++| PCE2 SX3 X3-NWCE DECREMENT SECTOR WORD COUNT
05060 M00S02674.pfload +++| NG X3,PCE1 IF END OF CATALOG SECTOR
05061 M00S02675.pfload +++| SA1 X2+FCFN SET FILE NAME AND USER INDEX
05062 M00S02676.pfload +++| SX2 X2+NWCE ADVANCE CATALOG ENTRY ADDRESS
05063 M00S02677.pfload +++| MX7 -18
| Line S02678 Modification History |
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05064 M01S02678.286l859 ---| BX6 -X7*X1
05065 M01S02679.286l859 ---| ZR X6,PCE2 IF NULL CATALOG ENTRY
05066 M01S02680.286l859 ---| SA6 MPUI
05067 M01S02681.286l859 ---| BX7 X7*X1
05068 M01S02682.286l859 ---| LX6 X2 SAVE CATALOG ENTRY ADDRESS
05069 M01S02683.286l859 ---| SA7 MPFN
| Line S00598 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05070 M01S00598.286l859 +++| BX6 -X7*X1 USER INDEX
05071 M01S00599.286l859 +++| ZR X6,PCE2 IF CATALOG HOLE
05072 M01S00600.286l859 +++| BX6 X2 SAVE CATALOG ENTRY ADDRESS
05073 M00S02684.pfload +++| SA6 PCEA
05074 M00S02685.pfload +++| BX7 X3 SAVE SECTOR WORD COUNT
05075 M00S02686.pfload +++| SA7 A6+B1
| Line S02687 Modification History |
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05076 M01S02687.286l859 ---| SA1 PCEB GENERATE MESSAGE WITH FILE NAME
05077 M01S02688.286l859 ---| EDITS MSFN,X1
05078 M01S02689.286l859 ---| RJ SEM SEND ERROR MESSAGE
| Line S00601 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05079 M01S00601.286l859 +++| SA2 PCEB
05080 M01S00602.286l859 +++| SB2 X2 SET ERROR MESSAGE ADDRESS
05081 M01S00603.286l859 +++| RJ SFE SEND ERROR MESSAGE
| Line S00007 Modification History |
M01 (Added by) | pfloa10 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05082 M02S00007.286l859 ---| RJ AEC ADVANCE ERROR COUNT
05083 M00S02690.pfload +++| SA2 PCEA RESTORE CATALOG ENTRY ADDRESS
05084 M00S02691.pfload +++| SA3 PCEA+1 RESTORE SECTOR WORD COUNT
05085 M00S02692.pfload +++| EQ PCE2 PROCESS NEXT CATALOG ENTRY
05086 M00S02693.pfload +++|
| Line S00145 Modification History |
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
05087 M01S00145.253l688 +++|
| Line S02694 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05088 M01S02694.ns22000 ---| PCEA BSS 2 SECTOR ADDRESS AND LENGTH PARAMETERS
05089 M01S02695.ns22000 ---| PCEB BSS 1 ERROR MESSAGE ADDRESS
| Line S01093 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05090 M01S01093.ns22000 +++| PCEA BSSZ 2 SECTOR ADDRESS AND LENGTH PARAMETERS
05091 M01S01094.ns22000 +++| PCEB CON 0 ERROR MESSAGE ADDRESS
05092 M01S01095.ns22000 +++| PDB SPACE 4,20
05093 M01S01096.ns22000 +++|** PDB - PROCESS DATA BLOCK.
05094 M01S01097.ns22000 +++|*
05095 M01S01098.ns22000 +++|* ENTRY (X3) .LT. 0 IF EOR DETECTED ON ARCHIVE FILE.
05096 M01S01099.ns22000 +++|* .GE. 0 IF EOR NOT DETECTED ON ARCHIVE FILE.
05097 M01S01100.ns22000 +++|* (*CATS* IN POINTER) = ADDRESS OF CATALOG ENTRY.
05098 M01S01101.ns22000 +++|*
05099 M01S01102.ns22000 +++|* EXIT (X6) = 0 IF FILE NOT TO BE LOADED.
05100 M01S01103.ns22000 +++|* = NON-ZERO IF FILE TO BE LOADED.
05101 M01S01104.ns22000 +++|* DATA FOR FILE WRITTEN TO MASS STORAGE.
05102 M01S01105.ns22000 +++|* (SKER) = 1 IF *SKIP TO EOR* REQUIRED.
05103 M01S01106.ns22000 +++|*
05104 M01S01107.ns22000 +++|* USES X - ALL.
05105 M01S01108.ns22000 +++|* A - 1, 2, 3, 4, 6, 7.
05106 M01S01109.ns22000 +++|* B - 6, 7.
05107 M01S01110.ns22000 +++|*
| Line S01111 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05108 M02S01111.286l859 ---|* CALLS AEC, DIF, DWE, RCW, SCE, SEM, WPR.
| Line S00604 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05109 M01S00604.286l859 +++|* CALLS AFE, CFE, DIF, DWE, RCW, SCE, SFE, WPR.
| Line S01112 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05110 M01S01112.ns22000 +++|*
| Line S01113 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05111 M02S01113.286l859 ---|* MACROS CWREAD, EDITS, RECALL.
| Line S00605 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05112 M01S00605.286l859 +++|* MACROS CWREAD, RECALL.
| Line S01114 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05113 M01S01114.ns22000 +++|
05114 M01S01115.ns22000 +++|
05115 M01S01116.ns22000 +++| PDB SUBR ENTRY/EXIT
05116 M01S01117.ns22000 +++|
05117 M01S01118.ns22000 +++|* PRESET DATA PROCESSING PARAMETERS.
05118 M01S01119.ns22000 +++|
05119 M01S01120.ns22000 +++| SA1 TCBF+FCLF SET FILE LENGTH
05120 M01S01121.ns22000 +++| MX0 -24
05121 M01S01122.ns22000 +++| SX2 B1 ADJUST LENGTH FOR EOI
05122 M01S01123.ns22000 +++| LX1 -36
05123 M01S01124.ns22000 +++| BX6 -X0*X1
05124 M01S01125.ns22000 +++| IX7 X6+X2
05125 M01S01126.ns22000 +++| BX5 X5-X5 CLEAR WORD ACCUMULATOR
05126 M01S01127.ns22000 +++| SA1 TCBF+FCBS CHECK FILE TYPE
05127 M01S01128.ns22000 +++| SA7 PDBB
05128 M01S01129.ns22000 +++| BX6 X6-X6 CLEAR *PFU* CONTROL WORD
05129 M01S01130.ns22000 +++| LX1 59-11
05130 M01S01131.ns22000 +++| SA6 PDBD CLEAR BUFFER POINTER
05131 M01S01132.ns22000 +++| SX7 SSBFL INITIALIZE SYSTEM SECTOR LENGTH
05132 M01S01133.ns22000 +++| SA7 PDBC
05133 M01S01134.ns22000 +++| PL X1,PDB1 IF INDIRECT ACCESS FILE
05134 M01S01135.ns22000 +++|
05135 M01S01136.ns22000 +++|* SET DEVICE NUMBER FOR DIRECT ACCESS FILE IN LINKAGE WORD.
05136 M01S01137.ns22000 +++|
05137 M01S01138.ns22000 +++| SA1 TCBF+FCDN GET DN FROM CATALOG
05138 M01S01139.ns22000 +++| MX0 -6
05139 M01S01140.ns22000 +++| LX1 -36
05140 M01S01141.ns22000 +++| BX6 -X0*X1
05141 M01S01142.ns22000 +++| LX6 48
05142 M01S01143.ns22000 +++| NZ X6,PDB1 IF DEVICE SPECIFIED IN CATALOG
05143 M01S01144.ns22000 +++| SA1 CPAR+/COMSPFS/CPDN SET MASTER DEVICE NUMBER
05144 M01S01145.ns22000 +++| LX1 48
05145 M01S01146.ns22000 +++| BX6 X1
05146 M01S01147.ns22000 +++| NZ X1,PDB1 IF DN SPECIFIED
05147 M01S01148.ns22000 +++| MX6 1 SET 4000B FOR PACK DAPF DN
05148 M01S01149.ns22000 +++| PDB1 LX6 24
05149 M01S01150.ns22000 +++|
05150 M01S01151.ns22000 +++|* SET CATALOG ADDRESS IN LINKAGE WORD.
05151 M01S01152.ns22000 +++|
05152 M01S01153.ns22000 +++| SA1 CATS+2 GET ADDRESS OF CATALOG ENTRY
05153 M01S01154.ns22000 +++| LX1 36
05154 M01S01155.ns22000 +++| BX6 X6+X1
05155 M01S01156.ns22000 +++| SA6 LWRD
05156 M01S01157.ns22000 +++| NG X3,PDB13 IF PHYSICAL EOR
05157 M01S01158.ns22000 +++| EQ PDB3
05158 M01S01159.ns22000 +++|
05159 M01S01160.ns22000 +++| PDB2 RJ RCW READ CONTROL WORD
| Line S01161 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05160 M02S01161.286l859 ---| NZ X7,PDB25 IF PARITY ERROR
| Line S00606 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05161 M01S00606.286l859 +++| NZ X7,PDB25 IF READ ERROR
| Line S01162 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05162 M01S01162.ns22000 +++| SX0 X3-3
05163 M01S01163.ns22000 +++| NZ X0,PDB12 IF NOT DATA TYPE
05164 M01S01164.ns22000 +++|
05165 M01S01165.ns22000 +++|* BREAK UP CONTROL WORD
05166 M01S01166.ns22000 +++|
05167 M01S01167.ns22000 +++| PDB3 SA4 CWBF CHECK FOR ERROR CONTROL WORD
| Line S01168 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05168 M02S01168.286l859 ---| SA3 ERCW
| Line S00607 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05169 M01S00607.286l859 +++| SA3 PDBE
| Line S01169 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05170 M01S01169.ns22000 +++| MX0 42
05171 M01S01170.ns22000 +++| BX2 X0*X4
05172 M01S01171.ns22000 +++| BX2 X2-X3
05173 M01S01172.ns22000 +++| ZR X2,PDB26 IF ERROR CONTROL WORD
05174 M01S01173.ns22000 +++| MX0 51
05175 M01S01174.ns22000 +++| BX1 -X0*X4 SET NUMBER OF WORDS
05176 M01S01175.ns22000 +++| AX4 9
05177 M01S01176.ns22000 +++| AX0 6
05178 M01S01177.ns22000 +++| BX0 -X0*X4 SET DATA MARK
05179 M01S01178.ns22000 +++| IX5 X5+X1 INCREMENT WORD COUNT
05180 M01S01179.ns22000 +++|
05181 M01S01180.ns22000 +++|* CHECK FOR SYSTEM SECTOR.
05182 M01S01181.ns22000 +++|
05183 M01S01182.ns22000 +++| SA3 PDBC GET REMAINING SYSTEM SECTOR LENGTH
05184 M01S01183.ns22000 +++| SX4 X0-4
05185 M01S01184.ns22000 +++| BX7 X7-X7
05186 M01S01185.ns22000 +++| BX6 X4+X3
05187 M01S01186.ns22000 +++| ZR X6,PDB12 IF SYSTEM SECTOR NOT BOI
05188 M01S01187.ns22000 +++| ZR X4,PDB4 IF SYSTEM SECTOR
05189 M01S01188.ns22000 +++| ZR X3,PDB6 IF SYSTEM SECTOR PROCESSING COMPLETED
05190 M01S01189.ns22000 +++| SX7 X3-SSBFL
05191 M01S01190.ns22000 +++| ZR X7,PDB5 IF BOI NOT SYSTEM SECTOR
| Line S01191 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05192 M02S01191.286l859 ---| EQ PDB28 PROCESS TRUNCATED SYSTEM SECTOR
| Line S00608 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05193 M01S00608.286l859 +++| SB2 ERAB * ARCHIVE FILE BLOCK ERROR ...*
05194 M01S00609.286l859 +++| EQ PDB27 ISSUE MESSAGE AND SUPPRESS FILE LOAD
| Line S01192 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05195 M01S01192.ns22000 +++|
05196 M01S01193.ns22000 +++| PDB4 IX7 X3-X1 DECREMENT REMAINING SYSTEM SECTOR LENGTH
| Line S01194 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05197 M02S01194.286l859 ---| NG X7,PDB29 IF SYSTEM SECTOR TOO LONG
| Line S00610 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05198 M01S00610.286l859 +++| PL X7,PDB5 IF SYSTEM SECTOR NOT TOO LONG
05199 M01S00611.286l859 +++| SB2 ERAB * ARCHIVE FILE BLOCK ERROR ...*
05200 M01S00612.286l859 +++| EQ PDB27 ISSUE MESSAGE AND SUPPRESS FILE LOAD
| Line S01195 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05201 M01S01195.ns22000 +++|
| Line S01196 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05202 M02S01196.286l859 ---|* READ TAPE INTO BUFFER
| Line S00613 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05203 M01S00613.286l859 +++|* READ FILE DATA INTO BUFFER.
| Line S01197 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05204 M01S01197.ns22000 +++|
05205 M01S01198.ns22000 +++| PDB5 SA7 PDBC SAVE REMAINING SYSTEM SECTOR LENGTH
05206 M01S01199.ns22000 +++| PDB6 ZR X5,PDB8 IF NO WORDS TO READ
05207 M01S01200.ns22000 +++| SA4 PDBD POINTER TO NEXT AVAILABLE WORD
05208 M01S01201.ns22000 +++| BX3 -X4
05209 M01S01202.ns22000 +++| SX3 X3+100B
05210 M01S01203.ns22000 +++| IX2 X5-X3
05211 M01S01204.ns22000 +++| PL X2,PDB7 IF NOT ENOUGH SPACE
05212 M01S01205.ns22000 +++| IX6 X4+X5 NEW POINTER
05213 M01S01206.ns22000 +++| SA6 A4
05214 M01S01207.ns22000 +++| CWREAD TAPE,TDBF+X4,X5
| Line S01208 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05215 M02S01208.286l859 ---| NZ X7,PDB25 IF PARITY ERROR
| Line S00614 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05216 M01S00614.286l859 +++| NZ X7,PDB25 IF READ ERROR
| Line S01209 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05217 M01S01209.ns22000 +++| BX5 X5-X5 CLEAR WORD COUNT
05218 M01S01210.ns22000 +++| ZR X0,PDB2 IF NO FILE MARK
05219 M01S01211.ns22000 +++| SX2 X0-4
05220 M01S01212.ns22000 +++| ZR X2,PDB2 IF FIRST PART OF SPLIT SYSTEM SECTOR
05221 M01S01213.ns22000 +++| SX0 X0-1
05222 M01S01214.ns22000 +++| ZR X0,PDB10 IF EOR
| Line S01215 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05223 M02S01215.286l859 ---| EDITS MSFN,MES20 * PFLOAD - MISSING EOR.*
05224 M02S01216.286l859 ---| RJ SEM SEND ERROR MESSAGE
05225 M02S01217.286l859 ---| EQ PDB22 PROCESS TAPE ERROR
| Line S00615 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05226 M01S00615.286l859 +++| SB2 ERAB * ARCHIVE FILE BLOCK ERROR ...*
05227 M01S00616.286l859 +++| EQ PDB22 PROCESS ARCHIVE FILE ERROR
| Line S01218 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05228 M01S01218.ns22000 +++|
05229 M01S01219.ns22000 +++|* PROCESS BUFFER WITH NOT ENOUGH SPACE AVAILABLE.
05230 M01S01220.ns22000 +++|
05231 M01S01221.ns22000 +++| PDB7 SX6 B0+ RESET WORDS WRITTEN
05232 M01S01222.ns22000 +++| SA6 A4
05233 M01S01223.ns22000 +++| IX5 X5-X3 WORDS LEFT IN MAIN BUFFER
05234 M01S01224.ns22000 +++| CWREAD TAPE,TDBF+X4,X3
| Line S01225 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05235 M02S01225.286l859 ---| NZ X7,PDB25 IF PARITY ERROR
| Line S00617 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05236 M01S00617.286l859 +++| NZ X7,PDB25 IF READ ERROR
| Line S01226 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05237 M01S01226.ns22000 +++| SX6 100B
05238 M01S01227.ns22000 +++| EQ PDB14 PROCESS BLOCK
05239 M01S01228.ns22000 +++|
05240 M01S01229.ns22000 +++|* PROCESS FILE MARKS.
05241 M01S01230.ns22000 +++|
05242 M01S01231.ns22000 +++| PDB8 ZR X0,PDB2 IF PLAIN DATA BLOCK
05243 M01S01232.ns22000 +++| SX2 X0-4
05244 M01S01233.ns22000 +++| ZR X2,PDB2 IF SYSTEM SECTOR
05245 M01S01234.ns22000 +++| SX2 X0-1
05246 M01S01235.ns22000 +++| NZ X2,PDB11 IF NOT EOR
05247 M01S01236.ns22000 +++|
05248 M01S01237.ns22000 +++|* PROCESS EOR WITH ZERO LENGTH PRU.
05249 M01S01238.ns22000 +++|
05250 M01S01239.ns22000 +++| SX6 B0+ SET PRU LENGTH TO ZERO
05251 M01S01240.ns22000 +++| PDB9 BX0 X0-X0 CLEAR DATA MARK
05252 M01S01241.ns22000 +++| EQ PDB14 PROCESS DATA BLOCK
05253 M01S01242.ns22000 +++|
05254 M01S01243.ns22000 +++|* PROCESS EOR WITH SHORT PRU.
05255 M01S01244.ns22000 +++|
05256 M01S01245.ns22000 +++| PDB10 SA1 PDBD SET PRU LENGTH
05257 M01S01246.ns22000 +++| BX6 X1
05258 M01S01247.ns22000 +++| BX7 X7-X7 CLEAR WORDS WRITTEN
05259 M01S01248.ns22000 +++| SA7 A1
05260 M01S01249.ns22000 +++| EQ PDB14 PROCESS DATA BLOCK
05261 M01S01250.ns22000 +++|
05262 M01S01251.ns22000 +++|* PROCESS EOF.
05263 M01S01252.ns22000 +++|
05264 M01S01253.ns22000 +++| PDB11 SX6 DLEF SET EOF INDICATOR
05265 M01S01254.ns22000 +++| LX6 54
05266 M01S01255.ns22000 +++| EQ PDB9 CLEAR DATA MARK
05267 M01S01256.ns22000 +++|
05268 M01S01257.ns22000 +++|* PROCESS EOI.
05269 M01S01258.ns22000 +++|
05270 M01S01259.ns22000 +++| PDB12 NG X3,PDB13 IF EOI
| Line S01260 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05271 M02S01260.286l859 ---| EDITS MSFN,MES22 * PFLOAD - NO EOI FOR FILE.*
05272 M02S01261.286l859 ---| RJ SEM
| Line S00618 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05273 M01S00618.286l859 +++| SB2 ERAB * ARCHIVE FILE BLOCK ERROR ...*
| Line S01262 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05274 M01S01262.ns22000 +++| EQ PDB22 PROCESS MISSING EOI
05275 M01S01263.ns22000 +++|
05276 M01S01264.ns22000 +++| PDB13 SX0 3 SET EOI CONDITION
05277 M01S01265.ns22000 +++| SX6 DLEI SET EOI INDICATOR
05278 M01S01266.ns22000 +++| LX6 54
05279 M01S01267.ns22000 +++|
05280 M01S01268.ns22000 +++|* PROCESS DATA BLOCK
05281 M01S01269.ns22000 +++|
05282 M01S01270.ns22000 +++| PDB14 SA1 LWRD SET PRU LENGTH
05283 M01S01271.ns22000 +++| MX2 48
05284 M01S01272.ns22000 +++| BX2 -X2*X6
05285 M01S01273.ns22000 +++| SB7 X2+B1
05286 M01S01274.ns22000 +++| MX2 42
05287 M01S01275.ns22000 +++| LX2 54
05288 M01S01276.ns22000 +++| BX1 X2*X1
05289 M01S01277.ns22000 +++| BX6 X6+X1
05290 M01S01278.ns22000 +++| SX3 X0-4
05291 M01S01279.ns22000 +++| ZR X3,PDB15 IF SYSTEM SECTOR
05292 M01S01280.ns22000 +++| SA1 PDBB DECREMENT LENGTH
05293 M01S01281.ns22000 +++| SX2 B1
05294 M01S01282.ns22000 +++| IX7 X1-X2
05295 M01S01283.ns22000 +++| SX3 X0-3
05296 M01S01284.ns22000 +++| IX1 X7-X2
05297 M01S01285.ns22000 +++| PL X1,PDB16 IF MORE LENGTH INDICATED BY CATALOG
05298 M01S01286.ns22000 +++| ZR X3,PDB17 IF EOI
05299 M01S01287.ns22000 +++| EQ PDB22 PROCESS FILE TOO LONG
05300 M01S01288.ns22000 +++|
05301 M01S01289.ns22000 +++|* PROCESS SYSTEM SECTOR.
05302 M01S01290.ns22000 +++|
05303 M01S01291.ns22000 +++| PDB15 SX1 DLSS SET SYSTEM SECTOR INDICATOR
05304 M01S01292.ns22000 +++| LX1 54
05305 M01S01293.ns22000 +++| BX6 X6+X1
05306 M01S01294.ns22000 +++| BX0 X0-X0 CLEAR DATA MARK
05307 M01S01295.ns22000 +++| EQ PDB18 WRITE SYSTEM SECTOR TO DATA FILE
05308 M01S01296.ns22000 +++|
05309 M01S01297.ns22000 +++|* WRITE SECTOR TO DATA FILE.
05310 M01S01298.ns22000 +++|
05311 M01S01299.ns22000 +++| PDB16 ZR X3,PDB21 IF FILE TOO SHORT
05312 M01S01300.ns22000 +++| PDB17 SA7 A1 SAVE REMAINING LENGTH
05313 M01S01301.ns22000 +++| PDB18 SA6 LWRD SAVE DATA LINKAGE WORD
05314 M01S01302.ns22000 +++| SB6 A6 SET BUFFER ADDRESS
05315 M01S01303.ns22000 +++| PDB19 SX2 DATA
05316 M01S01304.ns22000 +++| RJ WPR WRITE SECTOR TO DATA FILE
05317 M01S01305.ns22000 +++| NZ B7,PDB20 IF WRITE ERROR
05318 M01S01306.ns22000 +++| SX1 X0-3
05319 M01S01307.ns22000 +++| NZ X1,PDB6 IF NOT EOI
05320 M01S01308.ns22000 +++| SX6 B1+ SELECT FILE LOADING
05321 M01S01309.ns22000 +++| EQ PDBX RETURN
05322 M01S01310.ns22000 +++|
05323 M01S01311.ns22000 +++|* PROCESS DATA WRITE ERROR.
05324 M01S01312.ns22000 +++|
05325 M01S01313.ns22000 +++| PDB20 BX6 X0 SAVE ARCHIVE CONTROL WORD PARAMETERS
05326 M01S01314.ns22000 +++| LX7 X5
05327 M01S01315.ns22000 +++| SA6 PDBA
05328 M01S01316.ns22000 +++| SA7 A6+B1
05329 M01S01317.ns22000 +++| RJ DWE PROCESS DATA WRITE ERROR
05330 M01S01318.ns22000 +++| SA1 PDBA RESTORE ARCHIVE CONTROL WORD PARAMETERS
05331 M01S01319.ns22000 +++| SA2 A1+B1
05332 M01S01320.ns22000 +++| BX0 X1
05333 M01S01321.ns22000 +++| LX5 X2
05334 M01S01322.ns22000 +++| SA1 LWRD RESTORE SECTOR WORD COUNT
05335 M01S01323.ns22000 +++| MX2 -12
05336 M01S01324.ns22000 +++| BX3 -X2*X1
05337 M01S01325.ns22000 +++| SB6 A1 RESTORE BUFFER ADDRESS
05338 M01S01326.ns22000 +++| SA1 BFCA CHECK IF ERROR ON CURRENT FILE
05339 M01S01327.ns22000 +++| SA2 CATS+2
05340 M01S01328.ns22000 +++| SB7 X3+B1
05341 M01S01329.ns22000 +++| BX7 X1-X2
05342 M01S01330.ns22000 +++| NZ X7,PDB19 IF ERROR NOT ON CURRENT FILE
05343 M01S01331.ns22000 +++| SA1 PDBB LENGTH NOT WRITTEN TO BUFFER
05344 M01S01332.ns22000 +++| SA3 X2+FCLF ADJUST CATALOG LENGTH
05345 M01S01333.ns22000 +++| LX1 36
05346 M01S01334.ns22000 +++| IX7 X3-X1
05347 M01S01335.ns22000 +++| SX6 B1 SELECT FILE LOADING
05348 M01S01336.ns22000 +++| SA7 A3
05349 M01S01337.ns22000 +++| SA6 SKER SET SKIP TO EOR FLAG
05350 M01S01338.ns22000 +++| EQ PDBX RETURN
05351 M01S01339.ns22000 +++|
05352 M01S01340.ns22000 +++|* PROCESS FILE TOO SHORT.
05353 M01S01341.ns22000 +++|
| Line S01342 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05354 M02S01342.286l859 ---| PDB21 EDITS MSFN,MES19 * PFLOAD - FILE TRUNCATED.*
05355 M02S01343.286l859 ---| RJ SEM
| Line S00619 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05356 M01S00619.286l859 +++| PDB21 SA1 TCBF+FCUI
05357 M01S00620.286l859 +++| SB2 ERFT * FILE TRUNCATED ...*
05358 M01S00621.286l859 +++| RJ SFE SEND ERROR MESSAGE
| Line S01344 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05359 M02S01344.286l859 ---| RJ AEC ADVANCE ERROR COUNT
| Line S01345 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05360 M01S01345.ns22000 +++| EQ PDB24 PROCESS TRUNCATED FILE
05361 M01S01346.ns22000 +++|
05362 M01S01347.ns22000 +++|* PROCESS ERRORS.
05363 M01S01348.ns22000 +++|
| Line S01349 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05364 M02S01349.286l859 ---| PDB22 EDITS MSFN,MES16 * PFLOAD - TAPE ERROR.*
05365 M02S01350.286l859 ---| RJ SEM
05366 M02S01351.286l859 ---| RJ AEC ADVANCE ERROR COUNT
05367 M02S01352.286l859 ---| PDB23 SX6 B1+ SET SKIP TO EOR FLAG
| Line S00622 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05368 M01S00622.286l859 +++| PDB22 SA1 TCBF+FCUI
05369 M01S00623.286l859 +++| RJ SFE SEND ERROR MESSAGE
05370 M01S00624.286l859 +++| SX6 B1+ SET SKIP TO EOR FLAG
| Line S01353 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05371 M01S01353.ns22000 +++| SA6 SKER
05372 M01S01354.ns22000 +++| PDB24 SA2 PDBB UPDATE LENGTH IN CATALOG
05373 M01S01355.ns22000 +++| SX1 B1
05374 M01S01356.ns22000 +++| IX7 X2-X1 ALLOW FOR EOI SECTOR
05375 M01S01357.ns22000 +++| ZR X7,PDB13 IF NO CATALOG CHANGE
05376 M01S01358.ns22000 +++| MX6 0
05377 M01S01359.ns22000 +++| SA6 A2
05378 M01S01360.ns22000 +++| RECALL DATA WAIT FOR *PFU* COMPLETION
05379 M01S01361.ns22000 +++| SA1 CATS+2 SET NEW LENGTH IN CATALOG
05380 M01S01362.ns22000 +++| SA2 X1+FCLF
05381 M01S01363.ns22000 +++| LX2 24
05382 M01S01364.ns22000 +++| IX6 X2-X7 NEW FILE LENGTH
05383 M01S01365.ns22000 +++| LX6 36
05384 M01S01366.ns22000 +++| SA6 A2
05385 M01S01367.ns22000 +++| EQ PDB13 FORCE EOI
05386 M01S01368.ns22000 +++|
| Line S01369 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05387 M02S01369.286l859 ---|* PROCESS PARITY ERROR.
| Line S00625 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05388 M01S00625.286l859 +++|* PROCESS READ ERROR.
| Line S01370 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05389 M01S01370.ns22000 +++|
| Line S01371 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05390 M02S01371.286l859 ---| PDB25 EDITS MSFN,MES15 * PFLOAD - PARITY ERROR.*
05391 M02S01372.286l859 ---| RJ SEM
05392 M02S01373.286l859 ---| RJ AEC ADVANCE ERROR COUNT
05393 M02S01374.286l859 ---| EQ PDB23 PROCESS ERROR
| Line S00626 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05394 M01S00626.286l859 +++| PDB25 SB2 ERAR * ARCHIVE FILE READ ERROR ...*
05395 M01S00627.286l859 +++| EQ PDB22 PROCESS ERROR
| Line S01375 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05396 M01S01375.ns22000 +++|
05397 M01S01376.ns22000 +++|* PROCESS ERROR CONTROL WORD.
05398 M01S01377.ns22000 +++|
05399 M01S01378.ns22000 +++| PDB26 SX6 FEDT SET DATA ERROR IN CATALOG
05400 M01S01379.ns22000 +++| RJ SCE
05401 M01S01380.ns22000 +++| SA1 CWBF CLEAR CONTROL WORD ERROR FLAGS
05402 M01S01381.ns22000 +++| MX7 -15
05403 M01S01382.ns22000 +++| BX6 -X7*X1
05404 M01S01383.ns22000 +++| LX1 -15 GET ERROR TYPE
05405 M01S01384.ns22000 +++| MX7 -3
05406 M01S01385.ns22000 +++| BX2 -X7*X1
05407 M01S01386.ns22000 +++| SA6 A1
05408 M01S01387.ns22000 +++| ZR X2,PDB21 IF TRUNCATED FILE ERROR
05409 M01S01388.ns22000 +++| SA1 CPAR+/COMSPFS/CPEO
05410 M01S01389.ns22000 +++| NZ X1,PDB27 IF BAD FILE PROCESSING SUPPRESSED
05411 M01S01390.ns22000 +++| SX7 X2-2
05412 M01S01391.ns22000 +++| NZ X7,PDB3 IF NOT SUPPRESSED FILE CONTROL WORD
| Line S01392 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05413 M02S01392.286l859 ---| PDB27 RJ DIF DELETE INCOMPLETE FILE
| Line S00628 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05414 M01S00628.286l859 +++| SB2 EREO * FILE LOAD SUPPRESSED BY ERROR ...*
05415 M01S00629.286l859 +++|
05416 M01S00630.286l859 +++|* ISSUE ERROR MESSAGE AND SUPRESS FILE LOAD.
05417 M01S00631.286l859 +++|
05418 M01S00632.286l859 +++| PDB27 SA1 TCBF SET FILE NAME AND USER INDEX
05419 M01S00633.286l859 +++| RJ SFE SEND ERROR MESSAGE
05420 M01S00634.286l859 +++| RJ CFE COUNT FILE NOT LOADED
05421 M01S00635.286l859 +++| RJ DIF DELETE INCOMPLETE FILE
| Line S01393 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05422 M01S01393.ns22000 +++| SX7 B1 SET SKIP TO EOR FLAG
05423 M01S01394.ns22000 +++| BX6 X6-X6 CLEAR LOAD FLAG
05424 M01S01395.ns22000 +++| SA7 SKER
05425 M01S01396.ns22000 +++| EQ PDBX RETURN
05426 M01S01397.ns22000 +++|
| Line S01398 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05427 M02S01398.286l859 ---|* PROCESS WRONG LENGTH SYSTEM SECTOR.
05428 M02S01399.286l859 ---|
05429 M02S01400.286l859 ---| PDB28 EDITS MSFN,MES9 * PFLOAD - SYSTEM SECTOR TRUNCATED*
05430 M02S01401.286l859 ---| EQ PDB30 SEND ERROR MESSAGE
05431 M02S01402.286l859 ---|
05432 M02S01403.286l859 ---| PDB29 EDITS MSFN,MES10 * PFLOAD - SYSTEM SECTOR TOO LONG*
05433 M02S01404.286l859 ---| PDB30 RJ SEM
| Line S00008 Modification History |
M01 (Added by) | pfloa10 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05434 M02S00008.286l859 ---| RJ AEC ADVANCE ERROR COUNT
| Line S01405 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05435 M02S01405.286l859 ---| EQ PDB27 DELETE INCOMPLETE FILE
05436 M02S01406.286l859 ---|
| Line S00146 Modification History |
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
05437 M01S00146.253l688 +++|
| Line S01407 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05438 M01S01407.ns22000 +++| PDBA BSSZ 2 ARCHIVE CONTROL WORD PARAMETERS
05439 M01S01408.ns22000 +++| PDBB CON 0 LENGTH ACCUMULATOR
05440 M01S01409.ns22000 +++| PDBC CON 0 REMAINING SYSTEM SECTOR LENGTH
05441 M01S01410.ns22000 +++| PDBD CON 0 WORDS WRITTEN
| Line S01411 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05442 M02S01411.286l859 ---| ERCW VFD 42/7HERROR**,18/0
| Line S00636 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05443 M01S00636.286l859 +++| PDBE VFD 42/7HERROR**,18/0
| Line S01412 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
05444 M02S01412.253l688 ---| PDF SPACE 4,15
| Line S00147 Modification History |
M01 (Added by) | 253l688 |
M02 (Removed by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05445 M02S00147.ns2697 ---| PDF SPACE 4,20
| Line S01413 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05446 M02S01413.ns2697 ---|** PDF - PROCESS DIRECT ACCESS FILE.
05447 M02S01414.ns2697 ---|*
05448 M02S01415.ns2697 ---|* ENTRY (TCBF) = PF CATALOG ENTRY.
05449 M02S01416.ns2697 ---|*
05450 M02S01417.ns2697 ---|* EXIT DEVICE SELECTED AND SET IN PFC ENTRY.
05451 M02S01418.ns2697 ---|* (X5) = 0, IF NO ERROR IN DEVICE SELECTION.
05452 M02S01419.ns2697 ---|* .NE. 0 IF ERROR. MESSAGE HAS BEEN ISSUED.
05453 M02S01420.ns2697 ---|*
05454 M02S01421.ns2697 ---|* USES X - ALL.
05455 M02S01422.ns2697 ---|* A - 1, 2, 3, 5, 6, 7.
05456 M02S01423.ns2697 ---|* B - 2, 7.
05457 M02S01424.ns2697 ---|*
05458 M02S01425.ns2697 ---|* CALLS CAL, RAS, SEM, SFD, SLD.
05459 M02S01426.ns2697 ---|*
05460 M02S01427.ns2697 ---|* MACROS EDITS.
05461 M02S01428.ns2697 ---|
05462 M02S01429.ns2697 ---| PDF SUBR ENTRY/EXIT
05463 M02S01430.ns2697 ---| MX0 -6
05464 M02S01431.ns2697 ---| SA1 CPAR+/COMSPFS/CPPN
05465 M02S01432.ns2697 ---| BX5 X5-X5 SET NO ERROR
| Line S00001 Modification History |
M01 (Added by) | pfloa12 |
M02 (Removed by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05466 M02S00001.ns2697 ---| SA3 PFCO
| Line S01433 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05467 M02S01433.ns2697 ---| SA2 TCBF+FCDN GET DEVICE NUMBER FROM CATALOG
| Line S00002 Modification History |
M01 (Added by) | pfloa12 |
M02 (Removed by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05468 M02S00002.ns2697 ---| ZR X3,PDF0 IF *PFC ONLY* FILE
| Line S01434 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05469 M02S01434.ns2697 ---| ZR X1,PDF1 IF NOT AN AUXILIARY DEVICE LOAD
| Line S01435 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | pfloa12 |
M03 (Removed by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05470 M03S01435.ns2697 ---| LX0 36 CLEAR DEVICE NUMBER
| Line S00003 Modification History |
M01 (Added by) | pfloa12 |
M02 (Removed by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05471 M02S00003.ns2697 ---| PDF0 LX0 36 CLEAR DEVICE NUMBER
| Line S01436 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05472 M02S01436.ns2697 ---| BX6 X0*X2
05473 M02S01437.ns2697 ---| SA6 A2+
| Line S00004 Modification History |
M01 (Added by) | pfloa12 |
M02 (Removed by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05474 M02S00004.ns2697 ---| ZR X3,PDFX IF *PFC ONLY* FILE
| Line S01438 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | pfloa5 |
M03 (Removed by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05475 M03S01438.ns2697 ---| EQ PDFX RETURN
| Line S00001 Modification History |
M01 (Added by) | pfloa5 |
M02 (Removed by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05476 M02S00001.ns2697 ---| SB7 MSTT+1 SET TABLE ADDRESS
05477 M02S00002.ns2697 ---| EQ PDF15 CHECK FOR SPACE AVAILABLE
| Line S01439 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05478 M02S01439.ns2697 ---|
05479 M02S01440.ns2697 ---| PDF1 SA1 TCBF+FCUI USER INDEX
05480 M02S01441.ns2697 ---| SX4 X1-SBUI
05481 M02S01442.ns2697 ---| NG X4,PDF2 IF NOT *MSF* SUBFAMILY USER INDEX
05482 M02S01443.ns2697 ---| BX3 -X4
05483 M02S01444.ns2697 ---| SX4 X3+MNSF-1
05484 M02S01445.ns2697 ---| PDF2 SA3 CPAR+/COMSPFS/CPDN MASTER DEVICE NUMBER
05485 M02S01446.ns2697 ---| LX2 -36
05486 M02S01447.ns2697 ---| BX1 -X0*X2 DEVICE NUMBER FROM CATALOG
05487 M02S01448.ns2697 ---| IX6 X2-X1
05488 M02S01449.ns2697 ---| BX7 X1-X3
05489 M02S01450.ns2697 ---| NG X4,PDF3 IF NOT *MSF* SUBFAMILY USER INDEX
05490 M02S01451.ns2697 ---| SX7 B0+ FORCE MASTER DEVICE
05491 M02S01452.ns2697 ---| SX1 B0+
05492 M02S01453.ns2697 ---| PDF3 NZ X7,PDF4 IF DEVICE FROM PFC NOT MASTER DEVICE
05493 M02S01454.ns2697 ---| LX6 36 CLEAR DEVICE NUMBER FROM CATALOG
05494 M02S01455.ns2697 ---| SA6 A2
05495 M02S01456.ns2697 ---| PDF4 ZR X1,PDF5 IF DEVICE FROM CATALOG IS ZERO
05496 M02S01457.ns2697 ---| SX3 X1+ USE DEVICE NUMBER FROM CATALOG
05497 M02S01458.ns2697 ---|
05498 M02S01459.ns2697 ---|* SEARCH FOR DIRECT ACCESS DEVICE.
05499 M02S01460.ns2697 ---|
05500 M02S01461.ns2697 ---| PDF5 BX2 X3
05501 M02S01462.ns2697 ---| RJ SFD SEARCH FOR DEVICE
05502 M02S01463.ns2697 ---| ZR X1,PDF6 IF DEVICE NOT FOUND
05503 M02S01464.ns2697 ---| LX1 -6 SET DAPF EST ORDINAL
05504 M02S01465.ns2697 ---| MX7 -9
05505 M02S01466.ns2697 ---| BX7 -X7*X1 EXTRACT EST ORDINAL
05506 M02S01467.ns2697 ---| SA7 DAEQ
05507 M02S01468.ns2697 ---| SA2 TCBF+FCUI USER INDEX OF FILE
05508 M02S01469.ns2697 ---| MX6 -3
05509 M02S01470.ns2697 ---| BX2 -X6*X2
05510 M02S01471.ns2697 ---| SA1 A1+B1 GET SECONDARY MASK OF DEVICE
05511 M02S01472.ns2697 ---| SB7 A1 SAVE TABLE ADDRESS
05512 M02S01473.ns2697 ---| SB2 X2+8-59
05513 M02S01474.ns2697 ---| AX6 X1,B2 SELECT CORRECT MASK BIT
05514 M02S01475.ns2697 ---| NG X6,PDF12 IF USER INDEX ALLOWED ON DEVICE
05515 M02S01476.ns2697 ---| PL X4,PDFX IF *MSF* SUBFAMILY USER INDEX
05516 M02S01477.ns2697 ---|
05517 M02S01478.ns2697 ---|* CHECK DESTINATION DEVICE.
05518 M02S01479.ns2697 ---|
05519 M02S01480.ns2697 ---| PDF6 SA1 CPAR+/COMSPFS/CPDD DESTINATION DEVICE
05520 M02S01481.ns2697 ---| ZR X1,PDF7 IF DESTINATION DEVICE NOT SPECIFIED
05521 M02S01482.ns2697 ---| SA2 TCBF+FCUI USER INDEX OF FILE
05522 M02S01483.ns2697 ---| MX0 -6
05523 M02S01484.ns2697 ---| BX7 -X0*X1 DESTINATION DEVICE
05524 M02S01485.ns2697 ---| LX1 -6 *MSTT* ADDRESS OF *DD*
05525 M02S01486.ns2697 ---| SA3 X1+B1 SECONDARY MASK OF *DD*
05526 M02S01487.ns2697 ---| SB7 A3+ SAVE TABLE ADDRESS
05527 M02S01488.ns2697 ---| MX1 -3
05528 M02S01489.ns2697 ---| BX2 -X1*X2
05529 M02S01490.ns2697 ---| SA1 CPAR+/COMSPFS/CPDN MASTER DEVICE NUMBERR
05530 M02S01491.ns2697 ---| SB2 X2+8-59
05531 M02S01492.ns2697 ---| AX3 X3,B2 POSITION MASK BIT
05532 M02S01493.ns2697 ---| BX2 X1-X7 COMPARE *DD* WITH MASTER DEVICE
05533 M02S01494.ns2697 ---| NG X3,PDF10 IF USER INDEX ALLOWED ON DEVICE
05534 M02S01495.ns2697 ---| PDF7 SA1 CPAR+/COMSPFS/CPOP
05535 M02S01496.ns2697 ---| LX1 59-54
05536 M02S01497.ns2697 ---| NG X1,PDF13 IF *OP=L* SPECIFIED
05537 M02S01498.ns2697 ---|
05538 M02S01499.ns2697 ---|* NO DEVICE FOUND TO LOAD DIRECT ACCESS FILE ON.
05539 M02S01500.ns2697 ---|
05540 M02S01501.ns2697 ---| PDF8 SX5 MES12 *PFLOAD - ALTERNATE DEVICE NOT FOUND*
05541 M02S01502.ns2697 ---| PDF9 EDITS MSFN,X5 FORMAT ERROR MESSAGE
05542 M02S01503.ns2697 ---| RJ SEM
05543 M02S01504.ns2697 ---| EQ PDFX RETURN
05544 M02S01505.ns2697 ---|
05545 M02S01506.ns2697 ---|* PROCESS DEVICE FOUND.
05546 M02S01507.ns2697 ---|
05547 M02S01508.ns2697 ---| PDF10 SA1 A3-B1 SET DAPF EST ORDINAL
05548 M02S01509.ns2697 ---| SA3 TCBF+FCDN CLEAR DEVICE NUMBER FROM CATALOG
05549 M02S01510.ns2697 ---| LX1 -6
05550 M02S01511.ns2697 ---| MX6 -9 SET EST ORDINAL
05551 M02S01512.ns2697 ---| BX6 -X6*X1
05552 M02S01513.ns2697 ---| LX0 36
05553 M02S01514.ns2697 ---| SA6 DAEQ
05554 M02S01515.ns2697 ---| BX1 X0*X3
05555 M02S01516.ns2697 ---| NZ X2,PDF11 IF *DD* NOT EQUAL TO MASTER DEVICE
05556 M02S01517.ns2697 ---| BX7 X7-X7 CLEAR DEVICE NUMBER IN CATALOG
05557 M02S01518.ns2697 ---| PDF11 LX7 36 PUT *DD* IN CATALOG
05558 M02S01519.ns2697 ---| BX6 X1+X7
05559 M02S01520.ns2697 ---| SA6 A3+
05560 M02S01521.ns2697 ---|
05561 M02S01522.ns2697 ---|* LOAD LEVEL FILES IF *OP=L* SPECIFIED.
05562 M02S01523.ns2697 ---|
05563 M02S01524.ns2697 ---| PDF12 SA1 CPAR+/COMSPFS/CPOP
05564 M02S01525.ns2697 ---| LX1 59-54
05565 M02S01526.ns2697 ---| PL X1,PDF15 IF *OP=L* NOT SPECIFIED
05566 M02S01527.ns2697 ---| PDF13 RJ SLD SELECT LARGEST DEVICE
05567 M02S01528.ns2697 ---| ZR X4,PDF8 IF NO DEVICE FOUND
05568 M02S01529.ns2697 ---| NG X4,PDF16 IF ACCESS LEVEL PREVENTS SELECTION
05569 M02S01530.ns2697 ---| PL X5,PDF17 IF SPACE FOR FILE ON DEVICE
05570 M02S01531.ns2697 ---| PDF14 SX5 MES13 * PFLOAD - NO SPACE FOR FILE*
05571 M02S01532.ns2697 ---| EQ PDF9 ISSUE MESSAGE AND SKIP FILE
05572 M02S01533.ns2697 ---|
05573 M02S01534.ns2697 ---|* CHECK IF ENOUGH SPACE FOR FILE ON SELECTED DEVICE.
05574 M02S01535.ns2697 ---|
05575 M02S01536.ns2697 ---| PDF15 SA5 B7+ GET TABLE ENTRY
05576 M02S01537.ns2697 ---| RJ RAS RETURN AVAILABLE SPACE
05577 M02S01538.ns2697 ---| SA2 TCBF+FCLF GET FILE LENGTH
05578 M02S01539.ns2697 ---| AX2 36
05579 M02S01540.ns2697 ---| IX3 X1-X2
05580 M02S01541.ns2697 ---| NG X3,PDF14 IF NO SPACE FOR FILE
05581 M02S01542.ns2697 ---| RJ CAL CHECK ACCESS LEVELS
05582 M02S01543.ns2697 ---| PL X6,PDF17 IF NO ERROR
05583 M02S01544.ns2697 ---| PDF16 SX5 MES14 * PFLOAD - NO DEVICE FOUND FOR FILE.*
05584 M02S01545.ns2697 ---| EQ PDF9 ISSUE MESSAGE AND SKIP FILE
05585 M02S01546.ns2697 ---|
05586 M02S01547.ns2697 ---| PDF17 BX5 X5-X5 SET NO ERROR
05587 M02S01548.ns2697 ---| EQ PDFX RETURN
05588 M02S01549.ns2697 ---| PDI SPACE 4,20
05589 M02S01550.ns2697 ---|** PDI - PROCESS DESTINATION INDEX.
05590 M02S01551.ns2697 ---|*
05591 M02S01552.ns2697 ---|* ENTRY (TCBF) = CATALOG ENTRY FOR CURRENT FILE.
05592 M02S01553.ns2697 ---|* (CPAR+/COMSPFS/CPDI) = DESTINATION INDEX.
05593 M02S01554.ns2697 ---|* (TMDD) = TABLE OF MASTER DEVICE DESCRIPTIONS.
05594 M02S01555.ns2697 ---|*
05595 M02S01556.ns2697 ---|* EXIT (TCBF) = UPDATED WITH DESTINATION INDEX IF SPECIFIED.
05596 M02S01557.ns2697 ---|* (MDDS) = MASTER DEVICE DESCRIPTION FOR FILE.
05597 M02S01558.ns2697 ---|* (CPAR+/COMSPFS/CPDN) = MASTER DEVICE NUMBER FOR FILE.
05598 M02S01559.ns2697 ---|*
05599 M02S01560.ns2697 ---|* USES X - 1, 2, 3, 6, 7.
05600 M02S01561.ns2697 ---|* A - 1, 2, 6, 7.
05601 M02S01562.ns2697 ---|
05602 M02S01563.ns2697 ---|
05603 M02S01564.ns2697 ---| PDI SUBR ENTRY/EXIT
05604 M02S01565.ns2697 ---| SA1 CPAR+/COMSPFS/CPDI
05605 M02S01566.ns2697 ---| SA2 TCBF+FCUI
05606 M02S01567.ns2697 ---| ZR X1,PDI1 IF DESTINATION DEVICE NOT SPECIFIED
05607 M02S01568.ns2697 ---| MX3 42
05608 M02S01569.ns2697 ---| BX2 X3*X2 PUT DESTINATION INDEX IN CATALOG
05609 M02S01570.ns2697 ---| IX6 X2+X1
05610 M02S01571.ns2697 ---| BX2 X1
05611 M02S01572.ns2697 ---| SA6 A2+
05612 M02S01573.ns2697 ---| PDI1 MX3 -3 GET MASTER DEVICE DESCRIPTION
05613 M02S01574.ns2697 ---| BX2 -X3*X2
05614 M02S01575.ns2697 ---| SA1 TMDD+X2
05615 M02S01576.ns2697 ---| MX3 -6
05616 M02S01577.ns2697 ---| LX6 X1 SAVE MASTER DEVICE DESCRIPTION
05617 M02S01578.ns2697 ---| BX7 -X3*X1 SET MASTER DEVICE NUMBER
05618 M02S01579.ns2697 ---| SA6 MDDS
05619 M02S01580.ns2697 ---| SA7 CPAR+/COMSPFS/CPDN
05620 M02S01581.ns2697 ---| EQ PDIX RETURN
05621 M00S02696.pfload +++| PFD SPACE 4,25
05622 M00S02697.pfload +++|** PFD - PROCESS FULL DEVICE.
05623 M00S02698.pfload +++|*
05624 M00S02699.pfload +++|* ENTRY (X2) = FET ADDRESS OF FILE WITH ERROR.
05625 M00S02700.pfload +++|* (X6) = ERROR CODE.
05626 M00S02701.pfload +++|* ((X2)+FTPM) = FST ENTRY AT TIME OF ERROR.
05627 M00S02702.pfload +++|* (ANCE) = ADDRESS OF NEW CATALOG ENTRIES.
05628 M00S02703.pfload +++|* (*CATS* IN POINTER) = ADDRESS OF FIRST CATALOG SECTOR
05629 M00S02704.pfload +++|* NOT LOADED.
05630 M00S02705.pfload +++|*
| Line S02706 Modification History |
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05631 M01S02706.286l859 ---|* EXIT DATA AND PERMITS FOR UNWRITTEN CATALOG ENTRIES ARE
05632 M01S02707.286l859 ---|* PURGED, THE UTILITY PROCESSOR IS DROPPED, THE UTILITY
05633 M01S02708.286l859 ---|* INTERLOCK IS CLEARED AND MESSAGES ARE ISSUED TO
05634 M01S02709.286l859 ---|* IDENTIFY THE AFFECTED DEVICE AND THE FIRST FILE THAT
05635 M01S02710.286l859 ---|* WAS NOT LOADED.
| Line S00637 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05636 M01S00637.286l859 +++|* EXIT DATA AND PERMITS FOR UNWRITTEN CATALOG ENTRIES PURGED.
05637 M01S00638.286l859 +++|* ERROR MESSAGE ISSUED.
05638 M01S00639.286l859 +++|* UTILITY INTERLOCK CLEARED.
05639 M00S02711.pfload +++|*
05640 M00S02712.pfload +++|* USES X - ALL.
05641 M00S02713.pfload +++|* A - 0, 1, 2, 5, 6, 7.
05642 M00S02714.pfload +++|* B - 5, 6, 7.
05643 M00S02715.pfload +++|*
| Line S02716 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05644 M01S02716.ns22000 ---|* CALLS CIN, DUP, FUB, SEM, SSC, WPR.
| Line S01582 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05645 M02S01582.286l859 ---|* CALLS CIN, DUP, FUB, SEM, SFD, SSC, WPR.
| Line S00640 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05646 M01S00640.286l859 +++|* CALLS CIN, COD, DUP, FUB, SEM, SFD, SSC, WPR.
05647 M00S02717.pfload +++|*
| Line S02718 Modification History |
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05648 M01S02718.286l859 ---|* MACROS EDITS, RECALL.
| Line S00641 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05649 M01S00641.286l859 +++|* MACROS RECALL.
05650 M00S02719.pfload +++|
05651 M00S02720.pfload +++|
05652 M00S02721.pfload +++| PFD SUBR ENTRY/EXIT
05653 M00S02722.pfload +++|
| Line S02723 Modification History |
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05654 M01S02723.286l859 ---|* SET MESSAGE PARAMETERS.
| Line S00642 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05655 M01S00642.286l859 +++|* ISSUE ERROR MESSAGE.
05656 M00S02724.pfload +++|
| Line S02725 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05657 M01S02725.ns22000 ---| SX7 MES7 SET TRACK LIMIT MESSAGE
| Line S01583 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05658 M02S01583.286l859 ---| SX7 MES7 * PFLOAD - TRACK LIMIT.*
| Line S00643 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05659 M01S00643.286l859 +++| SB5 ERTL * TRACK LIMIT ...*
05660 M00S02726.pfload +++| SX1 X6-FETL
05661 M00S02727.pfload +++| ZR X1,PFD1 IF TRACK LIMIT ERROR
| Line S02728 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05662 M01S02728.ns22000 ---| SX7 MES8 SET ERROR IDLE MESSAGE
| Line S01584 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05663 M02S01584.286l859 ---| SX7 MES8 * PFLOAD - ERROR IDLE DETECTED.*
| Line S02729 Modification History |
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05664 M01S02729.286l859 ---| PFD1 SA7 PFDA SAVE MESSAGE ADDRESS
05665 M01S02730.286l859 ---| SA1 X2+FTPM SET SECTOR
05666 M01S02731.286l859 ---| MX3 -12
05667 M01S02732.286l859 ---| LX1 -12
05668 M01S02733.286l859 ---| BX6 -X3*X1
05669 M01S02734.286l859 ---| LX1 -12 SET TRACK
05670 M01S02735.286l859 ---| BX7 -X3*X1
05671 M01S02736.286l859 ---| LX1 -24 SET EQUIPMENT
05672 M01S02737.286l859 ---| SA6 MPSC
05673 M01S02738.286l859 ---| SA7 MPTK
05674 M01S02739.286l859 ---| MX3 -6
05675 M01S02740.286l859 ---| BX6 -X3*X1
05676 M01S02741.286l859 ---| SA6 MPEQ
05677 M01S02742.286l859 ---| SB7 MSTT SET FWA OF MASS STORAGE TABLE
05678 M01S02743.286l859 ---| PFD2 SA1 B7 GET NEXT DEVICE DESCRIPTION
05679 M01S02744.286l859 ---| SB7 B7+2
05680 M01S02745.286l859 ---| LX1 -6
| Line S02746 Modification History |
M01 (Removed by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05681 M02S02746.286l859 ---| BX7 -X3*X1 EXTRACT EQUIPMENT NUMBER
| Line S01585 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05682 M02S01585.286l859 ---| MX7 -9
05683 M02S01586.286l859 ---| BX7 -X7*X1 EXTRACT EST ORDINAL
| Line S02747 Modification History |
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05684 M01S02747.286l859 ---| IX7 X7-X6
05685 M01S02748.286l859 ---| NZ X7,PFD2 IF NOT CORRECT EQUIPMENT
05686 M01S02749.286l859 ---| LX1 6 SET DEVICE NUMBER
05687 M01S02750.286l859 ---| BX6 -X3*X1
05688 M01S02751.286l859 ---| SA6 MPDN
05689 M01S02752.286l859 ---| SA1 ANCE SET FILE NAME AND USER INDEX
05690 M01S02753.286l859 ---| SA2 CATS+FTOT
05691 M01S02754.286l859 ---| IX6 X2-X1
05692 M01S02755.286l859 ---| SA2 X2+1+FCFN+FCUI*
05693 M01S02756.286l859 ---| MX3 42
05694 M01S02757.286l859 ---| PL X6,PFD3 IF NOT AN OLD CATALOG ENTRY
05695 M01S02758.286l859 ---| SA2 X1+FCFN+FCUI*
05696 M01S02759.286l859 ---| PFD3 BX6 X3*X2
05697 M01S02760.286l859 ---| SA6 MPFN
05698 M01S02761.286l859 ---| BX7 -X3*X2
05699 M01S02762.286l859 ---| SA7 MPUI
| Line S00644 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05700 M01S00644.286l859 +++| SB5 ERID * ERROR IDLE DETECTED ...*
05701 M01S00645.286l859 +++| PFD1 SA1 X2+FTPM
05702 M01S00646.286l859 +++| MX6 -9
05703 M01S00647.286l859 +++| LX1 -48
05704 M01S00648.286l859 +++| BX1 -X6*X1 EST ORDINAL OF DEVICE WITH ERROR
05705 M01S00649.286l859 +++| RJ COD CONVERT EST ORDINAL
05706 M01S00650.286l859 +++| BX1 X4
05707 M01S00651.286l859 +++| SB2 1R+
05708 M01S00652.286l859 +++| RJ SNM SET EST ORDINAL IN MESSAGE
05709 M01S00653.286l859 +++| SB2 B5 SET MESSAGE ADDRESS
05710 M01S00654.286l859 +++| RJ SEM SEND ERROR MESSAGE
05711 M00S02763.pfload +++|
05712 M00S02764.pfload +++|* PURGE DATA AND PERMITS FOR UNWRITTEN CATALOG ENTRIES.
05713 M00S02765.pfload +++|
05714 M00S02766.pfload +++| RECALL DATA
05715 M00S02767.pfload +++| RECALL PETS
05716 M00S02768.pfload +++| SA1 PETS+FTSC SAVE OLD SECTOR COUNTER
05717 M00S02769.pfload +++| SX0 X1+
05718 M00S02770.pfload +++| RJ SSC SET BUFFER SECTOR COUNT
05719 M00S02771.pfload +++| SA1 PETS+FTSC ADJUST SECTOR COUNTER
05720 M00S02772.pfload +++| IX6 X0-X1
05721 M00S02773.pfload +++| SA6 A1
05722 M00S02774.pfload +++| SA1 PETS+FTFT REWIND PERMIT BUFFER
05723 M00S02775.pfload +++| SX6 X1
05724 M00S02776.pfload +++| SA6 A1+B1
05725 M00S02777.pfload +++| SA6 A6+B1
| Line S02778 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05726 M01S02778.ns22000 ---| BX4 X4-X4 CLEAR IAF PROCESSED FLAG
| Line S01587 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05727 M01S01587.ns22000 +++| BX4 X4-X4 CLEAR IAPF PROCESSED FLAG
05728 M00S02779.pfload +++| SA0 B0 CLEAR PERMITS PROCESSED FLAG
05729 M00S02780.pfload +++| SB5 B0 CLEAR BLOCK WORD COUNT
05730 M00S02781.pfload +++| SA5 CATS+FTOT GET FWA OF CATALOG ENTRIES
05731 M00S02782.pfload +++| SA2 IPFF
05732 M00S02783.pfload +++| SA1 A5-B1 GET LWA+1 OF CATALOG ENTRIES
05733 M00S02784.pfload +++| SX5 X5-NWCE
05734 M00S02785.pfload +++| BX0 X1
05735 M00S02786.pfload +++| ZR X2,PFD4 IF NO INCOMPLETE FILE
05736 M00S02787.pfload +++| SX0 X0+NWCE INCLUDE INCOMPLETE FILE
05737 M00S02788.pfload +++| PFD4 SX5 X5+NWCE ADVANCE TO NEXT CATALOG ENTRY
05738 M00S02789.pfload +++| GT B5,PFD5 IF NOT END OF CATALOG BLOCK
05739 M00S02790.pfload +++| SB5 100B SET FULL BLOCK WORD COUNT
05740 M00S02791.pfload +++| SX5 X5+1 SKIP CONTROL WORD
05741 M00S02792.pfload +++| PFD5 IX6 X5-X0
05742 M00S02793.pfload +++| SB5 B5-NWCE DECREMENT BLOCK WORD COUNT
05743 M00S02794.pfload +++| MX3 -12
05744 M00S02795.pfload +++| PL X6,PFD10 IF NO MORE CATALOG ENTRIES
05745 M00S02796.pfload +++| SA2 ANCE
05746 M00S02797.pfload +++| SA1 X5+FCUI
05747 M00S02798.pfload +++| IX7 X5-X2
05748 M00S02799.pfload +++| SX6 X1
05749 M00S02800.pfload +++| NG X7,PFD4 IF AN OLD CATALOG ENTRY
05750 M00S02801.pfload +++| SX7 X1-IFUI
05751 M00S02802.pfload +++| ZR X6,PFD7 IF A HOLE
05752 M00S02803.pfload +++| ZR X7,PFD7 IF WRITE ERROR ON FILE
05753 M00S02804.pfload +++| SA1 X5+FCBT+FCBS* GET FIRST TRACK AND SECTOR OF FILE
05754 M00S02805.pfload +++| BX6 -X3*X1
05755 M00S02806.pfload +++| LX3 12
05756 M00S02807.pfload +++| BX7 X3*X1 CLEAR FIRST TRACK OF FILE
05757 M00S02808.pfload +++| BX3 -X3*X1
05758 M00S02809.pfload +++| LX1 59-11
05759 M00S02810.pfload +++| SA7 A1
05760 M00S02811.pfload +++| ZR X3,PFD7 IF NO FIRST TRACK
05761 M00S02812.pfload +++| NG X1,PFD8 IF DIRECT ACCESS FILE
| Line S02813 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05762 M01S02813.ns22000 ---| NZ X4,PFD7 IF IAF FILE ALREADY PROCESSED
05763 M01S02814.ns22000 ---| SX4 B1+ SET IAF FILE PROCESSED FLAG
| Line S01588 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05764 M01S01588.ns22000 +++| NZ X4,PFD7 IF IAPF FILE ALREADY PROCESSED
05765 M01S01589.ns22000 +++| SX4 B1+ SET IAPF FILE PROCESSED FLAG
05766 M00S02815.pfload +++| PFD6 BX6 X3+X6 PUT PARAMETERS IN FET
05767 M00S02816.pfload +++| MX3 42
05768 M00S02817.pfload +++| SA6 DATA+FTPM
05769 M00S02818.pfload +++| SA1 DATA PUT POSITION REQUEST IN FET
05770 M00S02819.pfload +++| BX7 X3*X1
05771 M00S02820.pfload +++| SA7 A1
05772 M00S02821.pfload +++| RECALL A1 WAIT FOR POSITIONING TO COMPLETE
05773 M00S02822.pfload +++| PFD7 SA1 X5+FCRI GET PERMIT RANDOM INDEX
05774 M00S02823.pfload +++| MX3 -24
05775 M00S02824.pfload +++| LX1 -36
05776 M00S02825.pfload +++| BX6 -X3*X1
05777 M00S02826.pfload +++| ZR X6,PFD4 IF NO PERMITS
05778 M00S02827.pfload +++| SB7 A0
05779 M00S02828.pfload +++| NZ B7,PFD4 IF PERMITS ALREADY PROCESSED
05780 M00S02829.pfload +++| SA0 B1 SET PERMITS PROCESSED FLAG
05781 M00S02830.pfload +++| MX3 42
05782 M00S02831.pfload +++| SA6 PETS+FTPM PUT RANDOM INDEX PARAMETER IN FET
05783 M00S02832.pfload +++| SA1 PETS SET POSITION REQUEST IN FET
05784 M00S02833.pfload +++| BX7 X3*X1
05785 M00S02834.pfload +++| SB6 LWRD SET BUFFER ADDRESS
05786 M00S02835.pfload +++| SX6 B1+B1 SET EOI CONTROL WORD
05787 M00S02836.pfload +++| SA7 A1
05788 M00S02837.pfload +++| LX6 54
05789 M00S02838.pfload +++| SB7 B1 SET BUFFER WORD COUNT
05790 M00S02839.pfload +++| SA6 B6
05791 M00S02840.pfload +++| SX2 A1 SET PERMITS FET ADDRESS
05792 M00S02841.pfload +++| RJ WPR WRITE EOI SECTOR
05793 M00S02842.pfload +++| RJ FUB FLUSH PERMIT BUFFER
05794 M00S02843.pfload +++| EQ PFD4 PROCESS NEXT CATALOG ENTRY
05795 M00S02844.pfload +++|
05796 M00S02845.pfload +++|* PROCESS DIRECT ACCESS FILE.
05797 M00S02846.pfload +++|
| Line S02847 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05798 M01S02847.ns22000 ---| PFD8 SA1 X5+FCEO GET DEVICE NUMBER FROM CATALOG
| Line S01590 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05799 M01S01590.ns22000 +++| PFD8 SA1 X5+FCDN GET DEVICE NUMBER FROM CATALOG
05800 M00S02848.pfload +++| MX6 -6
05801 M00S02849.pfload +++| LX1 -36
05802 M00S02850.pfload +++| BX2 -X6*X1
| Line S02851 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05803 M01S02851.ns22000 ---| SB6 MSTT SET FWA OF MASS STORAGE TABLE
| Line S02852 Modification History |
M01 (Removed by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05804 M01S02852.ns2697 ---| NZ X2,PFD9 IF FILE NOT ON MASTER DEVICE
05805 M01S02853.ns2697 ---| SA2 CPAR+/COMSPFS/CPDN GET MASTER DEVICE NUMBER
| Line S02854 Modification History |
M01 (Removed by) | ns22000 |
M02 (Removed by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05806 M02S02854.ns2697 ---| PFD9 SA1 B6 GET NEXT DEVICE DESCRIPTION
05807 M02S02855.ns2697 ---| SB6 B6+2
05808 M02S02856.ns2697 ---| BX7 -X6*X1 EXTRACT DEVICE NUMBER
05809 M02S02857.ns2697 ---| IX7 X2-X7
05810 M02S02858.ns2697 ---| NZ X7,PFD9 IF NOT CORRECT DEVICE
| Line S01591 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05811 M02S01591.ns2697 ---| PFD9 RJ SFD SEARCH FOR DEVICE
| Line S00305 Modification History |
M01 (Added by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05812 M01S00305.ns2697 +++| RJ SFD SEARCH FOR DEVICE
| Line S02859 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05813 M01S02859.ns22000 ---| LX1 -6 SET EQUIPMENT NUMBER
| Line S01592 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05814 M01S01592.ns22000 +++| LX1 -6 SET EST ORDINAL
| Line S02860 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05815 M01S02860.ns22000 ---| BX7 -X6*X1
| Line S01593 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05816 M01S01593.ns22000 +++| MX7 -9
05817 M01S01594.ns22000 +++| BX7 -X7*X1 EXTRACT EST ORDINAL
| Line S02861 Modification History |
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05818 M01S02861.242l642 ---| SX6 X7+4000B SET *DROP AND FLAW TRACKS* FLAG
| Line S00053 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05819 M01S00053.242l642 +++| SX6 X7+4000B SET *DROP TRACKS* FLAG
05820 M00S02862.pfload +++| EQ PFD6 DROP TRACK CHAIN
05821 M00S02863.pfload +++|
05822 M00S02864.pfload +++|* DROP UTILITY PROCESSOR AND UTILITY INTERLOCK.
05823 M00S02865.pfload +++|
05824 M00S02866.pfload +++| PFD10 BX6 X6-X6 CLEAR *CATALOG ENTRIES WRITTEN*
05825 M00S02867.pfload +++| SA6 CEWF
05826 M00S02868.pfload +++| RJ DUP DROP UTILITY PROCESSOR
05827 M00S02869.pfload +++| RJ CIN CLEAR UTILITY INTERLOCK
| Line S02870 Modification History |
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05828 M01S02870.286l859 ---|
05829 M01S02871.286l859 ---|* ISSUE ERROR MESSAGES.
05830 M01S02872.286l859 ---|
05831 M01S02873.286l859 ---| SA1 SADD BUILD TRACK LIMIT/ERROR IDLE MESSAGE
05832 M01S02874.286l859 ---| SA2 PFDA
05833 M01S02875.286l859 ---| EDITS X1,X2
05834 M01S02876.286l859 ---| RJ SEM SEND ERROR MESSAGE
05835 M01S02877.286l859 ---| SA1 PFDA BUILD MESSAGE WITH FILE NAME
05836 M01S02878.286l859 ---| EDITS MSFN,X1
05837 M01S02879.286l859 ---| RJ SEM SEND ERROR MESSAGE
| Line S02880 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05838 M01S02880.ns22000 ---| EQ PFDX EXIT
| Line S01595 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05839 M01S01595.ns22000 +++| EQ PFDX RETURN
| Line S02881 Modification History |
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05840 M01S02881.286l859 ---|
| Line S00148 Modification History |
M01 (Added by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05841 M02S00148.286l859 ---|
| Line S02882 Modification History |
M01 (Removed by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05842 M02S02882.286l859 ---| PFDA BSS 0 ERROR MESSAGE ADDRESS
| Line S01596 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05843 M02S01596.286l859 ---| PFDA CON 0 ERROR MESSAGE ADDRESS
| Line S01597 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
05844 M02S01597.253l688 ---| PGF SPACE 4,10
| Line S00149 Modification History |
M01 (Added by) | 253l688 |
M02 (Removed by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05845 M02S00149.ns2697 ---| PGF SPACE 4,15
| Line S00306 Modification History |
M01 (Added by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05846 M01S00306.ns2697 +++| PGF SPACE 4,25
| Line S01598 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05847 M01S01598.ns22000 +++|** PGF - PURGE FILE ON REPLACE OPTION.
05848 M01S01599.ns22000 +++|*
| Line S01600 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05849 M02S01600.ns2697 ---|* EXIT (X6) = 0 IF NO ERROR ON PURGE.
05850 M02S01601.ns2697 ---|* UTILITY INTERLOCK CLEARED AND RESTORED.
| Line S00307 Modification History |
M01 (Added by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05851 M01S00307.ns2697 +++|* ENTRY (X6) .NE. 0 IF SPACE AVAILABLE FOR FILE.
05852 M01S00308.ns2697 +++|* (X6) = 0 IF NO SPACE FOR DIRECT ACCESS FILE.
| Line S00309 Modification History |
M01 (Added by) | ns2697 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05853 M02S00309.286l859 ---|* (B2) = REQUIRED DEVICE NUMBER IF .NE. 0 AND NO SPACE
| Line S00655 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05854 M01S00655.286l859 +++|* (X7) = REQUIRED DEVICE NUMBER IF .NE. 0 AND NO SPACE
| Line S00310 Modification History |
M01 (Added by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05855 M01S00310.ns2697 +++|* FOR DIRECT ACCESS FILE.
| Line S00311 Modification History |
M01 (Added by) | ns2697 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05856 M02S00311.286l859 ---|* (B2) = 0 IF LOAD LEVELING USED IN DEVICE SELECTION AND
| Line S00656 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05857 M01S00656.286l859 +++|* (X7) = 0 IF LOAD LEVELING USED IN DEVICE SELECTION AND
| Line S00312 Modification History |
M01 (Added by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05858 M01S00312.ns2697 +++|* NO SPACE FOR DIRECT ACCESS FILE.
| Line S01602 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05859 M01S01602.ns22000 +++|*
| Line S01603 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05860 M02S01603.ns2697 ---|* USES X - 0, 1, 2, 5, 6, 7.
05861 M02S01604.ns2697 ---|* A - 1, 2, 6, 7.
| Line S00313 Modification History |
M01 (Added by) | ns2697 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05862 M02S00313.286l859 ---|* EXIT (X5) = 0 IF FILE PURGE ATTEMPTED.
05863 M02S00314.286l859 ---|* (X5) = * NO SPACE FOR FILE.* MESSAGE ADDRESS IF FILE
| Line S00657 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05864 M01S00657.286l859 +++|* EXIT (B2) = 0 IF FILE PURGE ATTEMPTED.
05865 M01S00658.286l859 +++|* (B2) = * NO SPACE FOR FILE* MESSAGE ADDRESS IF FILE
| Line S00315 Modification History |
M01 (Added by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05866 M01S00315.ns2697 +++|* PURGE NOT ATTEMPTED.
05867 M01S00316.ns2697 +++|* UTILITY INTERLOCK SET AND *PFU* ACTIVE.
| Line S01605 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05868 M01S01605.ns22000 +++|*
| Line S01606 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05869 M02S01606.ns2697 ---|* CALLS AUP, CIN, DUP, SIN.
| Line S00317 Modification History |
M01 (Added by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05870 M01S00317.ns2697 +++|* USES X - 1, 2, 3, 5, 6, 7.
05871 M01S00318.ns2697 +++|* A - 1, 2, 3, 5, 6, 7.
05872 M01S00319.ns2697 +++|* B - 2.
| Line S01607 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05873 M01S01607.ns22000 +++|*
| Line S01608 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05874 M02S01608.ns2697 ---|* MACROS PURGE, SETPFP.
| Line S00320 Modification History |
M01 (Added by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05875 M01S00320.ns2697 +++|* CALLS AUP, CAL, CIN, DUP, RAS, SFD, SIN.
05876 M01S00321.ns2697 +++|*
05877 M01S00322.ns2697 +++|* MACROS CATLIST, PURGE, SETPFP.
| Line S01609 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05878 M01S01609.ns22000 +++|
05879 M01S01610.ns22000 +++|
| Line S00323 Modification History |
M01 (Added by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05880 M01S00323.ns2697 +++|* REACTIVATE *PFU* AND RETURN NO SPACE FOR FILE ERROR.
05881 M01S00324.ns2697 +++|
05882 M01S00325.ns2697 +++| PGF5 RJ SIN SET UTILITY INTERLOCK
05883 M01S00326.ns2697 +++| RJ AUP ACTIVATE *PFU*
| Line S00327 Modification History |
M01 (Added by) | ns2697 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05884 M02S00327.286l859 ---| SX5 MES13 * NO SPACE FOR FILE.*
| Line S00659 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05885 M01S00659.286l859 +++| SB2 ERNS * NO SPACE FOR FILE ...*
| Line S00328 Modification History |
M01 (Added by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05886 M01S00328.ns2697 +++|
| Line S01611 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05887 M01S01611.ns22000 +++| PGF SUBR ENTRY/EXIT
05888 M01S01612.ns22000 +++|
| Line S01613 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05889 M02S01613.ns2697 ---|* CLEAR UTILITY INTERLOCK.
| Line S00329 Modification History |
M01 (Added by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05890 M01S00329.ns2697 +++|* SAVE ENTRY CONDITIONS AND DROP *PFU*.
| Line S01614 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05891 M01S01614.ns22000 +++|
| Line S00330 Modification History |
M01 (Added by) | ns2697 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05892 M02S00330.286l859 ---| SX7 B2
| Line S00331 Modification History |
M01 (Added by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05893 M01S00331.ns2697 +++| SA6 PGFB SAVE NO SPACE STATUS
| Line S00332 Modification History |
M01 (Added by) | ns2697 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05894 M02S00332.286l859 ---| SA7 A6+B1 SAVE DEVICE POINTER
| Line S00660 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
05895 M01S00660.286l859 +++| SA7 A6+1 SAVE DEVICE POINTER
| Line S01615 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05896 M01S01615.ns22000 +++| RJ DUP DROP UTILITY PROCESSOR
05897 M01S01616.ns22000 +++| RJ CIN CLEAR UTILITY INTERLOCK
05898 M01S01617.ns22000 +++|
| Line S01618 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05899 M02S01618.ns2697 ---|* SET UP FET.
| Line S00333 Modification History |
M01 (Added by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05900 M01S00333.ns2697 +++|* SET FILE NAME AND USER INDEX FOR *PFM*.
| Line S01619 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05901 M01S01619.ns22000 +++|
05902 M01S01620.ns22000 +++| SA1 TCBF+FCFN GET FILE NAME AND USER INDEX
| Line S01621 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05903 M02S01621.ns2697 ---| SA2 PURG
05904 M02S01622.ns2697 ---| MX0 42
05905 M02S01623.ns2697 ---| BX6 -X0*X2
05906 M02S01624.ns2697 ---| BX5 -X0*X1
05907 M02S01625.ns2697 ---| BX1 X0*X1
05908 M02S01626.ns2697 ---| BX6 X6+X1
05909 M02S01627.ns2697 ---| SA6 A2
05910 M02S01628.ns2697 ---|
05911 M02S01629.ns2697 ---|* PROCESS USER INDEX.
05912 M02S01630.ns2697 ---|
05913 M02S01631.ns2697 ---| SA1 PGFA CURRENT USER INDEX
05914 M02S01632.ns2697 ---| IX6 X1-X5
05915 M02S01633.ns2697 ---| SX7 X5 SAVE NEW USER INDEX
05916 M02S01634.ns2697 ---| ZR X6,PGF1 IF SAME USER INDEX
05917 M02S01635.ns2697 ---| SA7 SPAR+2
| Line S00334 Modification History |
M01 (Added by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05918 M01S00334.ns2697 +++| SA2 PGFA GET CURRENT USER INDEX
05919 M01S00335.ns2697 +++| MX7 -18
05920 M01S00336.ns2697 +++| BX6 -X7*X1 USER INDEX
05921 M01S00337.ns2697 +++| BX7 X7*X1 FILE NAME
05922 M01S00338.ns2697 +++| IX2 X2-X6
05923 M01S00339.ns2697 +++| SA7 P+CFPN SET FILE NAME IN FET
05924 M01S00340.ns2697 +++| ZR X2,PGF1 IF SAME USER INDEX
05925 M01S00341.ns2697 +++| SA6 PGFA UPDATE CURRENT USER INDEX
05926 M01S00342.ns2697 +++| SA6 SPAR+2 SET USER INDEX IN *CPM* CALL
| Line S01636 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05927 M01S01636.ns22000 +++| SX6 UIPR SET USER INDEX FLAG
| Line S01637 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05928 M02S01637.ns2697 ---| SA7 PGFA
| Line S01638 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05929 M01S01638.ns22000 +++| SA6 SPAR
05930 M01S01639.ns22000 +++| SETPFP SPAR SET USER INDEX
05931 M01S01640.ns22000 +++|
| Line S01641 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05932 M02S01641.ns2697 ---|* PURGE FILES.
| Line S00343 Modification History |
M01 (Added by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05933 M01S00343.ns2697 +++|* DETERMINE IF PURGE WILL CREATE SUFFICIENT SPACE FOR FILE.
| Line S01642 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05934 M01S01642.ns22000 +++|
| Line S01643 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05935 M02S01643.ns2697 ---| PGF1 PURGE PURG PURGE FILE
| Line S00344 Modification History |
M01 (Added by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05936 M01S00344.ns2697 +++| PGF1 SA1 PGFB
05937 M01S00345.ns2697 +++| NZ X1,PGF4 IF SPACE FOR FILE AVAILABLE
05938 M01S00346.ns2697 +++| SX6 PFMB SET IN = OUT = FIRST
05939 M01S00347.ns2697 +++| SA6 P+2
05940 M01S00348.ns2697 +++| SA6 P+3
05941 M01S00349.ns2697 +++| CATLIST P GET DEVICE NUMBER AND FILE LENGTH
05942 M01S00350.ns2697 +++| SA1 P
05943 M01S00351.ns2697 +++| MX6 -8
05944 M01S00352.ns2697 +++| AX1 10
05945 M01S00353.ns2697 +++| BX1 -X6*X1
05946 M01S00354.ns2697 +++| NZ X1,PGF5 IF ERROR ON CATLIST CALL
05947 M01S00355.ns2697 +++| SA2 PFMB+FCDN GET DEVICE NUMBER
05948 M01S00356.ns2697 +++| SA3 PFMB+FCBS+FCLF*0 GET FIRST SECTOR AND LENGTH
05949 M01S00357.ns2697 +++| MX6 -6
05950 M01S00358.ns2697 +++| LX2 -36
05951 M01S00359.ns2697 +++| LX3 59-11
05952 M01S00360.ns2697 +++| BX2 -X6*X2
05953 M01S00361.ns2697 +++| PL X3,PGF5 IF INDIRECT ACCESS FILE
05954 M01S00362.ns2697 +++| RJ SFD SEARCH FOR DEVICE
05955 M01S00363.ns2697 +++| ZR X1,PGF5 IF DEVICE NOT FOUND
05956 M01S00364.ns2697 +++| SA2 PGFB+1
05957 M01S00365.ns2697 +++| SA5 A1+1 GET DEVICE PARAMETERS
05958 M01S00366.ns2697 +++| ZR X2,PGF2 IF LOAD LEVELING USED TO SELECT DEVICE
05959 M01S00367.ns2697 +++| SB2 X2
05960 M01S00368.ns2697 +++| SB2 A1-B2
05961 M01S00369.ns2697 +++| ZR B2,PGF3 IF SAME DEVICE
05962 M01S00370.ns2697 +++| EQ PGF5 SET NO SPACE FOR FILE
05963 M01S00371.ns2697 +++|
05964 M01S00372.ns2697 +++| PGF2 RJ CAL CHECK ACCESS LEVELS
05965 M01S00373.ns2697 +++| NG X6,PGF5 IF ACCESS LEVEL ERROR
05966 M01S00374.ns2697 +++| PGF3 MX6 -24
05967 M01S00375.ns2697 +++| MX7 -12
05968 M01S00376.ns2697 +++| LX3 -24
05969 M01S00377.ns2697 +++| LX5 -36
05970 M01S00378.ns2697 +++| BX3 -X6*X3 FILE LENGTH
05971 M01S00379.ns2697 +++| SX6 B1+B1
05972 M01S00380.ns2697 +++| BX1 -X7*X5 DEVICE SECTOR LIMIT
05973 M01S00381.ns2697 +++| IX3 X3+X6 INCLUDE SYSTEM SECTOR AND EOI IN LENGTH
05974 M01S00382.ns2697 +++| SX6 X1-1
05975 M01S00383.ns2697 +++| BX7 X1
05976 M01S00384.ns2697 +++| IX3 X3+X6
05977 M01S00385.ns2697 +++| LX5 36 RESTORE DEVICE PARAMETERS
05978 M01S00386.ns2697 +++| IX3 X3/X7
05979 M01S00387.ns2697 +++| IX3 X3*X1 SPACE OCCUPIED BY FILE
05980 M01S00388.ns2697 +++| RJ RAS CHECK SPACE ON DEVICE WITH FILE PURGE
05981 M01S00389.ns2697 +++| ZR X1,PGF5 IF NO SPACE AVAILABLE
05982 M01S00390.ns2697 +++|
05983 M01S00391.ns2697 +++|* REQUIRE FILE NOT BUSY TO AVOID PURGING OLD FILE WITHOUT
05984 M01S00392.ns2697 +++|* CREATING SPACE FOR FILE TO BE LOADED.
05985 M01S00393.ns2697 +++|
05986 M01S00394.ns2697 +++| SA1 P+CFPN
05987 M01S00395.ns2697 +++| SX6 SRNB SET NOT BUSY REQUIRED
05988 M01S00396.ns2697 +++| LX6 12
05989 M01S00397.ns2697 +++| BX6 X1+X6
05990 M01S00398.ns2697 +++| SA6 A1+
05991 M01S00399.ns2697 +++|
05992 M01S00400.ns2697 +++|* PURGE FILE AND REACTIVATE *PFU*. ERROR STATUS IS NOT CHECKED
05993 M01S00401.ns2697 +++|* SINCE A PURGE FAILURE WILL BE DETECTED BY THE FILE NAME
05994 M01S00402.ns2697 +++|* REAPPEARING IN THE FILE LIST WHEN *PFU* IS REACTIVATED.
05995 M01S00403.ns2697 +++|
05996 M01S00404.ns2697 +++| PGF4 PURGE P PURGE FILE
| Line S01644 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
05997 M01S01644.ns22000 +++| RJ SIN SET UTILITY INTERLOCK
| Line S01645 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
05998 M02S01645.ns2697 ---| SX1 B1 ACTIVATE UTILITY PROCESSOR (NON-INITIAL)
05999 M02S01646.ns2697 ---| RJ AUP
06000 M02S01647.ns2697 ---| SA1 PURG CHECK FOR ERROR
06001 M02S01648.ns2697 ---| MX0 -8
06002 M02S01649.ns2697 ---| AX1 10
06003 M02S01650.ns2697 ---| BX6 -X0*X1
| Line S00405 Modification History |
M01 (Added by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
06004 M01S00405.ns2697 +++| RJ AUP ACTIVATE *PFU*
| Line S00406 Modification History |
M01 (Added by) | ns2697 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
06005 M02S00406.286l859 ---| SX5 B0 SET NO ERROR
| Line S00661 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
06006 M01S00661.286l859 +++| SB2 B0 SET NO ERROR
| Line S01651 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
06007 M01S01651.ns22000 +++| EQ PGFX RETURN
06008 M01S01652.ns22000 +++|
| Line S00150 Modification History |
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
06009 M01S00150.253l688 +++|
| Line S01653 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
06010 M01S01653.ns22000 +++| PGFA CON 0 CURRENT USER INDEX
| Line S00407 Modification History |
M01 (Added by) | ns2697 |
Seq # *Modification Id* Act
----------------------------+
06011 M01S00407.ns2697 +++| PGFB CON 0 NO SPACE FOR FILE STATUS
06012 M01S00408.ns2697 +++| CON 0 REQUIRED DEVICE POINTER
| Line S01654 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
06013 M01S01654.ns22000 +++| PPB SPACE 4,30
06014 M01S01655.ns22000 +++|** PPB - PROCESS PERMIT BLOCK.
06015 M01S01656.ns22000 +++|*
06016 M01S01657.ns22000 +++|* ENTRY (CWBF) = PERMIT CONTROL WORD.
06017 M01S01658.ns22000 +++|* (RICT) = CURRENT PERMIT RANDOM INDEX.
06018 M01S01659.ns22000 +++|* (*CATS* IN POINTER) = ADDRESS OF CATALOG ENTRY.
06019 M01S01660.ns22000 +++|*
06020 M01S01661.ns22000 +++|* EXIT (X6) = 0 IF FILE NOT TO BE LOADED.
06021 M01S01662.ns22000 +++|* (X6) = 1 IF FILE TO BE LOADED.
06022 M01S01663.ns22000 +++|* (RICT) = UPDATED PERMIT RANDOM INDEX.
06023 M01S01664.ns22000 +++|* (SKER) = 1 IF *SKIP TO EOR* REQUIRED.
06024 M01S01665.ns22000 +++|* CATALOG ENTRY UPDATED WITH RANDOM INDEX OF FIRST
06025 M01S01666.ns22000 +++|* PERMIT SECTOR.
06026 M01S01667.ns22000 +++|* PERMIT SECTORS WRITTEN TO *PETS* FILE.
| Line S01668 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
06027 M02S01668.286l859 ---|* TAPE FILE POSITIONED AT EOR IF FILE NOT TO BE LOADED,
06028 M02S01669.286l859 ---|* OTHERWISE AT FIRST WORD FOLLOWING PERMITS.
| Line S00662 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
06029 M01S00662.286l859 +++|* ARCHIVE FILE POSITIONED AT EOR IF FILE NOT TO BE
06030 M01S00663.286l859 +++|* LOADED, OTHERWISE AT FIRST WORD FOLLOWING PERMITS.
| Line S01670 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
06031 M01S01670.ns22000 +++|*
06032 M01S01671.ns22000 +++|* IF A PERMIT WRITE ERROR, TRACK LIMIT ERROR OR ERROR
06033 M01S01672.ns22000 +++|* IDLE CONDITION IS DETECTED, CLEANUP IS PERFORMED AND
06034 M01S01673.ns22000 +++|* EXIT IS TO *ABT*.
06035 M01S01674.ns22000 +++|*
06036 M01S01675.ns22000 +++|* USES X - 0, 1, 2, 3, 5, 6, 7.
06037 M01S01676.ns22000 +++|* A - 1, 2, 3, 6, 7.
| Line S01677 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
06038 M02S01677.286l859 ---|* B - 3, 6, 7.
| Line S00664 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
06039 M01S00664.286l859 +++|* B - 2, 3, 6, 7.
| Line S01678 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
06040 M01S01678.ns22000 +++|*
| Line S01679 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
06041 M02S01679.286l859 ---|* CALLS AEC, PWE, RCW, SCE, SEM, WPR.
| Line S00665 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
06042 M01S00665.286l859 +++|* CALLS CFE, PWE, RCW, SCE, SFE, WPR.
| Line S01680 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
06043 M01S01680.ns22000 +++|*
06044 M01S01681.ns22000 +++|* MACROS CWREAD.
06045 M01S01682.ns22000 +++|
06046 M01S01683.ns22000 +++|
06047 M01S01684.ns22000 +++| PPB SUBR ENTRY/EXIT
06048 M01S01685.ns22000 +++| SA3 CATS+2 PUT FIRST RANDOM INDEX IN CATALOG
06049 M01S01686.ns22000 +++| SA1 X3+FCRI
06050 M01S01687.ns22000 +++| SA2 RICT
06051 M01S01688.ns22000 +++| MX3 -36
06052 M01S01689.ns22000 +++| BX7 -X3*X1
06053 M01S01690.ns22000 +++| LX2 36
06054 M01S01691.ns22000 +++| BX6 X2+X7
06055 M01S01692.ns22000 +++| SA6 A1
06056 M01S01693.ns22000 +++| BX5 X5-X5 CLEAR SECTOR BUFFER WORD COUNT
06057 M01S01694.ns22000 +++| PPB1 SA1 CWBF SET WORD COUNT OF CONTROL WORD
06058 M01S01695.ns22000 +++| MX2 -9
06059 M01S01696.ns22000 +++| BX0 -X2*X1
06060 M01S01697.ns22000 +++|
06061 M01S01698.ns22000 +++|* FILL PERMIT SECTOR BUFFER.
06062 M01S01699.ns22000 +++|
06063 M01S01700.ns22000 +++| PPB2 SX1 100B
06064 M01S01701.ns22000 +++| IX3 X1-X5 REMAINING WORD COUNT OF SECTOR BUFFER
06065 M01S01702.ns22000 +++| IX2 X0-X3
06066 M01S01703.ns22000 +++| PL X2,PPB3 IF CONTROL WORD WILL FILL SECTOR BUFFER
06067 M01S01704.ns22000 +++| BX3 X0 SET TO READ REMAINDER OF CONTROL WORD
06068 M01S01705.ns22000 +++| PPB3 ZR X3,PPB4 IF NO WORDS TO READ
06069 M01S01706.ns22000 +++| SB6 TDBF+X5 SET SECTOR BUFFER ADDRESS
06070 M01S01707.ns22000 +++| IX0 X0-X3 REMAINING WORD COUNT FOR CONTROL WORD
06071 M01S01708.ns22000 +++| IX5 X5+X3 SECTOR BUFFER WORD COUNT
06072 M01S01709.ns22000 +++| CWREAD TAPE,B6,X3
| Line S01710 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
06073 M02S01710.286l859 ---| NZ X7,PPB5 IF PARITY ERROR
| Line S00666 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
06074 M01S00666.286l859 +++| NZ X7,PPB5 IF READ ERROR
| Line S01711 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
06075 M01S01711.ns22000 +++| ZR X1,PPB2 IF CONTROL WORD BLOCK COMPLETE
| Line S01712 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
06076 M02S01712.286l859 ---| EQ PPB7 PROCESS INCOMPLETE PERMIT BLOCK
| Line S00667 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
06077 M01S00667.286l859 +++| SB2 ERAB * ARCHIVE BLOCK ERROR ...*
06078 M01S00668.286l859 +++| EQ PPB6 PROCESS INCOMPLETE PERMIT BLOCK
| Line S01713 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
06079 M01S01713.ns22000 +++|
06080 M01S01714.ns22000 +++|* PROCESS END OF CONTROL WORD.
06081 M01S01715.ns22000 +++|
06082 M01S01716.ns22000 +++| PPB4 NZ X0,PPB10 IF NOT END OF CONTROL WORD
06083 M01S01717.ns22000 +++| SA1 CWBF GET EOR FLAG
06084 M01S01718.ns22000 +++| MX2 -3
06085 M01S01719.ns22000 +++| LX1 -9
06086 M01S01720.ns22000 +++| BX3 -X2*X1 SET LAST SECTOR FLAG
06087 M01S01721.ns22000 +++| LX1 -6
06088 M01S01722.ns22000 +++| BX6 -X2*X1
06089 M01S01723.ns22000 +++| SB3 X3
06090 M01S01724.ns22000 +++| NZ X6,PPB8 IF ERROR CONTROL WORD
06091 M01S01725.ns22000 +++| EQ B3,B1,PPB9 IF EOR FLAG SET IN CONTROL WORD
06092 M01S01726.ns22000 +++| RJ RCW READ NEXT CONTROL WORD
06093 M01S01727.ns22000 +++| SX2 X3-2
06094 M01S01728.ns22000 +++| ZR X2,PPB1 IF A PERMIT CONTROL WORD
06095 M01S01729.ns22000 +++|
| Line S01730 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
06096 M02S01730.286l859 ---|* PROCESS TAPE ERROR.
| Line S00669 Modification History |
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act
----------------------------+
06097 M01S00669.286l859 +++|* PROCESS ARCHIVE FILE ERROR.
| Line S01731 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
06098 M01S01731.ns22000 +++|