cdc:nos2.source:opl.opl871:deck:pfm.004
Deck PFM Part 004
95 Modifications
Listing Sections
- Deck PFM Start
- Deck PFM Part 1 (Line 1496)
- Deck PFM Part 2 (Line 2779)
- Deck PFM Part 3 (Line 4327)
- Deck PFM Part 4 (Line 5928)
- Deck PFM Part 5 (Line 7505)
- Deck PFM Part 6 (Line 8827)
- Deck PFM Part 7 (Line 10151)
- Deck PFM Part 8 (Line 11613)
- Deck PFM Part 9 (Line 13038)
- Deck PFM Part 10 (Line 14497)
- Deck PFM Part 11 (Line 15803)
- Deck PFM Part 12 (Line 17019)
- Deck PFM Part 13 (Line 18417)
- Deck PFM Part 14 (Line 19621)
- Deck PFM Part 15 (Line 20842)
- Deck PFM Part 16 (Line 22356)
Source
Seq # *Modification Id* Act ----------------------------+ 05928 M01S00037.pfm39 +++| SBD SA 05929 M01S00038.pfm39 +++| MJN DFR13.1 IF LESS AVAILABLE 05930 M01S00039.pfm39 +++| NJN DFR13.5 IF MORE AVAILABLE 05931 M01S00040.pfm39 +++| LDD SA+1 05932 M01S00041.pfm39 +++| SBD CM+1 05933 M01S00042.pfm39 +++| MJN DFR13.5 IF MORE AVAILABLE 05934 M01S00043.pfm39 +++| UJN DFR13.1 CHECK NEXT DEVICE 05935 M01S00044.pfm39 +++| 05936 M01S00045.pfm39 +++| DFR13.3 LDN 0 SPACE REQUIRED NOT SPECIFIED 05937 M01S00046.pfm39 +++|* LDN 1 (SPACE REQUIRED SPECIFIED) 05938 M01S00047.pfm39 +++| DFRD EQU *-1 05939 M01S00048.pfm39 +++| ZJN DFR13.5 IF SPACE REQUIRED NOT SPECIFIED 05940 M01S00049.pfm39 +++| LDD P1 COMPARE CURRENT DEVICE STATUS 05941 M01S00050.pfm39 +++| SBM DFRC 05942 M01S00051.pfm39 +++| PJN DFR13.4 IF SAVED STATUS BETTER 05943 M01S00052.pfm39 +++| RAM DFRC 05944 M01S00053.pfm39 +++| DFR13.4 LDD CM 05945 M01S00054.pfm39 +++| SBD LF 05946 M01S00055.pfm39 +++| MJN DFR13.1 IF NOT ENOUGH SPACE 05947 M01S00056.pfm39 +++| NJN DFR13.5 IF ENOUGH SPACE 05948 M01S00057.pfm39 +++| LDD CM+1 05949 M01S00058.pfm39 +++| SBD LF+1 05950 M01S00059.pfm39 +++| MJN DFR13.1 IF NOT ENOUGH SPACE 05951 M01S00060.pfm39 +++| DFR13.5 LDD CM SELECT THIS DEVICE 05952 M01S00061.pfm39 +++| STD SA 05953 M01S00062.pfm39 +++| LDD CM+1 05954 M01S00063.pfm39 +++| STD SA+1 05955 M00S04339.pfm +++| LDD T2 SET EST ORDINAL 05956 M00S04340.pfm +++| STD FS
| Line S00503 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Removed by) | pfm39 |
Seq # *Modification Id* Act ----------------------------+ 05957 M02S00503.pfm39 ---| LDD T0 SAVE DEVICE STATUS
| Line S00064 Modification History | |
|---|---|
M01 (Added by) | pfm39 |
Seq # *Modification Id* Act ----------------------------+ 05958 M01S00064.pfm39 +++| LDD P1 SAVE DEVICE STATUS
| Line S00504 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 05959 M01S00504.242l642 +++| STD P2 05960 M00S04341.pfm +++| LDD T3+4 SAVE MST ADDRESS 05961 M00S04342.pfm +++| STD P3 05962 M00S04343.pfm +++| LDM PFPN 05963 M00S04344.pfm +++| NJN DFR14 IF AUXILIARY DEVICE REQUEST 05964 M00S04345.pfm +++| LJM DFR11 CHECK FOR MORE DEVICES 05965 M00S04346.pfm +++|
| Line S04347 Modification History | |
|---|---|
M01 (Removed by) | pfm39 |
Seq # *Modification Id* Act ----------------------------+ 05966 M01S04347.pfm39 ---|* DETERMINE IF ENOUGH SPACE ON DEVICE. 05967 M01S04348.pfm39 ---| 05968 M00S04349.pfm +++| DFR14 LDD FS SET DRIVER FOR PF EQUIPMENT 05969 M00S04350.pfm +++| STD T5
| Line S04351 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 05970 M01S04351.242l642 ---| SETMS
| Line S00505 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 05971 M01S00505.242l642 +++| SETMS STATUS
| Line S04352 Modification History | |
|---|---|
M01 (Removed by) | pfm39 |
Seq # *Modification Id* Act ----------------------------+ 05972 M01S04352.pfm39 ---| LDN CFOU CHECK FET LENGTH 05973 M01S04353.pfm39 ---| SBM FETL 05974 M01S04354.pfm39 ---| MJN DFR15 IF FET LONG ENOUGH TO SPECIFY SPACE 05975 M01S04355.pfm39 ---| LJM DFR18 ASSIGN TRACK FOR FILE 05976 M01S04356.pfm39 ---| 05977 M01S04357.pfm39 ---| DFR15 RJM SFA VERIFY THAT DEVICE HAS SUFFICIENT SPACE 05978 M01S04358.pfm39 ---| ADN CFOU 05979 M01S04359.pfm39 ---| CRD CM 05980 M01S04360.pfm39 ---| LDD CM+3 05981 M01S04361.pfm39 ---| ADD CM+4 05982 M01S04362.pfm39 ---| ZJN DFR18 IF FILE SPACE NOT SPECIFIED 05983 M01S04363.pfm39 ---| LDN 0 CALCULATE AVAILABLE PRU-S ON DEVICE 05984 M01S04364.pfm39 ---| STD T1 05985 M01S04365.pfm39 ---| STD T2 05986 M01S04366.pfm39 ---| LDM SLM 05987 M01S04367.pfm39 ---| SBN 1 05988 M01S04368.pfm39 ---| STD T3 05989 M01S04369.pfm39 ---| DFR16 LDD P1 MULTIPLY AVAILABLE TRACKS BY *SLM* 05990 M01S04370.pfm39 ---| RAD T2 05991 M01S04371.pfm39 ---| SHN -14 05992 M01S04372.pfm39 ---| RAD T1 05993 M01S04373.pfm39 ---| SOD T3 05994 M01S04374.pfm39 ---| PJN DFR16 IF NOT COMPLETE 05995 M01S04375.pfm39 ---| LDD CM+3 05996 M01S04376.pfm39 ---| SBD T1 05997 M01S04377.pfm39 ---| MJN DFR18 IF ENOUGH SPACE ON DEVICE 05998 M01S04378.pfm39 ---| NJN DFR17 IF NOT ENOUGH SPACE 05999 M01S04379.pfm39 ---| LDD CM+4 06000 M01S04380.pfm39 ---| SBD T2 06001 M01S04381.pfm39 ---| MJN DFR18 IF ENOUGH SPACE AVAILABLE 06002 M01S04382.pfm39 ---| ZJN DFR18 IF ENOUGH SPACE 06003 M01S04383.pfm39 ---| DFR17 ERROR SPN,CH,IW *REQUESTED SPACE UNAVAILABLE.* 06004 M01S04384.pfm39 ---| 06005 M00S04385.pfm +++| DFR18 LDM SLM PRE-CHECK PRU LIMIT 06006 M00S04386.pfm +++| STM CMLA+1 06007 M00S04387.pfm +++| LDN 0 SHOW REQUEST PRESET 06008 M00S04388.pfm +++| RJM CML 06009 M00S04389.pfm +++| LDC PFSN 06010 M00S04390.pfm +++| RJM SFN 06011 M00S04391.pfm +++| RJM SFT SET FNT/FST INFORMATION 06012 M00S04392.pfm +++| LDD FS+1 06013 M00S04393.pfm +++| ZJN DFR19 IF NO TRACK ASSIGNED 06014 M00S04394.pfm +++| LDM SLM DECREMENT PRU COUNT FOR TRACK ASSIGNED
| Line S04395 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06015 M01S04395.242l642 ---| STM DPPD+1
| Line S00506 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06016 M01S00506.242l642 +++| STM AIPR+1 06017 M00S04396.pfm +++| LJM DFR20 COMPLETE 06018 M00S04397.pfm +++| 06019 M00S04398.pfm +++| DFR19 ERROR TKL,CH,IW,FS *EQXXX,DNYY, TRACK LIMIT.*
| Line S00065 Modification History | |
|---|---|
M01 (Added by) | pfm39 |
Seq # *Modification Id* Act ----------------------------+ 06020 M01S00065.pfm39 +++| DSA SPACE 4,10 06021 M01S00066.pfm39 +++|** DSA - DETERMINE SPACE AVAILABLE ON A DEVICE. 06022 M01S00067.pfm39 +++|* 06023 M01S00068.pfm39 +++|* ENTRY (T3+4) = MST ADDRESS/10. 06024 M01S00069.pfm39 +++|* 06025 M01S00070.pfm39 +++|* EXIT (CM - CM+1) = SPACE AVAILABLE. 06026 M01S00071.pfm39 +++|* 06027 M01S00072.pfm39 +++|* USES CM - CM+4. 06028 M01S00073.pfm39 +++| 06029 M01S00074.pfm39 +++| 06030 M01S00075.pfm39 +++| DSA SUBR ENTRY/EXIT 06031 M01S00076.pfm39 +++| LDD T3+4 ADDRESS OF MST 06032 M01S00077.pfm39 +++| SHN 3 06033 M01S00078.pfm39 +++| ADK MDGL GET SECTORS PER TRACK 06034 M01S00079.pfm39 +++| CRD CM 06035 M01S00080.pfm39 +++| LDD CM+4 06036 M01S00081.pfm39 +++| STD T0 06037 M01S00082.pfm39 +++| LDD T3+4 ADDRESS OF MST 06038 M01S00083.pfm39 +++| SHN 3 06039 M01S00084.pfm39 +++| ADK TDGL GET TRACKS AVAILABLE 06040 M01S00085.pfm39 +++| CRD CM 06041 M01S00086.pfm39 +++| LDN 0 06042 M01S00087.pfm39 +++| STD CM CLEAR RESULT 06043 M01S00088.pfm39 +++| STD CM+1 06044 M01S00089.pfm39 +++| STD CM+3 CLEAR UPPER HALF OF MULTIPLIER 06045 M01S00090.pfm39 +++| 06046 M01S00091.pfm39 +++|* MULTIPLY NUMBER OF TRACKS AVAILABLE BY NUMBER OF SECTORS 06047 M01S00092.pfm39 +++|* PER TRACK USING SHIFTS AND ADDS. 06048 M01S00093.pfm39 +++| 06049 M01S00094.pfm39 +++| DSA1 LDD T0 CHECK MULTIPLIER (SECTORS PER TRACK) 06050 M01S00095.pfm39 +++| ZJN DSAX IF DONE 06051 M01S00096.pfm39 +++| SHN 21-0 RIGHT SHIFT MULTIPLIER 1 BIT 06052 M01S00097.pfm39 +++| STD T0 06053 M01S00098.pfm39 +++| PJN DSA2 IF NO ADDITION 06054 M01S00099.pfm39 +++| LDD CM+4 ADD SHIFTED NUMBER OF TRACKS TO RESULT 06055 M01S00100.pfm39 +++| RAD CM+1 06056 M01S00101.pfm39 +++| SHN -14 06057 M01S00102.pfm39 +++| ADD CM+3 06058 M01S00103.pfm39 +++| RAD CM 06059 M01S00104.pfm39 +++| DSA2 LDD CM+3 SHIFT NUMBER OF TRACKS TO THE LEFT 06060 M01S00105.pfm39 +++| RAD CM+3 06061 M01S00106.pfm39 +++| LDD CM+4 06062 M01S00107.pfm39 +++| RAD CM+4 06063 M01S00108.pfm39 +++| SHN -14 06064 M01S00109.pfm39 +++| RAD CM+3 06065 M01S00110.pfm39 +++| UJN DSA1 DO NEXT ITERATION OF MULTIPLY
| Line S00507 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06066 M01S00507.242l642 +++| PDS SPACE 4,25 06067 M01S00508.242l642 +++|** PDS - PROCESS DEVICE STATUS. 06068 M01S00509.242l642 +++|* 06069 M01S00510.242l642 +++|* ENTRY (A) = 0 IF DEVICE CAN BE ACCESSED. 06070 M01S00511.242l642 +++|* (A) = 1 IF NEW ACTIVITY RESTRICTED ON DEVICE. 06071 M01S00512.242l642 +++|* (A) = 2 IF PF UTILITY ACTIVE. 06072 M01S00513.242l642 +++|* (A) = 3 IF ACCESS DENIED BY *SETMS*. 06073 M01S00514.242l642 +++|* (A) = 4 IF *ERROR IDLE* SET FOR DEVICE. 06074 M01S00515.242l642 +++|* (FS) = EST ORDINAL OF DEVICE. 06075 M01S00516.242l642 +++|* (FERT) = REAL-TIME PROCESSING FLAG. 06076 M01S00517.242l642 +++|* (SSYS) = SUBSYSTEM FLAG. 06077 M01S00518.242l642 +++|* 06078 M01S00519.242l642 +++|* EXIT RETURN IF DEVICE CAN BE ACCESSED. 06079 M01S00520.242l642 +++|* 06080 M01S00521.242l642 +++|* TO *ERR* IF PF UTILITY ACTIVE. 06081 M01S00522.242l642 +++|* TO *ERR* IF DEVICE IS INACCESSIBLE. 06082 M01S00523.242l642 +++|* TO *ERR* IF *ERROR IDLE* IS SET. 06083 M01S00524.242l642 +++|* 06084 M01S00525.242l642 +++|* THE FOLLOWING LOCATIONS ARE SET FOR ERROR EXITS WHICH 06085 M01S00526.242l642 +++|* MAY CAUSE THE JOB TO BE ROLLED OUT. 06086 M01S00527.242l642 +++|* (ERRC) = ROLLOUT EVENT. 06087 M01S00528.242l642 +++|* (ERRD) = ROLLOUT TIME. 06088 M01S00529.242l642 +++|* 06089 M01S00530.242l642 +++|* USES T0. 06090 M01S00531.242l642 +++|* 06091 M01S00532.242l642 +++|* MACROS ERROR. 06092 M01S00533.242l642 +++| 06093 M01S00534.242l642 +++| 06094 M01S00535.242l642 +++| PDS4 LDN 0 RETURN WITH (A) = 0 06095 M01S00536.242l642 +++| 06096 M01S00537.242l642 +++| PDS SUBR ENTRY/EXIT 06097 M01S00538.242l642 +++| STD T0 SAVE DEVICE STATUS 06098 M01S00539.242l642 +++| SBN 2 06099 M01S00540.242l642 +++| MJN PDS4 IF DEVICE CAN BE ACCESSED, RETURN 06100 M01S00541.242l642 +++| NJN PDS1 IF PF UTILITY NOT ACTIVE 06101 M01S00542.242l642 +++| LDN PFUE SET ROLLOUT EVENT 06102 M01S00543.242l642 +++| STM ERRC 06103 M01S00544.242l642 +++| LDK UIRT SET ROLLOUT TIME 06104 M01S00545.242l642 +++| STM ERRD 06105 M01S00546.242l642 +++| ERROR PFA,CH,IW,,EC2 * PF UTILITY ACTIVE.* 06106 M01S00547.242l642 +++| 06107 M01S00548.242l642 +++| PDS1 LDM FERT 06108 M01S00549.242l642 +++| NJN PDS2 IF REAL-TIME PROCESSING SET 06109 M01S00550.242l642 +++| LDM SSYS 06110 M01S00551.242l642 +++| NJN PDS3 IF A SUBSYSTEM 06111 M01S00552.242l642 +++| 06112 M01S00553.242l642 +++|* SUSPEND THE JOB OR RETURN STATUS INDICATING DELAY TO CALLER. 06113 M01S00554.242l642 +++| 06114 M01S00555.242l642 +++| PDS2 LDD T0 06115 M01S00556.242l642 +++| SBN 4 06116 M01S00557.242l642 +++| ZJN PDS3 IF *ERROR IDLE* IS SET 06117 M01S00558.242l642 +++| ERROR WID,CH,IW,FS,EC6 * WAITING - INACCESSIBLE DEVICE.* 06118 M01S00559.242l642 +++| 06119 M01S00560.242l642 +++|* TERMINATE THE REQUEST. 06120 M01S00561.242l642 +++| 06121 M01S00562.242l642 +++| PDS3 ERROR PFN,CH,IW * DEVICE UNAVAILABLE.* 06122 M00S04399.pfm +++| SFT SPACE 4,20 06123 M00S04400.pfm +++|** SFT - SET FNT/FST INFORMATION. 06124 M00S04401.pfm +++|* 06125 M00S04402.pfm +++|* ENTRY (FNTA) = FNT ADDRESS IN NFL. 06126 M00S04403.pfm +++|* (LFAL) = LOCAL FILE ACCESS LEVEL. 06127 M00S04404.pfm +++|* (FN - FN+4) = LOCAL FILE NAME. 06128 M00S04405.pfm +++|* (FS) = FILE EST ORDINAL. 06129 M00S04406.pfm +++|* 06130 M00S04407.pfm +++|* EXIT (FA) = FNT ADDRESS. 06131 M00S04408.pfm +++|* (FS - FS+4) = FST ENTRY. 06132 M00S04409.pfm +++|* (FN - FN+4) = FNT ENTRY. 06133 M00S04410.pfm +++|* (RTKE) = RESERVED TRACK EST ORDINAL. 06134 M00S04411.pfm +++|* (RTKT) = RESERVED TRACK. 06135 M00S04412.pfm +++|* FNT/FST REWRITTEN TO CENTRAL MEMORY. 06136 M00S04413.pfm +++|* 06137 M00S04414.pfm +++|* USES FA, CM - CM+4, FN - FN+4, FS - FS+4. 06138 M00S04415.pfm +++|* 06139 M00S04416.pfm +++|* MACROS MONITOR, NFA. 06140 M00S04417.pfm +++| 06141 M00S04418.pfm +++| 06142 M00S04419.pfm +++| SFT SUBR ENTRY/EXIT 06143 M00S04420.pfm +++| LDC LOFT*100 SET FILE TYPE 06144 M00S04421.pfm +++|* LDC PMFT*100 (*ASSIGNPF* WITH *SRSY* SPECIAL REQUEST) 06145 M00S04422.pfm +++| SFTA EQU *-1 06146 M00S04423.pfm +++| RAD FN+4 06147 M00S04424.pfm +++| LDM FNTA SET FST ADDRESS 06148 M00S04425.pfm +++| STD FA 06149 M00S04426.pfm +++| NFA FA,R SET FILE ACCESS LEVEL 06150 M00S04427.pfm +++| ADN FUTL 06151 M00S04428.pfm +++| CRD CM 06152 M00S04429.pfm +++| LDM LFAL 06153 M00S04430.pfm +++| STD CM+2 06154 M00S04431.pfm +++| NFA FA,R UPDATE FNT INFORMATION 06155 M00S04432.pfm +++| ADK FNTL 06156 M00S04433.pfm +++| CWD FN 06157 M00S04434.pfm +++| ADN FUTL-FNTL 06158 M00S04435.pfm +++| CWD CM 06159 M00S04436.pfm +++| LDN ZERL REQUEST TRACK FOR FILE 06160 M00S04437.pfm +++| CRD CM 06161 M00S04438.pfm +++| LDD FS SET EST ORDINAL 06162 M00S04439.pfm +++| STD CM+1 06163 M00S04440.pfm +++| STM RTKE SET RESERVED TRACK EST ORDINAL 06164 M00S04441.pfm +++| MONITOR RTCM 06165 M00S04442.pfm +++| LDD CM+4 SET FST 06166 M00S04443.pfm +++| STM RTKT SET RESERVED TRACK 06167 M00S04444.pfm +++| STD FS+1 06168 M00S04445.pfm +++| STD FS+2 06169 M00S04446.pfm +++| LDN FSMS 06170 M00S04447.pfm +++| STD FS+3 06171 M00S04448.pfm +++| LDN 4 06172 M00S04449.pfm +++| STD FS+4 06173 M00S04450.pfm +++| NFA FA,R REWRITE FNT/FST 06174 M00S04451.pfm +++| ADK FNTL 06175 M00S04452.pfm +++| CWD FN 06176 M00S04453.pfm +++| ADN FSTL-FNTL 06177 M00S04454.pfm +++| CWD FS 06178 M00S04455.pfm +++| LJM SFTX RETURN
| Line S04456 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06179 M01S04456.242l642 ---| WSE SPACE 4,10 06180 M01S04457.242l642 ---|** WSE - WRITE ERROR PROCESSOR. 06181 M01S04458.242l642 ---|* 06182 M01S04459.242l642 ---|* WSE IS CALLED TO PROCESS MASS STORAGE ERRORS. 06183 M01S04460.242l642 ---|* 06184 M01S04461.242l642 ---|* MACROS ERROR. 06185 M01S04462.242l642 ---| 06186 M01S04463.242l642 ---| 06187 M01S04464.242l642 ---| WSE ERROR MSE,,IW,FS *EQXXX,DNYY, MASS STORAGE ERROR.* 06188 M00S04465.pfm +++| SPACE 4,10 06189 M00S04466.pfm +++| WCS$ EQU 0 SELECT CONSECUTIVE SECTOR WRITE 06190 M00S04467.pfm +++| SPACE 4,10 06191 M00S04468.pfm +++|* COMMON DECKS. 06192 M00S04469.pfm +++| 06193 M00S04470.pfm +++| 06194 M00S04471.pfm +++|*CALL COMPWEI 06195 M00S04472.pfm +++|*CALL COMPWSS 06196 M00S04473.pfm +++| SPACE 4,10
| Line S04474 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06197 M01S04474.242l642 ---| LOCF EQU *+5 OVERLAY ADDRESS FOR *0DF*. 06198 M01S04475.242l642 ---| SPACE 4,10 06199 M00S04476.pfm +++|* CHECK FOR OVERFLOW. 06200 M00S04477.pfm +++| 06201 M00S04478.pfm +++|
| Line S04479 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06202 M01S04479.242l642 ---| ERRNG BFMS-LOCF-ZDFL CHECK LENGTH OF *0DF* 06203 M01S04480.242l642 ---| 06204 M01S04481.242l642 ---| 06205 M00S04482.pfm +++| OVERFLOW OVLD,EPFW OVERFLOW INTO ERROR PROCESSING AREA 06206 M00S04483.pfm +++| OVERLAY (CATALOG/PERMIT SEARCH AND RESIDENT.),OVLA 06207 M00S04484.pfm +++| SPACE 4,25 06208 M00S04485.pfm +++|** THIS OVERLAY CONTAINS PRELIMINARY PROCESSING FOR 06209 M00S04486.pfm +++|* MOST REQUESTS, INCLUDING CATALOG AND PERMIT SEARCH. 06210 M00S04487.pfm +++|* IT ALSO CONTAINS RESIDENT SUBROUTINES. 06211 M00S04488.pfm +++|* 06212 M00S04489.pfm +++|* ENTRY (CC) = COMMAND CODE. 06213 M00S04490.pfm +++| 06214 M00S04491.pfm +++| 06215 M00S04492.pfm +++| OVL BSS 0 ENTRY 06216 M00S04493.pfm +++| LJM IRP INITIAL REQUEST PROCESSING
| Line S04494 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 06217 M01S04494.253l688 ---| EOI SPACE 4,10 06218 M01S04495.253l688 ---|** EOI - EOI SECTOR BUFFER. 06219 M01S04496.253l688 ---| 06220 M01S04497.253l688 ---| 06221 M01S04498.253l688 ---| EOIA CON 0,0 END OF INFORMATION DISK ADDRESS 06222 M01S04499.253l688 ---| EOIB CON 0,0 END OF INFORMATION CONTROL BYTES
| Line S00037 Modification History | |
|---|---|
M01 (Added by) | ns2415 |
M02 (Removed by) | pfm54 |
Seq # *Modification Id* Act ----------------------------+ 06223 M02S00037.pfm54 ---| HNG SPACE 4,10 06224 M02S00038.pfm54 ---|** HNG - HANG PP. 06225 M02S00039.pfm54 ---| 06226 M02S00040.pfm54 ---| 06227 M02S00041.pfm54 ---| HNG CON 0 ENTRY (RETURN ADDRESS) 06228 M02S00042.pfm54 ---| HNG1 MONITOR HNGM HANG 06229 M02S00043.pfm54 ---| UJN HNG1 CONTINUE TO HANG 06230 M00S04500.pfm +++| MSR SPACE 4,10 06231 M00S04501.pfm +++|** MSR - *COMPRNS* MASS STORAGE READ ERROR PROCESSOR. 06232 M00S04502.pfm +++|* 06233 M00S04503.pfm +++|* ENTRY FROM *RNS*.
| Line S00563 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06234 M01S00563.242l642 +++|* (MSRA) = ADDRESS OF ERROR PROCESSOR IN CALLER 06235 M01S00564.242l642 +++|* OF *RNS*. 06236 M00S04504.pfm +++|*
| Line S04505 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06237 M01S04505.242l642 ---|* EXIT TO ADDRESS SPECIFIED IN *TMSE*. 06238 M01S04506.242l642 ---|* 06239 M01S04507.242l642 ---|* USES T2.
| Line S00565 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06240 M01S00565.242l642 +++|* CALLS PCC, PCE, PTE. 06241 M00S04508.pfm +++| 06242 M00S04509.pfm +++| 06243 M00S04510.pfm +++| MSR SUBR ENTRY/EXIT
| Line S04511 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06244 M01S04511.242l642 ---| LDN 0 06245 M01S04512.242l642 ---| STD T2 06246 M01S04513.242l642 ---| MSR1 LDM TMSE,T2 06247 M01S04514.242l642 ---| ZJN * IF END OF TABLE 06248 M01S04515.242l642 ---| LMM RNS 06249 M01S04516.242l642 ---| ZJN MSR3 IF CALLING ROUTINE 06250 M01S04517.242l642 ---| MSR2 LDN 2 06251 M01S04518.242l642 ---| RAD T2 06252 M01S04519.242l642 ---| UJN MSR1 CHECK NEXT TABLE ENTRY 06253 M01S04520.242l642 ---| 06254 M01S04521.242l642 ---| MSR3 LDM TMSE+1,T2 ERROR PROCESSOR ADDRESS 06255 M01S04522.242l642 ---| STD T2 06256 M01S04523.242l642 ---| LJM 0,T2 EXIT TO ERROR PROCESSOR 06257 M01S04524.242l642 ---| TMSE SPACE 4,15 06258 M01S04525.242l642 ---|** TABLE OF *RNS* MASS STORAGE READ ERROR PROCESSORS. 06259 M01S04526.242l642 ---|* 06260 M01S04527.242l642 ---|* WORD 0 = *RNS* RETURN ADDRESS. 06261 M01S04528.242l642 ---|* WORD 1 = ERROR PROCESSING ADDRESS. 06262 M01S04529.242l642 ---| 06263 M01S04530.242l642 ---| 06264 M01S04531.242l642 ---| TMSE BSS 0 06265 M01S04532.242l642 ---| CON .MSE1,PCE CATALOG READ 06266 M01S04533.242l642 ---| CON .MSE2,PCC CATALOG READ FOR CHANGE 06267 M01S04534.242l642 ---| CON .MSE3,PTE DEVICE TO DEVICE TRANSFER 06268 M01S04535.242l642 ---| CON .MSE4,PAE APPEND DEVICE TRANSFER 06269 M01S04536.242l642 ---| CON 0
| Line S00566 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06270 M01S00566.242l642 +++| RJM PCE PROCESS CATALOG READ ERROR 06271 M01S00567.242l642 +++|* RJM PCC (CATALOG READ ERROR FOR *CHANGE* REQUEST) 06272 M01S00568.242l642 +++|* RJM PTE (READ ERROR FOR DEVICE TO DEVICE TRANSFER) 06273 M01S00569.242l642 +++| MSRA EQU *-1 ERROR PROCESSOR ADDRESS 06274 M01S00570.242l642 +++| UJN MSRX RETURN 06275 M00S04537.pfm +++| SPACE 4,10 06276 M00S04538.pfm +++|* RESIDENT COMMON DECKS. 06277 M00S04539.pfm +++| 06278 M00S04540.pfm +++| 06279 M00S04541.pfm +++|*CALL COMPSNT 06280 M00S04542.pfm +++|*CALL COMPRNS 06281 M00S04543.pfm +++| SPACE 4,10 06282 M00S04544.pfm +++| LOCG EQU *+5 LOAD ADDRESS FOR DEVICE/DEVICE TRANSFER
| Line S04545 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06283 M01S04545.242l642 ---| LCO SPACE 4,10 06284 M01S04546.242l642 ---|** LCO - LOAD COMMAND OVERLAY. 06285 M01S04547.242l642 ---|* 06286 M01S04548.242l642 ---|* EXIT TO COMMAND OVERLAY. 06287 M01S04549.242l642 ---|* 06288 M01S04550.242l642 ---|* MACROS ENDMS, EXECUTE. 06289 M01S04551.242l642 ---| 06290 M01S04552.242l642 ---| 06291 M01S04553.242l642 ---| LCO BSS 0 ENTRY 06292 M01S04554.242l642 ---| ENDMS RELEASE MASTER DEVICE CHANNEL 06293 M01S04555.242l642 ---| EXECUTE 3PD LOAD CATALOG/PERMIT UPDATE ROUTINES 06294 M01S04556.242l642 ---| LDC * SET COMMAND PROCESSING ADDRESS 06295 M01S04557.242l642 ---| LCOA EQU *-1 (PROCESSING ADDRESS WITHIN OVERLAY) 06296 M01S04558.242l642 ---| STD P0 06297 M01S04559.242l642 ---| LCOB EQU *+1 (LAST TWO CHARACTERS OF OVERLAY NAME) 06298 M01S04560.242l642 ---| EXECUTE 3PE *GET*/*OLD*/*UGET* 06299 M01S04561.242l642 ---| EXECUTE 3PF,= *SAVE*/*REPLACE*/*UREPLAC* 06300 M01S04562.242l642 ---| EXECUTE 3PG,= *APPEND* 06301 M01S04563.242l642 ---| EXECUTE 3PH,= *ATTACH*/*UATTACH* 06302 M01S04564.242l642 ---| EXECUTE 3PJ,= *DEFINE*/*SETDA* 06303 M01S04565.242l642 ---| EXECUTE 3PK,= *PERMIT*/*PURGE*/*DROPDS*/*DROPIDS*/*DELPFC* 06304 M01S04566.242l642 ---| EXECUTE 3PL,= *CHANGE*/*SETPFAC*/*SETPFAL* 06305 M01S04567.242l642 ---| EXECUTE 3PM,= *SETASA*/*SETAF* 06306 M01S04568.242l642 ---| EXECUTE 3PP,= STAGE FILE FROM ALTERNATE STORAGE 06307 M00S04569.pfm +++| TITLE RESIDENT SUBROUTINES. 06308 M00S04570.pfm +++| CAI SPACE 4,15 06309 M00S04571.pfm +++|** CAI - CLEAR ALLOCATION INTERLOCK. 06310 M00S04572.pfm +++|* 06311 M00S04573.pfm +++|* ENTRY (T5)= PERMANENT FILE EST ORDINAL. 06312 M00S04574.pfm +++|* (AILK) = TRACK FOR ALLOCATION INTERLOCK. 06313 M00S04575.pfm +++|* 06314 M00S04576.pfm +++|* EXIT ALLOCATION INTERLOCK CLEARED. 06315 M00S04577.pfm +++|* 06316 M00S04578.pfm +++|* USES T5. 06317 M00S04579.pfm +++|* 06318 M00S04580.pfm +++|* CALLS CTI. 06319 M00S04581.pfm +++| 06320 M00S04582.pfm +++| 06321 M00S04583.pfm +++| CAI SUBR ENTRY/EXIT 06322 M00S04584.pfm +++| LDC 4000 SET CHECKPOINT VIA *STBM* 06323 M00S04585.pfm +++| RAD T5 06324 M00S04586.pfm +++| LDM AILK 06325 M00S04587.pfm +++| RJM CTI CLEAR TRACK INTERLOCK 06326 M00S04588.pfm +++| LDD T5 RESTORE EST ORDINAL 06327 M00S04589.pfm +++| LPC 777 06328 M00S04590.pfm +++| STD T5 06329 M00S04591.pfm +++| LDN 0 CLEAR INTERLOCK FLAG 06330 M00S04592.pfm +++| STM AILK 06331 M00S04593.pfm +++| UJN CAIX RETURN 06332 M00S04594.pfm +++| CSA SPACE 4,15 06333 M00S04595.pfm +++|** CSA - COMPUTE SECTOR ADDRESS. 06334 M00S04596.pfm +++|* 06335 M00S04597.pfm +++|* ENTRY (RI - RI+1) = RANDOM INDEX OF PERMIT SECTOR. 06336 M00S04598.pfm +++|* (DVLW - DVLW+4) = DEVICE LAYOUT WORD OF MST. 06337 M00S04599.pfm +++|* PROPER DRIVER LOADED. 06338 M00S04600.pfm +++|* 06339 M00S04601.pfm +++|* EXIT (T6) = TRACK OF RANDOM SECTOR. 06340 M00S04602.pfm +++|* (T7) = SECTOR OF RANDOM SECTOR. 06341 M00S04603.pfm +++|* 06342 M00S04604.pfm +++|* USES T6 - T7, RI - RI+1. 06343 M00S04605.pfm +++|* 06344 M00S04606.pfm +++|* CALLS CRA. 06345 M00S04607.pfm +++|* 06346 M00S04608.pfm +++|* MACROS ERROR. 06347 M00S04609.pfm +++| 06348 M00S04610.pfm +++| 06349 M00S04611.pfm +++| CSA SUBR ENTRY/EXIT 06350 M00S04612.pfm +++| LDM DVLW+2 SET FIRST TRACK 06351 M00S04613.pfm +++| STD T6 06352 M00S04614.pfm +++| RJM CRA CONVERT RANDOM ADDRESS 06353 M00S04615.pfm +++| PJN CSAX IF RANDOM ADDRESS OK 06354 M00S04616.pfm +++| ERROR RIN,,,EQ *EQXXX,DNYY, RANDOM INDEX ERROR.* 06355 M00S04617.pfm +++| DPR SPACE 4,15 06356 M00S04618.pfm +++|** DPR - DELAY PRIOR TO RETRY. 06357 M00S04619.pfm +++|*
| Line S04620 Modification History | |
|---|---|
M01 (Removed by) | pfm36 |
Seq # *Modification Id* Act ----------------------------+ 06358 M01S04620.pfm36 ---|* DELAY 1/4 SECOND.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | pfm36 |
Seq # *Modification Id* Act ----------------------------+ 06359 M01S00001.pfm36 +++|* DELAY 100 MILLISECONDS. 06360 M00S04621.pfm +++|* 06361 M00S04622.pfm +++|* EXIT TO *ERR* IF *ORET* SET. 06362 M00S04623.pfm +++|* 06363 M00S04624.pfm +++|* USES T0. 06364 M00S04625.pfm +++|* 06365 M00S04626.pfm +++|* MACROS DELAY, ERROR, PAUSE. 06366 M00S04627.pfm +++| 06367 M00S04628.pfm +++| 06368 M00S04629.pfm +++| DPR SUBR ENTRY/EXIT
| Line S04630 Modification History | |
|---|---|
M01 (Removed by) | pfm36 |
Seq # *Modification Id* Act ----------------------------+ 06369 M01S04630.pfm36 ---| LDC 3000
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | pfm36 |
Seq # *Modification Id* Act ----------------------------+ 06370 M01S00002.pfm36 +++| LDC 1400 06371 M00S04631.pfm +++| STD T0 06372 M00S04632.pfm +++| DPR1 DELAY 06373 M00S04633.pfm +++| PAUSE 06374 M00S04634.pfm +++| LDD CM+1 06375 M00S04635.pfm +++| LMN ORET 06376 M00S04636.pfm +++| ZJN DPR2 IF *ORET* SET 06377 M00S04637.pfm +++| SOD T0 06378 M00S04638.pfm +++| PJN DPR1 IF MORE DELAY REQUIRED 06379 M00S04639.pfm +++| UJN DPRX RETURN 06380 M00S04640.pfm +++|
| Line S04641 Modification History | |
|---|---|
M01 (Removed by) | ns2415 |
Seq # *Modification Id* Act ----------------------------+ 06381 M01S04641.ns2415 ---| DPR2 ERROR ABT * PFM ABORTED.*
| Line S00044 Modification History | |
|---|---|
M01 (Added by) | ns2415 |
Seq # *Modification Id* Act ----------------------------+ 06382 M01S00044.ns2415 +++| DPR2 ERROR ABT,,,T5 *EQXXX,DNYY, PFM ABORTED.* 06383 M00S04642.pfm +++| DTK SPACE 4,15 06384 M00S04643.pfm +++|** DTK - DROP TRACKS. 06385 M00S04644.pfm +++|* 06386 M00S04645.pfm +++|* ENTRY (A) = LAST SECTOR WRITTEN. 06387 M00S04646.pfm +++|* (T6) = ADDRESS OF LAST TRACK (NOT RELEASED). 06388 M00S04647.pfm +++|* (T5) = EST ORDINAL. 06389 M00S04648.pfm +++|* 06390 M00S04649.pfm +++|* EXIT LAST SECTOR WRITTEN UPDATED IN TRT. 06391 M00S04650.pfm +++|* 06392 M00S04651.pfm +++|* USES CM - CM+4. 06393 M00S04652.pfm +++| 06394 M00S04653.pfm +++| 06395 M00S04654.pfm +++| DTK SUBR ENTRY/EXIT 06396 M00S04655.pfm +++| STD CM+3 06397 M00S04656.pfm +++| LDD T6 06398 M00S04657.pfm +++| LPC 3777 06399 M00S04658.pfm +++| STD CM+2 06400 M00S04659.pfm +++| LDD T5 06401 M00S04660.pfm +++| STD CM+1 06402 M00S04661.pfm +++| MONITOR DTKM 06403 M00S04662.pfm +++| UJN DTKX RETURN 06404 M00S04663.pfm +++| ITC SPACE 4,15 06405 M00S04664.pfm +++|** ITC - INTERLOCK TRACK CHAIN. 06406 M00S04665.pfm +++|* 06407 M00S04666.pfm +++|* ENTRY (A) = TRACK CHAIN TO BE INTERLOCKED. 06408 M00S04667.pfm +++|* (T5) = EST ORDINAL. 06409 M00S04668.pfm +++|*
| Line S04669 Modification History | |
|---|---|
M01 (Removed by) | ns2415 |
Seq # *Modification Id* Act ----------------------------+ 06410 M01S04669.ns2415 ---|* EXIT (T6) = TRACK INTERLOCKED.
| Line S00045 Modification History | |
|---|---|
M01 (Added by) | ns2415 |
Seq # *Modification Id* Act ----------------------------+ 06411 M01S00045.ns2415 +++|* EXIT (A) = 0 IF TRACK INTERLOCKED. 06412 M01S00046.ns2415 +++|* (A) = 2 IF TRACK NOT RESERVED. 06413 M01S00047.ns2415 +++|* (T6) = TRACK.
| Line S04670 Modification History | |
|---|---|
M01 (Removed by) | pfm36 |
Seq # *Modification Id* Act ----------------------------+ 06414 M01S04670.pfm36 ---|* RECALL *PFM* IF INTERLOCK NOT AVAILABLE 06415 M01S04671.pfm36 ---|* AFTER TWO TRIES. 06416 M00S04672.pfm +++|* 06417 M00S04673.pfm +++|* CALLS DPR, STI. 06418 M00S04674.pfm +++| 06419 M00S04675.pfm +++|
| Line S00048 Modification History | |
|---|---|
M01 (Added by) | ns2415 |
Seq # *Modification Id* Act ----------------------------+ 06420 M01S00048.ns2415 +++| ITC2 LMN 1 RETURN STATUS VALUE 06421 M01S00049.ns2415 +++| 06422 M00S04676.pfm +++| ITC SUBR ENTRY/EXIT 06423 M00S04677.pfm +++| STD T6
| Line S04678 Modification History | |
|---|---|
M01 (Removed by) | pfm36 |
Seq # *Modification Id* Act ----------------------------+ 06424 M01S04678.pfm36 ---| RJM STI TRY TO INTERLOCK TRACK 06425 M01S04679.pfm36 ---| ZJN ITCX IF TRACK INTERLOCKED
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | pfm36 |
Seq # *Modification Id* Act ----------------------------+ 06426 M01S00003.pfm36 +++| ITC1 RJM STI TRY TO INTERLOCK TRACK
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | pfm36 |
M02 (Removed by) | ns2415 |
Seq # *Modification Id* Act ----------------------------+ 06427 M02S00004.ns2415 ---| ZJN ITCX IF INTERLOCK SUCCESSFUL
| Line S00050 Modification History | |
|---|---|
M01 (Added by) | ns2415 |
Seq # *Modification Id* Act ----------------------------+ 06428 M01S00050.ns2415 +++| LMN 1 06429 M01S00051.ns2415 +++| NJN ITC2 IF INTERLOCK WORKED OR TRACK NOT RESERVED 06430 M00S04680.pfm +++| RJM DPR DELAY PRIOR TO RETRY
| Line S04681 Modification History | |
|---|---|
M01 (Removed by) | pfm36 |
Seq # *Modification Id* Act ----------------------------+ 06431 M01S04681.pfm36 ---| RJM STI TRY TO INTERLOCK TRACK 06432 M01S04682.pfm36 ---| ZJN ITCX IF TRACK INTERLOCKED 06433 M01S04683.pfm36 ---| EXIT INA,CH,,,EC4 * INTERLOCK NOT AVAILABLE.*
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | pfm36 |
Seq # *Modification Id* Act ----------------------------+ 06434 M01S00005.pfm36 +++| UJN ITC1 TRY AGAIN
| Line S04684 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06435 M01S04684.242l642 ---| ITF SPACE 4,15 06436 M01S04685.242l642 ---|** ITF - INTERLOCK FILE. 06437 M01S04686.242l642 ---|* 06438 M01S04687.242l642 ---|* ENTRY (A) = TRACK CHAIN TO BE INTERLOCKED. 06439 M01S04688.242l642 ---|* (T5) = EST ORDINAL. 06440 M01S04689.242l642 ---|* 06441 M01S04690.242l642 ---|* EXIT (T6) = TRACK. 06442 M01S04691.242l642 ---|* 06443 M01S04692.242l642 ---|* USES T6. 06444 M01S04693.242l642 ---|* 06445 M01S04694.242l642 ---|* CALLS DPR, STI. 06446 M01S04695.242l642 ---| 06447 M01S04696.242l642 ---| 06448 M01S04697.242l642 ---| ITF SUBR ENTRY/EXIT 06449 M01S04698.242l642 ---| STD T6 06450 M01S04699.242l642 ---| ITF1 RJM STI TRY TO INTERLOCK TRACK 06451 M01S04700.242l642 ---| ZJN ITFX IF TRACK INTERLOCKED 06452 M01S04701.242l642 ---| RJM DPR DELAY PRIOR TO RETRY 06453 M01S04702.242l642 ---| UJN ITF1 RETRY 06454 M01S04703.242l642 ---| RMD SPACE 4,10
| Line S00571 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06455 M01S00571.242l642 +++| RMD SPACE 4,15 06456 M00S04704.pfm +++|** RMD - RESET TO MASTER DEVICE. 06457 M00S04705.pfm +++|* 06458 M00S04706.pfm +++|* ENTRY (EQ) = MASTER DEVICE EST ORDINAL. 06459 M00S04707.pfm +++|* 06460 M00S04708.pfm +++|* EXIT (T5) = MASTER DEVICE EST ORDINAL. 06461 M00S04709.pfm +++|* 06462 M00S04710.pfm +++|* USES T5.
| Line S00572 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06463 M01S00572.242l642 +++|* 06464 M01S00573.242l642 +++|* CALLS PDV. 06465 M00S04711.pfm +++|* 06466 M00S04712.pfm +++|* MACROS SETMS. 06467 M00S04713.pfm +++| 06468 M00S04714.pfm +++| 06469 M00S04715.pfm +++| RMD SUBR ENTRY/EXIT 06470 M00S04716.pfm +++| LDD EQ 06471 M00S04717.pfm +++| STD T5
| Line S04718 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06472 M01S04718.242l642 ---| SETMS READ
| Line S00574 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Removed by) | ns2645 |
Seq # *Modification Id* Act ----------------------------+ 06473 M02S00574.ns2645 ---| SETMS IO
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2645 |
Seq # *Modification Id* Act ----------------------------+ 06474 M01S00001.ns2645 +++| SETMS IO,NS
| Line S00575 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06475 M01S00575.242l642 +++| RJM PDV PROCESS DEVICE STATUS 06476 M00S04719.pfm +++| UJN RMDX RETURN
| Line S04720 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 06477 M01S04720.253l688 ---| RTK SPACE 4,20 06478 M01S04721.253l688 ---|** RTK - REQUEST LINKED TRACK. 06479 M01S04722.253l688 ---|* 06480 M01S04723.253l688 ---|* ENTRY (T6) = ADDRESS OF LAST TRACK IN CHAIN. 06481 M01S04724.253l688 ---|* (T5) = MASTER DEVICE EST ORDINAL. 06482 M01S04725.253l688 ---|* 06483 M01S04726.253l688 ---|* EXIT (A) = 0 IF NO TRACK AVAILABLE. 06484 M01S04727.253l688 ---|* (A) = TRACK IF AVAILABLE. 06485 M01S04728.253l688 ---|* NEW TRACK PREWRITTEN WITH EOI-S. 06486 M01S04729.253l688 ---|* 06487 M01S04730.253l688 ---|* USES T6, T7, CM - CM+4. 06488 M01S04731.253l688 ---|*
| Line S04732 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 06489 M02S04732.253l688 ---|* CALLS WDS.
| Line S00576 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 06490 M02S00576.253l688 ---|* CALLS PDV, WDS.
| Line S04733 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 06491 M01S04733.253l688 ---|* 06492 M01S04734.253l688 ---|* MACROS ENDMS, MONITOR, SETMS. 06493 M01S04735.253l688 ---|* 06494 M01S04736.253l688 ---|* NOTES THE DRIVER AUTOMATICALLY WRITES THE LAST SECTOR 06495 M01S04737.253l688 ---|* OF A TRACK WITH *WLSF*, EVEN IF *WCSF* IS SPECIFIED. 06496 M01S04738.253l688 ---| 06497 M01S04739.253l688 ---| 06498 M01S04740.253l688 ---| RTK SUBR ENTRY/EXIT 06499 M01S04741.253l688 ---| LDN ZERL 06500 M01S04742.253l688 ---| CRD CM 06501 M01S04743.253l688 ---| LDD T5 SET EST ORDINAL 06502 M01S04744.253l688 ---| STD CM+1 06503 M01S04745.253l688 ---| LDD T6 SET PRESENT LAST TRACK ADDRESS 06504 M01S04746.253l688 ---| STD CM+2 06505 M01S04747.253l688 ---| MONITOR RTCM 06506 M01S04748.253l688 ---| LDD CM+4 06507 M01S04749.253l688 ---| ZJN RTKX IF NO TRACK ASSIGNED 06508 M01S04750.253l688 ---| STD T6 PREWRITE NEW TRACK 06509 M01S04751.253l688 ---| LDN 0 06510 M01S04752.253l688 ---| STD T7
| Line S04753 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 06511 M02S04753.253l688 ---| SETMS WRITE
| Line S00577 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 06512 M02S00577.253l688 ---| SETMS IO 06513 M02S00578.253l688 ---| RJM PDV PROCESS DEVICE STATUS
| Line S04754 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 06514 M01S04754.253l688 ---| RTK1 LDC EOIB+WCSF 06515 M01S04755.253l688 ---| RJM WDS 06516 M01S04756.253l688 ---| AOD T7 06517 M01S04757.253l688 ---| LMM SLM 06518 M01S04758.253l688 ---| NJN RTK1 IF NOT LAST SECTOR 06519 M01S04759.253l688 ---| ENDMS 06520 M01S04760.253l688 ---| LDD T6
| Line S04761 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 06521 M02S04761.253l688 ---| LJM RTKX RETURN 06522 M02S04762.253l688 ---| WBI SPACE 4,15
| Line S00579 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 06523 M02S00579.253l688 ---| UJP RTKX RETURN
| Line S00580 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06524 M01S00580.242l642 +++| UCE SPACE 4,20 06525 M01S00581.242l642 +++|** UCE - UPDATE CATALOG ENTRY. 06526 M01S00582.242l642 +++|* 06527 M01S00583.242l642 +++|* ENTRY (CB) = POINTER TO BUFFER LOCATION. 06528 M01S00584.242l642 +++|* (CI) = POINTER TO CATALOG ENTRY IN BUFFER. 06529 M01S00585.242l642 +++|* MASTER DEVICE CHANNEL RESERVED. 06530 M01S00586.242l642 +++|* (PWRF) = *PFM* RESTART FLAGS FOR RECALL. 06531 M01S00587.242l642 +++|* (UCEA) SET WITH *STMI+CI* IF FCMD, FCUD 06532 M01S00588.242l642 +++|* ARE TO BE UPDATED. 06533 M01S00589.242l642 +++|* 06534 M01S00590.242l642 +++|* EXIT (PWRF) = FLAGS SET FOR ACCESS AND PERMIT COUNTS 06535 M01S00591.242l642 +++|* UPDATED. 06536 M01S00592.242l642 +++|* FCAC, FCAD, FCMD, FCUD UPDATED. 06537 M01S00593.242l642 +++|* CATALOG ENTRY REWRITTEN. 06538 M01S00594.242l642 +++|* 06539 M01S00595.242l642 +++|* USES CM - CM+4. 06540 M01S00596.242l642 +++|* 06541 M01S00597.242l642 +++|* CALLS WBI. 06542 M01S00598.242l642 +++| 06543 M01S00599.242l642 +++| 06544 M01S00600.242l642 +++| UCE SUBR ENTRY/EXIT 06545 M01S00601.242l642 +++| 06546 M01S00602.242l642 +++|* UPDATE DATES. 06547 M01S00603.242l642 +++| 06548 M01S00604.242l642 +++| LDN PDTL READ PACKED DATE AND TIME 06549 M01S00605.242l642 +++| CRD CM 06550 M01S00606.242l642 +++| LDN 3 06551 M01S00607.242l642 +++| STD CM 06552 M01S00608.242l642 +++| RAD CI 06553 M01S00609.242l642 +++| UCE1 LDM CM+2-1,CM 06554 M01S00610.242l642 +++| UCEA UJN UCE2 READ ACCESS - BYPASS FCMD, FCUD UPDATES 06555 M01S00611.242l642 +++|* UJN UCE3 (*UATTACH*/M=R - BYPASS DATE/TIME UPDATE) 06556 M01S00612.242l642 +++|* STM FCUD-1,CI (UPDATE UTILITY CONTROL DATE/TIME) 06557 M01S00613.242l642 +++| CON FCUD-1 06558 M01S00614.242l642 +++| UCEB STM FCMD-1,CI UPDATE MODIFICATION DATE 06559 M01S00615.242l642 +++|* UJN UCE3 (*UATTACH* - BYPASS FCMD, FCAD UPDATE) 06560 M01S00616.242l642 +++| UCE2 STM FCAD-1,CI UPDATE ACCESS DATE 06561 M01S00617.242l642 +++| UCE3 SOD CI 06562 M01S00618.242l642 +++| SOD CM 06563 M01S00619.242l642 +++| NJN UCE1 IF UPDATE NOT COMPLETE 06564 M01S00620.242l642 +++| 06565 M01S00621.242l642 +++|* UPDATE ACCESS COUNT. 06566 M01S00622.242l642 +++| 06567 M01S00623.242l642 +++| LDM PWRF RESTART FLAGS 06568 M01S00624.242l642 +++| LPK RFAC 06569 M01S00625.242l642 +++| NJN UCE4 IF ACCESS COUNT UPDATED 06570 M01S00626.242l642 +++| UCEC AOM FCAC+1,CI ADVANCE ACCESS COUNT 06571 M01S00627.242l642 +++|* UJN UCE4 (*UATTACH* - BYPASS ACCESS COUNT UPDATE) 06572 M01S00628.242l642 +++| SHN -14 06573 M01S00629.242l642 +++| RAM FCAC,CI 06574 M01S00630.242l642 +++| 06575 M01S00631.242l642 +++|* REWRITE CATALOG ENTRY. 06576 M01S00632.242l642 +++| 06577 M01S00633.242l642 +++| UCE4 LDD CB REWRITE CATALOG 06578 M01S00634.242l642 +++| RJM WBI 06579 M01S00635.242l642 +++| LDM PWRF RESTART FLAGS 06580 M01S00636.242l642 +++| SCN RFAC+RFPC 06581 M01S00637.242l642 +++| ADK RFAC+RFPC SET ACCESS AND PERMIT COUNTS UPDATED 06582 M01S00638.242l642 +++| STM PWRF 06583 M01S00639.242l642 +++| UJP UCEX RETURN 06584 M01S00640.242l642 +++| 06585 M01S00641.242l642 +++|* CHECK RANGE ON GENERATED JUMPS. 06586 M01S00642.242l642 +++| 06587 M01S00643.242l642 +++| ERRNG 37-UCE3+UCEB 06588 M01S00644.242l642 +++| ERRNG 37-UCE4+UCEC 06589 M01S00645.242l642 +++| WBI SPACE 4,20 06590 M00S04763.pfm +++|** WBI - WRITE BUFFER IN PLACE. 06591 M00S04764.pfm +++|* 06592 M00S04765.pfm +++|* ENTRY (A) = BUFFER LOCATION. 06593 M00S04766.pfm +++|* (T5) = MASTER DEVICE EST ORDINAL.
| Line S00646 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06594 M01S00646.242l642 +++|* (STAT) = *STNS* BIT SET IF NO JOB SUSPENSION ALLOWED. 06595 M00S04767.pfm +++|* ADDRESS SET IN 2 LOCATIONS PRECEEDING BUFFER. 06596 M00S04768.pfm +++|* LINKAGE SET IN BUFFER. 06597 M00S04769.pfm +++|* 06598 M00S04770.pfm +++|* EXIT SECTOR WRITTEN.
| Line S00647 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06599 M01S00647.242l642 +++|* TO *ERR* TO PROCESS MASS STORAGE ERROR. 06600 M00S04771.pfm +++|* 06601 M00S04772.pfm +++|* USES T3, T6, T7. 06602 M00S04773.pfm +++|*
| Line S04774 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06603 M01S04774.242l642 ---|* CALLS WDS.
| Line S00648 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06604 M01S00648.242l642 +++|* CALLS PDV, PES, WDS. 06605 M00S04775.pfm +++|* 06606 M00S04776.pfm +++|* MACROS ERROR, SETMS. 06607 M00S04777.pfm +++| 06608 M00S04778.pfm +++| 06609 M00S04779.pfm +++| WBI SUBR ENTRY/EXIT 06610 M00S04780.pfm +++| STD T3 SAVE BUFFER ADRRESS 06611 M00S04781.pfm +++| LDM -2,T3 06612 M00S04782.pfm +++| STD T6 06613 M00S04783.pfm +++| LDM -1,T3 06614 M00S04784.pfm +++| STD T7
| Line S04785 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06615 M01S04785.242l642 ---| SETMS WRITE,RW
| Line S00649 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Removed by) | ns2645 |
Seq # *Modification Id* Act ----------------------------+ 06616 M02S00649.ns2645 ---| SETMS IO,RW
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2645 |
Seq # *Modification Id* Act ----------------------------+ 06617 M01S00002.ns2645 +++| SETMS IO,(RW,NS)
| Line S00650 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06618 M01S00650.242l642 +++| RJM PDV PROCESS DEVICE STATUS 06619 M00S04786.pfm +++| LDD T3 06620 M00S04787.pfm +++| LMK WLSF WRITE LAST SECTOR 06621 M00S04788.pfm +++| RJM WDS 06622 M00S04789.pfm +++| PJN WBIX IF NO ERRORS
| Line S00651 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06623 M01S00651.242l642 +++| RJM PES PROCESS ERROR STATUS 06624 M01S00652.242l642 +++| LDM STAT 06625 M01S00653.242l642 +++| LPK STNS 06626 M01S00654.242l642 +++| NJN WBI1 IF JOB SUSPENSION INHIBITED 06627 M01S00655.242l642 +++| LDM RDCT DRIVER STATUS 06628 M01S00656.242l642 +++| SHN 21-13 06629 M01S00657.242l642 +++| PJN WBI1 IF DATA TRANSFERRED 06630 M00S04790.pfm +++| ERROR MSE,CH,,T5 *EQXXX,DNYY, MASS STORAGE ERROR.*
| Line S00658 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06631 M01S00658.242l642 +++| 06632 M01S00659.242l642 +++|* REQUEST ERROR IDLE BE SET WHEN CATALOG OR PERMIT FILE 06633 M01S00660.242l642 +++|* IS NOT INTACT. 06634 M01S00661.242l642 +++| 06635 M01S00662.242l642 +++| WBI1 ERROR MSE,CH,,T5,,EI *EQXXX,DNYY, MASS STORAGE ERROR.* 06636 M00S04791.pfm +++| SPACE 4,10 06637 M00S04792.pfm +++|* RESIDENT COMMON DECKS. 06638 M00S04793.pfm +++| 06639 M00S04794.pfm +++| 06640 M00S04795.pfm +++|*CALL COMPCRA 06641 M00S04796.pfm +++|*CALL COMPCTI 06642 M00S04797.pfm +++|*CALL COMPIRA 06643 M00S04798.pfm +++| STI$ SET 0 RETURN CONTROL ON TRACK INTERLOCK REJECT
| Line S00052 Modification History | |
|---|---|
M01 (Added by) | ns2415 |
Seq # *Modification Id* Act ----------------------------+ 06644 M01S00052.ns2415 +++| TNR$ SET 0 DO NOT HANG ON *TRACK NOT RESERVED* 06645 M00S04799.pfm +++|*CALL COMPSTI 06646 M00S04800.pfm +++| SPACE 4,10 06647 M00S04801.pfm +++| OVLU EQU *+5 CATALOG/PERMIT UPDATE OVERLAY LOAD ADDRESS
| Line S00663 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06648 M01S00663.242l642 +++| SPACE 4,10 06649 M01S00664.242l642 +++|* DEFINE THE MAXIMUM LENGTH OF OVERLAYS *3PD* 06650 M01S00665.242l642 +++|* (CATALOG UPDATE ROUTINES) AND *3PE* (PERMIT 06651 M01S00666.242l642 +++|* UPDATE ROUTINES) IN SECTORS. 06652 M01S00667.242l642 +++| 06653 M01S00668.242l642 +++| 06654 M01S00669.242l642 +++| OVLL EQU 3*500B OVERLAY LENGTH IN SECTORS 06655 M01S00670.242l642 +++| SPACE 4,10 06656 M01S00671.242l642 +++|* DEFINE THE LOAD ADDRESS FOR THE COMMAND OVERLAYS. 06657 M01S00672.242l642 +++| 06658 M01S00673.242l642 +++| 06659 M01S00674.242l642 +++| OVLC EQU OVLU+OVLL-5 COMMAND CODE LOAD ADDRESS 06660 M00S04802.pfm +++| TITLE PERMIT SEARCH ROUTINES. 06661 M00S04803.pfm +++| CPI SPACE 4,25 06662 M00S04804.pfm +++|** CPI - CHECK PERMISSION INFORMATION. 06663 M00S04805.pfm +++|* 06664 M00S04806.pfm +++|* *BFMS* IS USED TO READ PERMITS. 06665 M00S04807.pfm +++|* 06666 M00S04808.pfm +++|* ENTRY (A) = PERMISSION MODE REQUIRED FOR COMMAND. 06667 M00S04809.pfm +++|* (CI) = INDEX TO CATALOG ENTRY. 06668 M00S04810.pfm +++|* MASTER DEVICE CHANNEL RESERVED. 06669 M00S04811.pfm +++|* (PP) = 0. 06670 M00S04812.pfm +++|* (PB) = 0. 06671 M00S04813.pfm +++|* 06672 M00S04814.pfm +++|* EXIT (A) = ACCESS MODE ALLOWED. 06673 M00S04815.pfm +++|* TO ERR IF NOT PERMITTED ACCESS. 06674 M00S04816.pfm +++|* BUFFER LOADED WITH PERMITS. 06675 M00S04817.pfm +++|* (PP) = POINTER TO PERMIT ENTRY. 06676 M00S04818.pfm +++|* (PP) = 0 IF PERMIT ENTRY NOT AVAILABLE. 06677 M00S04819.pfm +++|* (PB) = ADDRESS OF PERMIT BUFFER. 06678 M00S04820.pfm +++|* (PB) = 0 IF NO PERMIT SEARCH POSSIBLE. 06679 M00S04821.pfm +++|* 06680 M00S04822.pfm +++|* USES P1, PB, PP, T0, T1, RI - RI+1. 06681 M00S04823.pfm +++|* 06682 M00S04824.pfm +++|* CALLS SPI. 06683 M00S04825.pfm +++|* 06684 M00S04826.pfm +++|* MACROS MONITOR. 06685 M00S04827.pfm +++| 06686 M00S04828.pfm +++| 06687 M00S04829.pfm +++| CPI SUBR ENTRY/EXIT 06688 M00S04830.pfm +++| LPN 37 SET MODE REQUIRED 06689 M00S04831.pfm +++| STD T1 06690 M00S04832.pfm +++| STM CPIC 06691 M00S04833.pfm +++| LDC SHNI+21 SET SHIFT COUNT FOR MODE REQUIRED 06692 M00S04834.pfm +++| SBD T1 06693 M00S04835.pfm +++| STM CPID 06694 M00S04836.pfm +++| LDD PI 06695 M00S04837.pfm +++| ADD PI+1 06696 M00S04838.pfm +++| ZJN CPIX IF NOT ALTERNATE CATALOG ACCESS
| Line S04839 Modification History | |
|---|---|
M01 (Removed by) | pfm67 |
Seq # *Modification Id* Act ----------------------------+ 06697 M01S04839.pfm67 ---| LDM FCCT,CI CHECK FILE CATEGORY 06698 M01S04840.pfm67 ---| SHN -6 06699 M01S04841.pfm67 ---| LMN FCPB 06700 M01S04842.pfm67 ---| ZJN CPI1 IF PUBLIC FILE 06701 M00S04843.pfm +++| 06702 M00S04844.pfm +++|* READ PERMISSION INFORMATION. 06703 M00S04845.pfm +++| 06704 M00S04846.pfm +++| LDC BFMS SET PERMIT BUFFER 06705 M00S04847.pfm +++| STD PB 06706 M00S04848.pfm +++| LDM FCRI,CI SET PERMIT ADDRESS 06707 M00S04849.pfm +++| STD RI 06708 M00S04850.pfm +++| LDM FCRI+1,CI 06709 M00S04851.pfm +++| STD RI+1 06710 M00S04852.pfm +++| ADD RI 06711 M00S04853.pfm +++| ZJN CPI1 IF NO PERMISSION INFORMATION AVAILABLE 06712 M00S04854.pfm +++| LDN IPPA PF INCREMENT OF PERMIT FILE ACCESS
| Line S04855 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06713 M01S04855.242l642 ---| RAM DPPF
| Line S00675 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06714 M01S00675.242l642 +++| RAM AIPF+1 06715 M00S04856.pfm +++| RJM SPI SEARCH PERMISSION INFORMATION
| Line S04857 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06716 M01S04857.242l642 ---| .PPE1 BSS 0 06717 M00S04858.pfm +++| 06718 M00S04859.pfm +++|* CHECK FILE CATEGORY. 06719 M00S04860.pfm +++| 06720 M00S04861.pfm +++| CPI1 LDM FCAM,CI SET ACCESS MODE FOR FILE 06721 M00S04862.pfm +++| LPN 77 06722 M00S04863.pfm +++| STD P1 06723 M00S04864.pfm +++| LDM FCCT,CI 06724 M00S04865.pfm +++| SHN -6 06725 M00S04866.pfm +++| LMK FCPR 06726 M00S04867.pfm +++| NJN CPI3 IF NOT PRIVATE FILE 06727 M00S04868.pfm +++|
| Line S04869 Modification History | |
|---|---|
M01 (Removed by) | pfm67 |
Seq # *Modification Id* Act ----------------------------+ 06728 M01S04869.pfm67 ---|* PRIVATE FILES.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | pfm67 |
Seq # *Modification Id* Act ----------------------------+ 06729 M01S00001.pfm67 +++|* PRIVATE FILE. 06730 M00S04870.pfm +++| 06731 M00S04871.pfm +++| LDD PP 06732 M00S04872.pfm +++| NJN CPI5 IF PERMIT FOUND 06733 M00S04873.pfm +++| CPI2 LDN PTNU PROHIBIT ACCESS TO FILE 06734 M00S04874.pfm +++| STD P1 06735 M00S04875.pfm +++| UJN CPI8 PROCESS PERMIT NOT FOUND 06736 M00S04876.pfm +++|
| Line S04877 Modification History | |
|---|---|
M01 (Removed by) | pfm67 |
Seq # *Modification Id* Act ----------------------------+ 06737 M01S04877.pfm67 ---|* NON-PRIVATE FILE.
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | pfm67 |
Seq # *Modification Id* Act ----------------------------+ 06738 M01S00002.pfm67 +++|* SEMI-PRIVATE OR PUBLIC FILE. 06739 M00S04878.pfm +++|
| Line S04879 Modification History | |
|---|---|
M01 (Removed by) | pfm67 |
Seq # *Modification Id* Act ----------------------------+ 06740 M01S04879.pfm67 ---| CPI3 LMN FCPB&FCPR 06741 M01S04880.pfm67 ---| ZJN CPI6 IF PUBLIC FILE
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | pfm67 |
Seq # *Modification Id* Act ----------------------------+ 06742 M01S00003.pfm67 +++| CPI3 LDM PFAC 06743 M01S00004.pfm67 +++| NJN CPI4 IF CALLER HAS USER NAME IN CPA 06744 M01S00005.pfm67 +++| STD PB PREVENT UPDATE OF PERMIT ENTRY 06745 M01S00006.pfm67 +++| UJN CPI6 TREAT AS NONPERMITTED PUBLIC FILE 06746 M00S04881.pfm +++|
| Line S04882 Modification History | |
|---|---|
M01 (Removed by) | pfm67 |
Seq # *Modification Id* Act ----------------------------+ 06747 M01S04882.pfm67 ---|* SEMI-PRIVATE FILES. 06748 M01S04883.pfm67 ---| 06749 M01S04884.pfm67 ---| LDM PFAC 06750 M01S04885.pfm67 ---| NJN CPI4 IF CALLER HAS USER NAME IN CPA 06751 M01S04886.pfm67 ---| STD PB PREVENT UPDATE OF PERMIT ENTRY 06752 M01S04887.pfm67 ---| UJN CPI6 TREAT AS PUBLIC FILE 06753 M01S04888.pfm67 ---| 06754 M01S04889.pfm67 ---| CPI4 LDC MJNI+CPI6-CPIB SET SEMI-PRIVATE FILE
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | pfm67 |
Seq # *Modification Id* Act ----------------------------+ 06755 M01S00007.pfm67 +++| CPI4 LDC MJNI+CPI6-CPIB SET SEMI-PRIVATE OR PUBLIC FILE 06756 M00S04890.pfm +++| STM CPIB 06757 M00S04891.pfm +++| LDD PP CHECK PERMIT INDEX 06758 M00S04892.pfm +++| ZJN CPI6 IF NO PERMIT FOUND 06759 M00S04893.pfm +++| 06760 M00S04894.pfm +++|* CHECK PERMIT TYPE. 06761 M00S04895.pfm +++| 06762 M00S04896.pfm +++| CPI5 LDM FPMD,PP CHECK PERMIT TYPE 06763 M00S04897.pfm +++| SHN 21-4 06764 M00S04898.pfm +++| CPIB MJN CPI2 IF ACCOUNTING PERMIT
| Line S04899 Modification History | |
|---|---|
M01 (Removed by) | pfm67 |
Seq # *Modification Id* Act ----------------------------+ 06765 M01S04899.pfm67 ---|* MJN CPI6 IF ACCOUNTING PERMIT (SEMI-PRIVATE FILE)
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | pfm67 |
Seq # *Modification Id* Act ----------------------------+ 06766 M01S00008.pfm67 +++|* MJN CPI6 IF ACCOUNTING PERMIT (SEMI-PRIVATE/PUBLIC) 06767 M00S04900.pfm +++| SHN -21+4 SET PERMIT MODE 06768 M00S04901.pfm +++| STD P1 06769 M00S04902.pfm +++| 06770 M00S04903.pfm +++|* CHECK ACCESS MODE. 06771 M00S04904.pfm +++| 06772 M00S04905.pfm +++| CPI6 LDD P1 PERMITTED MODE 06773 M00S04906.pfm +++| SBN PTLM 06774 M00S04907.pfm +++| MJN CPI8 IF LEGAL MODE 06775 M00S04908.pfm +++| CPI7 ERROR FNF *(FILENAME) NOT FOUND.* 06776 M00S04909.pfm +++| 06777 M00S04910.pfm +++|* CHECK FOR MULTI-LEVEL USER NAME ACCESS. 06778 M00S04911.pfm +++| 06779 M00S04912.pfm +++| CPI8 LDM PFPT 06780 M00S04913.pfm +++| NJN CPI10 IF NOT MULTI-LEVEL USER 06781 M00S04914.pfm +++| LDC * (REQUESTED MODE) 06782 M00S04915.pfm +++| CPIC EQU *-1 06783 M00S04916.pfm +++| LMN PTRD 06784 M00S04917.pfm +++| ZJN CPI9 IF READ MODE REQUESTED 06785 M00S04918.pfm +++| LMN PTEX&PTRD 06786 M00S04919.pfm +++| NJN CPI10 IF MODE OTHER THAN EXECUTE REQUESTED 06787 M00S04920.pfm +++| CPI9 LDN PTRD ALLOW READ MODE ACCESS 06788 M00S04921.pfm +++| LJM CPIX RETURN 06789 M00S04922.pfm +++| 06790 M00S04923.pfm +++|* CHECK EXPIRATION DATE. 06791 M00S04924.pfm +++| 06792 M00S04925.pfm +++| CPI10 LDD PP 06793 M00S04926.pfm +++| ZJN CPI12 IF NO PERMIT ENTRY 06794 M00S04927.pfm +++| LDM FPMD,PP 06795 M00S04928.pfm +++| SHN 21-5 06796 M00S04929.pfm +++| PJN CPI12 IF EXPIRATION DATE NOT PRESENT 06797 M00S04930.pfm +++| LDM FPXD,PP 06798 M00S04931.pfm +++| LPN 77 06799 M00S04932.pfm +++| STD CM+3 06800 M00S04933.pfm +++| SHN 14 06801 M00S04934.pfm +++| LMM FPXD+1,PP 06802 M00S04935.pfm +++| ZJN CPI12 IF NONEXPIRING PERMIT 06803 M00S04936.pfm +++| STD CM+4 06804 M00S04937.pfm +++| LDN VEDS VALIDATE EXPIRATION DATE 06805 M00S04938.pfm +++| STD CM+1 06806 M00S04939.pfm +++| MONITOR VSAM 06807 M00S04940.pfm +++| LDD CM+1 06808 M00S04941.pfm +++| ZJN CPI12 IF PERMIT NOT EXPIRED 06809 M00S04942.pfm +++| CPI11 LJM CPI7 *(FILENAME) NOT FOUND.* 06810 M00S04943.pfm +++| 06811 M00S04944.pfm +++|* CHECK IF ACCESS MODE PERMITTED. 06812 M00S04945.pfm +++| 06813 M00S04946.pfm +++| CPI12 LDM TMPE,P1 06814 M00S04947.pfm +++| CPID SHN ** (21 - REQUESTED MODE) 06815 M00S04948.pfm +++| PJN CPI11 IF REQUESTED MODE NOT ALLOWED 06816 M00S04949.pfm +++| LDD P1 ALLOW PERMITTED MODE 06817 M00S04950.pfm +++| LJM CPIX RETURN 06818 M00S04951.pfm +++| 06819 M00S04952.pfm +++|* TEST RANGE OF GENERATED RELATIVE JUMPS. 06820 M00S04953.pfm +++| 06821 M00S04954.pfm +++| ERRNG 37+CPIB-CPI6 06822 M00S04955.pfm +++| 06823 M00S04956.pfm +++| 06824 M00S04957.pfm +++| TMPE BSS 0 TABLE OF MODE PERMISSION EQUIVALENCES. 06825 M00S04958.pfm +++| LOC 0 06826 M00S04959.pfm +++| 06827 M00S04960.pfm +++| CON MDWR WRITE 06828 M00S04961.pfm +++| CON MDRD READ 06829 M00S04962.pfm +++| CON MDAP APPEND 06830 M00S04963.pfm +++| CON MDEX EXECUTE 06831 M00S04964.pfm +++| CON MDNU NEGATE 06832 M00S04965.pfm +++| CON MDMD MODIFY 06833 M00S04966.pfm +++| CON MDRM READ/ALLOW MODIFY 06834 M00S04967.pfm +++| CON MDRA READ/ALLOW EXTEND 06835 M00S04968.pfm +++| CON MDUP UPDATE 06836 M00S04969.pfm +++| CON MDRU READ/ALLOW UPDATE 06837 M00S04970.pfm +++| 06838 M00S04971.pfm +++| LOC *O
| Line S04972 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06839 M01S04972.242l642 ---| PPE SPACE 4,10 06840 M01S04973.242l642 ---|** PPE - PROCESS PERMIT READ ERROR. 06841 M01S04974.242l642 ---|* 06842 M01S04975.242l642 ---|* ENTRY FROM SPI. 06843 M01S04976.242l642 ---|* 06844 M01S04977.242l642 ---|* EXIT *FILE NOT FOUND.* ISSUED IF CALLED FROM *CPI*. 06845 M01S04978.242l642 ---|* *MASS STORAGE ERROR.* ISSUED IF CALLED FROM *PERMIT*. 06846 M01S04979.242l642 ---| 06847 M01S04980.242l642 ---| 06848 M01S04981.242l642 ---| PPE BSS 0 ENTRY 06849 M01S04982.242l642 ---| LDM SPI 06850 M01S04983.242l642 ---| LMC .PPE1 06851 M01S04984.242l642 ---| NJN PPE1 IF NOT CALLED FROM *CPI* 06852 M01S04985.242l642 ---| ERROR FNF *(FILE NAME) NOT FOUND.* 06853 M01S04986.242l642 ---| 06854 M01S04987.242l642 ---| PPE1 ERROR MSE,,,EQ *EQXXX,DNYY, MASS STORAGE ERROR.* 06855 M01S04988.242l642 ---| SPI SPACE 4,20
| Line S00676 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06856 M01S00676.242l642 +++| SPI SPACE 4,25 06857 M00S04989.pfm +++|** SPI - SEARCH PERMISSION INFORMATION. 06858 M00S04990.pfm +++|* 06859 M00S04991.pfm +++|* ENTRY (PB) = BUFFER TO BE SEARCHED. 06860 M00S04992.pfm +++|* (PP) = 0. 06861 M00S04993.pfm +++|* (EBTK) = END BUFFER TRACK, IF BUFFER IS IN *BFMS*. 06862 M00S04994.pfm +++|* 06863 M00S04995.pfm +++|* EXIT (PP) = INDEX TO PERMIT ENTRY IF FOUND. 06864 M00S04996.pfm +++|* (PP) = 0 IF PERMIT ENTRY NOT FOUND. 06865 M00S04997.pfm +++|* (T1) = NEXT AVAILABLE ENTRY IF NOT FOUND AND SHORT PRU. 06866 M00S04998.pfm +++|* (EXPC) = NUMBER OF EXPLICIT PERMIT ENTRIES (IF PERMIT 06867 M00S04999.pfm +++|* NOT FOUND). 06868 M00S05000.pfm +++|* (RI - RI+1) = RANDOM INDEX OF PERMIT SECTOR. 06869 M00S05001.pfm +++|* (ADVANCED IF SECTOR OVERFLOW) 06870 M00S05002.pfm +++|* (STAT) FLAG SET IF *BFMS* REUSED. 06871 M00S05003.pfm +++|* BUFFER LOADED WITH PERMITS. 06872 M00S05004.pfm +++|* 06873 M00S05005.pfm +++|* USES T1, T2, PI - PI+1, RI - RI+1. 06874 M00S05006.pfm +++|*
| Line S05007 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06875 M01S05007.242l642 ---|* CALLS CSA, RDS, PPE.
| Line S00677 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06876 M01S00677.242l642 +++|* CALLS CSA, PDV, PES, RDS. 06877 M00S05008.pfm +++|* 06878 M00S05009.pfm +++|* MACROS ERROR, SETMS. 06879 M00S05010.pfm +++| 06880 M00S05011.pfm +++| 06881 M00S05012.pfm +++| SPI SUBR ENTRY/EXIT 06882 M00S05013.pfm +++| LDN STPR INDICATE THAT PERMITS WERE READ 06883 M00S05014.pfm +++| RAM STAT 06884 M00S05015.pfm +++| LDM EBTK CHECK IF END BUFFER IS IN *BFMS* 06885 M00S05016.pfm +++| ZJN SPI1 IF *BFMS* IS NOT IN USE 06886 M00S05017.pfm +++| LDN STBR INDICATE THAT *BFMS* HAS BEEN REUSED 06887 M00S05018.pfm +++| RAM STAT 06888 M00S05019.pfm +++| 06889 M00S05020.pfm +++|* READ NEXT SECTOR OF PERMITS. 06890 M00S05021.pfm +++| 06891 M00S05022.pfm +++| SPI1 RJM CSA COMPUTE RANDOM ADDRESS 06892 M00S05023.pfm +++| LDD T6 SET CURRENT SECTOR POINTERS 06893 M00S05024.pfm +++| STM -2,PB 06894 M00S05025.pfm +++| STM ERRC 06895 M00S05026.pfm +++| LDD T7 06896 M00S05027.pfm +++| STM -1,PB 06897 M00S05028.pfm +++| STM ERRD
| Line S05029 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06898 M01S05029.242l642 ---| SETMS READ
| Line S00678 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06899 M01S00678.242l642 +++| SETMS IO 06900 M01S00679.242l642 +++| RJM PDV PROCESS DEVICE STATUS 06901 M00S05030.pfm +++| LDD PB 06902 M00S05031.pfm +++| RJM RDS READ SECTOR 06903 M00S05032.pfm +++| PJN SPI2 IF NO READ ERROR
| Line S05033 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06904 M01S05033.242l642 ---| LJM PPE PROCESS PERMIT READ ERROR
| Line S00680 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06905 M01S00680.242l642 +++| RJM PES PROCESS ERROR STATUS 06906 M01S00681.242l642 +++| ERROR MSE,CH,,EQ *EQXXX,DNYY, MASS STORAGE ERROR.* 06907 M00S05034.pfm +++| 06908 M00S05035.pfm +++| SPI2 LDM 1,PB WORD COUNT IN PERMIT SECTOR
| Line S05036 Modification History | |
|---|---|
M01 (Removed by) | ns2649 |
Seq # *Modification Id* Act ----------------------------+ 06909 M01S05036.ns2649 ---| ZJN SPI3 IF ZERO LENGTH SECTOR
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2649 |
Seq # *Modification Id* Act ----------------------------+ 06910 M01S00001.ns2649 +++| SBN NWPE+NWPH 06911 M01S00002.ns2649 +++| MJN SPI3 IF INCORRECT SECTOR LENGTH 06912 M00S05037.pfm +++| LPN NWPE-1 06913 M00S05038.pfm +++| ZJN SPI4 IF INTEGRAL NUMBER OF PERMIT ENTRIES 06914 M00S05039.pfm +++| ERRNZ NWPH-NWPE HEADER SIZE MUST EQUAL ENTRY SIZE
| Line S05040 Modification History | |
|---|---|
M01 (Removed by) | ns2415 |
Seq # *Modification Id* Act ----------------------------+ 06915 M01S05040.ns2415 ---| SPI3 ERROR BCS,,,T5 * BAD CATALOG/PERMIT SECTOR.*
| Line S00053 Modification History | |
|---|---|
M01 (Added by) | ns2415 |
Seq # *Modification Id* Act ----------------------------+ 06916 M01S00053.ns2415 +++| SPI3 ERROR BCS,,,T5,,EI *EQXXX,DNYY, BAD CATALOG/PERMIT SECTOR.* 06917 M00S05041.pfm +++| 06918 M00S05042.pfm +++| SPI4 LDN NWPH ADVANCE WORD COUNT PAST HEADER 06919 M00S05043.pfm +++| STD T2 06920 M00S05044.pfm +++| LDD PB RESET SEARCH INDEX 06921 M00S05045.pfm +++| ADN NWPH*5+2 SKIP HEADER AND CONTROL BYTES 06922 M00S05046.pfm +++| STD T1 06923 M00S05047.pfm +++| UJN SPI7 CHECK FIRST ENTRY IN SECTOR 06924 M00S05048.pfm +++| 06925 M00S05049.pfm +++|* ADVANCE TO NEXT PERMIT ENTRY. 06926 M00S05050.pfm +++| 06927 M00S05051.pfm +++| SPI5 LDM FPMD,T1 06928 M00S05052.pfm +++| SHN 21-4 06929 M00S05053.pfm +++| MJN SPI6 IF ACCOUNTING PERMIT 06930 M00S05054.pfm +++| AOM EXPC ADVANCE EXPLICIT PERMIT COUNT 06931 M00S05055.pfm +++| SPI6 LDN NWPE*5 ADVANCE BUFFER INDEX 06932 M00S05056.pfm +++| RAD T1 06933 M00S05057.pfm +++| LDN NWPE INCREMENT WORD COUNT 06934 M00S05058.pfm +++| RAD T2 06935 M00S05059.pfm +++| LMM 1,PB 06936 M00S05060.pfm +++| NJN SPI7 IF NOT END OF BUFFER 06937 M00S05061.pfm +++| UJN SPI10 END OF BUFFER 06938 M00S05062.pfm +++| 06939 M00S05063.pfm +++| SPI7 LDM PFAC 06940 M00S05064.pfm +++| LMM FPAN,T1 COMPARE USER NAME 06941 M00S05065.pfm +++| NJN SPI5 IF NO MATCH 06942 M00S05066.pfm +++| LDM FPAN+1,T1 06943 M00S05067.pfm +++| LMM PFAC+1 06944 M00S05068.pfm +++| NJN SPI5 IF NO MATCH 06945 M00S05069.pfm +++| LDM FPAN+2,T1 06946 M00S05070.pfm +++| LMM PFAC+2 06947 M00S05071.pfm +++| SPI8 NJN SPI5 IF NO MATCH 06948 M00S05072.pfm +++| LDM FPAN+3,T1 06949 M00S05073.pfm +++| LMM PFAC+3 06950 M00S05074.pfm +++| SCN 77 06951 M00S05075.pfm +++| NJN SPI8 IF NO MATCH 06952 M00S05076.pfm +++| LDD T1 SET POINTER TO ENTRY 06953 M00S05077.pfm +++| STD PP 06954 M00S05078.pfm +++| SPI9 LDD T1 SET HOLE ADDRESS 06955 M00S05079.pfm +++| STM NPHA 06956 M00S05080.pfm +++| LJM SPIX RETURN 06957 M00S05081.pfm +++| 06958 M00S05082.pfm +++| SPI10 LDD T2 CHECK WORD COUNT OF SECTOR 06959 M00S05083.pfm +++| LMD HN 06960 M00S05084.pfm +++| NJN SPI9 IF END OF PERMITS 06961 M00S05085.pfm +++| LDM FPRI,PB CHECK FOR LINKED PERMIT BUFFERS 06962 M00S05086.pfm +++| STD RI 06963 M00S05087.pfm +++| LDM FPRI+1,PB 06964 M00S05088.pfm +++| STD RI+1 06965 M00S05089.pfm +++| ADD RI 06966 M00S05090.pfm +++| ZJN SPI9 IF INDEX NOT SET 06967 M00S05091.pfm +++| LJM SPI1 READ NEXT SECTOR 06968 M00S05092.pfm +++| SPACE 4,10 06969 M00S05093.pfm +++| OVL0 EQU *+5 ZERO-LEVEL OVERLAY LOAD ADDRESS 06970 M00S05094.pfm +++| TITLE CATALOG SEARCH ROUTINES.
| Line S05095 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 06971 M01S05095.253l688 ---| CCD SPACE 4,15
| Line S00116 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 06972 M01S00116.253l688 +++| CCD SPACE 4,25 06973 M00S05096.pfm +++|** CCD - CHECK CATALOG DATA. 06974 M00S05097.pfm +++|* 06975 M00S05098.pfm +++|* CHECK IF CATALOG ENTRY IS THAT OF DESIRED FILE. 06976 M00S05099.pfm +++|* IF PASSWORD PRESENT IN CATALOG ENTRY, VERIFY THAT 06977 M00S05100.pfm +++|* CORRECT PASSWORD WAS SPECIFIED AND THAT PASSWORD 06978 M00S05101.pfm +++|* HAD NOT EXPIRED (ALTERNATE USER ONLY). 06979 M00S05102.pfm +++|* THE ACCESS LEVEL AND ACCESS CATEGORY SET ARE ALSO 06980 M00S05103.pfm +++|* VALIDATED. STATISTICS ARE ACCUMULATED FOR USER 06981 M00S05104.pfm +++|* CONTROL CHECKS. 06982 M00S05105.pfm +++|* 06983 M00S05106.pfm +++|* ENTRY (T3) = INDEX TO CATALOG ENTRY. 06984 M00S05107.pfm +++|* (FN - FN+3) = FILE NAME. 06985 M00S05108.pfm +++|* (PFPW - PFPW+3) = FILE PASSWORD FROM CALL BLOCK 06986 M00S05109.pfm +++|* (CCDA) = EXIT JUMP IF NO OPTIONAL USER. 06987 M00S05110.pfm +++|* 06988 M00S05111.pfm +++|* EXIT (A) = 0 IF FILE FOUND AND ACCESS ALLOWED. 06989 M00S05112.pfm +++|* (NF - NF+1) INCREMENTED. 06990 M00S05113.pfm +++|* (CS - CS+1) ADVANCED IF FILE IS INDIRECT. 06991 M00S05114.pfm +++|* TO *ERR* IF ACCESS TO FILE NOT ALLOWED. 06992 M00S05115.pfm +++|* 06993 M00S05116.pfm +++|* USES T3, FN - FN+3. 06994 M00S05117.pfm +++|* 06995 M00S05118.pfm +++|* MACROS ERROR, MONITOR.
| Line S00117 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 06996 M01S00117.253l688 +++|* 06997 M01S00118.253l688 +++|* NOTES THE USE OF THE DATA TAGS *CCDD*, *CCDF*, *CCDI* 06998 M01S00119.253l688 +++|* AND *CCDP* SHOULD BE AVOIDED, SINCE THEY CONFLICT 06999 M01S00120.253l688 +++|* WITH GLOBAL SYMBOL DEFINITIONS. 07000 M00S05119.pfm +++| 07001 M00S05120.pfm +++| 07002 M00S05121.pfm +++| CCD SUBR ENTRY/EXIT 07003 M00S05122.pfm +++| CCDB UJN CCD1 SET TO *PSN* IF ALLOCATION COMMAND 07004 M00S05123.pfm +++|* I.E. SAVE, REPLACE, APPEND, DEFINE. 07005 M00S05124.pfm +++| 07006 M00S05125.pfm +++|* ACCUMULATE STATISTICS. 07007 M00S05126.pfm +++| 07008 M00S05127.pfm +++| AOD NF+1 ADVANCE FILE COUNT 07009 M00S05128.pfm +++| SHN -14 07010 M00S05129.pfm +++| RAD NF 07011 M00S05130.pfm +++| LDM FCBS,T3 07012 M00S05131.pfm +++| SHN 6 07013 M00S05132.pfm +++| MJN CCD1 IF DIRECT ACCESS FILE 07014 M00S05133.pfm +++| LDM FCLF+1,T3 ADD TO CUMULATIVE SIZE OF INDIRECT FILES 07015 M00S05134.pfm +++| RAD CS+1 07016 M00S05135.pfm +++| SHN -14 07017 M00S05136.pfm +++| ADM FCLF,T3 07018 M00S05137.pfm +++| RAD CS 07019 M00S05138.pfm +++| 07020 M00S05139.pfm +++|* CHECK FILE FOR SEARCH. 07021 M00S05140.pfm +++| 07022 M00S05141.pfm +++| CCD1 LDI T3 COMPARE FILE NAMES 07023 M00S05142.pfm +++| LMD FN 07024 M00S05143.pfm +++| NJN CCDX IF NOT EQUAL 07025 M00S05144.pfm +++| LDM FCFN+1,T3 COMPARE BYTE 2 07026 M00S05145.pfm +++| LMD FN+1 07027 M00S05146.pfm +++| CCD2 NJN CCDX IF NOT EQUAL 07028 M00S05147.pfm +++| LDM FCFN+2,T3 COMPARE BYTE 3 07029 M00S05148.pfm +++| LMD FN+2 07030 M00S05149.pfm +++| NJN CCDX IF NOT EQUAL 07031 M00S05150.pfm +++| LDM FCFN+3,T3 COMPARE 7TH CHARACTER 07032 M00S05151.pfm +++| LMD FN+3 07033 M00S05152.pfm +++| SHN -6 07034 M00S05153.pfm +++| NJN CCD2 IF LAST CHARACTER NOT EQUAL
| Line S05154 Modification History | |
|---|---|
M01 (Removed by) | pfm45 |
Seq # *Modification Id* Act ----------------------------+ 07035 M01S05154.pfm45 ---| CCDA STD T2 07036 M01S05155.pfm45 ---|* UJN CCD4 (NOT ALTERNATE USER) 07037 M01S05156.pfm45 ---|* UJN CCD4 (*PERMIT* REQUEST) 07038 M00S05157.pfm +++| 07039 M00S05158.pfm +++|* COMPARE FILE PASSWORD. 07040 M00S05159.pfm +++|
| Line S05160 Modification History | |
|---|---|
M01 (Removed by) | pfm45 |
Seq # *Modification Id* Act ----------------------------+ 07041 M01S05160.pfm45 ---| LDM FCPW,T3 COMPARE FILE PASSWORD
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | pfm45 |
Seq # *Modification Id* Act ----------------------------+ 07042 M01S00001.pfm45 +++| CCDA LDM FCPW,T3 COMPARE FILE PASSWORD 07043 M01S00002.pfm45 +++|* UJN CCD4 (NOT ALTERNATE USER) 07044 M01S00003.pfm45 +++|* UJN CCD4 (*PERMIT* REQUEST) 07045 M00S05161.pfm +++| LMM PFPW 07046 M00S05162.pfm +++| NJN CCD3 IF NOT EQUAL 07047 M00S05163.pfm +++| LDM FCPW+1,T3 COMPARE BYTE 2 07048 M00S05164.pfm +++| LMM PFPW+1 07049 M00S05165.pfm +++| NJN CCD3 IF NOT EQUAL 07050 M00S05166.pfm +++| LDM FCPW+2,T3 COMPARE BYTE 3 07051 M00S05167.pfm +++| LMM PFPW+2 07052 M00S05168.pfm +++| NJN CCD3 IF NOT EQUAL 07053 M00S05169.pfm +++| LDM FCPW+3,T3 COMPARE 7TH CHARACTER 07054 M00S05170.pfm +++| LMM PFPW+3 07055 M00S05171.pfm +++| SHN -6 07056 M00S05172.pfm +++| CCD3 NJN CCD6 IF NOT EQUAL 07057 M00S05173.pfm +++| UJN CCD5 CHECK FOR PASSWORD EXPIRATION 07058 M00S05174.pfm +++|
| Line S05175 Modification History | |
|---|---|
M01 (Removed by) | pfm60 |
Seq # *Modification Id* Act ----------------------------+ 07059 M01S05175.pfm60 ---| CCD4 UJN CCD7 VALIDATE ACCESS TO FILE
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | pfm60 |
Seq # *Modification Id* Act ----------------------------+ 07060 M01S00001.pfm60 +++| CCD4 LDN 0 07061 M01S00002.pfm60 +++| UJN CCD7 VALIDATE ACCESS TO FILE 07062 M00S05176.pfm +++| 07063 M00S05177.pfm +++|* CHECK FOR PASSWORD EXPIRATION. 07064 M00S05178.pfm +++| 07065 M00S05179.pfm +++| CCD5 LDM FCPW,T3 07066 M00S05180.pfm +++| ZJN CCD7 IF NO PASSWORD 07067 M00S05181.pfm +++| LDM FCXD,T3 CHECK EXPIRATION DATE 07068 M00S05182.pfm +++| LPN 77 07069 M00S05183.pfm +++| STD CM+3 07070 M00S05184.pfm +++| SHN 14 07071 M00S05185.pfm +++| LMM FCXD+1,T3 07072 M00S05186.pfm +++| ZJN CCD7 IF NON-EXPIRING PASSWORD 07073 M00S05187.pfm +++| STD CM+4 07074 M00S05188.pfm +++| LDN VEDS VALIDATE EXPIRATION DATE 07075 M00S05189.pfm +++| STD CM+1 07076 M00S05190.pfm +++| MONITOR VSAM 07077 M00S05191.pfm +++| LDD CM+1 07078 M00S05192.pfm +++| ZJN CCD7 IF NOT EXPIRED 07079 M00S05193.pfm +++| CCD6 ERROR FNF *(FILENAME) NOT FOUND.* 07080 M00S05194.pfm +++| 07081 M00S05195.pfm +++|* VALIDATE ACCESS TO FILE. 07082 M00S05196.pfm +++|
| Line S05197 Modification History | |
|---|---|
M01 (Removed by) | pfm60 |
Seq # *Modification Id* Act ----------------------------+ 07083 M01S05197.pfm60 ---| CCD7 LDD T3 VALIDATE ACCESS LEVEL AND CATEGORY SET
| Line S05198 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
M02 (Removed by) | pfm60 |
Seq # *Modification Id* Act ----------------------------+ 07084 M02S05198.pfm60 ---| RAM CCDD
| Line S00121 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | pfm60 |
Seq # *Modification Id* Act ----------------------------+ 07085 M02S00121.pfm60 ---| RAM CCDE
| Line S05199 Modification History | |
|---|---|
M01 (Removed by) | pfm60 |
Seq # *Modification Id* Act ----------------------------+ 07086 M01S05199.pfm60 ---| LDD MA 07087 M01S05200.pfm60 ---| CWM FCAL-1,ON
| Line S05201 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
M02 (Removed by) | pfm60 |
Seq # *Modification Id* Act ----------------------------+ 07088 M02S05201.pfm60 ---| CCDD EQU *-1
| Line S00122 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | pfm60 |
Seq # *Modification Id* Act ----------------------------+ 07089 M02S00122.pfm60 ---| CCDE EQU *-1
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | pfm60 |
Seq # *Modification Id* Act ----------------------------+ 07090 M01S00003.pfm60 +++| CCD7 STD CM VALIDATE ACCESS LEVEL AND CATEGORY SET 07091 M01S00004.pfm60 +++| LDM FCAL,T3 SET ACCESS LEVEL 07092 M01S00005.pfm60 +++| LPN 7 07093 M01S00006.pfm60 +++| STD CM+1 07094 M01S00007.pfm60 +++| LDM FCFC,T3 SET ACCESS CATEGORY 07095 M01S00008.pfm60 +++| LPC 377 07096 M01S00009.pfm60 +++| STD CM+2 07097 M01S00010.pfm60 +++| LDM FCFC+1,T3 07098 M01S00011.pfm60 +++| STD CM+3 07099 M01S00012.pfm60 +++| LDM FCFC+2,T3 07100 M01S00013.pfm60 +++| STD CM+4 07101 M01S00014.pfm60 +++| LDD MA 07102 M01S00015.pfm60 +++| CWD CM 07103 M00S05202.pfm +++| LDN ZERL 07104 M00S05203.pfm +++| CRD CM 07105 M00S05204.pfm +++| LDN VAJS CHECK AGAINST CURRENT JOB VALIDATIONS 07106 M00S05205.pfm +++| STD CM+1 07107 M00S05206.pfm +++| ERRNZ VAJS-3 VALIDATE ACCESS LEVEL AND CATEGORY SET 07108 M00S05207.pfm +++| STD CM+4 07109 M00S05208.pfm +++| MONITOR VSAM 07110 M00S05209.pfm +++| LDD CM+1 07111 M00S05210.pfm +++| CCDC NJN CCD6 IF NOT VALID ACCESS
| Line S05211 Modification History | |
|---|---|
M01 (Removed by) | pfm37 |
Seq # *Modification Id* Act ----------------------------+ 07112 M01S05211.pfm37 ---|* NJN CCD8 IF NOT VALID ACCESS (NOT ALTERNATE USER) 07113 M01S05212.pfm37 ---| LJM CCDX RETURN 07114 M01S05213.pfm37 ---| 07115 M01S05214.pfm37 ---| CCD8 ERROR JCA,,,,SVE * JOB CANNOT ACCESS FILE.*
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | pfm37 |
Seq # *Modification Id* Act ----------------------------+ 07116 M01S00001.pfm37 +++|* NJN CCD9 IF NOT VALID ACCESS (NOT ALTERNATE USER) 07117 M01S00002.pfm37 +++| CCD8 LJM CCDX RETURN 07118 M01S00003.pfm37 +++| 07119 M01S00004.pfm37 +++|* ALLOW AN *SSJ=* JOB TO PURGE ANY FILE. 07120 M01S00005.pfm37 +++| 07121 M01S00006.pfm37 +++| CCD9 LDM SSJS 07122 M01S00007.pfm37 +++| ZJN CCD10 IF NOT *SSJ=* 07123 M01S00008.pfm37 +++| LDD CC 07124 M01S00009.pfm37 +++| LMN CCPG 07125 M01S00010.pfm37 +++| ZJN CCD8 IF *PURGE* 07126 M01S00011.pfm37 +++| CCD10 ERROR JCA,,,,SVE * JOB CANNOT ACCESS FILE.*
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | pfm36 |
Seq # *Modification Id* Act ----------------------------+ 07127 M01S00006.pfm36 +++| ICT SPACE 4,15 07128 M01S00007.pfm36 +++|** ICT - INTERLOCK CATALOG TRACK. 07129 M01S00008.pfm36 +++|* 07130 M01S00009.pfm36 +++|* ENTRY (T6) = CATALOG TRACK TO BE INTERLOCKED. 07131 M01S00010.pfm36 +++|* (T5) = EST ORDINAL. 07132 M01S00011.pfm36 +++|* 07133 M01S00012.pfm36 +++|* EXIT TRACK INTERLOCKED. 07134 M01S00013.pfm36 +++|* RECALL *PFM* IF INTERLOCK NOT AVAILABLE
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | pfm36 |
M02 (Removed by) | ns2415 |
Seq # *Modification Id* Act ----------------------------+ 07135 M02S00014.ns2415 ---|* AFTER TWO TRIES.
| Line S00054 Modification History | |
|---|---|
M01 (Added by) | ns2415 |
M02 (Removed by) | pfm52 |
Seq # *Modification Id* Act ----------------------------+ 07136 M02S00054.pfm52 ---|* AFTER TWO TRIES.
| Line S00034 Modification History | |
|---|---|
M01 (Added by) | pfm52 |
Seq # *Modification Id* Act ----------------------------+ 07137 M01S00034.pfm52 +++|* AFTER FOUR TRIES.
| Line S00055 Modification History | |
|---|---|
M01 (Added by) | ns2415 |
Seq # *Modification Id* Act ----------------------------+ 07138 M01S00055.ns2415 +++|* TO *HNG* IF CATALOG TRACK NOT RESERVED.
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | pfm36 |
Seq # *Modification Id* Act ----------------------------+ 07139 M01S00015.pfm36 +++|* 07140 M01S00016.pfm36 +++|* CALLS DPR, STI. 07141 M01S00017.pfm36 +++| 07142 M01S00018.pfm36 +++| 07143 M01S00019.pfm36 +++| ICT SUBR ENTRY/EXIT
| Line S00020 Modification History | |
|---|---|
M01 (Added by) | pfm36 |
M02 (Removed by) | pfm52 |
Seq # *Modification Id* Act ----------------------------+ 07144 M02S00020.pfm52 ---| RJM STI TRY TO INTERLOCK TRACK
| Line S00035 Modification History | |
|---|---|
M01 (Added by) | pfm52 |
Seq # *Modification Id* Act ----------------------------+ 07145 M01S00035.pfm52 +++| LDN 3 SET RETRY COUNT 07146 M01S00036.pfm52 +++| STD T1 07147 M01S00037.pfm52 +++| ICT1 RJM STI TRY TO INTERLOCK TRACK
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | pfm36 |
Seq # *Modification Id* Act ----------------------------+ 07148 M01S00021.pfm36 +++| ZJN ICTX IF INTERLOCK SUCCESSFUL
| Line S00056 Modification History | |
|---|---|
M01 (Added by) | ns2415 |
Seq # *Modification Id* Act ----------------------------+ 07149 M01S00056.ns2415 +++| LMN 2
| Line S00057 Modification History | |
|---|---|
M01 (Added by) | ns2415 |
M02 (Removed by) | pfm52 |
Seq # *Modification Id* Act ----------------------------+ 07150 M02S00057.pfm52 ---| ZJN ICT1 IF TRACK NOT RESERVED
| Line S00038 Modification History | |
|---|---|
M01 (Added by) | pfm52 |
Seq # *Modification Id* Act ----------------------------+ 07151 M01S00038.pfm52 +++| ZJN ICT2 IF TRACK NOT RESERVED 07152 M01S00039.pfm52 +++| SOD T1 07153 M01S00040.pfm52 +++| MJN ICT3 IF RETRY COUNT EXHAUSTED
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | pfm36 |
Seq # *Modification Id* Act ----------------------------+ 07154 M01S00022.pfm36 +++| RJM DPR DELAY PRIOR TO RETRY
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | pfm36 |
M02 (Removed by) | pfm52 |
Seq # *Modification Id* Act ----------------------------+ 07155 M02S00023.pfm52 ---| RJM STI TRY TO INTERLOCK TRACK 07156 M02S00024.pfm52 ---| ZJN ICTX IF INTERLOCK SUCCESSFUL
| Line S00058 Modification History | |
|---|---|
M01 (Added by) | ns2415 |
M02 (Removed by) | pfm52 |
Seq # *Modification Id* Act ----------------------------+ 07157 M02S00058.pfm52 ---| LMN 2 07158 M02S00059.pfm52 ---| ZJN ICT1 IF TRACK NOT RESERVED
| Line S00025 Modification History | |
|---|---|
M01 (Added by) | pfm36 |
M02 (Removed by) | pfm52 |
Seq # *Modification Id* Act ----------------------------+ 07159 M02S00025.pfm52 ---| EXIT INA,CH,,,EC4 * INTERLOCK NOT AVAILABLE.*
| Line S00041 Modification History | |
|---|---|
M01 (Added by) | pfm52 |
Seq # *Modification Id* Act ----------------------------+ 07160 M01S00041.pfm52 +++| UJN ICT1 RETRY
| Line S00060 Modification History | |
|---|---|
M01 (Added by) | ns2415 |
Seq # *Modification Id* Act ----------------------------+ 07161 M01S00060.ns2415 +++|
| Line S00061 Modification History | |
|---|---|
M01 (Added by) | ns2415 |
M02 (Removed by) | pfm52 |
Seq # *Modification Id* Act ----------------------------+ 07162 M02S00061.pfm52 ---| ICT1 RJM HNG HANG IF CATALOG TRACK NOT RESERVED
| Line S00042 Modification History | |
|---|---|
M01 (Added by) | pfm52 |
Seq # *Modification Id* Act ----------------------------+ 07163 M01S00042.pfm52 +++| ICT2 RJM HNG HANG IF CATALOG TRACK NOT RESERVED 07164 M01S00043.pfm52 +++| 07165 M01S00044.pfm52 +++| ICT3 EXIT INA,CH,,,EC4 * INTERLOCK NOT AVAILABLE.* 07166 M00S05215.pfm +++| ISP SPACE 4,20 07167 M00S05216.pfm +++|** ISP - INITIALIZE SEARCH OF PERMANENT FILES. 07168 M00S05217.pfm +++|* 07169 M00S05218.pfm +++|* ENTRY (EQ) = MASTER DEVICE EST ORDINAL. 07170 M00S05219.pfm +++|* (CCIA) = CATALOG TRACK. 07171 M00S05220.pfm +++|* 07172 M00S05221.pfm +++|* EXIT (T4) = MASTER DEVICE CHANNEL. 07173 M00S05222.pfm +++|* (T5) = MASTER DEVICE EST ORDINAL. 07174 M00S05223.pfm +++|* (T6) = CATALOG TRACK. 07175 M00S05224.pfm +++|* (T7) = CATALOG SECTOR. 07176 M00S05225.pfm +++|* (DPPF) = INCREMENTED FOR CATALOG SEARCH. 07177 M00S05226.pfm +++|* (P0 - P4) = CATALOG SEARCH POINTERS INITIALIZED. 07178 M00S05227.pfm +++|* CATALOG TRACK INTERLOCK SET. 07179 M00S05228.pfm +++|* *SETMS READ* PERFORMED. 07180 M00S05229.pfm +++|*
| Line S05230 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 07181 M01S05230.242l642 ---|* CALLS IRA, ITC.
| Line S00682 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Removed by) | pfm36 |
Seq # *Modification Id* Act ----------------------------+ 07182 M02S00682.pfm36 ---|* CALLS IRA, ITC, PDV.
| Line S00026 Modification History | |
|---|---|
M01 (Added by) | pfm36 |
Seq # *Modification Id* Act ----------------------------+ 07183 M01S00026.pfm36 +++|* CALLS ICT, IRA, PDV. 07184 M00S05231.pfm +++|* 07185 M00S05232.pfm +++|* MACROS ERROR, SETMS. 07186 M00S05233.pfm +++| 07187 M00S05234.pfm +++| 07188 M00S05235.pfm +++| ISP SUBR ENTRY/EXIT 07189 M00S05236.pfm +++| LDD EQ SET MASTER DEVICE EST ORDINAL 07190 M00S05237.pfm +++| STD T5 07191 M00S05238.pfm +++| LDM CCIA SET CATALOG TRACK
| Line S05239 Modification History | |
|---|---|
M01 (Removed by) | pfm36 |
Seq # *Modification Id* Act ----------------------------+ 07192 M01S05239.pfm36 ---| ISPB RJM ITC SET CATALOG TRACK INTERLOCK
| Line S00027 Modification History | |
|---|---|
M01 (Added by) | pfm36 |
Seq # *Modification Id* Act ----------------------------+ 07193 M01S00027.pfm36 +++| STD T6 07194 M01S00028.pfm36 +++| ISPB RJM ICT INTERLOCK CATALOG TRACK 07195 M00S05240.pfm +++|* UJN ISP1 (*UREPLAC*/*DROPIDS*- ALREADY INTERLOCKED) 07196 M00S05241.pfm +++| AOM CCIB SET CATALOG TRACK INTERLOCK FLAG 07197 M00S05242.pfm +++| ISP1 LDN IPCS PF INCREMENT FOR CATALOG SEARCH
| Line S05243 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 07198 M01S05243.242l642 ---| RAM DPPF
| Line S00683 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 07199 M01S00683.242l642 +++| RAM AIPF+1 07200 M00S05244.pfm +++| RJM IRA INITIALIZE RANDOM PROCESSORS 07201 M00S05245.pfm +++| 07202 M00S05246.pfm +++|* SET SEARCH POINTERS. 07203 M00S05247.pfm +++| 07204 M00S05248.pfm +++| LDN 0 SET STARTING CATALOG TRACK SECTOR 07205 M00S05249.pfm +++| STD T7 07206 M00S05250.pfm +++| LDN ZERL CONTIGUOUS STORAGE INITIALIZATION 07207 M00S05251.pfm +++| CRD P0 TEMPORARY CATALOG SEARCH BUFFER POINTERS 07208 M00S05252.pfm +++| LDC BUF1 SET PRIMARY BUFFER POINTER 07209 M00S05253.pfm +++|* LDC BFMS (*UREPLAC*/*DROPIDS*) 07210 M00S05254.pfm +++| ISPC EQU *-1 07211 M00S05255.pfm +++| STD P2 07212 M00S05256.pfm +++| LDC BUF2 SET SECONDARY BUFFER POINTER 07213 M00S05257.pfm +++| ISPA EQU *-1 07214 M00S05258.pfm +++|* LDC BFMS (*DEFINE* REQUEST) 07215 M00S05259.pfm +++| STD P3
| Line S05260 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 07216 M01S05260.242l642 ---| SETMS READ 07217 M01S05261.242l642 ---| LJM ISPX RETURN
| Line S00684 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Removed by) | ns2645 |
Seq # *Modification Id* Act ----------------------------+ 07218 M02S00684.ns2645 ---| SETMS IO
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2645 |
Seq # *Modification Id* Act ----------------------------+ 07219 M01S00003.ns2645 +++| SETMS READSTR
| Line S00685 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 07220 M01S00685.242l642 +++| RJM PDV PROCESS DEVICE STATUS 07221 M01S00686.242l642 +++| UJP ISPX RETURN 07222 M00S05262.pfm +++| PCE SPACE 4,10 07223 M00S05263.pfm +++|** PCE - PROCESS CATALOG READ ERROR.
| Line S00687 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 07224 M01S00687.242l642 +++|* 07225 M01S00688.242l642 +++|* ENTRY READ ERROR DETECTED BY *COMPRNS*. 07226 M00S05264.pfm +++| 07227 M00S05265.pfm +++|
| Line S05266 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 07228 M01S05266.242l642 ---| PCE BSS 0 ENTRY
| Line S00689 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 07229 M01S00689.242l642 +++| PCE SUBR ENTRY 07230 M01S00690.242l642 +++| RJM PES PROCESS ERROR STATUS 07231 M00S05267.pfm +++| ERROR MSE,,,T5 *EQXXX,DNYY, MASS STORAGE ERROR.* 07232 M00S05268.pfm +++| SCH SPACE 4,50 07233 M00S05269.pfm +++|** SCH - SEARCH CATALOGS. 07234 M00S05270.pfm +++|* 07235 M00S05271.pfm +++|* THIS ROUTINE WILL SEARCH FOR A FILE AND FOR A HOLE 07236 M00S05272.pfm +++|* (IF REQUESTED) BY READING INTO *BUF1* UNTIL A HOLE IS FOUND 07237 M00S05273.pfm +++|* AND THEN CONTINUING IN *BUF2*. IF A LARGER HOLE IS 07238 M00S05274.pfm +++|* FOUND (*BUF2*) THEN READ WILL REVERT BACK TO *BUF1* UNTIL 07239 M00S05275.pfm +++|* LARGEST HOLE AND FILE ARE IN *BUF1* AND *BUF2*. *SCH* 07240 M00S05276.pfm +++|* ALWAYS EXITS WHEN THE FILE IS FOUND. 07241 M00S05277.pfm +++|* 07242 M00S05278.pfm +++|* ON A *UREPLAC* OR *DROPIDS* REQUEST, *SCH* IS CALLED JUST TO 07243 M00S05279.pfm +++|* SEARCH FOR A HOLE. READING WILL START WITH *BFMS* AND WILL 07244 M00S05280.pfm +++|* SWITCH BACK AND FORTH BETWEEN *BFMS* AND *BUF2* UNTIL THE END 07245 M00S05281.pfm +++|* OF CATALOGS, OR UNTIL AN EXACT FIT IS FOUND. 07246 M00S05282.pfm +++|* 07247 M00S05283.pfm +++|* UPON REENTRY (ON A *REPLACE* OR *APPEND* REQUEST IN WHICH 07248 M00S05284.pfm +++|* NO EXACT FIT HOLE WAS FOUND IN THE FIRST SEARCH) IT IS 07249 M00S05285.pfm +++|* NECESSARY TO KEEP ONE OF THE TWO BUFFERS (THE ONE WITH THE 07250 M00S05286.pfm +++|* FILE CATALOG ENTRY IN IT) AND TO CONTINUE TO SEARCH FOR A 07251 M00S05287.pfm +++|* LARGER HOLE BY READING INTO THE REMAINING BUFFER AND *BFMS*. 07252 M00S05288.pfm +++|* READING WILL START IN THE REMAINING *BUF1*/*BUF2* BUFFER - 07253 M00S05289.pfm +++|* RATHER THAN IN *BFMS* - UNLESS THERE IS ALREADY A HOLE IN 07254 M00S05290.pfm +++|* THE *BUF1*/*BUF2* BUFFER. 07255 M00S05291.pfm +++|* 07256 M00S05292.pfm +++|* IF NO HOLE SEARCH IS REQUIRED ALL SECTORS ARE READ 07257 M00S05293.pfm +++|* INTO BUF1 (*GET*, *OLD* AND *ATTACH* REQUESTS). 07258 M00S05294.pfm +++|* 07259 M00S05295.pfm +++|* SEE *CPI* FOR BUFFERS USED TO READ PERMITS. 07260 M00S05296.pfm +++|* 07261 M00S05297.pfm +++|* ENTRY (FN - FN+3) = FILE NAME. 07262 M00S05298.pfm +++|* (UI - UI+1) = USER INDEX. 07263 M00S05299.pfm +++|* (LF - LF+1) = LENGTH OF FILE IF HOLE SEARCH DESIRED. 07264 M00S05300.pfm +++|* (SCHA) INCREMENTED IF REENTRANT CALL. 07265 M00S05301.pfm +++|* (SCHB) PRESET FOR REENTRY IF CURRENT ENTRY (FILE 07266 M00S05302.pfm +++|* FOUND) IS TO BE INCLUDED IN HOLE SEARCH. 07267 M00S05303.pfm +++|* (SCHF) PRESET IF HOLE SEARCH ENABLED (SEARCH FOR 07268 M00S05304.pfm +++|* LARGEST HOLE OR ONE THAT FILE EXACTLY FITS IN). 07269 M00S05305.pfm +++|* (SCHH) PRESET IF SEARCH FOR DAPF HOLE. 07270 M00S05306.pfm +++|* (SCHI) PRESET IF SEARCH FOR LARGEST HOLE ENABLED. 07271 M00S05307.pfm +++|* 07272 M00S05308.pfm +++|* EXIT (A) = 0 IF FILE FOUND. 07273 M00S05309.pfm +++|* (CI) = CATALOG POINTER. 07274 M00S05310.pfm +++|* (CB) = CATALOG BUFFER. 07275 M00S05311.pfm +++|* (HP) = HOLE POINTER. 07276 M00S05312.pfm +++|* (HB) = HOLE BUFFER. 07277 M00S05313.pfm +++|* (EP) = END POINTER. 07278 M00S05314.pfm +++|* (EB) = END BUFFER. 07279 M00S05315.pfm +++|* (HL) = SIZE OF HOLE FOUND. 07280 M00S05316.pfm +++|* (NF - NF+1) = NUMBER OF FILES IN CATALOG. 07281 M00S05317.pfm +++|* (CS - CS+1) = CUMULATIVE SIZE OF INDIRECT FILES.
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | pfm40 |
Seq # *Modification Id* Act ----------------------------+ 07282 M01S00004.pfm40 +++|* (DAHP - DAHP+2) = DIRECT ACCESS HOLE POINTERS IF 07283 M01S00005.pfm40 +++|* DA HOLE FOUND AND NOT DAPF SEARCH. 07284 M00S05318.pfm +++|* (SDAB - SDAC) = ADDRESS OF FILE IF FOUND. 07285 M00S05319.pfm +++|* 07286 M00S05320.pfm +++|* USES P0 - P3, T3 - T7. 07287 M00S05321.pfm +++|* 07288 M00S05322.pfm +++|* CALLS CCD, ISP, RNS. 07289 M00S05323.pfm +++|* 07290 M00S05324.pfm +++|* MACROS ERROR. 07291 M00S05325.pfm +++| 07292 M00S05326.pfm +++| 07293 M00S05327.pfm +++|* FILE FOUND. 07294 M00S05328.pfm +++| 07295 M00S05329.pfm +++| SCH18 LDD T3 SET CATALOG ENTRY POINTERS 07296 M00S05330.pfm +++| STD CI 07297 M00S05331.pfm +++| LDM P2,P1 07298 M00S05332.pfm +++| STD CB 07299 M00S05333.pfm +++| LDM FCBT,CI SET ADDRESS OF FILE FOUND 07300 M00S05334.pfm +++| STM SDAB 07301 M00S05335.pfm +++| LDM FCBS,CI 07302 M00S05336.pfm +++| STM SDAC 07303 M00S05337.pfm +++| LDN 0 07304 M00S05338.pfm +++| 07305 M00S05339.pfm +++| SCH SUBR ENTRY/EXIT 07306 M00S05340.pfm +++| SCHA LDN 0 07307 M00S05341.pfm +++|* LDN 1 PRESET BY CATALOG SEARCH INITIALIZATION 07308 M00S05342.pfm +++| NJN SCH1 IF NOT INITIAL CALL 07309 M00S05343.pfm +++| AOM SCHA CLEAR INITIAL CALL STATUS 07310 M00S05344.pfm +++| RJM ISP INITIALIZE FOR SEARCH 07311 M00S05345.pfm +++| LJM SCH7 READ FIRST SECTOR 07312 M00S05346.pfm +++| 07313 M00S05347.pfm +++|* SECONDARY CALL TO CONTINUE SEARCH FOR BEST HOLE. 07314 M00S05348.pfm +++| 07315 M00S05349.pfm +++| SCH1 LDK PSNI USE NEW BUFFER FOR REMAINDER OF SEARCH 07316 M00S05350.pfm +++| STM SCHD 07317 M00S05351.pfm +++| LDD HP 07318 M00S05352.pfm +++| ZJN SCH1.1 IF NO HOLE FOUND YET 07319 M00S05353.pfm +++| LDD HB 07320 M00S05354.pfm +++| LMM P2,P1 07321 M00S05355.pfm +++| NJN SCH1.2 IF HOLE NOT IN CURRENT BUFFER 07322 M00S05356.pfm +++| SCH1.1 AOM SCHC SET BUFFER TOGGLE (DO NOT USE *BFMS* NEXT) 07323 M00S05357.pfm +++| SCH1.2 LJM SCH10 CONTINUE SEARCH, BYPASSING CURRENT FILE 07324 M00S05358.pfm +++|* LJM SCH11 (INCLUDE CURRENT FILE IN SEARCH) 07325 M00S05359.pfm +++| SCHB EQU *-1 07326 M00S05360.pfm +++| 07327 M00S05361.pfm +++|* END OF SECTOR PROCESSING. 07328 M00S05362.pfm +++| 07329 M00S05363.pfm +++| SCH2 LDC * PARTIAL SECTOR WORD COUNT 07330 M00S05364.pfm +++| SCHE EQU *-1 07331 M00S05365.pfm +++| LPN 77 07332 M00S05366.pfm +++| ZJN SCH4 IF NOT EOR 07333 M00S05367.pfm +++| 07334 M00S05368.pfm +++|* END OF RECORD ENCOUNTERED. 07335 M00S05369.pfm +++| 07336 M00S05370.pfm +++| LDD T3 SET END SECTOR POINTERS 07337 M00S05371.pfm +++| STD EP 07338 M00S05372.pfm +++| 07339 M00S05373.pfm +++|* END OF INFORMATION ENCOUNTERED (NO SHORT SECTOR). 07340 M00S05374.pfm +++| 07341 M00S05375.pfm +++| SCH3 LDM P2,P1 SET END BUFFER 07342 M00S05376.pfm +++| STD EB 07343 M00S05377.pfm +++| LJM SCHX RETURN 07344 M00S05378.pfm +++| 07345 M00S05379.pfm +++|* SELECT BUFFER FOR NEXT SECTOR. 07346 M00S05380.pfm +++| 07347 M00S05381.pfm +++| SCH4 UJN SCH5 TOGGLE BUFFER IF NECESSARY 07348 M00S05382.pfm +++|* PSN (NEW BUFFER REQUIRED) 07349 M00S05383.pfm +++| SCHD EQU *-1 07350 M00S05384.pfm +++| LDC BFMS SET *BFMS* IN PLACE OF CURRENT BUFFER 07351 M00S05385.pfm +++| STM P2,P1 07352 M00S05386.pfm +++| ISTORE SCHD,(UJN SCH5) RESET TO BYPASS THIS SECTION 07353 M00S05387.pfm +++| SCH5 LDN 0 07354 M00S05388.pfm +++|* LDN 1 (BUFFER TOGGLE REQUIRED) 07355 M00S05389.pfm +++| SCHC EQU *-1 07356 M00S05390.pfm +++| ZJN SCH7 IF SAME BUFFER TO BE USED 07357 M00S05391.pfm +++| ISTORE SCHC,(LDN 0) CLEAR BUFFER TOGGLE 07358 M00S05392.pfm +++| LDD P1 TOGGLE BUFFER 07359 M00S05393.pfm +++| LMN 1 07360 M00S05394.pfm +++| STD P1 07361 M00S05395.pfm +++| 07362 M00S05396.pfm +++|* READ NEXT SECTOR. 07363 M00S05397.pfm +++| 07364 M00S05398.pfm +++| SCH7 LDM P2,P1 SET BUFFER ADDRESS 07365 M00S05399.pfm +++| STD T3 07366 M00S05400.pfm +++| LDD T6 SAVE POSITION OF SECTOR 07367 M00S05401.pfm +++| STM -2,T3 07368 M00S05402.pfm +++| STM ERRC 07369 M00S05403.pfm +++| LDD T7 07370 M00S05404.pfm +++| STM -1,T3 07371 M00S05405.pfm +++| STM ERRD 07372 M00S05406.pfm +++| LDD T3 READ SECTOR 07373 M00S05407.pfm +++| RJM RNS
| Line S05408 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 07374 M01S05408.242l642 ---| .MSE1 BSS 0 *COMPRNS* RETURN ADDRESS 07375 M00S05409.pfm +++| NJN SCH8 IF NOT EOF/EOI OR ZERO LENGTH RECORD 07376 M00S05410.pfm +++| LJM SCH3 PROCESS EOI 07377 M00S05411.pfm +++| 07378 M00S05412.pfm +++| SCH8 STD P0 SAVE WORD COUNT 07379 M00S05413.pfm +++| STM SCHE 07380 M00S05414.pfm +++| LPN NWCE-1 07381 M00S05415.pfm +++| ZJN SCH9 IF INTEGRAL NUMBER OF CATALOG ENTRIES
| Line S05416 Modification History | |
|---|---|
M01 (Removed by) | ns2415 |
Seq # *Modification Id* Act ----------------------------+ 07382 M01S05416.ns2415 ---| ERROR BCS,,,T5 *EQXXX,DNYY, BAD CATALOG/PERMIT SECTOR.*
| Line S00062 Modification History | |
|---|---|
M01 (Added by) | ns2415 |
Seq # *Modification Id* Act ----------------------------+ 07383 M01S00062.ns2415 +++| ERROR BCS,,,T5,,EI *EQXXX,DNYY, BAD CATALOG/PERMIT SECTOR.* 07384 M00S05417.pfm +++| 07385 M00S05418.pfm +++| SCH9 LDN 2 SKIP CONTROL BYTES 07386 M00S05419.pfm +++| RAD T3 07387 M00S05420.pfm +++| UJN SCH11 CHECK FIRST CATALOG ENTRY 07388 M00S05421.pfm +++| 07389 M00S05422.pfm +++|* ADVANCE TO NEXT CATALOG ENTRY. 07390 M00S05423.pfm +++| 07391 M00S05424.pfm +++| SCH10 LDC NWCE*5 ADVANCE TO NEXT CATALOG ENTRY 07392 M00S05425.pfm +++| RAD T3 07393 M00S05426.pfm +++| LCN NWCE ADVANCE SECTOR WORD COUNT 07394 M00S05427.pfm +++| RAD P0 07395 M00S05428.pfm +++| ZJP SCH2 IF END OF BUFFER 07396 M00S05429.pfm +++| 07397 M00S05430.pfm +++|* CHECK NEXT CATALOG ENTRY. 07398 M00S05431.pfm +++| 07399 M00S05432.pfm +++| SCH11 LDM FCUI,T3 07400 M00S05433.pfm +++| LPN 37 07401 M00S05434.pfm +++| SHN 14 07402 M00S05435.pfm +++| LMM FCUI+1,T3 07403 M00S05436.pfm +++| SCHF PSN 0 07404 M00S05437.pfm +++|* ZJN SCH12 (HOLE SEARCH ENABLED - IF HOLE) 07405 M00S05438.pfm +++| ZJN SCH10 IF EMPTY CATALOG ENTRY 07406 M00S05439.pfm +++| LMD UI+1 07407 M00S05440.pfm +++| SHN 6 07408 M00S05441.pfm +++| LMD UI 07409 M00S05442.pfm +++| SCHG NJN SCH10 IF NOT SAME USER INDEX 07410 M00S05443.pfm +++|* PSN (PRIVATE DEVICE ACCESS) 07411 M00S05444.pfm +++|* UJN SCH10 (*UREPLAC*/*DROPIDS*, HOLE SEARCH ONLY) 07412 M00S05445.pfm +++| RJM CCD CHECK CATALOG DATA 07413 M00S05446.pfm +++| NJN SCH10 IF NOT SAME FILE 07414 M00S05447.pfm +++| LJM SCH18 TERMINATE SEARCH 07415 M00S05448.pfm +++|
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | pfm40 |
Seq # *Modification Id* Act ----------------------------+ 07416 M01S00006.pfm40 +++|* SAVE ADDRESS OF DIRECT ACCESS HOLE FOR POSSIBLE FUTURE USE. 07417 M01S00007.pfm40 +++| 07418 M01S00008.pfm40 +++| SCH11.1 LDM DAHP 07419 M01S00009.pfm40 +++| SCH11.2 NJN SCH10 IF DIRECT ACCESS HOLE ALREADY FOUND 07420 M01S00010.pfm40 +++| LDM P2,P1 GET START OF BUFFER 07421 M01S00011.pfm40 +++| STD T0 07422 M01S00012.pfm40 +++| LDD T3 SAVE OFFSET WITHIN BUFFER 07423 M01S00013.pfm40 +++| SBD T0 07424 M01S00014.pfm40 +++| STM DAHP+2 07425 M01S00015.pfm40 +++| SOD T0 07426 M01S00016.pfm40 +++| LDI T0 SAVE DIRECT ACCESS HOLE SECTOR 07427 M01S00017.pfm40 +++| STM DAHP+1 07428 M01S00018.pfm40 +++| SOD T0 07429 M01S00019.pfm40 +++| LDI T0 SAVE DIRECT ACCESS HOLE TRACK 07430 M01S00020.pfm40 +++| STM DAHP 07431 M01S00021.pfm40 +++| UJN SCH11.2 ADVANCE TO NEXT CATALOG ENTRY 07432 M01S00022.pfm40 +++| 07433 M00S05449.pfm +++|* CHECK HOLE FOR POSSIBILITY OF PLUG. 07434 M00S05450.pfm +++| 07435 M00S05451.pfm +++| SCH12 LDM FCBS,T3 07436 M00S05452.pfm +++| SHN 6 07437 M00S05453.pfm +++|
| Line S05454 Modification History | |
|---|---|
M01 (Removed by) | pfm40 |
Seq # *Modification Id* Act ----------------------------+ 07438 M01S05454.pfm40 ---| SCHH MJN SCH10 IF NOT IAPF HOLE
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | pfm40 |
Seq # *Modification Id* Act ----------------------------+ 07439 M01S00023.pfm40 +++| SCHH MJN SCH11.1 IF NOT IAPF HOLE 07440 M00S05455.pfm +++|* UJN SCH16 (DAPF FILE SEARCH) 07441 M00S05456.pfm +++| LDM FCLF+1,T3 07442 M00S05457.pfm +++| STD T0 07443 M00S05458.pfm +++| SBD LF+1 07444 M00S05459.pfm +++| SCHI ZJN SCH17 IF EXACT FIT 07445 M00S05460.pfm +++|* UJN SCH13 (*APPEND* - SEARCH FOR LARGEST HOLE)
| Line S05461 Modification History | |
|---|---|
M01 (Removed by) | ns2273 |
Seq # *Modification Id* Act ----------------------------+ 07446 M01S05461.ns2273 ---| SBN MNHS
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2273 |
Seq # *Modification Id* Act ----------------------------+ 07447 M01S00001.ns2273 +++| SBK MNHS 07448 M00S05462.pfm +++| MJN SCH15 IF NOT LARGE ENOUGH FOR FILE AND NEW HOLE 07449 M00S05463.pfm +++| SCH13 LDD HL 07450 M00S05464.pfm +++| SBD T0 07451 M00S05465.pfm +++| PJN SCH15 IF NOT LARGER THAN PREVIOUS HOLE 07452 M00S05466.pfm +++| LDD T0 SET THIS AS MAXIMUM HOLE 07453 M00S05467.pfm +++| STD HL 07454 M00S05468.pfm +++| 07455 M00S05469.pfm +++|* SET POINTER TO HOLE. 07456 M00S05470.pfm +++| 07457 M00S05471.pfm +++| SCH14 AOM SCHC SET TO TOGGLE BUFFER 07458 M00S05472.pfm +++| LDD T3 SAVE HOLE ADDRESS 07459 M00S05473.pfm +++| STD HP 07460 M00S05474.pfm +++| LDM P2,P1 SET HOLE BUFFER ADDRESS 07461 M00S05475.pfm +++| STD HB 07462 M00S05476.pfm +++| SCH15 LJM SCH10 ADVANCE TO NEXT CATALOG ENTRY 07463 M00S05477.pfm +++|* LJM SCHX (*UREPLAC*/*DROPIDS*, EXACT FIT FOUND) 07464 M00S05478.pfm +++| SCHJ EQU *-1 07465 M00S05479.pfm +++| 07466 M00S05480.pfm +++|* CHECK FOR DIRECT ACCESS PURGED ENTRY. 07467 M00S05481.pfm +++| 07468 M00S05482.pfm +++| SCH16 PJN SCH15 IF NOT DIRECT ACCESS FILE 07469 M00S05483.pfm +++| 07470 M00S05484.pfm +++|* EXACT FIT. BYPASS REMAINDER OF HOLES. 07471 M00S05485.pfm +++| 07472 M00S05486.pfm +++| SCH17 ISTORE SCHF,(PSN) BYPASS HOLE SEARCH 07473 M00S05487.pfm +++| LDD T0 SET LENGTH OF HOLE 07474 M00S05488.pfm +++| STD HL 07475 M00S05489.pfm +++| SCHK UJN SCH14 SET POINTER TO HOLE 07476 M00S05490.pfm +++|* PSN (*UREPLAC*/*DROPIDS*) 07477 M00S05491.pfm +++| LDC SCHX 07478 M00S05492.pfm +++| STM SCHJ SET HOLE SEARCH ONLY EXIT 07479 M00S05493.pfm +++| UJN SCH14 SET POINTER TO HOLE 07480 M00S05494.pfm +++| SHL SPACE 4,30 07481 M00S05495.pfm +++|** SHL - SEARCH CATALOG FOR HOLE. 07482 M00S05496.pfm +++|* 07483 M00S05497.pfm +++|* THIS SUBROUTINE PRESETS *SCH* TO SEARCH FOR A HOLE ENTRY 07484 M00S05498.pfm +++|* FOR A *UREPLAC* OR *DROPIDS* REQUEST. 07485 M00S05499.pfm +++|* 07486 M00S05500.pfm +++|* IT IS POSSIBLE THAT AT THE COMPLETION OF THE SEARCH, THE 07487 M00S05501.pfm +++|* HOLE ENTRY AND/OR THE END OF CATALOGS WILL BE IN SAME SECTOR 07488 M00S05502.pfm +++|* AS THE FILE CATALOG ENTRY. IF THIS SITUATION OCCURS, THE 07489 M00S05503.pfm +++|* HOLE AND/OR END POINTERS WILL BE ADJUSTED TO POINT TO THE 07490 M00S05504.pfm +++|* FILE ENTRY-S BUFFER (*BUF1*). 07491 M00S05505.pfm +++|* 07492 M00S05506.pfm +++|* ENTRY (CCIA) = CATALOG TRACK ADDRESS. 07493 M00S05507.pfm +++|* (CB) = CATALOG BUFFER. 07494 M00S05508.pfm +++|* (CI) = CATALOG POINTER. 07495 M00S05509.pfm +++|* (LF - LF+1) = LENGTH OF FILE. 07496 M00S05510.pfm +++|* (SDAA) = MASTER DEVICE EST ORDINAL. 07497 M00S05511.pfm +++|* 07498 M00S05512.pfm +++|* EXIT (A) = 0, IF HOLE NOT FOUND. 07499 M00S05513.pfm +++|* (EB) = END BUFFER, IF END ENCOUNTERED. 07500 M00S05514.pfm +++|* (EP) = END POINTER, IF END ENCOUNTERED. 07501 M00S05515.pfm +++|* (HB) = HOLE BUFFER. 07502 M00S05516.pfm +++|* (HL) = SIZE OF HOLE FOUND. 07503 M00S05517.pfm +++|* (HP) = HOLE POINTER. 07504 M00S05518.pfm +++|*
Proceed to Part 5
cdc/nos2.source/opl.opl871/deck/pfm.004.txt · Last modified: by 127.0.0.1