cdc:nos2.source:opl.opl871:deck:pfdump.002
Deck PFDUMP Part 002
50 Modifications
Listing Sections
- Deck PFDUMP Start
- Deck PFDUMP Part 1 (Line 831)
- Deck PFDUMP Part 2 (Line 1895)
- Deck PFDUMP Part 3 (Line 3030)
- Deck PFDUMP Part 4 (Line 3997)
- Deck PFDUMP Part 5 (Line 5116)
- Deck PFDUMP Part 6 (Line 6364)
- Deck PFDUMP Part 7 (Line 7572)
- Deck PFDUMP Part 8 (Line 8753)
- Deck PFDUMP Part 9 (Line 9774)
- Deck PFDUMP Part 10 (Line 10683)
- Deck PFDUMP Part 11 (Line 11885)
Source
Seq # *Modification Id* Act ----------------------------+ 01895 M02S01049.286l859 ---|*T,AEPB+2 60/ CHECKSUM VALUE
Figure AEPB+2
01896 M02S01050.286l859 ---|*T,AEPB+3 24/ MASK,24/ ERROR CLASS,12/ ERROR CODE
Figure AEPB+3
01897 M02S01051.286l859 ---|*T,AEPB+4 60/ PENDING INTERRUPTS
Figure AEPB+4
| Line S01052 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
M02 (Removed by) | 253l688 |
M03 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01898 M03S01052.286l859 ---|*T,AEPB+5 60/ PENDING RA+1 REQUEST
Figure AEPB+5
| Line S00046 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 253l688 |
M03 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01899 M03S00046.286l859 ---|*T,AEPB+5 60/ PENDING SYSTEM REQUEST
Figure AEPB+5
| Line S01053 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01900 M02S01053.286l859 ---|*T,AEPB+6 60/ INTERRUPTED TERMINAL I/O
Figure AEPB+6
01901 M02S01054.286l859 ---|*T,AEPB+7 48/,12/ ERROR FLAG
Figure AEPB+7
01902 M02S01055.286l859 ---|*T,AEPB+8 60/
Figure AEPB+8
01903 M02S01056.286l859 ---|*T,AEPB+9 60/ EXCHANGE PACKAGE (WORD 1)
Figure AEPB+9
01904 M02S01057.286l859 ---|*T, * 60/
Figure *
01905 M02S01058.286l859 ---|*T,AEPB+24 60/ EXCHANGE PACKAGE (WORD 16)
Figure AEPB+24
01906 M02S01059.286l859 ---|* 01907 M02S01060.286l859 ---|* LENGTH = LENGTH OF REPRIEVE PARAMETER BLOCK. 01908 M02S01061.286l859 ---|* FUNC = REPRIEVE FUNCTION CODE. 01909 M02S01062.286l859 ---|* C = COMPLETION BIT. 01910 M02S01063.286l859 ---| 01911 M02S01064.286l859 ---| AEPB VFD 36/0,12/AEPBL,12/0 01912 M02S01065.286l859 ---| VFD 30/0,30/EXP 01913 M02S01066.286l859 ---| BSSZ 7 01914 M02S01067.286l859 ---| BSSZ 16 EXCHANGE PACKAGE 01915 M02S01068.286l859 ---| 01916 M02S01069.286l859 ---| AEPBL EQU *-AEPB LENGTH OF REPRIEVE PARAMETER BLOCK
| Line S00104 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01917 M02S00104.286l859 ---| ABTA BSSZ 1 ABORT IN-PROCESS FLAG 01918 M02S00105.286l859 ---| ABTB RPVBLK ABT3 REPRIEVE BLOCK
| Line S00452 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01919 M01S00452.286l859 +++| SA7 A1+B1 SET *IN* = *FIRST* 01920 M01S00453.286l859 +++| SA7 A7+B1 SET *OUT* = *FIRST* 01921 M01S00454.286l859 +++| LABEL AST REQUEST TAPE ASSIGNMENT 01922 M01S00455.286l859 +++| EQ AATX RETURN 01923 M00S01070.pfdump +++| ALF SPACE 4,20 01924 M00S01071.pfdump +++|** ALF - ATTACH LOCK FILE. 01925 M00S01072.pfdump +++|* 01926 M00S01073.pfdump +++|* ENTRY (B6) = LOCK FILE INDEX.
| Line S00047 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01927 M01S00047.v23l617 +++|* (B4) = 0, IF *MSS* FILE BEING ATTACHED.
| Line S00048 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01928 M02S00048.242l642 ---|* (B4) = 8, IF *MAS* FILE BEING ATTACHED.
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01929 M01S00012.242l642 +++|* (B4) = 8, IF *MSE* FILE BEING ATTACHED. 01930 M00S01074.pfdump +++|* (CMSK) = CONTROL MASK HAVING BIT SET FOR EACH 01931 M00S01075.pfdump +++|* SUBFAMILY STILL NEEDING LOCK.
| Line S01076 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01932 M01S01076.v23l617 ---|* (GPAR+2) = ORIGINAL (42/ USER NUMBER,18/ USER INDEX).
| Line S00049 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01933 M01S00049.v23l617 +++|* (GPAR+2) = ORIGINAL (42/ USER NAME,18/ USER INDEX). 01934 M00S01077.pfdump +++|* *LFAT* = FWA OF LOCK FILE FET ARGUMENT TABLE. 01935 M00S01078.pfdump +++|* *LOCK* = FWA OF LOCK FILE FET. 01936 M00S01079.pfdump +++|* PERMANENT FILE PARAMETERS SET FOR FAMILY DESIRED. 01937 M00S01080.pfdump +++|* 01938 M00S01081.pfdump +++|* EXIT (B6) = LOCK FILE INDEX. 01939 M00S01082.pfdump +++|* (CMSK) = CONTROL MASK UPDATED. 01940 M00S01083.pfdump +++|* (LMSK) = LOCK MASK UPDATED. 01941 M00S01084.pfdump +++|* LOCK FILE ATTACHED, IF AVAILABLE. 01942 M00S01085.pfdump +++|* 01943 M00S01086.pfdump +++|* USES X - 0, 1, 2, 3, 4, 6, 7. 01944 M00S01087.pfdump +++|* A - 1, 2, 3, 6, 7.
| Line S01088 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01945 M01S01088.v23l617 ---|* B - 6. 01946 M00S01089.pfdump +++|* 01947 M00S01090.pfdump +++|* MACROS ATTACH, CATLIST, SETFET, SETPFP. 01948 M00S01091.pfdump +++| 01949 M00S01092.pfdump +++| 01950 M00S01093.pfdump +++| ALF SUBR ENTRY/EXIT
| Line S01094 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01951 M01S01094.v23l617 ---| SX6 B6 SAVE LOCK FILE INDEX 01952 M01S01095.v23l617 ---| SA6 ALFA 01953 M00S01096.pfdump +++| MX0 42 01954 M00S01097.pfdump +++| SA1 LFAT+B6 ADJUST FET ARGUMENTS 01955 M00S01098.pfdump +++| SA2 LOCK FILE NAME 01956 M00S01099.pfdump +++| BX6 X0*X1
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | pfdum1 |
Seq # *Modification Id* Act ----------------------------+ 01957 M01S00001.pfdum1 +++| SA6 A2+8 01958 M00S01100.pfdump +++| BX3 -X0*X2 01959 M00S01101.pfdump +++| BX6 X3+X6 01960 M00S01102.pfdump +++| SA6 A2
| Line S01103 Modification History | |
|---|---|
M01 (Removed by) | pfdum17 |
Seq # *Modification Id* Act ----------------------------+ 01961 M01S01103.pfdum17 ---| SA3 LOCK+1 FIRST
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | pfdum17 |
M02 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01962 M02S00001.v23l617 ---| SA3 LOCK+FTIN SET IN POINTER
| Line S01104 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01963 M01S01104.v23l617 ---| BX6 -X0*X1 01964 M01S01105.v23l617 ---| BX2 X0*X3 01965 M01S01106.v23l617 ---| BX6 X2+X6 01966 M01S01107.v23l617 ---| SA6 A3
| Line S00050 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01967 M01S00050.v23l617 +++| BX6 -X0*X1 01968 M01S00051.v23l617 +++| SA6 LOCK+FTIN SET *IN* POINTER 01969 M00S01108.pfdump +++| 01970 M00S01109.pfdump +++|* ATTEMPT TO ATTACH DESIRED LOCK FILE. 01971 M00S01110.pfdump +++| 01972 M00S01111.pfdump +++| SX6 UIPR SET SUBFAMILY USER INDEX 01973 M00S01112.pfdump +++| SA6 SPAR
| Line S01113 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01974 M01S01113.v23l617 ---| SX7 SBUI+B6
| Line S00052 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01975 M01S00052.v23l617 +++| SX7 B6-B4 GET SUBFAMILY INDEX 01976 M01S00053.v23l617 +++| SX7 X7+SBUI SUBFAMILY USER INDEX 01977 M00S01114.pfdump +++| SA7 SPAR+2 01978 M00S01115.pfdump +++| SETPFP SPAR 01979 M00S01116.pfdump +++| SETFET LOCK,ERP=E SET USER ERROR PROCESSING
| Line S01117 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01980 M01S01117.ns21000 ---| ATTACH LOCK,,,,R,,,,IE
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01981 M01S00008.ns21000 +++| CATLIST LOCK,,,,,,,IE GET PFC ENTRY 01982 M01S00009.ns21000 +++| ATTACH LOCK,,,,RU,,,,IE 01983 M00S01118.pfdump +++| 01984 M00S01119.pfdump +++|* CHECK ATTACH ERROR CODE. 01985 M00S01120.pfdump +++| 01986 M00S01121.pfdump +++| SA1 X2
| Line S01122 Modification History | |
|---|---|
M01 (Removed by) | pfdum1 |
Seq # *Modification Id* Act ----------------------------+ 01987 M01S01122.pfdum1 ---| MX2 42 01988 M01S01123.pfdum1 ---| BX6 X2*X1
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | pfdum1 |
M02 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01989 M02S00002.ns21000 ---| BX6 X0*X1 01990 M00S01124.pfdump +++| MX0 -8 01991 M00S01125.pfdump +++| LX1 7-17 01992 M00S01126.pfdump +++| BX4 -X0*X1 ERROR CODE
| Line S01127 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01993 M01S01127.ns21000 ---| SA6 LOCK+8 SET FILE NAME IN FET
| Line S01128 Modification History | |
|---|---|
M01 (Removed by) | ns2005 |
M02 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01994 M02S01128.ns21000 ---| CATLIST LOCK GET PFC ENTRY
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2005 |
M02 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01995 M02S00001.ns21000 ---| CATLIST LOCK,,,,,,,IE GET PFC ENTRY
| Line S01129 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01996 M01S01129.v23l617 ---| SA3 ALFA RESTORE LOCK INDEX 01997 M01S01130.v23l617 ---| SB6 X3+ 01998 M00S01131.pfdump +++| ZR X4,ALF1 IF NO ERROR ON *ATTACH* 01999 M00S01132.pfdump +++| SX3 X4-/ERRMSG/FNF 02000 M00S01133.pfdump +++| NZ X3,ALFX IF FILE FOUND BUT UNAVAILABLE 02001 M00S01134.pfdump +++| 02002 M00S01135.pfdump +++|* INDICATE LOCK FILE OBTAINED. 02003 M00S01136.pfdump +++| 02004 M00S01137.pfdump +++| ALF1 SA1 LMSK SET LOCK MASK BIT 02005 M00S01138.pfdump +++| SX2 B1 02006 M00S01139.pfdump +++| LX2 B6,X2 02007 M00S01140.pfdump +++| BX6 X1+X2 02008 M00S01141.pfdump +++| SA6 A1
| Line S00054 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02009 M01S00054.v23l617 +++| AX2 B4 02010 M00S01142.pfdump +++| SA1 CMSK CLEAR CONTROL MASK BIT 02011 M00S01143.pfdump +++| BX6 X1-X2 02012 M00S01144.pfdump +++| SA6 A1 02013 M00S01145.pfdump +++| EQ ALFX RETURN
| Line S01146 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02014 M01S01146.v23l617 ---| 02015 M01S01147.v23l617 ---| ALFA BSSZ 1 LOCK FILE INDEX SAVE AREA
| Line S01148 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02016 M01S01148.253l688 ---| BEL SPACE 4,15 02017 M01S01149.253l688 ---|** BEL - BUILD ERRLOG MESSAGE. 02018 M01S01150.253l688 ---|* 02019 M01S01151.253l688 ---|* ENTRY (X5) = DAYFILE MESSAGE ADDRESS. 02020 M01S01152.253l688 ---|* (MPDN) = DEVICE NUMBER.
| Line S01153 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02021 M02S01153.253l688 ---|* (MPEQ) = EQUIPMENT NUMBER.
| Line S00130 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02022 M02S00130.253l688 ---|* (MPEQ) = EST ORDINAL.
| Line S01154 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02023 M01S01154.253l688 ---|* 02024 M01S01155.253l688 ---|* EXIT (X5) = ERRLOG MESSAGE ADDRESS. 02025 M01S01156.253l688 ---|* 02026 M01S01157.253l688 ---|* USES X - ALL. 02027 M01S01158.253l688 ---|* A - 1, 2, 3, 6. 02028 M01S01159.253l688 ---|* B - 2, 3, 4. 02029 M01S01160.253l688 ---|* 02030 M01S01161.253l688 ---|* CALLS COD. 02031 M01S01162.253l688 ---| 02032 M01S01163.253l688 ---| 02033 M01S01164.253l688 ---| BEL SUBR ENTRY/EXIT 02034 M01S01165.253l688 ---|
| Line S01166 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02035 M02S01166.253l688 ---|* SETUP ERRLOG MESSAGE PREFIX.
| Line S00131 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02036 M02S00131.253l688 ---|* SET UP ERRLOG MESSAGE PREFIX.
| Line S01167 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02037 M01S01167.253l688 ---|
| Line S01168 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02038 M02S01168.253l688 ---| SA1 MPEQ SET EQUIPMENT NUMBER 02039 M02S01169.253l688 ---| SX1 X1+100B INSURE LEADING ZERO
| Line S00132 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02040 M02S00132.253l688 ---| SA1 MPEQ SET EST ORDINAL 02041 M02S00133.253l688 ---| SX1 X1+1000B ENSURE LEADING ZEROES
| Line S01170 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02042 M01S01170.253l688 ---| RJ COD CONVERT OCTAL TO DISPLAY CODE 02043 M01S01171.253l688 ---| SA1 BELA
| Line S01172 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02044 M02S01172.253l688 ---| MX0 -12
| Line S00134 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02045 M02S00134.253l688 ---| MX0 -18
| Line S01173 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02046 M01S01173.253l688 ---| BX6 -X0*X6
| Line S01174 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02047 M02S01174.253l688 ---| LX0 47-11 02048 M02S01175.253l688 ---| LX6 47-11
| Line S00135 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02049 M02S00135.253l688 ---| LX0 47-17 02050 M02S00136.253l688 ---| LX6 47-17
| Line S01176 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02051 M01S01176.253l688 ---| BX1 X0*X1 02052 M01S01177.253l688 ---| BX6 X1+X6 02053 M01S01178.253l688 ---| SA6 A1+ 02054 M01S01179.253l688 ---| SA1 MPDN SET DEVICE NUMBER 02055 M01S01180.253l688 ---| SX1 X1+100B INSURE LEADING ZERO 02056 M01S01181.253l688 ---| RJ COD CONVERT OCTAL TO DISPLAY CODE 02057 M01S01182.253l688 ---| SA1 BELA 02058 M01S01183.253l688 ---| MX0 -12 02059 M01S01184.253l688 ---| BX6 -X0*X6
| Line S01185 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02060 M02S01185.253l688 ---| LX0 17-11 02061 M02S01186.253l688 ---| LX6 17-11
| Line S01187 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02062 M01S01187.253l688 ---| BX1 X0*X1 02063 M01S01188.253l688 ---| BX6 X1+X6 02064 M01S01189.253l688 ---| SA6 A1 02065 M01S01190.253l688 ---| 02066 M01S01191.253l688 ---|* MOVE DAYFILE MESSAGE DESCRIPTIVE STRING TO ERRLOG MESSAGE. 02067 M01S01192.253l688 ---| 02068 M01S01193.253l688 ---| SB2 B0 INITIALIZE WORD INDEX 02069 M01S01194.253l688 ---| SB4 10D 02070 M01S01195.253l688 ---| BEL1 SB3 B0 INITIALIZE CHARACTER INDEX 02071 M01S01196.253l688 ---| SA2 =1L, SET SEARCH CHARACTER 02072 M01S01197.253l688 ---| MX0 6 SET SEARCH MASK 02073 M01S01198.253l688 ---| SA3 BELB+B2 GET ERRLOG MESSAGE WORD 02074 M01S01199.253l688 ---| SA1 X5+B2 GET DAYFILE MESSAGE WORD 02075 M01S01200.253l688 ---| BX6 X3 02076 M01S01201.253l688 ---| BEL2 BX4 X0*X1 GET DAYFILE MESSAGE CHARACTER 02077 M01S01202.253l688 ---| BX7 X2-X4 02078 M01S01203.253l688 ---| ZR X7,BEL3 IF SEARCH CHARACTER FOUND 02079 M01S01204.253l688 ---| BX6 -X0*X6 INSERT DAYFILE CHARACTER 02080 M01S01205.253l688 ---| BX6 X4+X6 02081 M01S01206.253l688 ---| LX0 -6 SETUP FOR NEXT CHARACTER 02082 M01S01207.253l688 ---| LX2 -6 02083 M01S01208.253l688 ---| SB3 B3+B1 INCREMENT CHARACTER INDEX 02084 M01S01209.253l688 ---| LT B3,B4,BEL2 IF MORE CHARACTERS 02085 M01S01210.253l688 ---| SA6 A3 SAVE NEW ERRLOG MESSAGE WORD 02086 M01S01211.253l688 ---| SB2 B2+B1 INCREMENT WORD INDEX 02087 M01S01212.253l688 ---| SX1 B2-7 02088 M01S01213.253l688 ---| NG X1,BEL1 IF MORE WORDS 02089 M01S01214.253l688 ---| EQ BEL4 ADD LINE TERMINATOR 02090 M01S01215.253l688 ---| 02091 M01S01216.253l688 ---|* TERMINATE DESCRIPTIVE STRING WITH A PERIOD. 02092 M01S01217.253l688 ---| 02093 M01S01218.253l688 ---| BEL3 SX2 B3 02094 M01S01219.253l688 ---| LX2 2 02095 M01S01220.253l688 ---| SX3 B3 02096 M01S01221.253l688 ---| LX3 1 02097 M01S01222.253l688 ---| IX2 X2+X3 02098 M01S01223.253l688 ---| SB4 60D 02099 M01S01224.253l688 ---| SB3 X2 6*CHARACTER INDEX (0-9) 02100 M01S01225.253l688 ---| SB3 B4-B3 02101 M01S01226.253l688 ---| SA2 =1L. REPLACE COMMA WITH PERIOD 02102 M01S01227.253l688 ---| LX2 B3,X2 02103 M01S01228.253l688 ---| BX6 -X0*X6 02104 M01S01229.253l688 ---| BX6 X2+X6 02105 M01S01230.253l688 ---|
| Line S01231 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02106 M02S01231.253l688 ---|* SUPPLY ERRLOG MESSAGE LINE TERMINATOR.
| Line S00137 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02107 M02S00137.253l688 ---|* INSERT COMMA AFTER DEVICE NUMBER, ADD END OF LINE.
| Line S01232 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02108 M01S01232.253l688 ---| 02109 M01S01233.253l688 ---| SB2 -B3 CONSTRUCT MASK TO ZERO FILL WORD 02110 M01S01234.253l688 ---| MX0 1 02111 M01S01235.253l688 ---| SB3 59+6+B2 02112 M01S01236.253l688 ---| AX0 B3 02113 M01S01237.253l688 ---| BX6 X0*X6 02114 M01S01238.253l688 ---| SA6 A3+ SAVE LAST ERRLOG MESSAGE WORD 02115 M01S01239.253l688 ---| BEL4 BX6 X6-X6 02116 M01S01240.253l688 ---| SA6 A3+B1 ADD LINE TERMINATOR
| Line S00138 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02117 M02S00138.253l688 ---| SX6 1R,&1R INSERT COMMA AFTER DEVICE NUMBER 02118 M02S00139.253l688 ---| SA3 BELA+1 02119 M02S00140.253l688 ---| LX6 54 02120 M02S00141.253l688 ---| BX6 X3-X6 02121 M02S00142.253l688 ---| SA6 A3+
| Line S01241 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02122 M01S01241.253l688 ---| SX5 BELA SET ERRLOG MESSAGE ADDRESS 02123 M01S01242.253l688 ---| EQ BELX RETURN 02124 M01S01243.253l688 ---|
| Line S01244 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02125 M02S01244.253l688 ---| BELA DATA 10HEQXX,DNXX, ERRLOG MESSAGE BUILD AREA
| Line S00143 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02126 M02S00143.253l688 ---| BELA DATA 10HEQXXX,DNXX ERRLOG MESSAGE PREFIX
| Line S01245 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02127 M01S01245.253l688 ---| BELB BSSZ 8 02128 M01S01246.253l688 ---| CAC SPACE 4,15 02129 M01S01247.253l688 ---|** CAC - CLEAR PF ACTIVITY COUNT. 02130 M01S01248.253l688 ---|* 02131 M01S01249.253l688 ---|* ENTRY (ACFL) = 1 IF ACTIVITY COUNT SET. 02132 M01S01250.253l688 ---|* = 0 IF ACTIVITY COUNT ALREADY CLEAR.
| Line S01251 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02133 M02S01251.253l688 ---|* (MAEQ) = MASTER EQUIPMENT NUMBER.
| Line S00144 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02134 M02S00144.253l688 ---|* (MAEQ) = MASTER DEVICE EST ORDINAL.
| Line S01252 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02135 M01S01252.253l688 ---|* 02136 M01S01253.253l688 ---|* EXIT (ACFL) = 0. 02137 M01S01254.253l688 ---|* PFU CALLED TO CLEAR PF ACTIVITY COUNT IF NOT ALREADY 02138 M01S01255.253l688 ---|* CLEAR. 02139 M01S01256.253l688 ---|* 02140 M01S01257.253l688 ---|* USES X - 1, 3, 6. 02141 M01S01258.253l688 ---|* A - 1, 3, 6. 02142 M01S01259.253l688 ---|* 02143 M01S01260.253l688 ---|* MACROS CALLPFU, MESSAGE, MOVE. 02144 M01S01261.253l688 ---| 02145 M01S01262.253l688 ---| 02146 M01S01263.253l688 ---| CAC SUBR ENTRY/EXIT 02147 M01S01264.253l688 ---| SA1 ACFL CHECK ACTIVITY COUNT FLAG 02148 M01S01265.253l688 ---| SX6 ACFL SET ACTIVITY COUNT FLAG ADDRESS 02149 M01S01266.253l688 ---| ZR X1,CACX IF ACTIVITY COUNT ALREADY CLEAR
| Line S01267 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02150 M02S01267.253l688 ---| SA1 MAEQ SET MASTER EQUIPMENT NUMBER
| Line S00145 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02151 M02S00145.253l688 ---| SA1 MAEQ SET MASTER DEVICE EST ORDINAL
| Line S01268 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02152 M01S01268.253l688 ---| LX1 -12 02153 M01S01269.253l688 ---| BX6 X1+X6 MERGE WITH FET ADDRESS 02154 M01S01270.253l688 ---| SA6 ACFT+FTPM 02155 M01S01271.253l688 ---| SA3 IDSA+/COMSPFS/ADM1 *K* DISPLAY MESSAGE ADDRESS 02156 M01S01272.253l688 ---| MOVE 4,MSGF,X3 *CLEARING PF ACTIVITY COUNT.* 02157 M01S01273.253l688 ---| MESSAGE MSGF,2,R 02158 M01S01274.253l688 ---| CALLPFU ACFT,CTDA,R DECREMENT PF ACTIVITY COUNT 02159 M01S01275.253l688 ---| SA3 IDSA+/COMSPFS/ADM1 *K* DISPLAY MESSAGE ADDRESS 02160 M01S01276.253l688 ---| MOVE 4,MSGL,X3 CLEAR MESSAGE 02161 M01S01277.253l688 ---| MESSAGE (=C**),2,R 02162 M01S01278.253l688 ---| EQ CACX RETURN
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | ns2083 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02163 M02S00016.253l688 ---| CAF SPACE 4,20 02164 M02S00017.253l688 ---|** CAF - CLEAR ALTERNATE STORAGE TEMPORARY ERROR FLAG. 02165 M02S00018.253l688 ---|* 02166 M02S00019.253l688 ---|* ENTRY (B3) = FWA OF CATALOG ENTRY. 02167 M02S00020.253l688 ---|* (CRTK) = TRACK FROM WHICH CATALOG ENTRY WAS READ. 02168 M02S00021.253l688 ---|* (CRSC) = SECTOR WITHIN TRACK FROM WHICH CATALOG ENTRY 02169 M02S00022.253l688 ---|* WAS READ. 02170 M02S00023.253l688 ---|* (CRCO) = ORDINAL (RELATIVE INDEX WITHIN SECTOR) 02171 M02S00024.253l688 ---|* FROM WHICH CATALOG ENTRY WAS READ. 02172 M02S00025.253l688 ---|* (SGDN) = DEVICE NUMBER. 02173 M02S00026.253l688 ---|* (SGFM) = FAMILY NAME. 02174 M02S00027.253l688 ---|* CATALOG TRACK INTERLOCKED. 02175 M02S00028.253l688 ---|* 02176 M02S00029.253l688 ---|* EXIT ALTERNATE STORAGE TEMPORARY ERROR FLAG CLEARED. 02177 M02S00030.253l688 ---|* CATALOG TRACK INTERLOCK CLEARED DURING EXECUTION 02178 M02S00031.253l688 ---|* OF THIS ROUTINE IS RESET UPON EXIT. 02179 M02S00032.253l688 ---|* 02180 M02S00033.253l688 ---|* USES X - 0, 1, 2, 4, 6. 02181 M02S00034.253l688 ---|* A - 1, 2, 6. 02182 M02S00035.253l688 ---|* 02183 M02S00036.253l688 ---|* MACROS CLEARAF, PCINT. 02184 M02S00037.253l688 ---| 02185 M02S00038.253l688 ---| 02186 M02S00039.253l688 ---| CAF SUBR ENTRY/EXIT 02187 M02S00040.253l688 ---| PCINT CATS,CTCC CLEAR CATALOG TRACK INTERLOCK 02188 M02S00041.253l688 ---| 02189 M02S00042.253l688 ---|* INITIALIZE *CLEARAF* FET. 02190 M02S00043.253l688 ---| 02191 M02S00044.253l688 ---| SA1 B3+FCFN+FCUI* GET FILE NAME AND USER INDEX 02192 M02S00045.253l688 ---| MX0 42 02193 M02S00046.253l688 ---| SA2 SRFT+CFSN SET FILE NAME 02194 M02S00047.253l688 ---| BX6 X0*X1 02195 M02S00048.253l688 ---| BX2 -X0*X2 02196 M02S00049.253l688 ---| BX6 X6+X2 02197 M02S00050.253l688 ---| SA6 A2 02198 M02S00051.253l688 ---| 02199 M02S00052.253l688 ---|* INITIALIZE *CLEARAF* SPECIAL REQUEST BLOCK. 02200 M02S00053.253l688 ---| 02201 M02S00054.253l688 ---| SA2 SGFM SET FAMILY NAME 02202 M02S00055.253l688 ---| BX6 -X0*X1 SET USER INDEX 02203 M02S00056.253l688 ---| BX6 X2+X6 02204 M02S00057.253l688 ---| SA6 SRBK+SFFM+SFUI* 02205 M02S00058.253l688 ---| MX0 -36 02206 M02S00059.253l688 ---| SA1 B3+FCCD SET CREATION DATE/TIME 02207 M02S00060.253l688 ---| BX6 -X0*X1 02208 M02S00061.253l688 ---| SA6 SRBK+SFCD 02209 M02S00062.253l688 ---| SA1 B3+FCAA+FCAT* SET ALTERNATE STORAGE ADDRESS 02210 M02S00063.253l688 ---| BX6 X1 02211 M02S00064.253l688 ---| SA6 SRBK+SFAS 02212 M02S00065.253l688 ---| SA1 CRCO SET *PF-ID* 02213 M02S00066.253l688 ---| SA2 SGDN 02214 M02S00067.253l688 ---| LX1 7-1 02215 M02S00068.253l688 ---| BX6 X1+X2 02216 M02S00069.253l688 ---| SA1 CRTK 02217 M02S00070.253l688 ---| LX6 19-7 02218 M02S00071.253l688 ---| BX6 X6+X1 02219 M02S00072.253l688 ---| SA2 CRSC 02220 M02S00073.253l688 ---| LX6 31-19 02221 M02S00074.253l688 ---| BX6 X6+X2 02222 M02S00075.253l688 ---| SA6 SRBK+SFID 02223 M02S00076.253l688 ---| 02224 M02S00077.253l688 ---|* ISSUE CLEAR ALTERNATE STORAGE FLAG REQUEST. 02225 M02S00078.253l688 ---| 02226 M02S00079.253l688 ---| SX4 AFTMP 02227 M02S00080.253l688 ---| CLEARAF SRFT,,,,,,,X4 02228 M02S00081.253l688 ---| PCINT CATS,CTSC RESET CATALOG TRACK INTERLOCK 02229 M02S00082.253l688 ---| EQ CAFX RETURN
| Line S01279 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02230 M01S01279.253l688 ---| CDS SPACE 4,20 02231 M01S01280.253l688 ---|** CDS - CHECK DEVICE STATUS. 02232 M01S01281.253l688 ---|* 02233 M01S01282.253l688 ---|* ENTRY (X0) = 42/,18/CATALOG ADDRESS. 02234 M01S01283.253l688 ---|* (X1) = DIRECT ACCESS FILE RESIDENCY DEVICE. 02235 M01S01284.253l688 ---|* 02236 M01S01285.253l688 ---|* EXIT (X6) = 0 IF DEVICE FOUND. 02237 M01S01286.253l688 ---|* = NON-ZERO IF DEVICE NOT FOUND.
| Line S01287 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02238 M02S01287.253l688 ---|* (X7) = EQUIPMENT NUMBER.
| Line S00146 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02239 M02S00146.253l688 ---|* (X7) = EST ORDINAL.
| Line S01288 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02240 M01S01288.253l688 ---|* MESSAGE ISSUED IF RESIDENCY DEVICE NOT FOUND. 02241 M01S01289.253l688 ---|* 02242 M01S01290.253l688 ---|* USES X - 2, 3, 6, 7. 02243 M01S01291.253l688 ---|* A - 2, 6, 7. 02244 M01S01292.253l688 ---|* B - 2, 3. 02245 M01S01293.253l688 ---|* 02246 M01S01294.253l688 ---|* CALLS SEM. 02247 M01S01295.253l688 ---|* 02248 M01S01296.253l688 ---|* MACROS EDITS. 02249 M01S01297.253l688 ---| 02250 M01S01298.253l688 ---| 02251 M01S01299.253l688 ---|* SET DIRECT ACCESS FILE EQUIPMENT. 02252 M01S01300.253l688 ---| 02253 M01S01301.253l688 ---| CDS2 LX2 -6 SET DIRECT ACCESS FILE EQUIPMENT
| Line S00147 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02254 M02S00147.253l688 ---| MX7 -9
| Line S01302 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02255 M01S01302.253l688 ---| BX7 -X7*X2 02256 M01S01303.253l688 ---| 02257 M01S01304.253l688 ---| CDS SUBR ENTRY/EXIT 02258 M01S01305.253l688 ---| SB2 MSTT SET MASS STORAGE TABLE ADDRESS 02259 M01S01306.253l688 ---| MX7 -6 02260 M01S01307.253l688 ---| SB3 B1+B1 02261 M01S01308.253l688 ---| CDS1 SA2 B2 GET MASS STORAGE TABLE ENTRY 02262 M01S01309.253l688 ---| BX3 -X7*X2 COMPARE DEVICE NUMBERS 02263 M01S01310.253l688 ---| IX6 X1-X3 02264 M01S01311.253l688 ---| SB2 B2+B3 INCREMENT MASS STORAGE TABLE ADDRESS 02265 M01S01312.253l688 ---| ZR X6,CDS2 IF CORRECT DEVICE 02266 M01S01313.253l688 ---| NZ X2,CDS1 IF NOT END OF MASS STORAGE TABLE 02267 M01S01314.253l688 ---| SA2 X0 SET FILE NAME 02268 M01S01315.253l688 ---| BX6 X1 SET DEVICE NUMBER 02269 M01S01316.253l688 ---| MX3 42 02270 M01S01317.253l688 ---| BX7 X3*X2 02271 M01S01318.253l688 ---| SA6 MPDN 02272 M01S01319.253l688 ---| SA7 MPFN 02273 M01S01320.253l688 ---| BX6 -X3*X2 SET USER INDEX 02274 M01S01321.253l688 ---| SA6 MPUI 02275 M01S01322.253l688 ---| BX7 X0 SAVE (X0) 02276 M01S01323.253l688 ---| SA7 CDSA 02277 M01S01324.253l688 ---| EDITS MSMD,MES11 BUILD MISSING DEVICE MESSAGE 02278 M01S01325.253l688 ---| RJ SEM SEND ERROR MESSAGE 02279 M01S01326.253l688 ---| SA2 CDSA RESTORE (X0) 02280 M01S01327.253l688 ---| BX0 X2 02281 M01S01328.253l688 ---| SX6 B1 SET DEVICE NOT FOUND STATUS 02282 M01S01329.253l688 ---| EQ CDSX RETURN 02283 M01S01330.253l688 ---| 02284 M01S01331.253l688 ---| CDSA BSSZ 1 (X0) SAVE AREA 02285 M01S01332.253l688 ---| CFS SPACE 4,25
| Line S00106 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02286 M02S00106.286l859 ---| CFS SPACE 4,20
| Line S01333 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02287 M01S01333.286l859 ---|** CFS - CHECK FILE STATUS.
| Line S00456 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02288 M01S00456.286l859 +++| APR SPACE 4,10 02289 M01S00457.286l859 +++|** APR - ABORT PROCESSOR. 02290 M00S01334.pfdump +++|*
| Line S01335 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02291 M01S01335.286l859 ---|* ENTRY (DBUFH) = FILE CONTROL WORD.
| Line S00458 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02292 M01S00458.286l859 +++|* EXIT SCRATCH FILES RETURNED. 02293 M01S00459.286l859 +++|* OUTPUT FILES FLUSHED. 02294 M01S00460.286l859 +++|* INTERLOCKS RELEASED.
| Line S01336 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02295 M01S01336.253l688 ---|* (CBRI) = CATALOG BUFFER RANDOM INDEX FOR AFFECTED 02296 M01S01337.253l688 ---|* CATALOG ENTRY.
| Line S01338 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 02297 M01S01338.ns21000 ---|* (LMSK) = LOCK FILE MASK. 02298 M00S01339.pfdump +++|*
| Line S01340 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02299 M01S01340.253l688 ---|* EXIT (X2) = 0, IF TOTAL FILE TO BE DUMPED. 02300 M01S01341.253l688 ---|* = 1, IF PFC/PERMITS ONLY TO BE DUMPED. 02301 M01S01342.253l688 ---|* = 2, IF FILE NOT TO BE DUMPED.
| Line S00107 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02302 M02S00107.286l859 ---|* EXIT (X2) = 0, IF FILE TO BE DUMPED. 02303 M02S00108.286l859 ---|* = 1, IF FILE NOT TO BE DUMPED.
| Line S01343 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02304 M01S01343.286l859 ---|* UTILITY CONTROL DATE/TIME UPDATED FOR CATALOG ENTRY, 02305 M01S01344.286l859 ---|* IF DIRECT ACCESS FILE FOUND BUSY.
| Line S00461 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02306 M01S00461.286l859 +++|* CALLS CAC, CID, FAF, RLF, RMF.
| Line S01345 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02307 M01S01345.253l688 ---|* DEVICE ERROR IDLE SET, IF UTILITY CONTROL DATE/TIME 02308 M01S01346.253l688 ---|* UPDATE VERIFICATION ERROR OCCURS.
| Line S00013 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02309 M02S00013.253l688 ---|* DEVICE ERROR IDLE SET, IF WRITE ERROR ON CATALOG 02310 M02S00014.253l688 ---|* FILE AND DATA ON THE FILE HAS BEEN CORRUPTED.
| Line S01347 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02311 M01S01347.253l688 ---|* ALTERNATE STORAGE OBSOLETE FLAG CLEARED IN THE CATALOG 02312 M01S01348.253l688 ---|* ENTRY, IF DIRECT ACCESS FILE FOUND BUSY AND ITS 02313 M01S01349.253l688 ---|* ALTERNATE STORAGE ADDRESS SET. 02314 M00S01350.pfdump +++|*
| Line S01351 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02315 M01S01351.253l688 ---|* USES X - 0, 1, 2, 3, 5, 6, 7. 02316 M01S01352.253l688 ---|* A - 1, 2, 3, 6, 7.
| Line S00109 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02317 M02S00109.286l859 ---|* USES X - 0, 1, 2, 6, 7. 02318 M02S00110.286l859 ---|* A - 1, 2, 6, 7. 02319 M02S00111.286l859 ---|* B - 2, 3, 4.
| Line S00462 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02320 M01S00462.286l859 +++|* MACROS MESSAGE, RETURN, SETPFP. 02321 M01S00463.286l859 +++| 02322 M01S00464.286l859 +++| 02323 M01S00465.286l859 +++| APR SUBR ENTRY/EXIT 02324 M01S00466.286l859 +++| RETURN CATC 02325 M01S00467.286l859 +++| RETURN REQS 02326 M01S00468.286l859 +++| RETURN RESS 02327 M01S00469.286l859 +++| RETURN TC 02328 M01S00470.286l859 +++| RETURN PFMREQ 02329 M01S00471.286l859 +++| RJ RLF RELEASE LOCK FILES 02330 M01S00472.286l859 +++| RJ RMF RETURN MASTER DEVICE FILES 02331 M01S00473.286l859 +++| RJ CAC CLEAR PERMANENT FILE ACTIVITY COUNT 02332 M01S00474.286l859 +++| RJ CID CHECK INCOMPLETE FILE DUMP 02333 M01S00475.286l859 +++| ARCHIVE WRITEF WRITE EOF ON ARCHIVE/VERIFY FILES 02334 M01S00476.286l859 +++| RJ FAF FLUSH ARCHIVE/VERIFY FILES 02335 M01S00477.286l859 +++| SETPFP GPAR RESTORE PERMANENT FILE PARAMETERS 02336 M01S00478.286l859 +++| EQ APRX RETURN 02337 M01S00479.286l859 +++| CCR SPACE 4,15 02338 M01S00480.286l859 +++|** CCR - CHECK CATALOG RESCAN FILE. 02339 M00S01353.pfdump +++|*
| Line S01354 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02340 M01S01354.253l688 ---|* CALLS SEI, SEM.
| Line S00112 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02341 M02S00112.286l859 ---|* CALLS SEM, UCE.
| Line S00481 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02342 M01S00481.286l859 +++|* ENTRY (A0) = CATALOG ENTRY ADDRESS. 02343 M01S00482.286l859 +++|* (CTIN) = CURRENT CATALOG TRACK INDEX. 02344 M01S00483.286l859 +++|* (RESE - RESE+1) = CURRENT RESCAN ENTRY. 02345 M00S01355.pfdump +++|*
| Line S01356 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02346 M01S01356.253l688 ---|* MACROS CALLPFU, EDITS.
| Line S00113 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02347 M02S00113.286l859 ---|* MACROS EDITS.
| Line S00484 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02348 M01S00484.286l859 +++|* EXIT (A0) = CATALOG ENTRY ADDRESS. 02349 M01S00485.286l859 +++|* (X6) .LT. 0 IF END OF RESCAN FILE. 02350 M01S00486.286l859 +++|* (X6) = 0 IF FILE TO BE SKIPPED. 02351 M01S00487.286l859 +++|* (X6) .GT. 0 IF FILE TO BE PROCESSED. 02352 M01S00488.286l859 +++|* 02353 M01S00489.286l859 +++|* USES X - 1, 2, 3, 4, 6. 02354 M01S00490.286l859 +++|* A - 1, 2, 3, 4. 02355 M00S01357.pfdump +++| 02356 M00S01358.pfdump +++|
| Line S01359 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02357 M01S01359.286l859 ---| CFS SUBR ENTRY/EXIT
| Line S00491 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02358 M01S00491.286l859 +++| CCR SUBR ENTRY/EXIT 02359 M01S00492.286l859 +++| CCR1 SA1 RESE 02360 M01S00493.286l859 +++| SA2 CTIN 02361 M01S00494.286l859 +++| SA3 RESE+1 02362 M01S00495.286l859 +++| SA4 A0+FCFN 02363 M01S00496.286l859 +++| SX6 B0+ SET TO SKIP FILE 02364 M01S00497.286l859 +++| IX1 X1-X2 02365 M01S00498.286l859 +++| BX3 X3-X4 02366 M01S00499.286l859 +++| NG X1,CCR2 IF CURRENT ENTRY PAST STAGE REQUEST 02367 M01S00500.286l859 +++| NZ X1,CCRX IF STAGE REQUEST PAST CURRENT ENTRY 02368 M01S00501.286l859 +++| NZ X3,CCRX IF NOT SAME FILE NAME AND USER INDEX 02369 M01S00502.286l859 +++| SX6 1 SET PROCESS FILE 02370 M01S00503.286l859 +++| EQ CCRX RETURN 02371 M00S01360.pfdump +++|
| Line S01361 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02372 M01S01361.286l859 ---|* CHECK FOR BUSY FILE.
| Line S00504 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02373 M01S00504.286l859 +++| CCR2 READW RESS,RESE,2 READ NEXT STAGE REQUEST 02374 M01S00505.286l859 +++| ZR X1,CCR1 IF NOT END OF RESCAN FILE 02375 M01S00506.286l859 +++| SX6 -1 SET TERMINATE RESCAN 02376 M01S00507.286l859 +++| EQ CCRX RETURN 02377 M01S00508.286l859 +++| CDT SPACE 4,15 02378 M01S00509.286l859 +++|** CDT - COPY FILE DATA FROM ALTERNATE STORAGE TAPE. 02379 M01S00510.286l859 +++|* 02380 M01S00511.286l859 +++|* ENTRY ALTERNATE STORAGE TAPE POSITIONED AT FIRST BLOCK 02381 M01S00512.286l859 +++|* AFTER CATALOG ENTRY. 02382 M01S00513.286l859 +++|* 02383 M01S00514.286l859 +++|* EXIT FILE DATA COPIED FROM ALTERNATE STORGE TAPE TO ARCHIVE 02384 M01S00515.286l859 +++|* FILE(S). 02385 M01S00516.286l859 +++|* 02386 M01S00517.286l859 +++|* USES X - 1, 2, 3, 4, 5, 6, 7. 02387 M01S00518.286l859 +++|* A - 1, 2, 4, 5, 6, 7. 02388 M01S00519.286l859 +++|* B - 2, 3. 02389 M01S00520.286l859 +++|* 02390 M01S00521.286l859 +++|* CALLS RCW, SFE, WDT. 02391 M01S00522.286l859 +++|* 02392 M01S00523.286l859 +++|* MACROS ARCHIVE, CWREAD. 02393 M00S01362.pfdump +++|
| Line S01363 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02394 M01S01363.286l859 ---| SA1 DBUFH 02395 M01S01364.286l859 ---| MX0 12 02396 M01S01365.286l859 ---| BX2 X0*X1 02397 M01S01366.286l859 ---| ZR X2,CFSX IF NO ERROR CONDITION AND FILE NOT BUSY 02398 M00S01367.pfdump +++|
| Line S01368 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02399 M01S01368.286l859 ---|* SET UP MESSAGE.
| Line S00524 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02400 M01S00524.286l859 +++| CDT SUBR ENTRY/EXIT 02401 M00S01369.pfdump +++|
| Line S01370 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02402 M01S01370.286l859 ---| SA2 CATH+FCFN+FCUI* GET FILE NAME AND USER INDEX
| Line S01371 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02403 M02S01371.286l859 ---| BX6 X2 SAVE FOR POSSIBLE UTILITY CONTROL UPDATE
| Line S01372 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02404 M01S01372.286l859 ---| MX0 42
| Line S01373 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02405 M02S01373.286l859 ---| SA6 UULV
| Line S01374 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02406 M01S01374.286l859 ---| BX6 X0*X2 02407 M01S01375.286l859 ---| BX7 -X0*X2 02408 M01S01376.286l859 ---| SA6 MPFN 02409 M01S01377.286l859 ---| SA7 MPUI 02410 M01S01378.286l859 ---| SA1 CPAR+/COMSPFS/CPDN GET AND SAVE DEVICE NUMBER
| Line S01379 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02411 M02S01379.286l859 ---| SA2 MAEQ GET AND SAVE EQUIPMENT NUMBER
| Line S00148 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02412 M02S00148.286l859 ---| SA2 MAEQ GET AND SAVE EST ORDINAL
| Line S00525 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02413 M01S00525.286l859 +++| SX6 B0+ 02414 M01S00526.286l859 +++| SA6 CDTA INITIALIZE BUFFER WORD COUNT 02415 M01S00527.286l859 +++| 02416 M01S00528.286l859 +++|* SKIP PERMITS BLOCKS. 02417 M01S00529.286l859 +++| 02418 M01S00530.286l859 +++| CDT1 RJ RCW READ BLOCK CONTROL WORD 02419 M01S00531.286l859 +++| NZ X7,CDT5 IF ERROR 02420 M01S00532.286l859 +++| NZ X1,CDT5 IF EOR, EOF, OR EOI ON ARCHIVE FILE 02421 M01S00533.286l859 +++| SX1 X3-3 02422 M01S00534.286l859 +++| ZR X1,CDT3 IF DATA BLOCK 02423 M01S00535.286l859 +++| SX1 X3-2 02424 M01S00536.286l859 +++| NZ X1,CDT5 IF NOT PERMITS BLOCK 02425 M01S00537.286l859 +++| CWREAD AST,DBUFH,X6 READ BLOCK 02426 M01S00538.286l859 +++| NZ X7,CDT5 IF ERROR 02427 M01S00539.286l859 +++| NZ X1,CDT5 IF EOR, EOF, OR EOI
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | pfdum28 |
Seq # *Modification Id* Act ----------------------------+ 02428 M01S00001.pfdum28 +++| EQ CDT1 READ BLOCK CONTROL WORD
| Line S00540 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02429 M01S00540.286l859 +++| 02430 M01S00541.286l859 +++|* READ NEXT DATA BLOCK CONTROL WORD. 02431 M01S00542.286l859 +++| 02432 M01S00543.286l859 +++| CDT2 RJ RCW READ BLOCK CONTROL WORD 02433 M01S00544.286l859 +++| NZ X7,CDT5 IF ERROR 02434 M01S00545.286l859 +++| NG X1,CDT5 IF EOF OR EOI ON ARCHIVE FILE 02435 M01S00546.286l859 +++| NZ X1,CDT6 IF EOR ON ARCHIVE FILE 02436 M01S00547.286l859 +++| SX1 X3-3 02437 M01S00548.286l859 +++| NZ X1,CDT5 IF NOT DATA BLOCK 02438 M01S00549.286l859 +++| 02439 M01S00550.286l859 +++|* COPY DATA BLOCK TO ARCHIVE FILES. 02440 M01S00551.286l859 +++| 02441 M01S00552.286l859 +++| CDT3 SA1 CDTA 02442 M01S00553.286l859 +++| SA5 WREM 02443 M01S00554.286l859 +++| LX4 9 02444 M01S00555.286l859 +++| SX7 X4 02445 M01S00556.286l859 +++| SA7 CDTB SAVE BLOCK SUB-TYPE 02446 M01S00557.286l859 +++| IX7 X1+X6 BUFFER WORD COUNT INCLUDING NEW DATA BLOCK 02447 M01S00558.286l859 +++| SX5 X5-1 DATA SPACE REMAINING IN 1000B WORD SEGMENT 02448 M01S00559.286l859 +++| IX2 X5-X7 02449 M01S00560.286l859 +++| PL X2,CDT4 IF SUFFICIENT ROOM IN SEGMENT FOR DATA 02450 M01S00561.286l859 +++| IX3 X5-X1 SET WORD COUNT TO FILL SEGMENT 02451 M01S00562.286l859 +++| IX6 X6-X3 02452 M01S00563.286l859 +++| SA6 CDTC SAVE WORDS REMAINING IN NEW BLOCK 02453 M01S00564.286l859 +++| CWREAD AST,DBUFH+X1,X3 READ DATA 02454 M01S00565.286l859 +++| SA4 CDTB 02455 M01S00566.286l859 +++| NZ X7,CDT5 IF ERROR 02456 M01S00567.286l859 +++| NZ X1,CDT5 IF EOR, EOF, OR EOI ON ARCHIVE FILE 02457 M01S00568.286l859 +++| SX7 4000B 02458 M01S00569.286l859 +++| SB2 DBUFH SET DATA ADDRESS 02459 M01S00570.286l859 +++| SX6 DCWC+X5 SET DATA BLOCK TYPE AND LENGTH 02460 M01S00571.286l859 +++| SB3 X5+ SET WORD COUNT 02461 M01S00572.286l859 +++| BX4 X7*X4 PRESERVE SYSTEM SECTOR FLAG 02462 M01S00573.286l859 +++| BX6 X6+X4 MERGE SYSTEM SECTOR STATUS 02463 M01S00574.286l859 +++| SA6 CONTH SET CONTROL WORD 02464 M01S00575.286l859 +++| RJ WDT WRITE DATA 02465 M01S00576.286l859 +++| SA2 CDTC 02466 M01S00577.286l859 +++| SX1 B0+ SET OFFSET FOR READ 02467 M01S00578.286l859 +++| SX6 X2+ SET WORD COUNT TO READ 02468 M01S00579.286l859 +++| SX7 X2+ SET WORD COUNT IN BUFFER 02469 M01S00580.286l859 +++| CDT4 SA7 CDTA UPDATE WORDS IN WORKING BUFFER 02470 M01S00581.286l859 +++| CWREAD AST,DBUFH+X1,X6 READ DATA 02471 M01S00582.286l859 +++| SA4 CDTB 02472 M01S00583.286l859 +++| NZ X7,CDT5 IF ERROR 02473 M01S00584.286l859 +++| NZ X1,CDT5 IF EOR, EOF, OR EOI ON ARCHIVE FILE 02474 M01S00585.286l859 +++| ZR X4,CDT2 IF NOT SYSTEM SECTOR, EOR OR EOF BLOCK 02475 M01S00586.286l859 +++| SA1 CDTA 02476 M01S00587.286l859 +++| SB2 DBUFH SET DATA ADDRESS 02477 M01S00588.286l859 +++| SX6 DCWC+X1 02478 M01S00589.286l859 +++| BX6 X6+X4 SET DATA BLOCK SUB-TYPE 02479 M01S00590.286l859 +++| SB3 X1 SET WORD COUNT 02480 M01S00591.286l859 +++| SA6 CONTH SET CONTROL WORD 02481 M01S00592.286l859 +++| RJ WDT WRITE DATA 02482 M01S00593.286l859 +++| SX7 B0+ 02483 M01S00594.286l859 +++| SA7 CDTA SET NO DATA IN BUFFER 02484 M01S00595.286l859 +++| EQ CDT2 READ NEXT BLOCK CONTROL WORD 02485 M01S00596.286l859 +++| 02486 M01S00597.286l859 +++|* PROCESS ERROR IN ALTERNATE STORAGE FILE. 02487 M01S00598.286l859 +++| 02488 M01S00599.286l859 +++| CDT5 SA1 FLST 02489 M01S00600.286l859 +++| SX6 2 02490 M01S00601.286l859 +++| BX6 X1+X6 SET DATA ERROR IN FILE STATUS 02491 M01S00602.286l859 +++| SA6 A1 02492 M01S00603.286l859 +++| SA1 CATH+FCUI 02493 M01S00604.286l859 +++| SB2 ERTR * READ ERROR ON ALTERNATE STORAGE ...* 02494 M01S00605.286l859 +++| RJ SFE SEND ERROR MESSAGE 02495 M01S00606.286l859 +++| 02496 M01S00607.286l859 +++|* FLUSH DATA IN WORKING BUFFER AND COMPLETE FILE DUMP. 02497 M01S00608.286l859 +++| 02498 M01S00609.286l859 +++| CDT6 SA1 CDTA 02499 M01S00610.286l859 +++| ZR X1,CDT7 IF NO DATA IN WORKING BUFFER 02500 M01S00611.286l859 +++| SB2 DBUFH SET DATA ADDRESS 02501 M01S00612.286l859 +++| SB3 X1+ SET WORD COUNT 02502 M01S00613.286l859 +++| SX6 DCWC+X1 SET BLOCK TYPE 02503 M01S00614.286l859 +++| SA6 CONTH SET CONTROL WORD 02504 M01S00615.286l859 +++| RJ WDT WRITE DATA 02505 M01S00616.286l859 +++| CDT7 SA1 FLST 02506 M01S00617.286l859 +++| LX1 59-1 02507 M01S00618.286l859 +++| PL X1,CDT8 IF NO ERROR IN FILE DATA 02508 M01S00619.286l859 +++| SA1 LGCW GET ERROR CONTROL WORD 02509 M00S01380.pfdump +++| BX6 X1
| Line S00620 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02510 M01S00620.286l859 +++| SB3 B0 CLEAR DATA WORD COUNT 02511 M01S00621.286l859 +++| SA6 CONTH 02512 M01S00622.286l859 +++| SB2 CONTH SET BUFFER ADDRESS 02513 M01S00623.286l859 +++| RJ WDT WRITE ERROR CONTROL WORD 02514 M01S00624.286l859 +++| CDT8 ARCHIVE WRITER WRITE EOR ON ARCHIVE FILE 02515 M01S00625.286l859 +++| SX6 BFAC 02516 M01S00626.286l859 +++| SA6 WREM RESET BLOCK STATUS FOR NEXT FILE 02517 M01S00627.286l859 +++| EQ CDTX RETURN 02518 M01S00628.286l859 +++| 02519 M01S00629.286l859 +++| 02520 M01S00630.286l859 +++| CDTA CON 0 WORDS IN *DBUFH* 02521 M01S00631.286l859 +++| CDTB CON 0 DATA CONTROL WORD SUB-TYPE 02522 M01S00632.286l859 +++| CDTC CON 0 WORDS REMAINING IN DATA BLOCK 02523 M01S00633.286l859 +++| CFD SPACE 4,15 02524 M01S00634.286l859 +++|** CFD - COMPLETE FILE DUMP. 02525 M01S00635.286l859 +++|* 02526 M01S00636.286l859 +++|* ENTRY CATALOG ENTRY, PERMITS AND FILE DATA WRITTEN TO 02527 M01S00637.286l859 +++|* ARCHIVE FILE. 02528 M01S00638.286l859 +++|* 02529 M01S00639.286l859 +++|* EXIT FILE INFORMATION WRITTEN TO OUTPUT AND SUMMARY FILES. 02530 M01S00640.286l859 +++|* *PFM* REQUEST FORMATTED IF FILE TO BE PURGED OR 02531 M01S00641.286l859 +++|* ALTERNATE STORAGE POINTERS TO BE UPDATED. 02532 M01S00642.286l859 +++|* 02533 M01S00643.286l859 +++|* USES X - 1, 2, 3, 6, 7. 02534 M01S00644.286l859 +++|* A - 0, 1, 2, 3, 6. 02535 M01S00645.286l859 +++|* B - 2. 02536 M01S00646.286l859 +++|* 02537 M01S00647.286l859 +++|* CALLS CFP, UCE, WPR. 02538 M01S00648.286l859 +++| 02539 M01S00649.286l859 +++| 02540 M01S00650.286l859 +++| CFD SUBR ENTRY/EXIT 02541 M01S00651.286l859 +++| SX6 B0+ CLEAR INCOMPLETE FILE FLAG 02542 M01S00652.286l859 +++| SA6 IFST 02543 M01S00653.286l859 +++| SA0 CATH SET CATALOG ADDRESS 02544 M01S00654.286l859 +++| RJ CFP COUNT FILE PROCESSED 02545 M01S00655.286l859 +++| SA1 FLST 02546 M01S00656.286l859 +++| MX6 -3 02547 M01S00657.286l859 +++| BX1 -X6*X1 02548 M01S00658.286l859 +++| NZ X1,CFDX IF PFC ONLY DUMP OR ERROR IN FILE 02549 M01S00659.286l859 +++| SA1 CPAR+/COMSPFS/CPOP 02550 M01S00660.286l859 +++| SA2 CPAR+/COMSPFS/CPDT 02551 M01S00661.286l859 +++| SX7 B0 02552 M01S00662.286l859 +++| LX1 59-53 02553 M01S00663.286l859 +++| NG X1,CFD2 IF PURGE FILES AFTER DUMP 02554 M01S00664.286l859 +++| ZR X2,CFDX IF NOT DESTAGE DUMP 02555 M01S00665.286l859 +++| SB2 CTSL SET *TFLOK* FLAG FUNCTION 02556 M01S00666.286l859 +++| RJ UCE UPDATE CATALOG ENTRY 02557 M01S00667.286l859 +++| SA3 FLOK 02558 M01S00668.286l859 +++| NG X3,CFD1 IF ARCHIVE TO OPTICAL DISK 02559 M01S00669.286l859 +++| SA2 CATH+FCTV GET TAPE ALTERNATE STORAGE INFORMATION 02560 M01S00670.286l859 +++| SX7 B1+ 02561 M01S00671.286l859 +++| LX7 42-0 02562 M01S00672.286l859 +++| BX7 X2+X7 MERGE *SETASA* TAPE ALTERNATE STORAGE FLAG 02563 M01S00673.286l859 +++| EQ CFD2 WRITE *PFM* REQUEST 02564 M01S00674.286l859 +++| 02565 M01S00675.286l859 +++| CFD1 SA2 CATH+FCAA GET OPTICAL ALTERNATE STORAGE INFORMATION 02566 M00S01381.pfdump +++| BX7 X2
| Line S01382 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02567 M01S01382.286l859 ---| SA6 MPDN 02568 M01S01383.286l859 ---| SA7 MPEQ 02569 M01S01384.286l859 ---| SA1 DBUFH CHECK FOR TYPE OF ERROR 02570 M01S01385.286l859 ---| LX1 59-50 CHECK FOR BAD SYSTEM SECTOR 02571 M01S01386.286l859 ---| NG X1,CFS4 IF BAD SYSTEM SECTOR 02572 M01S01387.286l859 ---| LX1 1 02573 M01S01388.286l859 ---| NG X1,CFS3 IF ZERO LENGTH DIRECT ACCESS FILE
| Line S00676 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02574 M01S00676.286l859 +++| SA2 CATH+FCOA GET OPTICAL DISK ADDRESS 02575 M01S00677.286l859 +++| MX3 24 02576 M01S00678.286l859 +++| BX6 X3*X2 02577 M01S00679.286l859 +++| SA6 PFRS+2 SET ADDRESS IN *PFM* REQUEST PARAMETERS 02578 M01S00680.286l859 +++| CFD2 RJ WPR WRITE *PFM* REQUEST PARAMETERS 02579 M01S00681.286l859 +++| EQ CFDX RETURN 02580 M01S00682.286l859 +++| CID SPACE 4,25 02581 M01S00683.286l859 +++|** CID - CHECK INCOMPLETE FILE DUMP. 02582 M01S00684.286l859 +++|* 02583 M01S00685.286l859 +++|* ENTRY (IFST) = 0 IF NO INCOMPLETE FILE DUMP. 02584 M01S00686.286l859 +++|* (IFST) = 1 IF INCOMPLETE FILE DUMP AND PFC DUMPED. 02585 M01S00687.286l859 +++|* (IFST) = 2 IF INCOMPLETE FILE DUMP AND PERMITS DUMPED. 02586 M01S00688.286l859 +++|* CATALOG ENTRY IN *CATH* IF INCOMPLETE FILE DUMP. 02587 M01S00689.286l859 +++|* (FLST) = FILE STATUS WORD IF INCOMPLETE FILE DUMP. 02588 M01S00690.286l859 +++|* 02589 M01S00691.286l859 +++|* EXIT EOR WRITTEN ON ARCHIVE AND VERIFY FILES. 02590 M01S00692.286l859 +++|* CATALOG DATA OUTPUT AND FILE COUNTS UPDATED FOR FILE 02591 M01S00693.286l859 +++|* BEING DUMPED. 02592 M01S00694.286l859 +++|* ARCHIVE FILE ERROR FLAGS SET IF PERMITS DUMP AND/OR 02593 M01S00695.286l859 +++|* DATA DUMP INCOMPLETE. 02594 M01S00696.286l859 +++|* 02595 M01S00697.286l859 +++|* USES X - 1, 6. 02596 M01S00698.286l859 +++|* A - 0, 1, 6. 02597 M01S00699.286l859 +++|* 02598 M01S00700.286l859 +++|* CALLS CFP. 02599 M01S00701.286l859 +++|* 02600 M01S00702.286l859 +++|* MACROS WRITER. 02601 M00S01389.pfdump +++|
| Line S01390 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02602 M01S01390.286l859 ---|* BUSY MESSAGE. 02603 M00S01391.pfdump +++|
| Line S01392 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02604 M01S01392.ns22000 ---| EDITS MSFN,MES15 BUILD *DAF BUSY* MESSAGE
| Line S00149 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02605 M02S00149.286l859 ---| EDITS MSFN,MES15 BUILD *DAPF BUSY* MESSAGE
| Line S01393 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02606 M01S01393.286l859 ---| RJ SEM SEND ERROR MESSAGE
| Line S00703 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02607 M01S00703.286l859 +++| CID SUBR ENTRY/EXIT 02608 M01S00704.286l859 +++| SA1 IFST 02609 M01S00705.286l859 +++| ZR X1,CIDX IF NO INCOMPLETE FILE DUMP 02610 M01S00706.286l859 +++| ARCHIVE WRITER WRITE EOR ON ARCHIVE/VERIFY FILES 02611 M01S00707.286l859 +++| SA1 IFST 02612 M01S00708.286l859 +++| SX6 X1-2 02613 M01S00709.286l859 +++| ZR X6,CID1 IF PERMITS DUMP COMPLETE 02614 M01S00710.286l859 +++| SA1 CATH+FCRI 02615 M01S00711.286l859 +++| MX6 24 02616 M01S00712.286l859 +++| BX6 X6*X1 02617 M01S00713.286l859 +++| ZR X6,CID1 IF NO PERMITS 02618 M01S00714.286l859 +++| SX6 4 SET PERMITS LOST FLAG 02619 M01S00715.286l859 +++| CID1 SA1 FLST 02620 M01S00716.286l859 +++| LX1 59-0 02621 M01S00717.286l859 +++| NG X1,CID2 IF *PFC ONLY* FILE 02622 M01S00718.286l859 +++| SX6 X6+2 SET DATA ERROR FLAG 02623 M01S00719.286l859 +++| CID2 LX1 1 02624 M01S00720.286l859 +++| BX6 X1+X6 MERGE ERROR FLAGS 02625 M01S00721.286l859 +++| SA6 FLST UPDATE FILE STATUS 02626 M01S00722.286l859 +++| SA0 CATH SET CATALOG ENTRY ADDRESS 02627 M01S00723.286l859 +++| RJ CFP COUNT FILE PROCESSED 02628 M01S00724.286l859 +++| EQ CIDX RETURN 02629 M01S00725.286l859 +++| CSI SPACE 4,10 02630 M01S00726.286l859 +++|** CSI - CHECK SPECIAL USER INDEX. 02631 M01S00727.286l859 +++|* 02632 M01S00728.286l859 +++|* ENTRY (A0) = CATALOG ADDRESS. 02633 M01S00729.286l859 +++|* 02634 M01S00730.286l859 +++|* EXIT (A0) = CATALOG ADDRESS. 02635 M01S00731.286l859 +++|* (X6) .NE. 0 IF FILE TO BE DUMPED. 02636 M01S00732.286l859 +++|* (X6) = 0 IF FILE NOT TO BE DUMPED. 02637 M01S00733.286l859 +++|* 02638 M01S00734.286l859 +++|* USES X - 1, 2, 3, 6, 7. 02639 M01S00735.286l859 +++|* A - 1, 2, 3. 02640 M00S01394.pfdump +++|
| Line S01395 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02641 M01S01395.286l859 ---|* UPDATE UTILITY CONTROL DATE/TIME. 02642 M00S01396.pfdump +++|
| Line S01397 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 02643 M01S01397.ns21000 ---| SA1 LMSK 02644 M01S01398.ns21000 ---| NZ X1,CFS2 IF PROCESSING LOCK FILE
| Line S01399 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02645 M01S01399.253l688 ---| SA1 CATH+FCCD GET CREATION DATE/TIME 02646 M01S01400.253l688 ---| MX0 -36 02647 M01S01401.253l688 ---| BX6 -X0*X1 02648 M01S01402.253l688 ---| SA6 UULV+1 02649 M01S01403.253l688 ---| SA1 CBRI GET CATALOG BUFFER RANDOM INDEX 02650 M01S01404.253l688 ---| BX2 X1 02651 M01S01405.253l688 ---| AX1 2-0 02652 M01S01406.253l688 ---| SA3 X1+CSCW GET *CIO* TRAILER CONTROL WORD 02653 M01S01407.253l688 ---| BX3 -X0*X3 ISOLATE EQUIPMENT/TRACK/SECTOR 02654 M01S01408.253l688 ---| LX1 17-15 DETERMINE CATALOG ENTRY ORDINAL 02655 M01S01409.253l688 ---| IX1 X2-X1 02656 M01S01410.253l688 ---| LX1 37-1 MERGE ORDINAL/EQUIPMENT/TRACK/SECTOR 02657 M01S01411.253l688 ---| BX6 X1+X3 02658 M01S01412.253l688 ---| SA6 UULV+2 02659 M01S01413.253l688 ---| CALLPFU UUCW,CTUU,R UPDATE UTILITY CONTROL DATE/TIME 02660 M01S01414.253l688 ---| SA1 UUCW
| Line S01415 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02661 M02S01415.253l688 ---| LX1 59-12 02662 M02S01416.253l688 ---| PL X1,CFS1 IF NO CATALOG TRACK READ/WRITE ERRORS
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2209 |
M02 (Removed by) | 242l642 |
M03 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02663 M03S00001.253l688 ---| MX0 -12
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02664 M02S00015.253l688 ---| MX0 -12 02665 M02S00016.253l688 ---| LX1 -12 02666 M02S00017.253l688 ---| BX1 -X0*X1 ERROR CODE 02667 M02S00018.253l688 ---| ZR X1,CFS2 IF NO ERROR 02668 M02S00019.253l688 ---| SX1 X1-2 02669 M02S00020.253l688 ---| ZR X1,CFS1 IF CATALOG ENTRY VERIFY ERROR
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2209 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02670 M02S00002.253l688 ---| BX6 -X0*X3 SECTOR 02671 M02S00003.253l688 ---| AX3 12 02672 M02S00004.253l688 ---| BX7 -X0*X3 TRACK 02673 M02S00005.253l688 ---| SA7 MPTK 02674 M02S00006.253l688 ---| SA6 MPSC
| Line S01417 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02675 M01S01417.253l688 ---| EDITS MSFN,MES18 BUILD *RD/WT ERROR ON UCDT UPDATE* MSG 02676 M01S01418.253l688 ---| SX6 B1+ SET ERRLOG FLAG 02677 M01S01419.253l688 ---| SA6 ELFG 02678 M01S01420.253l688 ---| RJ SEM SEND ERROR MESSAGE
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02679 M02S00021.253l688 ---| SA1 UUCW 02680 M02S00022.253l688 ---| LX1 59-13 02681 M02S00023.253l688 ---| PL X1,CFS2 IF NOT WRITE ERROR WITH DATA TRANSFERRED
| Line S01421 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02682 M01S01421.253l688 ---| RJ SEI SET ERROR IDLE 02683 M01S01422.253l688 ---| EQ CFS2 CHECK FOR ALTERNATE STORAGE 02684 M01S01423.253l688 ---|
| Line S01424 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02685 M02S01424.253l688 ---| CFS1 LX1 59-13-59+12 02686 M02S01425.253l688 ---| PL X1,CFS2 IF NO CATALOG ENTRY VERIFY ERRORS 02687 M02S01426.253l688 ---| EDITS MSFN,MES19 BUILD *VERIFY ERROR ON UCDT UPDATE* MSG
| Line S00024 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02688 M02S00024.253l688 ---| CFS1 EDITS MSFN,MES19 BUILD *VERIFY ERROR ON UDCT UPDATE* MSG
| Line S01427 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02689 M01S01427.253l688 ---| SX6 B1+ SET ERRLOG FLAG 02690 M01S01428.253l688 ---| SA6 ELFG 02691 M01S01429.253l688 ---| RJ SEM SEND ERROR MESSAGE
| Line S01430 Modification History | |
|---|---|
M01 (Removed by) | ns2209 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02692 M02S01430.253l688 ---| SA1 MAEQ
| Line S01431 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02693 M01S01431.253l688 ---| 02694 M01S01432.253l688 ---|* CHECK FOR ALTERNATE STORAGE. 02695 M01S01433.253l688 ---| 02696 M01S01434.253l688 ---| CFS2 SA1 CATH+FCAA+FCAF* GET ALTERNATE STORAGE ADDRESS/FLAGS 02697 M01S01435.253l688 ---| MX0 -36 02698 M01S01436.253l688 ---| BX2 -X0*X1
| Line S01437 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02699 M02S01437.253l688 ---| ZR X2,CFS5 IF ALTERNATE STORAGE ADDRESS NOT SET
| Line S00150 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02700 M02S00150.253l688 ---| ZR X2,CFS6 IF ALTERNATE STORAGE ADDRESS NOT SET
| Line S01438 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02701 M01S01438.253l688 ---| 02702 M01S01439.253l688 ---|* DUMP PFC/PERMITS TO PRESERVE ALTERNATE STORAGE INFORMATION. 02703 M01S01440.253l688 ---|
| Line S01441 Modification History | |
|---|---|
M01 (Removed by) | pfdum3 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02704 M02S01441.253l688 ---| SX1 B1 CLEAR ALTERNATE STORAGE OBSOLETE FLAG 02705 M02S01442.253l688 ---| LX1 48-0 02706 M02S01443.253l688 ---| BX6 X1-X2
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | pfdum3 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02707 M02S00001.253l688 ---| MX0 -48 CLEAR ALTERNATE STORAGE FLAGS 02708 M02S00002.253l688 ---| BX6 -X0*X1
| Line S01444 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02709 M01S01444.253l688 ---| SA6 A1 02710 M01S01445.253l688 ---| SX2 1 SET *DUMP PFC/PERMITS ONLY* FLAG 02711 M01S01446.253l688 ---| EQ CFSX RETURN
| Line S00114 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02712 M02S00114.286l859 ---| SB2 CTUU SET UPDATE UTILITY CONTROL DATE FUNCTION 02713 M02S00115.286l859 ---| SB3 MES18 * RD/WT ERROR ON UCDT UPDATE* 02714 M02S00116.286l859 ---| SB4 MES19 * VERIFY ERROR ON UCDT UPDATE* 02715 M02S00117.286l859 ---| RJ UCE UPDATE CATALOG ENTRY 02716 M02S00118.286l859 ---| EQ CFS6 COUNT FILE NOT DUMPED
| Line S00736 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02717 M01S00736.286l859 +++| CSI2 SX6 B0+ SET NO FILE DUMP 02718 M00S01447.pfdump +++|
| Line S01448 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02719 M01S01448.286l859 ---|* ZERO LENGTH MESSAGE.
| Line S00737 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02720 M01S00737.286l859 +++| CSI SUBR ENTRY/EXIT 02721 M01S00738.286l859 +++| SA1 CPAR+/COMSPFS/CPOP 02722 M01S00739.286l859 +++| SA2 CPAR+/COMSPFS/CPDT 02723 M01S00740.286l859 +++| SA3 A0+FCUI 02724 M01S00741.286l859 +++| SX6 B1 SET TO DUMP FILE 02725 M01S00742.286l859 +++| LX1 59-53 02726 M01S00743.286l859 +++| SX7 X3-IFUI 02727 M01S00744.286l859 +++| SX3 X3+ USER INDEX 02728 M01S00745.286l859 +++| ZR X3,CSI2 IF CATALOG HOLE 02729 M01S00746.286l859 +++| ZR X7,CSI2 IF INDIRECT ACCESS DATA FLAW 02730 M01S00747.286l859 +++| ZR X2,CSI1 IF NOT DESTAGE DUMP 02731 M01S00748.286l859 +++| SX2 X3-SYUI 02732 M01S00749.286l859 +++| ZR X2,CSI2 IF SYSTEM USER INDEX 02733 M01S00750.286l859 +++| SX1 377770B 02734 M01S00751.286l859 +++| SX2 SBUI 02735 M01S00752.286l859 +++| BX1 X1*X3 02736 M01S00753.286l859 +++| BX1 X1-X2 02737 M01S00754.286l859 +++| NZ X2,CSIX IF NOT SUBFAMILY USER INDEX 02738 M01S00755.286l859 +++| EQ CSI2 SET NO FILE DUMP 02739 M00S01449.pfdump +++|
| Line S01450 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02740 M01S01450.286l859 ---| CFS3 EDITS MSFN,MES16 BUILD *ZERO LENGTH* MESSAGE
| Line S01451 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02741 M02S01451.286l859 ---| SX6 B1+ SET ERRLOG FLAG 02742 M02S01452.286l859 ---| SA6 ELFG 02743 M02S01453.286l859 ---| RJ SEM SEND ERROR MESSAGE 02744 M02S01454.286l859 ---| RJ SEI SET ERROR IDLE 02745 M02S01455.286l859 ---| EQ CFS5 SET *NO DUMP* FLAG
| Line S00151 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02746 M02S00151.286l859 ---| EQ CFS5 SEND ERROR MESSAGE
| Line S00756 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02747 M01S00756.286l859 +++| CSI1 PL X1,CSIX IF PURGE OPTION NOT SELECTED 02748 M01S00757.286l859 +++| SA1 /COMSPFS/FISP 02749 M01S00758.286l859 +++| SX2 X3-PGUI 02750 M01S00759.286l859 +++| NZ X1,CSIX IF USER INDEX SELECTIONS PRESENT 02751 M01S00760.286l859 +++| NG X2,CSIX IF FILE TO BE DUMPED 02752 M01S00761.286l859 +++| EQ CSI2 SET NO FILE DUMP 02753 M01S00762.286l859 +++| CSP SPACE 4,20 02754 M01S00763.286l859 +++|** CSP - CHECK SELECTION PARAMETERS. 02755 M01S00764.286l859 +++|* 02756 M01S00765.286l859 +++|* ENTRY (A0) = ADDRESS OF CATALOG ENTRY. 02757 M01S00766.286l859 +++|* (CPAR) = CRACKED PARAMETER ARRAY. 02758 M01S00767.286l859 +++|* 02759 M01S00768.286l859 +++|* EXIT (A0) = ADDRESS OF CATALOG ENTRY. 02760 M01S00769.286l859 +++|* (X6) = 0 IF FILE NOT TO BE DUMPED. 02761 M01S00770.286l859 +++|* (X6) = 1 IF TOTAL FILE TO BE DUMPED. 02762 M01S00771.286l859 +++|* (X6) = 2 IF ONLY PFC AND PERMITS TO BE DUMPED. 02763 M01S00772.286l859 +++|* (X6) = 3 IF STAGE FILE FROM ALTERNATE STORAGE. 02764 M01S00773.286l859 +++|* (X6) = 4 IF FILE TO BE COPIED FROM ALTERNATE STORAGE 02765 M01S00774.286l859 +++|* TAPE. 02766 M01S00775.286l859 +++|* 02767 M01S00776.286l859 +++|* USES X - 1, 2, 4, 6, 7. 02768 M01S00777.286l859 +++|* A - 1, 2, 3, 6. 02769 M01S00778.286l859 +++|* B - 2, 3, 4. 02770 M01S00779.286l859 +++|* 02771 M01S00780.286l859 +++|* CALLS CBR, CFE, CSC, SFE, SFL. 02772 M00S01456.pfdump +++|
| Line S01457 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02773 M01S01457.286l859 ---|* BAD SYSTEM SECTOR MESSAGE. 02774 M00S01458.pfdump +++|
| Line S01459 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02775 M01S01459.286l859 ---| CFS4 EDITS MSFN,MES17 BUILD *BAD SYSTEM SECTOR* MESSAGE
| Line S01460 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02776 M02S01460.286l859 ---| SX6 B1+ SET ERRLOG FLAG
| Line S00152 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2209 |
M03 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02777 M03S00152.286l859 ---| CFS5 SX6 B1+ SET ERRLOG FLAG
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | ns2209 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02778 M02S00007.286l859 ---| CFS5 SA1 DBUFH SET TRACK NUMBER 02779 M02S00008.286l859 ---| MX0 -12 02780 M02S00009.286l859 ---| LX1 -36 02781 M02S00010.286l859 ---| BX6 -X0*X1 02782 M02S00011.286l859 ---| SA6 MPTK 02783 M02S00012.286l859 ---| BX7 X7-X7 SET SECTOR ZERO 02784 M02S00013.286l859 ---| SA7 MPSC 02785 M02S00014.286l859 ---| SX6 B1+ SET ERRLOG FLAG
| Line S01461 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02786 M01S01461.286l859 ---| SA6 ELFG 02787 M01S01462.286l859 ---| RJ SEM SEND ERROR MESSAGE
| Line S01463 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02788 M02S01463.286l859 ---| RJ SEI SET ERROR IDLE
| Line S01464 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02789 M02S01464.286l859 ---| CFS5 SX2 2 SET *NO DUMP* FLAG
| Line S00153 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02790 M02S00153.286l859 ---| CFS6 SA2 SKNU ADVANCE FILES NOT DUMPED 02791 M02S00154.286l859 ---| SX6 B1 02792 M02S00155.286l859 ---| IX6 X6+X2 02793 M02S00156.286l859 ---| SA6 A2
| Line S00157 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 253l688 |
M03 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02794 M03S00157.286l859 ---| SX2 B1+B1 SET *NO DUMP* FLAG
| Line S00119 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02795 M02S00119.286l859 ---| SX2 B1 SET *NO DUMP* FLAG
| Line S01465 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02796 M01S01465.286l859 ---| EQ CFSX RETURN
| Line S01466 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02797 M02S01466.286l859 ---| CRC SPACE 4,20
| Line S00120 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02798 M02S00120.286l859 ---| CRC SPACE 4,30
| Line S01467 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02799 M01S01467.286l859 ---|** CRC - CHECK RESCAN CONTINUANCE. 02800 M01S01468.286l859 ---|* 02801 M01S01469.286l859 ---|* ENTRY (NFSR) = NUMBER OF FILE STAGINGS REQUESTED. 02802 M01S01470.286l859 ---|* (NNAR) = NUMBER OF *NOT ACTIVE* RESPONSES. 02803 M01S01471.286l859 ---|* (NNPR) = NUMBER OF NON-PRODUCTIVE RESCANS.
| Line S01472 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02804 M02S01472.286l859 ---|* (SGCW) = STAGING REQUEST CONTROL WORD.
| Line S01473 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02805 M01S01473.286l859 ---|* (/COMSPFS/KIN) = *K-DISPLAY* KEYBOARD INPUT.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | pfdum14 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02806 M02S00001.286l859 ---|* CATALOG TRACK INTERLOCK SET.
| Line S01474 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02807 M01S01474.286l859 ---|* 02808 M01S01475.286l859 ---|* EXIT (X6) = POSITIVE, IF RESCAN TO CONTINUE. 02809 M01S01476.286l859 ---|* = NEGATIVE, IF RESCAN TO BE TERMINNATED. 02810 M01S01477.286l859 ---|* (SCAN) = 0, IF RESCAN TERMINATED. 02811 M01S01478.286l859 ---|* (NFSR) = 0, IF RESCAN TERMINATED. 02812 M01S01479.286l859 ---|* (NNAR) = 0, IF RESCAN TERMINATED. 02813 M01S01480.286l859 ---|* (NNPR) = NUMBER OF NON-PRODUCTIVE RESCANS UPDATED. 02814 M01S01481.286l859 ---|* = 0, IF RESCAN TERMINATED. 02815 M01S01482.286l859 ---|* (/COMSPFS/KIN) = *K-DISPLAY* KEYBOARD INPUT CLEARED.
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | pfdum14 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02816 M02S00002.286l859 ---|* CATALOG TRACK INTERLOCK IS RESET UPON EXIT IF 02817 M02S00003.286l859 ---|* CLEARED DURING EXECUTION OF THIS ROUTINE.
| Line S01483 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02818 M01S01483.286l859 ---|* 02819 M01S01484.286l859 ---|* USES X - 0, 1, 2, 5, 6. 02820 M01S01485.286l859 ---|* A - 1, 2, 5, 6. 02821 M01S01486.286l859 ---|* B - 2, 3. 02822 M01S01487.286l859 ---|*
| Line S01488 Modification History | |
|---|---|
M01 (Removed by) | pfdum14 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02823 M02S01488.286l859 ---|* CALLS SEM, /COMSPFS/KIP.
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | pfdum14 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02824 M02S00004.286l859 ---|* CALLS /COMSPFS/KIP, SEM.
| Line S01489 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02825 M01S01489.286l859 ---|*
| Line S01490 Modification History | |
|---|---|
M01 (Removed by) | pfdum14 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02826 M02S01490.286l859 ---|* MACROS EDITS, MOVE, READ, READW, RECALL, REWIND, WRITEF.
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | pfdum14 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02827 M02S00005.286l859 ---|* MACROS EDITS, MOVE, PCINT, READ, READW, RECALL, REWIND, 02828 M02S00006.286l859 ---|* WRITEF.
| Line S00781 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02829 M01S00781.286l859 +++| CSP SUBR ENTRY/EXIT 02830 M00S01491.pfdump +++|
| Line S00782 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02831 M01S00782.286l859 +++|* CHECK TRUE DEVICE RESIDENCE CRITERION. 02832 M01S00783.286l859 +++|* DISK RESIDENCY IS CHECKED BECAUSE OLDER SYSTEM LEVELS DID 02833 M01S00784.286l859 +++|* NOT CLEAR THE DEVICE NUMBER IN THE PFC ENTRY WHEN DISK SPACE 02834 M01S00785.286l859 +++|* WAS RELEASED. 02835 M00S01492.pfdump +++|
| Line S01493 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02836 M01S01493.286l859 ---| CRC SUBR ENTRY/EXIT
| Line S00786 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02837 M01S00786.286l859 +++| SA1 CPAR+/COMSPFS/CPTD 02838 M01S00787.286l859 +++| SX6 B0+ SET NO FILE DUMP 02839 M01S00788.286l859 +++| SA6 FLCF CLEAR *FILE LENGTH CORRECT* FLAG 02840 M01S00789.286l859 +++| ZR X1,CSP1 IF NO TRUE DEVICE SELECTION 02841 M01S00790.286l859 +++| SA2 A0+FCDN 02842 M01S00791.286l859 +++| SA3 CPAR+/COMSPFS/CPDN 02843 M01S00792.286l859 +++| SA4 A0+FCBT 02844 M01S00793.286l859 +++| MX7 -6 02845 M01S00794.286l859 +++| LX2 -36 02846 M01S00795.286l859 +++| BX3 X1-X3 02847 M01S00796.286l859 +++| LX4 59-23 02848 M01S00797.286l859 +++| ZR X3,CSP1 IF TRUE DEVICE IS MASTER DEVICE 02849 M01S00798.286l859 +++| BX2 -X7*X2 RESIDENCY DEVICE 02850 M01S00799.286l859 +++| PL X4,CSPX IF FILE NOT DISK RESIDENT 02851 M01S00800.286l859 +++| BX2 X1-X2 02852 M01S00801.286l859 +++| NZ X2,CSPX IF FILE DOES NOT RESIDE ON TRUE DEVICE 02853 M00S01494.pfdump +++|
| Line S01495 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02854 M01S01495.286l859 ---|* CHECK RESPONSE FROM LAST STAGING REQUEST.
| Line S00802 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02855 M01S00802.286l859 +++|* GET FILE LENGTH IF REQUIRED AND CHECK SELECTION CRITERIA. 02856 M01S00803.286l859 +++|* FILES SPECIFIED IN TABLE *TSFF* WILL BE DUMPED ON AN 02857 M01S00804.286l859 +++|* INCREMENTAL DUMP EVEN IF THE SPECIFIED DATE/TIME CRITERION 02858 M01S00805.286l859 +++|* IS NOT MET BECAUSE THEY MAY HAVE BEEN MODIFIED WHILE IN 02859 M01S00806.286l859 +++|* FAST ATTACH MODE. 02860 M00S01496.pfdump +++|
| Line S01497 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02861 M01S01497.253l688 ---| RECALL SGCW WAIT UNTIL PFU CATCHES UP
| Line S00121 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02862 M02S00121.286l859 ---| RECALL SRFT WAIT FOR *PFM* COMPLETION
| Line S01498 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02863 M01S01498.286l859 ---| SA1 X2
| Line S01499 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02864 M02S01499.286l859 ---| MX0 -12 02865 M02S01500.286l859 ---| LX1 11-23 02866 M02S01501.286l859 ---| BX1 -X0*X1
| Line S00122 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02867 M02S00122.286l859 ---| SX1 X1 02868 M02S00123.286l859 ---| AX1 10
| Line S01502 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02869 M01S01502.286l859 ---| ZR X1,CRC1 IF LAST STAGING REQUEST ACCEPTED
| Line S00807 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02870 M01S00807.286l859 +++| CSP1 SA1 FLSF 02871 M01S00808.286l859 +++| ZR X1,CSP2 IF FILE LENGTH NOT REQUIRED FOR SELECTION 02872 M01S00809.286l859 +++| RJ SFL SET FILE LENGTH 02873 M01S00810.286l859 +++| ZR X6,CSPX IF DEVICE NOT FOUND ERROR 02874 M01S00811.286l859 +++| CSP2 SB4 A0 SET CATALOG ENTRY ADDRESS 02875 M01S00812.286l859 +++| RJ CSC CHECK SELECTION CRITERIA 02876 M01S00813.286l859 +++| NZ X6,CSP4 IF FILE SELECTED 02877 M01S00814.286l859 +++| ZR X7,CSPX IF NON-SELECTION NOT DUE TO DATE/TIME 02878 M01S00815.286l859 +++| SA1 INCD 02879 M01S00816.286l859 +++| ZR X1,CSPX IF NOT INCREMENTAL DUMP 02880 M01S00817.286l859 +++| SA2 TSFF-1 02881 M01S00818.286l859 +++| SA1 A0+FCUI 02882 M01S00819.286l859 +++| CSP3 SA2 A2+1 GET FAST ATTACH FILE NAME AND USER INDEX 02883 M01S00820.286l859 +++| ZR X2,CSPX IF END OF ENTRIES 02884 M01S00821.286l859 +++| BX3 X1-X2 02885 M01S00822.286l859 +++| NZ X3,CSP3 IF NO MATCH 02886 M00S01503.pfdump +++|
| Line S01504 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02887 M01S01504.286l859 ---|* DETERMINE IF LIMIT OF NON-PRODUCTIVE RESCANS EXCEEDED.
| Line S00823 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02888 M01S00823.286l859 +++|* CHECK FILE BACKUP REQUIREMENTS. 02889 M00S01505.pfdump +++|
| Line S01506 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02890 M01S01506.286l859 ---| SA1 NNAR INCREMENT NUMBER *NOT ACTIVE* RESPONSES
| Line S01507 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02891 M02S01507.286l859 ---| SX1 X1+1
| Line S00124 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02892 M02S00124.286l859 ---| SX1 X1+B1
| Line S01508 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02893 M01S01508.286l859 ---| SA2 NFSR 02894 M01S01509.286l859 ---| IX1 X2-X1 02895 M01S01510.286l859 ---| NZ X1,CRC1 IF LAST RESCAN PRODUCTIVE 02896 M01S01511.286l859 ---| SA1 NNPR UPDATE NUMBER NON-PRODUCTIVE RESCANS
| Line S01512 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02897 M02S01512.286l859 ---| SX6 X1+1
| Line S00125 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02898 M02S00125.286l859 ---| SX6 X1+B1
| Line S01513 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02899 M01S01513.286l859 ---| SA6 A1 02900 M01S01514.286l859 ---| SX6 X6-LNPR 02901 M01S01515.286l859 ---| NG X6,CRC2 IF NON-PRODUCTIVE LIMIT NOT EXCEEDED 02902 M01S01516.286l859 ---| 02903 M01S01517.286l859 ---|* FORCE *K-DISPLAY* RESPONSE. 02904 M01S01518.286l859 ---| 02905 M01S01519.286l859 ---| SA5 IDSA+/COMSPFS/ADM2 DISPLAY RESCAN MESSAGE 02906 M01S01520.286l859 ---| MOVE 4,MSGT,X5
| Line S01521 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02907 M02S01521.286l859 ---| SA5 IDSA+/COMSPFS/ADE1 DISPLAY *GO* OPTION 02908 M02S01522.286l859 ---| MOVE 4,MSGU,X5 02909 M02S01523.286l859 ---| SA5 IDSA+/COMSPFS/ADE2 DISPLAY *SKIP* OPTION 02910 M02S01524.286l859 ---| MOVE 4,MSGV,X5
| Line S00032 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02911 M02S00032.286l859 ---| SX6 RESC 02912 M02S00033.286l859 ---| RJ SRS SELECT RIGHT SCREEN
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | pfdum14 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02913 M02S00007.286l859 ---| PCINT CATS,CTCC CLEAR CATALOG TRACK INTERLOCK
| Line S01525 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02914 M01S01525.286l859 ---| SB2 CRC5 *K.SKIP.* PROCESSOR ADDRESS 02915 M01S01526.286l859 ---| SB3 CRC4 *K.GO.* PROCESSOR ADDRESS 02916 M01S01527.286l859 ---| EQ /COMSPFS/KIP PROCESS KEYBOARD RESPONSE 02917 M01S01528.286l859 ---| 02918 M01S01529.286l859 ---|* CHECK FOR *K-DISPLAY* KEYBOARD INPUT. 02919 M01S01530.286l859 ---| 02920 M01S01531.286l859 ---| CRC1 BX6 X6-X6 RESET NUMBER OF NON-PRODUCTIVE RESCANS 02921 M01S01532.286l859 ---| SA6 NNPR 02922 M01S01533.286l859 ---| CRC2 SA1 /COMSPFS/KIN 02923 M01S01534.286l859 ---| NZ X1,CRC3 IF ANY INPUT 02924 M01S01535.286l859 ---| BX6 X6-X6 SET CONTINUE RESCAN FLAG 02925 M01S01536.286l859 ---| EQ CRCX RETURN 02926 M01S01537.286l859 ---| 02927 M01S01538.286l859 ---|* PROCESS KEYBOARD INPUT. 02928 M01S01539.286l859 ---|
| Line S01540 Modification History | |
|---|---|
M01 (Removed by) | pfdum11 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02929 M02S01540.286l859 ---| CRC3 SX2 2LGO
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | pfdum11 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02930 M02S00001.286l859 ---| CRC3 SX2 2RGO 02931 M02S00002.286l859 ---| LX2 48
| Line S01541 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02932 M01S01541.286l859 ---| MX0 12 02933 M01S01542.286l859 ---| BX1 X0*X1 02934 M01S01543.286l859 ---| IX2 X1-X2
| Line S01544 Modification History | |
|---|---|
M01 (Removed by) | pfdum14 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02935 M02S01544.286l859 ---| NZ X2,CRC5 IF NOT *GO*
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | pfdum14 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02936 M02S00008.286l859 ---| ZR X2,CRC4.1 IF *GO* 02937 M02S00009.286l859 ---| EQ CRC5.1 PROCESS *SKIP*
| Line S01545 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02938 M01S01545.286l859 ---| 02939 M01S01546.286l859 ---|* PROCESS *K.GO.* 02940 M01S01547.286l859 ---|
| Line S01548 Modification History | |
|---|---|
M01 (Removed by) | pfdum14 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02941 M02S01548.286l859 ---| CRC4 BX6 X6-X6 SET CONTINUE RESCAN FLAG
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | pfdum14 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02942 M02S00010.286l859 ---| CRC4 PCINT CATS,CTSC RESET CATALOG TRACK INTERLOCK 02943 M02S00011.286l859 ---| CRC4.1 BX6 X6-X6 SET CONTINUE RESCAN FLAG
| Line S01549 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02944 M01S01549.286l859 ---| SA6 NNPR CLEAR NUMBER OF NON-PRODUCTIVE RESCANS 02945 M01S01550.286l859 ---| SA6 /COMSPFS/KIN CLEAR KEYBOARD INPUT 02946 M01S01551.286l859 ---| EQ CRCX RETURN 02947 M01S01552.286l859 ---| 02948 M01S01553.286l859 ---|* PROCESS *K.SKIP.* 02949 M01S01554.286l859 ---|
| Line S01555 Modification History | |
|---|---|
M01 (Removed by) | pfdum14 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02950 M02S01555.286l859 ---| CRC5 BX6 X6-X6 CLEAR KEYBOARD INPUT
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | pfdum14 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02951 M02S00012.286l859 ---| CRC5 PCINT CATS,CTSC RESET CATALOG TRACK INTERLOCK 02952 M02S00013.286l859 ---| CRC5.1 BX6 X6-X6 CLEAR KEYBOARD INPUT
| Line S01556 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02953 M01S01556.286l859 ---| SA6 /COMSPFS/KIN 02954 M01S01557.286l859 ---| SA5 IDSA+/COMSPFS/ADM2 CLEAR RESCAN MESSAGE 02955 M01S01558.286l859 ---| MOVE 4,MSGW,X5
| Line S01559 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02956 M02S01559.286l859 ---| SA5 IDSA+/COMSPFS/ADE1 02957 M02S01560.286l859 ---| MOVE 4,MSGW,X5 02958 M02S01561.286l859 ---| SA5 IDSA+/COMSPFS/ADE2
| Line S00034 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02959 M02S00034.286l859 ---| SA5 IDSA+/COMSPFS/ADER CLEAR HELP MESSAGE
| Line S01562 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02960 M01S01562.286l859 ---| MOVE 4,MSGW,X5 02961 M01S01563.286l859 ---| 02962 M01S01564.286l859 ---|* ISSUE *RESCAN KILLED* MESSAGE FOR EACH AFFECTED FILE. 02963 M01S01565.286l859 ---| 02964 M01S01566.286l859 ---| WRITEF REQS FLUSH STAGING REQUEST BUFFER 02965 M01S01567.286l859 ---| REWIND X2 02966 M01S01568.286l859 ---| READ X2
| Line S01569 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02967 M02S01569.286l859 ---| CRC6 READW REQS,REQW,RSEL GET STAGE REQUEST ENTRY
| Line S00126 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02968 M02S00126.286l859 ---| CRC6 READW REQS,RESE,2 READ STAGE REQUEST ENTRY
| Line S01570 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02969 M01S01570.286l859 ---| ZR X1,CRC7 IF READ COMPLETE 02970 M01S01571.286l859 ---| SX1 X1+3 02971 M01S01572.286l859 ---| NZ X1,CRC8 IF ENTRIES EXHAUSTED 02972 M01S01573.286l859 ---| SX1 MSGAB *PFDUMP - READ ERROR ON REQS - ABORT.*
| Line S01574 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02973 M02S01574.286l859 ---| EQ AEP ABORT
| Line S00127 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02974 M02S00127.286l859 ---| EQ ABT ABORT
| Line S01575 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02975 M01S01575.286l859 ---|
| Line S01576 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02976 M02S01576.286l859 ---| CRC7 SA1 REQW SET FILE NAME
| Line S00128 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02977 M02S00128.286l859 ---| CRC7 SA1 RESE+1 SET FILE NAME
| Line S01577 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02978 M01S01577.286l859 ---| MX0 42 02979 M01S01578.286l859 ---| BX6 X0*X1 02980 M01S01579.286l859 ---| SA6 MPFN 02981 M01S01580.286l859 ---| BX6 -X0*X1 SET USER INDEX 02982 M01S01581.286l859 ---| SA6 MPUI 02983 M01S01582.286l859 ---| EDITS MSFN,MES21 *PFDUMP - MSS STAGED FILE RESCAN KILLED..* 02984 M01S01583.286l859 ---| RJ SEM SEND ERROR MESSAGE 02985 M01S01584.286l859 ---| EQ CRC6 GET NEXT ENTRY 02986 M01S01585.286l859 ---| 02987 M01S01586.286l859 ---|* TERMINATE RESCAN. 02988 M01S01587.286l859 ---| 02989 M01S01588.286l859 ---| CRC8 BX6 X6-X6 02990 M01S01589.286l859 ---| SA6 SCAN CLEAR RESCAN FLAG 02991 M01S01590.286l859 ---| SA6 NFSR CLEAR NUMBER FILE STAGINGS REQUESTED 02992 M01S01591.286l859 ---| SA6 NNAR CLEAR NUMBER *NOT ACTIVE* RESPONSES 02993 M01S01592.286l859 ---| SA6 NNPR CLEAR NUMBER NON-PRODUCTIVE RESCANS 02994 M01S01593.286l859 ---| SA5 IDSA+/COMSPFS/ADM1 CLEAN UP *K* DISPLAY MESSAGES 02995 M01S01594.286l859 ---| MOVE 4,MSGW,X5 02996 M01S01595.286l859 ---| SA5 IDSA+/COMSPFS/ADM2 02997 M01S01596.286l859 ---| MOVE 4,MSGW,X5
| Line S01597 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02998 M02S01597.286l859 ---| SA5 IDSA+/COMSPFS/ADE1 02999 M02S01598.286l859 ---| MOVE 4,MSGW,X5 03000 M02S01599.286l859 ---| SA5 IDSA+/COMSPFS/ADE2
| Line S00035 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 03001 M02S00035.286l859 ---| SA5 IDSA+/COMSPFS/ADER
| Line S01600 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 03002 M01S01600.286l859 ---| MOVE 4,MSGW,X5 03003 M01S01601.286l859 ---| SX6 -1 SET RESCAN TERMINATION FLAG 03004 M01S01602.286l859 ---| EQ CRCX RETURN
| Line S01603 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 03005 M02S01603.286l859 ---| CSP SPACE 4,20
| Line S00129 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 03006 M02S00129.286l859 ---| CSP SPACE 4,30
| Line S01604 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 03007 M01S01604.286l859 ---|** CSP - CHECK SELECTION PARAMETERS. 03008 M01S01605.286l859 ---|* 03009 M01S01606.286l859 ---|* ENTRY (B3) = ADDRESS OF CATALOG ENTRY. 03010 M01S01607.286l859 ---|* (SCAN) = 0, IF NORMAL SCAN. 03011 M01S01608.286l859 ---|* = 1, IF RESCAN. 03012 M01S01609.286l859 ---|* = 4, IF RESCAN SCREEN EXHAUSTED.
| Line S01610 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 03013 M02S01610.286l859 ---|* (RESW - RESW+3) = RESCAN FILE SCREEN ENTRY.
| Line S00130 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 03014 M02S00130.286l859 ---|* (RESE - RESE+1) = RESCAN STAGE REQUEST ENTRY.
| Line S01611 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 03015 M01S01611.286l859 ---|* (FSNM) = NON-MASTER DEVICE FILE SELECTION PARAMETER. 03016 M01S01612.286l859 ---|* (CPAR) = CRACKED PARAMETER ARRAY.
| Line S01613 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 03017 M02S01613.286l859 ---|* (LMSK) = LOCK FILE MASK.
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 03018 M02S00010.286l859 ---|* (LFDP) = LOCK FILE DUMP PASS FLAG.
| Line S01614 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 03019 M01S01614.286l859 ---|* 03020 M01S01615.286l859 ---|* EXIT (X6) = 0, IF FILE NOT TO BE DUMPED. 03021 M01S01616.286l859 ---|* = 1, IF TOTAL FILE TO BE DUMPED. 03022 M01S01617.286l859 ---|* = 2, IF ONLY PFC AND PERMITS TO BE DUMPED. 03023 M01S01618.286l859 ---|* = 3, IF FILE STAGING REQUIRED.
| Line S01619 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 03024 M02S01619.286l859 ---|* = 4, IF RESCAN SCREEN EXHAUSTED. 03025 M02S01620.286l859 ---|* (SCAN) = 4, IF RESCAN SCREEN EXHAUSTED. 03026 M02S01621.286l859 ---|* (RESW - RESW+3) = RESCAN FILE SCREEN ENTRY UPDATED. 03027 M02S01622.286l859 ---|* ABORTS DUMP, IF READ ERROR ON RESCAN SCREEN FILE. 03028 M02S01623.286l859 ---|* CONTENTS OF B2, B3 AND B5 RESTORED TO ENTRY STATE.
| Line S00131 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 03029 M02S00131.286l859 ---|* = 4, IF END OF RESCAN STAGE REQUESTS.
Proceed to Part 3
cdc/nos2.source/opl.opl871/deck/pfdump.002.txt · Last modified: by 127.0.0.1