cdc:nos2.source:opl.opl871:deck:pfload.005
Deck PFLOAD Part 005
34 Modifications
Listing Sections
- Deck PFLOAD Start
- Deck PFLOAD Part 1 (Line 838)
- Deck PFLOAD Part 2 (Line 1745)
- Deck PFLOAD Part 3 (Line 2694)
- Deck PFLOAD Part 4 (Line 3990)
- Deck PFLOAD Part 5 (Line 4919)
- Deck PFLOAD Part 6 (Line 6099)
- Deck PFLOAD Part 7 (Line 7310)
- Deck PFLOAD Part 8 (Line 9172)
- Deck PFLOAD Part 9 (Line 10380)
- Deck PFLOAD Part 10 (Line 11334)
Source
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 +++|
Proceed to Part 6
cdc/nos2.source/opl.opl871/deck/pfload.005.txt · Last modified: by 127.0.0.1