cdc:nos2.source:opl.opl871:deck:1ds.001
Deck 1DS Part 001
41 Modifications
Listing Sections
- Deck 1DS Start
- Deck 1DS Part 1 (Line 1870)
- Deck 1DS Part 2 (Line 3414)
- Deck 1DS Part 3 (Line 5063)
- Deck 1DS Part 4 (Line 6536)
Source
Seq # *Modification Id* Act ----------------------------+ 01870 M00S01718.1ds +++| LDN DSSC-SSSC CHANGE SERVICE CLASS 01871 M00S01719.1ds +++| RAM ISJA 01872 M00S01720.1ds +++| LDK DSSI CHANGE SUBSYSTEM ID 01873 M00S01721.1ds +++| STM IAS.CMS+2 01874 M00S01722.1ds +++| DSS1 RJM ISS INITIATE SUBSYSTEM 01875 M00S01723.1ds +++| PJN DSSX IF JOB QUEUED SUCCESSFULLY 01876 M00S01724.1ds +++| LDK ZERL 01877 M00S01725.1ds +++| CRD CM 01878 M00S01726.1ds +++| LDD QA SET QFT ORDINAL 01879 M00S01727.1ds +++| ZJN DSS2 IF NO ENTRY WAS ASSIGNED 01880 M00S01728.1ds +++| STD CM+1 01881 M00S01729.1ds +++| LDN PQFT 01882 M00S01730.1ds +++| STD CM+2 01883 M00S01731.1ds +++| MONITOR MTRM RETURN QFT ENTRY 01884 M00S01732.1ds +++| DSS2 SOM DSSA 01885 M00S01733.1ds +++| NJN DSS1 IF RETRY COUNT NOT EXCEEDED 01886 M00S01734.1ds +++| LDK NCPL GET SYSTEM CONTROL POINT 01887 M00S01735.1ds +++| CRD CM 01888 M00S01736.1ds +++| AOD CM+1 ISSUE MESSAGE TO SYSTEM CONTROL POINT 01889 M00S01737.1ds +++| SHN 7 01890 M00S01738.1ds +++| ADN MS2W 01891 M00S01739.1ds +++| CWM DSSB,TR 01892 M00S01740.1ds +++| LJM DSSX RETURN 01893 M00S01741.1ds +++| 01894 M00S01742.1ds +++| 01895 M00S01743.1ds +++| DSSA CON 5 SUBSYSTEM INITIATION RETRY COUNT 01896 M00S01744.1ds +++| DSSB DATA C*DEADSTART SEQUENCING FAILED.* 01897 M00S01745.1ds +++| LOD SPACE 4,10 01898 M00S01746.1ds +++|*** FUNCTION LODF - LOAD JOB. 01899 M00S01747.1ds +++|* 01900 M00S01748.1ds +++|* ENTRY (IR+3) = EST ORDINAL. 01901 M00S01749.1ds +++|* (IR+4) = ID. 01902 M00S01750.1ds +++| 01903 M00S01751.1ds +++| 01904 M00S01752.1ds +++| LOD ENTRY ENTRY/EXIT 01905 M00S01753.1ds +++| LDC =C*LOAD* 01906 M00S01754.1ds +++| RJM GJC GENERATE JOB COMMAND 01907 M00S01755.1ds +++| LDD IR+3 01908 M00S01756.1ds +++| ZJN LOD1 IF NO EST ORDINAL SPECIFIED 01909 M00S01757.1ds +++| LDC =C*XXX,LOAD)* 01910 M00S01758.1ds +++| RJM GAC 01911 M00S01759.1ds +++| LOD1 LDD IR+4 01912 M00S01760.1ds +++| ZJN LOD2 IF NO ID 01913 M00S01761.1ds +++| RJM C2D ENTER ID 01914 M00S01762.1ds +++| SHN 6 01915 M00S01763.1ds +++| LMN 1R. 01916 M00S01764.1ds +++| STM LODA+3 01917 M00S01765.1ds +++| SHN -14 01918 M00S01766.1ds +++| SBN 1R. 01919 M00S01767.1ds +++| RAM LODA+2 01920 M00S01768.1ds +++| LOD2 LDC LODA 01921 M00S01769.1ds +++| RJM CCI 01922 M00S01770.1ds +++| LDN SYSC SET SERVICE CLASS 01923 M00S01771.1ds +++| STD JS 01924 M00S01772.1ds +++| RJM EJB ENTER JOB 01925 M00S01773.1ds +++| LJM LODX RETURN 01926 M00S01774.1ds +++| 01927 M00S01775.1ds +++| 01928 M00S01776.1ds +++| LODA VFD 60/6LLDI,,. 01929 M00S01777.1ds +++| IRM SPACE 4,10 01930 M00S01778.1ds +++|** IRM - INITIATE REMOTE MAINTENANCE FACILITY. 01931 M00S01779.1ds +++|* 01932 M00S01780.1ds +++|* EXIT RDF INITIATED. 01933 M00S01781.1ds +++|*
| Line S01782 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01934 M01S01782.271l716 ---|* USES AB - AB+4, CN - CN+4, T6, TN.
| Line S00025 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01935 M01S00025.271l716 +++|* USES TN, T6, AB - AB+4, CM - CM+4, CN - CN+4. 01936 M00S01783.1ds +++|* 01937 M00S01784.1ds +++|* CALLS AST, ISJ. 01938 M00S01785.1ds +++|* 01939 M00S01786.1ds +++|* MACROS DELAY, MONITOR, PAUSE. 01940 M00S01787.1ds +++| 01941 M00S01788.1ds +++| 01942 M00S01789.1ds +++| IRM3 LDD MA MAKE *IAF*REQUEST* 01943 M00S01790.1ds +++| CWM IRMB,ON
| Line S01791 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01944 M01S01791.271l716 ---| IRM4 MONITOR TSEM
| Line S00026 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01945 M01S00026.271l716 +++| IRM4 LDK ZERL 01946 M01S00027.271l716 +++| CRD CM 01947 M01S00028.271l716 +++| MONITOR TSEM 01948 M00S01792.1ds +++| LDD CM+1 01949 M00S01793.1ds +++| ZJN IRMX IF *IAF* INACCESSIBLE OR ERROR 01950 M00S01794.1ds +++| LMC 7777 01951 M00S01795.1ds +++| NJN IRMX IF REQUEST COMPLETE 01952 M00S01796.1ds +++| PAUSE ST 01953 M00S01797.1ds +++| LDC 3600 *TSEM* QUEUE FULL - DELAY AND RETRY 01954 M00S01798.1ds +++| STD T6 01955 M00S01799.1ds +++| IRM5 DELAY 01956 M00S01800.1ds +++| SOD T6 01957 M00S01801.1ds +++| ZJN IRM4 IF TIME TO REISSUE REQUEST 01958 M00S01802.1ds +++| UJN IRM5 CONTINUE TO DELAY 01959 M00S01803.1ds +++| 01960 M00S01804.1ds +++| IRM SUBR ENTRY/EXIT 01961 M00S01805.1ds +++| LDD TN SAVE CURRENT ID 01962 M00S01806.1ds +++| STM IRMC 01963 M00S01807.1ds +++| LDM IRMD 01964 M00S01808.1ds +++| NJN IRMX IF AUTO SELECTED *IAF* 01965 M00S01809.1ds +++| LDC IAS.IAF GET ADDRESS OF *IAF* SUBSYSTEM ENTRY 01966 M00S01810.1ds +++| STD TN 01967 M00S01811.1ds +++| LDM 2,TN CHECK SUBSYSTEM ACTIVE 01968 M00S01812.1ds +++| LMC FEAF*10000 FETCH *SSAT* ENTRY 01969 M00S01813.1ds +++| RJM AST 01970 M00S01814.1ds +++| NJP IRM3 IF ACTIVE 01971 M00S01815.1ds +++| LDK SSSL CHECK IF *IAF* IS ENABLED 01972 M00S01816.1ds +++| CRD CN 01973 M00S01817.1ds +++| LDM 3,TN 01974 M00S01818.1ds +++| STM IRMA 01975 M00S01819.1ds +++| LDM 1,TN 01976 M00S01820.1ds +++| LPN 17 01977 M00S01821.1ds +++| ADN CN 01978 M00S01822.1ds +++| STD T6 01979 M00S01823.1ds +++| LDI T6 CHECK SUBSYSTEM 01980 M00S01824.1ds +++| LPC 0 01981 M00S01825.1ds +++| IRMA EQU *-1 01982 M00S01826.1ds +++| ZJN IRM1 IF *IAF* ENABLED 01983 M00S01827.1ds +++| LDC IAS.RDF CHECK IF *RDF* IS ACTIVE 01984 M00S01828.1ds +++| STD TN 01985 M00S01829.1ds +++| LDM 2,TN 01986 M00S01830.1ds +++| LMC FEAF*10000 01987 M00S01831.1ds +++| RJM AST 01988 M00S01832.1ds +++| NJN IRM2 IF *RDF* ACTIVE 01989 M00S01833.1ds +++| IRM1 LDM 2,TN 01990 M00S01834.1ds +++| RJM ISJ INITIATE *RDF* OR *IAF* 01991 M00S01835.1ds +++| IRM2 LDM IRMC RESTORE CURRENT ID 01992 M00S01836.1ds +++| STD TN 01993 M00S01837.1ds +++| LJM IRMX RETURN 01994 M00S01838.1ds +++| 01995 M00S01839.1ds +++| 01996 M00S01840.1ds +++|* BUFFER FOR *TSEM* MONITOR CALL TO LOAD *RDF* DRIVER. 01997 M00S01841.1ds +++|
| Line S01842 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01998 M01S01842.271l716 ---| IRMB CON 2013
| Line S00029 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01999 M01S00029.271l716 +++| IRMB CON /REM/VITP 02000 M00S01843.1ds +++| CON 0 02001 M00S01844.1ds +++| CON 0 02002 M00S01845.1ds +++| CON 0 02003 M00S01846.1ds +++| CON 0 02004 M00S01847.1ds +++| IRMC CON 0 CURRENT ID 02005 M00S01848.1ds +++| IRMD CON 0 IAF AUTO FLAG 02006 M00S01849.1ds +++| 02007 M00S01850.1ds +++| ISS SPACE 4,10 02008 M00S01851.1ds +++|*** FUNCTION ISSF - INITIATE SPECIFIED SUB-SYSTEM. 02009 M00S01852.1ds +++|* 02010 M00S01853.1ds +++|* ENTRY (IR+3 - IR+4) = 18/NAME, 6/0, IF NOT *DSD* CALL. 02011 M00S01854.1ds +++|* (IR+3) = 0, IF *DSD* CALL. 02012 M00S01855.1ds +++|* (KBCML) = 18/NAME, 6/0, 24/PFC, 12/0, IF *DSD* CALL. 02013 M00S01856.1ds +++|* NAME = 3-CHARACTER SUBSYSTEM NAME. 02014 M00S01857.1ds +++|* PFC = PROCEDURE FILE NAME. 02015 M00S01858.1ds +++|* 02016 M00S01859.1ds +++|* EXIT (A) = 0, IF SUBSYSTEM INITIATED. 02017 M00S01860.1ds +++| 02018 M00S01861.1ds +++| 02019 M00S01862.1ds +++| ISS ENTRY ENTRY/EXIT 02020 M00S01863.1ds +++| LDD IR+3 02021 M00S01864.1ds +++| NJN ISS1 IF NOT *DSD* CALL 02022 M00S01865.1ds +++| LDC /1DS/DSDL+/1DS/KBCML GET SPECIAL PARAMETER WORD 02023 M00S01866.1ds +++| CRD AB 02024 M00S01867.1ds +++| LDD AB+2 SET PROCEDURE FILE NAME 02025 M00S01868.1ds +++| STM ISJB 02026 M00S01869.1ds +++| LDD AB+3 02027 M00S01870.1ds +++| STM ISJC 02028 M00S01871.1ds +++| UJN ISS2 GET SUBSYSTEM ID 02029 M00S01872.1ds +++| 02030 M00S01873.1ds +++| ISS1 STD AB SET SUBSYSTEM NAME 02031 M00S01874.1ds +++| LDD IR+4 02032 M00S01875.1ds +++| STD AB+1 02033 M00S01876.1ds +++| ISS2 LDC IASB FIND SUBSYSTEM ID 02034 M00S01877.1ds +++| STD TN 02035 M00S01878.1ds +++| ISS3 LDI TN 02036 M00S01879.1ds +++| LMD AB 02037 M00S01880.1ds +++| NJN ISS4 IF NO MATCH 02038 M00S01881.1ds +++| LDM 1,TN 02039 M00S01882.1ds +++| SCN 77 02040 M00S01883.1ds +++| LMD AB+1 02041 M00S01884.1ds +++| ZJN ISS5 IF MATCH 02042 M00S01885.1ds +++| ISS4 LDN IASBE GET NEXT TABLE ENTRY 02043 M00S01886.1ds +++| RAD TN 02044 M00S01887.1ds +++| LMC IASBL 02045 M00S01888.1ds +++| NJN ISS3 IF NOT END OF TABLE 02046 M00S01889.1ds +++| LDN 1 SET ERROR STATUS 02047 M00S01890.1ds +++| LJM ISSX RETURN 02048 M00S01891.1ds +++| 02049 M00S01892.1ds +++| ISS5 LDD TN 02050 M00S01893.1ds +++| LMC IAS.RDF 02051 M00S01894.1ds +++| NJN ISS6 IF NOT *RDF* 02052 M00S01895.1ds +++| RJM IRM INITIATE *RDF* 02053 M00S01896.1ds +++| UJN ISS7 RETURN 02054 M00S01897.1ds +++| 02055 M00S01898.1ds +++| ISS6 LDM 2,TN 02056 M00S01899.1ds +++| RJM ISJ 02057 M00S01900.1ds +++| ISS7 LJM ISSX RETURN 02058 M00S01901.1ds +++| IAS SPACE 4,10 02059 M00S01902.1ds +++|*** FUNCTION IASD - INITIATE ALL ENABLED SUB-SYSTEMS. 02060 M00S01903.1ds +++| 02061 M00S01904.1ds +++| 02062 M00S01905.1ds +++| IAS5 RJM CCF CLEAR CHECKPOINT FLAGS 02063 M00S01906.1ds +++| LDN 1 02064 M00S01907.1ds +++| STD CM+1 SET NUMBER OF OPTIONS 02065 M00S01908.1ds +++| STD CM+2 DO NOT DROP PPU 02066 M00S01909.1ds +++| LDD MA 02067 M00S01910.1ds +++| CWM IASD,ON 02068 M00S01911.1ds +++| MONITOR UADM ENABLE JOB SCHEDULING 02069 M00S01912.1ds +++| 02070 M00S01913.1ds +++| IAS ENTRY ENTRY/EXIT 02071 M00S01914.1ds +++| LDN 0 SPIN UP ISMD DEVICES 02072 M00S01915.1ds +++| RJM SUD 02073 M00S01916.1ds +++| LDD IR+2 02074 M00S01917.1ds +++| LMN /1DS/SCHF 02075 M00S01918.1ds +++| ZJN IAS5 IF ENABLE SCHEDULING CALL 02076 M00S01919.1ds +++| LDC IASB-IASBE SET LIST ADDRESS 02077 M00S01920.1ds +++| STD TN 02078 M00S01921.1ds +++| LDK SSSL GET SUBSYSTEM STATUS WORD 02079 M00S01922.1ds +++| CRD CN 02080 M00S01923.1ds +++| IAS1 LDN IASBE ADVANCE LIST ADDRESS 02081 M00S01924.1ds +++| RAD TN 02082 M00S01925.1ds +++| LMC IASBL 02083 M00S01926.1ds +++| ZJN IAS5 IF END OF LIST 02084 M00S01927.1ds +++| LDM 1,TN 02085 M00S01928.1ds +++| SHN 21-4 02086 M00S01929.1ds +++| PJN IAS1 IF NOT *AUTO* INITIATED SUBSYSTEM 02087 M00S01930.1ds +++| LDD TN 02088 M00S01931.1ds +++| LMC IAS.IAF 02089 M00S01932.1ds +++| NJN IAS2 IF NOT *IAF* 02090 M00S01933.1ds +++| AOM IRMD SET *IAF* AUTO FLAG 02091 M00S01934.1ds +++| IAS2 LDD TN 02092 M00S01935.1ds +++| LMC IAS.RDF 02093 M00S01936.1ds +++| NJN IAS3 IF NOT *RDF* 02094 M00S01937.1ds +++| RJM IRM INITIATE *RDF* 02095 M00S01938.1ds +++| UJN IAS1 NEXT SUBSYSTEM 02096 M00S01939.1ds +++| 02097 M00S01940.1ds +++| IAS3 LDM 3,TN SET MASK 02098 M00S01941.1ds +++| STM IASA 02099 M00S01942.1ds +++| LDM 1,TN SET BYTE ADDRESS 02100 M00S01943.1ds +++| LPN 17 02101 M00S01944.1ds +++| ADN CN 02102 M00S01945.1ds +++| STD T6 02103 M00S01946.1ds +++| LDI T6 CHECK SUBSYSTEM 02104 M00S01947.1ds +++| LPC 0 02105 M00S01948.1ds +++| IASA EQU *-1 02106 M00S01949.1ds +++| NJN IAS4 IF DISABLED 02107 M00S01950.1ds +++| LDM 2,TN INITIATE SUBSYSTEM 02108 M00S01951.1ds +++| RJM ISJ 02109 M00S01952.1ds +++| IAS4 LJM IAS1 CHECK NEXT SUBSYSTEM 02110 M00S01953.1ds +++| SPACE 4,15 02111 M00S01954.1ds +++|** TABLE OF SUBSYSTEMS. 02112 M00S01955.1ds +++|* 02113 M00S01956.1ds +++|* ENTRY FORMAT. 02114 M00S01957.1ds +++|* 02115 M00S01958.1ds +++|*T 18/ NAME, 1/P, 1/A, 4/ BYTE, 12/ SSID, 12/ MASK, 12/ TYPE
Figure
02116 M00S01959.1ds +++|* 02117 M00S01960.1ds +++|* NAME = 3-CHARACTER SUBSYSTEM NAME. 02118 M00S01961.1ds +++|* BYTE = BYTE POSITION IN *SSTL*. 02119 M00S01962.1ds +++|* P = SET IF PP-INITIATED SUBSYSTEM. 02120 M00S01963.1ds +++|* A = SET IF *AUTO* INITIATED SUBSYSTEM. 02121 M00S01964.1ds +++|* SSID = SUBSYSTEM ID. 02122 M00S01965.1ds +++|* MASK BIT MASK FOR SUBSYSTEM ENABLE/DISABLE BIT. 02123 M00S01966.1ds +++|* TYPE FILE TYPE AND STATUS, IF FILE TYPE .NE. *INQF*. 02124 M00S01967.1ds +++| 02125 M00S01968.1ds +++|
| Line S00041 Modification History | |
|---|---|
M01 (Added by) | 1ds21 |
Seq # *Modification Id* Act ----------------------------+ 02126 M01S00041.1ds21 +++| SUB$ EQU 1 ASSEMBLE *SUBSYST* MACRO 02127 M01S00042.1ds21 +++|*CALL COMSSSD 02128 M01S00043.1ds21 +++| 02129 M00S01969.1ds +++| IASB BSS 0 02130 M00S01970.1ds +++| LIST G 02131 M00S01971.1ds +++| .SUB HERE 02132 M00S01972.1ds +++| LIST * 02133 M00S01973.1ds +++| 02134 M00S01974.1ds +++| IASBL BSS 0 END OF SUBSYSTEMS 02135 M00S01975.1ds +++| 02136 M00S01976.1ds +++| 02137 M00S01977.1ds +++| IASD CON LDOS DECREMENT BY ONE 02138 M00S01978.1ds +++| CON INWL WORD ADDRESS 02139 M00S01979.1ds +++| CON 13D*100+1 BIT ADDRESS AND FIELD WIDTH 02140 M00S01980.1ds +++| CON 0,0 02141 M00S01981.1ds +++| SPACE 4,10 02142 M00S01982.1ds +++|** COMMON DECKS. 02143 M00S01983.1ds +++| 02144 M00S01984.1ds +++|
| Line S00044 Modification History | |
|---|---|
M01 (Added by) | 1ds21 |
Seq # *Modification Id* Act ----------------------------+ 02145 M01S00044.1ds21 +++| QUAL$ EQU 1 DO NOT QUALIFY COMMON DECKS 02146 M00S01985.1ds +++|*CALL COMPAST
| Line S01986 Modification History | |
|---|---|
M01 (Removed by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 02147 M01S01986.ns2786 ---|*CALL COMPCDD 02148 M00S01987.1ds +++|*CALL COMPCTE
| Line S01988 Modification History | |
|---|---|
M01 (Removed by) | 1ds21 |
Seq # *Modification Id* Act ----------------------------+ 02149 M01S01988.1ds21 ---| EJT$ EQU 1 EJT SEARCH 02150 M01S01989.1ds21 ---| FNT$ EQU 1 FNT SEARCH 02151 M01S01990.1ds21 ---| IFP$ EQU 1 *COMPGFP* REMOTE ASSEMBLY 02152 M01S01991.1ds21 ---| QFT$ EQU 1 QFT SEARCH 02153 M01S01992.1ds21 ---|*CALL COMPGFP
| Line S01993 Modification History | |
|---|---|
M01 (Removed by) | ns2663 |
Seq # *Modification Id* Act ----------------------------+ 02154 M01S01993.ns2663 ---|*CALL COMPIAM
| Line S00045 Modification History | |
|---|---|
M01 (Added by) | 1ds21 |
Seq # *Modification Id* Act ----------------------------+ 02155 M01S00045.1ds21 +++|*CALL COMPRFI 02156 M00S01994.1ds +++|*CALL COMPSUD
| Line S00028 Modification History | |
|---|---|
M01 (Added by) | ns2663 |
Seq # *Modification Id* Act ----------------------------+ 02157 M01S00028.ns2663 +++| WEI$ EQU 1 DEFINE ALTERNATE EOI BUFFER 02158 M01S00029.ns2663 +++|*CALL COMPWEI 02159 M00S01995.1ds +++| SPACE 4,10 02160 M00S01996.1ds +++| USE OVERLAY FORCE /LITERALS*/ 02161 M00S01997.1ds +++| MSG SPACE 4,10 02162 M00S01998.1ds +++|*** FUNCTION MSGF - SEND DAYFILE MESSAGE. 02163 M00S01999.1ds +++|* 02164 M00S02000.1ds +++|* ENTRY (IR+4) = 6/KEYBOARD BUFFER OFFSET, 6/. 02165 M00S02001.1ds +++| 02166 M00S02002.1ds +++| 02167 M00S02003.1ds +++| MSG ENTRY ENTRY/EXIT 02168 M00S02004.1ds +++| LDC BUF GET MESSAGE 02169 M00S02005.1ds +++| RJM RPK 02170 M00S02006.1ds +++| LDN 0 CLEAR LAST BYTE 02171 M00S02007.1ds +++| STM BUF+31 02172 M00S02008.1ds +++| LDC BUF SEND MESSAGE TO DAYFILE 02173 M00S02009.1ds +++| RJM DFM 02174 M00S02010.1ds +++| UJN MSGX RETURN
| Line S00046 Modification History | |
|---|---|
M01 (Added by) | 1ds21 |
Seq # *Modification Id* Act ----------------------------+ 02175 M01S00046.1ds21 +++| DIS SPACE 4,10 02176 M01S00047.1ds21 +++|*** FUNCTION DISF - CALL DIS TO JOB. 02177 M01S00048.1ds21 +++| 02178 M01S00049.1ds21 +++| 02179 M01S00050.1ds21 +++| DIS ENTRY ENTRY/EXIT 02180 M01S00051.1ds21 +++| RJM LKC LOG COMMAND 02181 M01S00052.1ds21 +++| LDC 2RDI BUILD INPUT REGISTER 02182 M01S00053.1ds21 +++| STD IR 02183 M01S00054.1ds21 +++| LDD CP 02184 M01S00055.1ds21 +++| SHN -7 02185 M01S00056.1ds21 +++| LMC 2L S 02186 M01S00057.1ds21 +++| STD IR+1 02187 M01S00058.1ds21 +++| LDN 0 02188 M01S00059.1ds21 +++| STD IR+2 02189 M01S00060.1ds21 +++| STD IR+3 02190 M01S00061.1ds21 +++| LDC 4000 SET DIRECT CALL 02191 M01S00062.1ds21 +++| STD IR+4 02192 M01S00063.1ds21 +++| LDD MA ENTER *DIS* IN RECALL STACK 02193 M01S00064.1ds21 +++| CWD IR 02194 M01S00065.1ds21 +++| LDN ZERL 02195 M01S00066.1ds21 +++| CRD CM 02196 M01S00067.1ds21 +++| MONITOR RECM 02197 M01S00068.1ds21 +++| LJM PPR EXIT TO PP RESIDENT 02198 M00S02011.1ds +++| ECB SPACE 4,10 02199 M00S02012.1ds +++|*** FUNCTION ECBF - ENTER CENTRAL MEMORY BUFFER. 02200 M00S02013.1ds +++|* 02201 M00S02014.1ds +++|* ENTRY (IR+4) = 6/KEYBOARD BUFFER OFFSET, 6/. 02202 M00S02015.1ds +++| 02203 M00S02016.1ds +++| 02204 M00S02017.1ds +++| ECB ENTRY ENTRY/EXIT 02205 M00S02018.1ds +++| LDC BUF READ AND PACK MESSAGE 02206 M00S02019.1ds +++| RJM RPK 02207 M00S02020.1ds +++| LDD CP READ DISPLAY CONTROL WORD 02208 M00S02021.1ds +++| ADC DBAW 02209 M00S02022.1ds +++| CRD CM 02210 M00S02023.1ds +++| LDD CM CHECK ADDRESS 02211 M00S02024.1ds +++| LPN 37 02212 M00S02025.1ds +++| SHN 14 02213 M00S02026.1ds +++| LMD CM+1 02214 M00S02027.1ds +++| ADN 5 02215 M00S02028.1ds +++| SHN -6 02216 M00S02029.1ds +++| SBD FL 02217 M00S02030.1ds +++| PJN ECBX IF .GE. FL - 5 02218 M00S02031.1ds +++| LDD CM STORE MESSAGE 02219 M00S02032.1ds +++| LPN 37 02220 M00S02033.1ds +++| SHN 6 02221 M00S02034.1ds +++| ADD RA 02222 M00S02035.1ds +++| SHN 6 02223 M00S02036.1ds +++| ADD CM+1 02224 M00S02037.1ds +++| CWM BUF,FV 02225 M00S02038.1ds +++| UJN ECBX RETURN
| Line S02039 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02226 M01S02039.271l716 ---| CLR SPACE 4,10 02227 M01S02040.271l716 ---|*** FUNCTION CLRF - SET/CLEAR PAUSE BIT. 02228 M01S02041.271l716 ---|* 02229 M01S02042.271l716 ---|* ENTRY (IR+3) = 0 IF CLEARING PAUSE BIT. 02230 M01S02043.271l716 ---|* = 1 IF SETTING PAUSE BIT. 02231 M01S02044.271l716 ---|* (IR+4) = 6/ KEYBOARD BUFFER OFFSET, 6/. 02232 M01S02045.271l716 ---| 02233 M01S02046.271l716 ---| 02234 M01S02047.271l716 ---| CLR4 RJM ISC INITIATE JOB CALL 02235 M01S02048.271l716 ---| 02236 M01S02049.271l716 ---| CLR ENTRY ENTRY/EXIT 02237 M01S02050.271l716 ---| LDC /1DS/DSDL+/1DS/KBCML FETCH PARAMETER WORD 02238 M01S02051.271l716 ---| CRD FN 02239 M01S02052.271l716 ---| LDN ERLN/10000 SET DEFAULT DAYFILE 02240 M01S02053.271l716 ---| STD T4 02241 M01S02054.271l716 ---| LDD FN+1 02242 M01S02055.271l716 ---| LPN 77 02243 M01S02056.271l716 ---| NJN CLR1 IF NOT JSN FOR SUBSYSTEM 02244 M01S02057.271l716 ---| LDN 1R 02245 M01S02058.271l716 ---| RAD FN+1 02246 M01S02059.271l716 ---| CLR1 LDD FN+2 02247 M01S02060.271l716 ---| NJN CLRX IF INCORRECT JSN
| Line S02061 Modification History | |
|---|---|
M01 (Removed by) | 1ds21 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02248 M02S02061.271l716 ---| RJM SSJ SEARCH FOR SPECIFIED JOB
| Line S00069 Modification History | |
|---|---|
M01 (Added by) | 1ds21 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02249 M02S00069.271l716 ---| RJM /OVLNB/SSJ SEARCH FOR SPECIFIED JOB
| Line S02062 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02250 M01S02062.271l716 ---| NJN CLR4 IF JOB NOT FOUND 02251 M01S02063.271l716 ---| CLR2 LDD CP 02252 M01S02064.271l716 ---| ADN SNSW 02253 M01S02065.271l716 ---| CRD CM 02254 M01S02066.271l716 ---| ADN MS2W-SNSW 02255 M01S02067.271l716 ---| CRD CN 02256 M01S02068.271l716 ---| LDN 0 CLEAR MESSAGE 02257 M01S02069.271l716 ---| STD CN 02258 M01S02070.271l716 ---| LDD CM+3 SET/CLEAR PAUSE BIT IN CPA 02259 M01S02071.271l716 ---| SCN 3 02260 M01S02072.271l716 ---| LMD IR+3 02261 M01S02073.271l716 ---| STD CM+3 02262 M01S02074.271l716 ---| LDD CP 02263 M01S02075.271l716 ---| ADN SNSW 02264 M01S02076.271l716 ---| CWD CM 02265 M01S02077.271l716 ---| ADN MS2W-SNSW 02266 M01S02078.271l716 ---| CWD CN 02267 M01S02079.271l716 ---| LDD FL 02268 M01S02080.271l716 ---| ZJN CLR3 IF NO FIELD LENGTH 02269 M01S02081.271l716 ---| LDD RA 02270 M01S02082.271l716 ---| SHN 6 02271 M01S02083.271l716 ---| CRD FS 02272 M01S02084.271l716 ---| LDD FS+3 SET/CLEAR PAUSE FLAGS IN (RA) 02273 M01S02085.271l716 ---| SCN 3 02274 M01S02086.271l716 ---| LMD IR+3 02275 M01S02087.271l716 ---| STD FS+3 02276 M01S02088.271l716 ---| LDD RA STORE (RA) 02277 M01S02089.271l716 ---| SHN 6 02278 M01S02090.271l716 ---| CWD FS 02279 M01S02091.271l716 ---| CLR3 LDD T4 ISSUE DAYFILE MESSAGE 02280 M01S02092.271l716 ---| SHN 14 02281 M01S02093.271l716 ---| ADM CLRA,IR+3 02282 M01S02094.271l716 ---| RJM DFM 02283 M01S02095.271l716 ---| LJM CLRX RETURN 02284 M01S02096.271l716 ---|
| Line S02097 Modification History | |
|---|---|
M01 (Removed by) | 1ds21 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02285 M02S02097.271l716 ---| CLRA CON MSGA 02286 M02S02098.271l716 ---| CON MSGB
| Line S00070 Modification History | |
|---|---|
M01 (Added by) | 1ds21 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02287 M02S00070.271l716 ---| 02288 M02S00071.271l716 ---| CLRA CON /OVLNB/MSGA 02289 M02S00072.271l716 ---| CON /OVLNB/MSGB 02290 M00S02099.1ds +++| BUF SPACE 4,10 02291 M00S02100.1ds +++| BUFB DATA 6HACDT, 02292 M00S02101.1ds +++| BUF DATA 2,0 COMMAND SECTOR BUFFER 02293 M00S02102.1ds +++| BUFA BSS 0
| Line S02103 Modification History | |
|---|---|
M01 (Removed by) | ns2663 |
Seq # *Modification Id* Act ----------------------------+ 02294 M01S02103.ns2663 ---| OVL0 EQU BUFA LOAD ADDRESS FOR *0SD*
| Line S00030 Modification History | |
|---|---|
M01 (Added by) | ns2663 |
Seq # *Modification Id* Act ----------------------------+ 02295 M01S00030.ns2663 +++| OVL0 EQU BUFA+2 LOAD ADDRESS FOR *0SD*, *0QM* 02296 M00S02104.1ds +++| ERRNG BFMS-BUF-510 CHECK FOR BUFFER OVERFLOW
| Line S00031 Modification History | |
|---|---|
M01 (Added by) | ns2663 |
Seq # *Modification Id* Act ----------------------------+ 02297 M01S00031.ns2663 +++| ERRNG BFMS-OVL0-2-ZQML *0QM* OVERFLOW
| Line S02105 Modification History | |
|---|---|
M01 (Removed by) | 1ds21 |
Seq # *Modification Id* Act ----------------------------+ 02298 M01S02105.1ds21 ---| ERRNG BFMS-BUFA+2-ZSDL *0SD* OVERFLOW
| Line S00073 Modification History | |
|---|---|
M01 (Added by) | 1ds21 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02299 M02S00073.271l716 ---| ERRNG BFMS-BUFA-2-ZSDL *0SD* OVERFLOW
| Line S00030 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02300 M01S00030.271l716 +++| ERRNG BFMS-OVL0-2-ZSDL *0SD* OVERFLOW 02301 M01S00031.271l716 +++| TITLE OVERLAYABLE REQUEST PROCESSORS. 02302 M01S00032.271l716 +++| SPACE 4,10 02303 M01S00033.271l716 +++|* THE FOLLOWING ROUTINES CANNOT USE BUFFER *BUF*. 02304 M01S00034.271l716 +++| 02305 M01S00035.271l716 +++| 02306 M01S00036.271l716 +++| QUAL OVLNB
| Line S02106 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02307 M01S02106.271l716 ---|
| Line S00037 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02308 M01S00037.271l716 +++| ECP SPACE 4,10 02309 M01S00038.271l716 +++|*** FUNCTION ECPF - ENTER CPU PRIORITY. 02310 M01S00039.271l716 +++|*
| Line S00040 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | ns2684 |
Seq # *Modification Id* Act ----------------------------+ 02311 M02S00040.ns2684 ---|* ENTRY (KBCML) = 36/, 12/ EO, 12/ PR 02312 M02S00041.ns2684 ---|* EO = EJT ORDINAL. 02313 M02S00042.ns2684 ---|* PR = CPU PRIORITY.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2684 |
Seq # *Modification Id* Act ----------------------------+ 02314 M01S00003.ns2684 +++|* ENTRY (IR+3) = EJT ORDINAL.
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns2684 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act ----------------------------+ 02315 M02S00004.ns2731 ---|* (IR+4) = CPU PRIORITY.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2731 |
Seq # *Modification Id* Act ----------------------------+ 02316 M01S00001.ns2731 +++|* (IR+4) = CPU PRIORITY IF .NE. 0. 02317 M01S00002.ns2731 +++|* (IR+4) = 0 IF SET PRIORITY TO SERVICE CLASS VALUE.
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | ns2684 |
Seq # *Modification Id* Act ----------------------------+ 02318 M01S00005.ns2684 +++|* (KBCML) = 36/, 24/ JSN.
| Line S00043 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02319 M01S00043.271l716 +++| 02320 M01S00044.271l716 +++| 02321 M01S00045.271l716 +++| ECP ENTRY ENTRY/EXIT 02322 M01S00046.271l716 +++| LDC /1DS/DSDL+/1DS/KBCML 02323 M01S00047.271l716 +++| CRD FN READ PARAMETER WORD
| Line S00048 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | ns2684 |
Seq # *Modification Id* Act ----------------------------+ 02324 M02S00048.ns2684 ---| SFA EJT,FN+3
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | ns2684 |
Seq # *Modification Id* Act ----------------------------+ 02325 M01S00006.ns2684 +++| LDD FN+3 SET JSN IN *UTEM* PARAMETER BLOCK 02326 M01S00007.ns2684 +++| STM ECPA+3 02327 M01S00008.ns2684 +++| LDD FN+4 02328 M01S00009.ns2684 +++| STM ECPA+4 02329 M01S00010.ns2684 +++| LDD MA 02330 M01S00011.ns2684 +++| CWM ECPA,ON 02331 M01S00012.ns2684 +++| LDN 60 SET RETRY COUNT 02332 M01S00013.ns2684 +++| STD T4
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | ns2684 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02333 M02S00014.271l750 ---| LDD IR+4 02334 M02S00015.271l750 ---| SBN LFCS 02335 M02S00016.271l750 ---| MJN ECP1 IF BELOW LOWEST FIXED CPU PRIORITY 02336 M02S00017.271l750 ---| LDC 1S8 SET *LFCS* BIT IN *JCIW* 02337 M02S00018.271l750 ---| RAD IR+4
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | ns2684 |
Seq # *Modification Id* Act ----------------------------+ 02338 M01S00019.ns2684 +++| 02339 M01S00020.ns2684 +++|* INTERLOCK EJT. 02340 M01S00021.ns2684 +++| 02341 M01S00022.ns2684 +++| ECP1 LDN VFIN SET INTERLOCK FLAG + WORD COUNT 02342 M01S00023.ns2684 +++| STD T1 02343 M01S00024.ns2684 +++| LDN 0 CLEAR UNUSED BYTE 02344 M01S00025.ns2684 +++| STD CM+2 02345 M01S00026.ns2684 +++| SFA EJT,IR+3 02346 M01S00027.ns2684 +++| RJM SFI SET INTERLOCK 02347 M01S00028.ns2684 +++| ZJN ECP4 IF ENTRY INTERLOCKED 02348 M01S00029.ns2684 +++| SBN 2 02349 M01S00030.ns2684 +++| PJN ECP3 IF VERIFICATION FAILED OR ENTRY NOT IN USE 02350 M01S00031.ns2684 +++| LDD HN DELAY 02351 M01S00032.ns2684 +++| STD T0 02352 M01S00033.ns2684 +++| ECP2 DELAY 02353 M01S00034.ns2684 +++| SOD T0 02354 M01S00035.ns2684 +++| PJN ECP2 IF MORE DELAY 02355 M01S00036.ns2684 +++| SOD T4 02356 M01S00037.ns2684 +++| PJN ECP1 IF NOT TIMED OUT 02357 M01S00038.ns2684 +++| ECP3 LDN 1 SET *EJT ENTRY BUSY* 02358 M01S00039.ns2684 +++| RJM SRD RETURN STATUS TO *DSD* 02359 M01S00040.ns2684 +++| LJM ECPX EXIT 02360 M01S00041.ns2684 +++| 02361 M01S00042.ns2684 +++|* DETERMINE JOB STATE. 02362 M01S00043.ns2684 +++| 02363 M01S00044.ns2684 +++| ECP4 SFA EJT,IR+3
| Line S00049 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02364 M01S00049.271l716 +++| ADK JSNE FETCH JOB STATUS FROM EJT
| Line S00050 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | ns2684 |
Seq # *Modification Id* Act ----------------------------+ 02365 M02S00050.ns2684 ---| CRD CN
| Line S00045 Modification History | |
|---|---|
M01 (Added by) | ns2684 |
Seq # *Modification Id* Act ----------------------------+ 02366 M01S00045.ns2684 +++| CRD FN
| Line S00051 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02367 M01S00051.271l716 +++| ADK SCHE-JSNE GET ROLLOUT INFORMATION 02368 M01S00052.271l716 +++| CRD T5
| Line S00053 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | ns2684 |
Seq # *Modification Id* Act ----------------------------+ 02369 M02S00053.ns2684 ---| LDD CN+4 EXTRACT JOB STATUS
| Line S00046 Modification History | |
|---|---|
M01 (Added by) | ns2684 |
Seq # *Modification Id* Act ----------------------------+ 02370 M01S00046.ns2684 +++| LDD FN+4 EXTRACT JOB STATUS
| Line S00054 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02371 M01S00054.271l716 +++| LPN 76 02372 M01S00055.271l716 +++| LMN EXJS*2
| Line S00056 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | ns2684 |
Seq # *Modification Id* Act ----------------------------+ 02373 M02S00056.ns2684 ---| NJN ECP2 IF NOT EXECUTING JOB STATE
| Line S00047 Modification History | |
|---|---|
M01 (Added by) | ns2684 |
Seq # *Modification Id* Act ----------------------------+ 02374 M01S00047.ns2684 +++| NJP ECP8 IF NOT EXECUTING JOB STATE
| Line S00057 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02375 M01S00057.271l716 +++| 02376 M01S00058.271l716 +++|* PROCESS JOB AT CONTROL POINT. 02377 M01S00059.271l716 +++|
| Line S00060 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | ns2684 |
Seq # *Modification Id* Act ----------------------------+ 02378 M02S00060.ns2684 ---| STD CM+1 02379 M02S00061.ns2684 ---| MONITOR DCPM DROP CPU 02380 M02S00062.ns2684 ---| LDD FN+4
| Line S00048 Modification History | |
|---|---|
M01 (Added by) | ns2684 |
Seq # *Modification Id* Act ----------------------------+ 02381 M01S00048.ns2684 +++| LDD T5+3 SET CONTROL POINT NUMBER 02382 M01S00049.ns2684 +++| STD T6 02383 M01S00050.ns2684 +++| LDD NC SET SYSTEM CP ADDRESS 02384 M01S00051.ns2684 +++| STD T7 02385 M01S00052.ns2684 +++| RJM CCP CHANGE CONTROL POINT 02386 M01S00053.ns2684 +++| NJN ECP5 IF UNABLE TO MOVE TO DESIRED CP 02387 M01S00054.ns2684 +++| LDD CP CHECK CURRENT PRIORITY
| Line S00055 Modification History | |
|---|---|
M01 (Added by) | ns2684 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02388 M02S00055.271l750 ---| ADN JCIW
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02389 M01S00002.271l750 +++| ADN CWQW
| Line S00056 Modification History | |
|---|---|
M01 (Added by) | ns2684 |
Seq # *Modification Id* Act ----------------------------+ 02390 M01S00056.ns2684 +++| CRD T1 02391 M01S00057.ns2684 +++| LDD T1
| Line S00058 Modification History | |
|---|---|
M01 (Added by) | ns2684 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02392 M02S00058.271l750 ---| SHN 21-11 02393 M02S00059.271l750 ---| MJN ECP6 IF GREATER THAN *LSCS*
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02394 M01S00003.271l750 +++| SHN -3
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act ----------------------------+ 02395 M02S00004.ns2731 ---| ADC -200-LSCS-1 02396 M02S00005.ns2731 ---| PJN ECP6 IF CURRENT PRIORITY GREATER THAN *LSCS*
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2731 |
Seq # *Modification Id* Act ----------------------------+ 02397 M01S00003.ns2731 +++| ADC -200-LSCS 02398 M01S00004.ns2731 +++| PJN ECP6 IF NOT .LT. SYSTEM PRIORITIES
| Line S00060 Modification History | |
|---|---|
M01 (Added by) | ns2684 |
Seq # *Modification Id* Act ----------------------------+ 02399 M01S00060.ns2684 +++| LDD IR+4 02400 M01S00061.ns2684 +++| LPC 177
| Line S00063 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02401 M01S00063.271l716 +++| STD CM+4 SET CPU PRIORITY IN REQUEST 02402 M01S00064.271l716 +++| LDN CPRS 02403 M01S00065.271l716 +++| STD CM+1 CHANGE CPU PRIORITY 02404 M01S00066.271l716 +++| MONITOR SJCM
| Line S00067 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | ns2684 |
Seq # *Modification Id* Act ----------------------------+ 02405 M02S00067.ns2684 ---| MONITOR RCPM RECALL CPU 02406 M02S00068.ns2684 ---| ECP1 SOD CN+4 02407 M02S00069.ns2684 ---| SFA EJT,FN+3 CLEAR EJT INTERLOCK
| Line S00062 Modification History | |
|---|---|
M01 (Added by) | ns2684 |
Seq # *Modification Id* Act ----------------------------+ 02408 M01S00062.ns2684 +++| ECP5 SOD FN+4 02409 M01S00063.ns2684 +++| SFA EJT,IR+3 CLEAR EJT INTERLOCK
| Line S00070 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02410 M01S00070.271l716 +++| ADK JSNE
| Line S00071 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | ns2684 |
Seq # *Modification Id* Act ----------------------------+ 02411 M02S00071.ns2684 ---| CWD CN
| Line S00064 Modification History | |
|---|---|
M01 (Added by) | ns2684 |
Seq # *Modification Id* Act ----------------------------+ 02412 M01S00064.ns2684 +++| CWD FN
| Line S00072 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02413 M01S00072.271l716 +++| UJP ECPX RETURN 02414 M01S00073.271l716 +++|
| Line S00065 Modification History | |
|---|---|
M01 (Added by) | ns2684 |
Seq # *Modification Id* Act ----------------------------+ 02415 M01S00065.ns2684 +++| ECP6 LDN 3 SET *INCORRECT ENTRY* 02416 M01S00066.ns2684 +++| ECP7 RJM SRD SET ERROR RESPONSE FOR *DSD* 02417 M01S00067.ns2684 +++| UJN ECP5 CLEAR EJT INTERLOCK 02418 M01S00068.ns2684 +++|
| Line S00074 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02419 M01S00074.271l716 +++|* PROCESS JOB AT PSEUDO-CONTROL POINT. 02420 M01S00075.271l716 +++|
| Line S00076 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | ns2684 |
Seq # *Modification Id* Act ----------------------------+ 02421 M02S00076.ns2684 ---| ECP2 LMN PCJS*2&EXJS*2 02422 M02S00077.ns2684 ---| NJN ECP4 IF JOB NOT AT PSEUDO CP
| Line S00069 Modification History | |
|---|---|
M01 (Added by) | ns2684 |
Seq # *Modification Id* Act ----------------------------+ 02423 M01S00069.ns2684 +++| ECP8 LMN PCJS*2&EXJS*2
| Line S00070 Modification History | |
|---|---|
M01 (Added by) | ns2684 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02424 M02S00070.271l750 ---| NJN ECP10 IF JOB NOT AT PSEUDO CP
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02425 M01S00006.271l750 +++| NJP ECP10 IF JOB NOT AT PSEUDO CP
| Line S00078 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02426 M01S00078.271l716 +++| LDD T6 02427 M01S00079.271l716 +++| RJM SCP SET PSEUDO CP AREA ADDRESS
| Line S00080 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02428 M02S00080.271l750 ---| ADN JCIW
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act ----------------------------+ 02429 M02S00007.ns2731 ---| ADN CWQW
| Line S00081 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act ----------------------------+ 02430 M02S00081.ns2731 ---| CRD CM GET JOB CONTROL INFORMATION
| Line S00082 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | ns2684 |
M03 (Removed by) | ns2731 |
Seq # *Modification Id* Act ----------------------------+ 02431 M03S00082.ns2731 ---| LDD FN+4 02432 M03S00083.ns2731 ---| SHN 3 CHANGE CPU PRIORITY
| Line S00071 Modification History | |
|---|---|
M01 (Added by) | ns2684 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act ----------------------------+ 02433 M02S00071.ns2731 ---| LDD CM CHECK CURRENT CPU PRIORITY
| Line S00072 Modification History | |
|---|---|
M01 (Added by) | ns2684 |
M02 (Removed by) | 271l750 |
M03 (Removed by) | ns2731 |
Seq # *Modification Id* Act ----------------------------+ 02434 M03S00072.ns2731 ---| SHN 21-11 02435 M03S00073.ns2731 ---| MJN ECP6 IF GREATER THAN *LSCS* 02436 M03S00074.ns2731 ---| LDD CM 02437 M03S00075.ns2731 ---| LPC 200 RETAIN RECALL FLAG 02438 M03S00076.ns2731 ---| LMD IR+4 SET NEW PRIORITY + *LFCS* FLAG
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act ----------------------------+ 02439 M02S00008.ns2731 ---| SHN -3 02440 M02S00009.ns2731 ---| ADC -200-LSCS-1 02441 M02S00010.ns2731 ---| PJN ECP6 IF CURRENT PRIORITY GREATER THAN *LSCS* 02442 M02S00011.ns2731 ---| LDD IR+4 SET NEW PRIORITY 02443 M02S00012.ns2731 ---| SHN 3 02444 M02S00013.ns2731 ---| ADC 2000
| Line S00084 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act ----------------------------+ 02445 M02S00084.ns2731 ---| STD CM
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act ----------------------------+ 02446 M02S00014.ns2731 ---| LDD CM+1 02447 M02S00015.ns2731 ---| LPC 3777 02448 M02S00016.ns2731 ---| LMC 4000 SET INCOMPLETE EXTENDED CPU SLICE 02449 M02S00017.ns2731 ---| STD CM+1 02450 M02S00018.ns2731 ---| LDN ZERL 02451 M02S00019.ns2731 ---| CRD CN
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | ns2731 |
Seq # *Modification Id* Act ----------------------------+ 02452 M01S00005.ns2731 +++| CRM BFMS+2,HN READ FIRST SECTOR OF CP AREA 02453 M01S00006.ns2731 +++| RJM SPR SET PRIORITY 02454 M01S00007.ns2731 +++| PJN ECP6 IF PRIORITY CHANGE NOT ALLOWED
| Line S00085 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02455 M01S00085.271l716 +++| LDD T6 RESET PCP AREA ADDRESS 02456 M01S00086.271l716 +++| RJM SCP
| Line S00087 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02457 M02S00087.271l750 ---| ADN JCIW UPDATE CONTROL INFORMATION
| Line S00020 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02458 M01S00020.271l750 +++| ADN CWQW UPDATE CPU SCHEDULING INFORMATION
| Line S00088 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act ----------------------------+ 02459 M02S00088.ns2731 ---| CWD CM
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act ----------------------------+ 02460 M02S00021.ns2731 ---| ADN CSAW-CWQW CLEAR CPU SLICE ACCUMULATORS 02461 M02S00022.ns2731 ---| CWD CN
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | ns2731 |
Seq # *Modification Id* Act ----------------------------+ 02462 M01S00008.ns2731 +++| CWM BFMS+2+5*CWQW,ON 02463 M01S00009.ns2731 +++| CWM BFMS+2+5*CSAW,ON CLEAR CPU SLICE ACCUMULATORS 02464 M01S00010.ns2731 +++| ERRNZ CSAW-CWQW-1
| Line S00089 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | ns2684 |
Seq # *Modification Id* Act ----------------------------+ 02465 M02S00089.ns2684 ---| ECP3 UJN ECP1 CLEAR EJT INTERLOCK
| Line S00077 Modification History | |
|---|---|
M01 (Added by) | ns2684 |
Seq # *Modification Id* Act ----------------------------+ 02466 M01S00077.ns2684 +++| UJP ECP5 CLEAR EJT INTERLOCK 02467 M01S00078.ns2684 +++| 02468 M01S00079.ns2684 +++| ECP9 LDN 2 SET *CANNOT ACCESS ROLLOUT DEVICE.* 02469 M01S00080.ns2684 +++| UJP ECP7 SET ERROR STATUS
| Line S00090 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02470 M01S00090.271l716 +++| 02471 M01S00091.271l716 +++|* PROCESS ROLLED-OUT JOB. 02472 M01S00092.271l716 +++|
| Line S00093 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | ns2684 |
Seq # *Modification Id* Act ----------------------------+ 02473 M02S00093.ns2684 ---| ECP4 SETMS IO,(NS,RW)
| Line S00081 Modification History | |
|---|---|
M01 (Added by) | ns2684 |
Seq # *Modification Id* Act ----------------------------+ 02474 M01S00081.ns2684 +++| ECP10 LMN PRJS*2&PCJS*2 02475 M01S00082.ns2684 +++| ZJN ECP9 IF PRE-INITIAL JOB STATE 02476 M01S00083.ns2684 +++| LMN PWJS*2&PRJS*2 02477 M01S00084.ns2684 +++| ZJN ECP9 IF PRE-INITIAL WAIT JOB STATE 02478 M01S00085.ns2684 +++| SETMS IO,(NS,RW)
| Line S00094 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02479 M01S00094.271l716 +++| LDN FSMS SET FIRST SECTOR OF CP AREA 02480 M01S00095.271l716 +++| STD T7 02481 M01S00096.271l716 +++| LDC BFMS READ ROLLOUT FILE 02482 M01S00097.271l716 +++| RJM RDS
| Line S00098 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | ns2684 |
Seq # *Modification Id* Act ----------------------------+ 02483 M02S00098.ns2684 ---| MJN ECP6 IF DISK ERROR 02484 M02S00099.ns2684 ---| LDD FN+4 02485 M02S00100.ns2684 ---| SHN 3 CHANGE CPU PRIORITY
| Line S00086 Modification History | |
|---|---|
M01 (Added by) | ns2684 |
Seq # *Modification Id* Act ----------------------------+ 02486 M01S00086.ns2684 +++| MJN ECP9 IF DISK ERROR
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | ns2731 |
Seq # *Modification Id* Act ----------------------------+ 02487 M01S00011.ns2731 +++| RJM SPR SET PRIORITY 02488 M01S00012.ns2731 +++| MJN ECP11 IF PRIORITY CHANGE ALLOWED 02489 M01S00013.ns2731 +++| ENDMS 02490 M01S00014.ns2731 +++| LJM ECP6 SET *INCORRECT ENTRY* 02491 M01S00015.ns2731 +++| 02492 M01S00016.ns2731 +++| ECP11 LDC BFMS+WLSF UPDATE ROLLOUT FILE 02493 M01S00017.ns2731 +++| RJM WDS 02494 M01S00018.ns2731 +++| ENDMS 02495 M01S00019.ns2731 +++| UJP ECP5 CLEAR EJT INTERLOCK 02496 M01S00020.ns2731 +++| 02497 M01S00021.ns2731 +++| 02498 M01S00022.ns2731 +++| ECPA VFD 1/1,5/JSNE,6/24D VERIFY THAT JSN-S MATCH 02499 M01S00023.ns2731 +++| VFD 6/36D,6/0 02500 M01S00024.ns2731 +++| VFD 36/0 02501 M01S00025.ns2731 +++| SPR SPACE 4,10 02502 M01S00026.ns2731 +++|** SPR - SET CPU PRIORITY OF ROLLED OUT JOB. 02503 M01S00027.ns2731 +++|* 02504 M01S00028.ns2731 +++|* ENTRY FIRST SECTOR OF CONTROL POINT AREA IN *BFMS*. 02505 M01S00029.ns2731 +++|* 02506 M01S00030.ns2731 +++|* EXIT (A) .LT. 0 IF NO ERROR. 02507 M01S00031.ns2731 +++| 02508 M01S00032.ns2731 +++| 02509 M01S00033.ns2731 +++| SPR SUBR ENTRY/EXIT
| Line S00087 Modification History | |
|---|---|
M01 (Added by) | ns2684 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02510 M02S00087.271l750 ---| LDM BFMS+2+5*JCIW+0 02511 M02S00088.271l750 ---| ERRPL JCIW-100 *JCIW* MUST BE IN FIRST SECTOR OF CPA 02512 M02S00089.271l750 ---| SHN 21-11 02513 M02S00090.271l750 ---| MJP ECP6 IF CURRENT PRIORITY GREATER THAN *LSCS* 02514 M02S00091.271l750 ---| SHN 11-21 02515 M02S00092.271l750 ---| LPC 200 RETAIN RECALL FLAG 02516 M02S00093.271l750 ---| LMD IR+4 SET NEW PRIORITY + *LFCS* FLAG
| Line S00101 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02517 M02S00101.271l750 ---| STM BFMS+2+5*JCIW+0
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02518 M01S00023.271l750 +++| LDM BFMS+2+5*CWQW+0 02519 M01S00024.271l750 +++| ERRPL CWQW-100 *CWQW* MUST BE IN FIRST SECTOR OF CPA 02520 M01S00025.271l750 +++| SHN -3
| Line S00026 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act ----------------------------+ 02521 M02S00026.ns2731 ---| ADC -200-LSCS-1 02522 M02S00027.ns2731 ---| PJP ECP6 IF CURRENT PRIORITY GREATER THAN *LSCS*
| Line S00034 Modification History | |
|---|---|
M01 (Added by) | ns2731 |
Seq # *Modification Id* Act ----------------------------+ 02523 M01S00034.ns2731 +++| ADC -200-LSCS 02524 M01S00035.ns2731 +++| PJN SPRX IF JOB AT SYSTEM PRIORITY 02525 M01S00036.ns2731 +++| 02526 M01S00037.ns2731 +++|* IF SETTING THE PRIORITY TO THE SERVICE CLASS VALUE, THE 02527 M01S00038.ns2731 +++|* SERVICE CLASS FLAG IN *CWQW* IS CLEARED SO THAT THE *JACM* 02528 M01S00039.ns2731 +++|* FUNCTION WILL RESET THE PRIORITY ON ROLLIN. 02529 M01S00040.ns2731 +++| 02530 M01S00041.ns2731 +++| LDM BFMS+2+5*CWQW+1 02531 M01S00042.ns2731 +++| LPC 2777 CLEAR SLICE AND SERVICE CLASS FLAGS 02532 M01S00043.ns2731 +++| LMC 4000 SET INCOMPLETE EXTENDED CPU SLICE 02533 M01S00044.ns2731 +++| STM BFMS+2+5*CWQW+1
| Line S00028 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02534 M01S00028.271l750 +++| LDD IR+4 SET NEW PRIORITY
| Line S00045 Modification History | |
|---|---|
M01 (Added by) | ns2731 |
Seq # *Modification Id* Act ----------------------------+ 02535 M01S00045.ns2731 +++| ZJN SPR1 IF SET PRIORITY TO SERVICE CLASS VALUE
| Line S00029 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02536 M01S00029.271l750 +++| SHN 3 02537 M01S00030.271l750 +++| ADC 2000 02538 M01S00031.271l750 +++| STM BFMS+2+5*CWQW+0
| Line S00032 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act ----------------------------+ 02539 M02S00032.ns2731 ---| LDM BFMS+2+5*CWQW+1 02540 M02S00033.ns2731 ---| LPC 3777 02541 M02S00034.ns2731 ---| LMC 4000 SET INCOMPLETE EXTENDED CPU SLICE 02542 M02S00035.ns2731 ---| STM BFMS+2+5*CWQW+1 02543 M02S00036.ns2731 ---| LDN ZERL CLEAR CPU SLICE ACCUMULATORS
| Line S00046 Modification History | |
|---|---|
M01 (Added by) | ns2731 |
Seq # *Modification Id* Act ----------------------------+ 02544 M01S00046.ns2731 +++| LDD TH SET PRIORITY NOT FROM SERVICE CLASS FLAG 02545 M01S00047.ns2731 +++| RAM BFMS+2+5*CWQW+1 02546 M01S00048.ns2731 +++| SPR1 LDN ZERL CLEAR CPU SLICE ACCUMULATORS
| Line S00037 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02547 M01S00037.271l750 +++| CRM BFMS+2+5*CSAW,ON 02548 M01S00038.271l750 +++| ERRPL CSAW-100 *CSAW* MUST BE IN FIRST SECTOR OF CPA
| Line S00102 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | ns2684 |
Seq # *Modification Id* Act ----------------------------+ 02549 M02S00102.ns2684 ---| ERRPL JCIW-100 *JCIW* MUST BE IN FIRST SECTOR OF CPA
| Line S00103 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act ----------------------------+ 02550 M02S00103.ns2731 ---| LDC BFMS+WLSF UPDATE ROLLOUT FILE 02551 M02S00104.ns2731 ---| RJM WDS 02552 M02S00105.ns2731 ---| ENDMS
| Line S00106 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | ns2684 |
M03 (Removed by) | ns2731 |
Seq # *Modification Id* Act ----------------------------+ 02553 M03S00106.ns2731 ---| ECP5 UJN ECP3 CLEAR EJT INTERLOCK 02554 M03S00107.ns2731 ---| 02555 M03S00108.ns2731 ---| ECP6 LDN 1 SET ERROR RESPONSE FOR *DSD* 02556 M03S00109.ns2731 ---| RJM SRD 02557 M03S00110.ns2731 ---| UJN ECP3 CLEAR EJT INTERLOCK
| Line S00094 Modification History | |
|---|---|
M01 (Added by) | ns2684 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act ----------------------------+ 02558 M02S00094.ns2731 ---| UJP ECP5 CLEAR EJT INTERLOCK 02559 M02S00095.ns2731 ---| 02560 M02S00096.ns2731 ---| 02561 M02S00097.ns2731 ---| ECPA VFD 1/1,5/JSNE,6/24D VERIFY THAT JSN-S MATCH 02562 M02S00098.ns2731 ---| VFD 6/36D,6/0 02563 M02S00099.ns2731 ---| VFD 36/0
| Line S00049 Modification History | |
|---|---|
M01 (Added by) | ns2731 |
Seq # *Modification Id* Act ----------------------------+ 02564 M01S00049.ns2731 +++| LCN 1 SET NO ERROR 02565 M01S00050.ns2731 +++| UJN SPRX RETURN
| Line S00111 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02566 M01S00111.271l716 +++| SPACE 4,10
| Line S02107 Modification History | |
|---|---|
M01 (Removed by) | 1ds21 |
Seq # *Modification Id* Act ----------------------------+ 02567 M01S02107.1ds21 ---|* FOLLOWING ROUTINES CAN NOT USE BUFFER *BUF*.
| Line S00074 Modification History | |
|---|---|
M01 (Added by) | 1ds21 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02568 M02S00074.271l716 ---|* FOLLOWING ROUTINES CAN NOT USE BUFFER *BUF* OR *BFMS*.
| Line S00112 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02569 M01S00112.271l716 +++|* THE FOLLOWING ROUTINES CANNOT USE BUFFERS *BUF* OR *BFMS*. 02570 M00S02108.1ds +++| 02571 M00S02109.1ds +++| 02572 M00S02110.1ds +++| ERRNG BFMS-* OVERFLOW INTO BUFFER
| Line S02111 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02573 M01S02111.271l716 ---| 02574 M01S02112.271l716 ---|
| Line S02113 Modification History | |
|---|---|
M01 (Removed by) | 1ds21 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02575 M02S02113.271l716 ---|* FOLLOWING ROUTINES DO NOT USE *BFMS*.
| Line S00075 Modification History | |
|---|---|
M01 (Added by) | 1ds21 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02576 M02S00075.271l716 ---| QUAL OVLNB
| Line S02114 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02577 M01S02114.271l716 ---| ROL SPACE 4,10 02578 M01S02115.271l716 ---|*** FUNCTION ROLF - ROLLOUT JOB. 02579 M01S02116.271l716 ---|* 02580 M01S02117.271l716 ---|* ENTRY (KBCML) = 24/JSN,12/TIME 02581 M01S02118.271l716 ---|* JSN = JSN OF JOB TO BE ROLLED. 02582 M01S02119.271l716 ---|* TIME = NUMBER OF SCHEDULER CYCLES. 02583 M01S02120.271l716 ---| 02584 M01S02121.271l716 ---| 02585 M01S02122.271l716 ---| ROL ENTRY ENTRY/EXIT 02586 M01S02123.271l716 ---| LDC /1DS/DSDL+/1DS/KBCML READ SPECIAL PARAMETER WORD 02587 M01S02124.271l716 ---| CRD FN 02588 M01S02125.271l716 ---| LDD FN STORE JSN IN *UTEM* BLOCK 02589 M01S02126.271l716 ---| STM ROLA+3 02590 M01S02127.271l716 ---| LDD FN+1 02591 M01S02128.271l716 ---| STM ROLA+4 02592 M01S02129.271l716 ---| LDD CP GET EJT ORDINAL 02593 M01S02130.271l716 ---| ADN TFSW 02594 M01S02131.271l716 ---| CRD CM 02595 M01S02132.271l716 ---| SFA EJT,CM GET ABSOLUTE ADDRESS OF EJT ENTRY 02596 M01S02133.271l716 ---| STD CM+4 02597 M01S02134.271l716 ---| SHN -14 02598 M01S02135.271l716 ---| STD CM+3 02599 M01S02136.271l716 ---| LDN 2 SET WORD COUNT 02600 M01S02137.271l716 ---| STD CM+1 02601 M01S02138.271l716 ---| LDN 0 02602 M01S02139.271l716 ---| STD CM+2 02603 M01S02140.271l716 ---| LDD MA WRITE *UTEM* REQUEST WORDS 02604 M01S02141.271l716 ---| CWM ROLA,CM+1 02605 M01S02142.271l716 ---| MONITOR UTEM 02606 M01S02143.271l716 ---| LDD CM+1 02607 M01S02144.271l716 ---| ZJN ROL1 IF VERIFICATION PASSED 02608 M01S02145.271l716 ---| LJM ROLX RETURN 02609 M01S02146.271l716 ---| 02610 M01S02147.271l716 ---| ROL1 LDD CP 02611 M01S02148.271l716 ---| ADN TERW 02612 M01S02149.271l716 ---| CRD CM 02613 M01S02150.271l716 ---| 02614 M01S02151.271l716 ---|* SET *TERW* BITS 29-21 WITH ROLLOUT TIME. 02615 M01S02152.271l716 ---| 02616 M01S02153.271l716 ---| LDD FN+2 UPDATE TIME FIELD 02617 M01S02154.271l716 ---| LPN 7 02618 M01S02155.271l716 ---| SHN 13-2 02619 M01S02156.271l716 ---| STD T1 02620 M01S02157.271l716 ---| LDD FN+2 02621 M01S02158.271l716 ---| SHN -3 02622 M01S02159.271l716 ---| STD T0 02623 M01S02160.271l716 ---| LDD CM+2 SET BITS 29-24 02624 M01S02161.271l716 ---| SCN 77 02625 M01S02162.271l716 ---| ADD T0 02626 M01S02163.271l716 ---| STD CM+2 02627 M01S02164.271l716 ---| LDD CM+3 SET BITS 23-21 02628 M01S02165.271l716 ---| LPC 777 02629 M01S02166.271l716 ---| ADD T1 02630 M01S02167.271l716 ---| STD CM+3 02631 M01S02168.271l716 ---| LDD CP 02632 M01S02169.271l716 ---| ADN TERW 02633 M01S02170.271l716 ---| CWD CM 02634 M01S02171.271l716 ---| LDN ZERL 02635 M01S02172.271l716 ---| CRD CM 02636 M01S02173.271l716 ---| LDN ROTE SET TIMED/EVENT 02637 M01S02174.271l716 ---| STD CM+1 02638 M01S02175.271l716 ---| MONITOR ROCM 02639 M01S02176.271l716 ---| LJM ROLX RETURN 02640 M01S02177.271l716 ---| 02641 M01S02178.271l716 ---| 02642 M01S02179.271l716 ---|* *UTEM* REQUEST BLOCK. 02643 M01S02180.271l716 ---| 02644 M01S02181.271l716 ---| ROLA VFD 1/1,5/JSNE,6/24D VERIFY JSN-S MATCH 02645 M01S02182.271l716 ---| VFD 6/36D,6/0 02646 M01S02183.271l716 ---| CON 0 02647 M01S02184.271l716 ---| CON 0 02648 M01S02185.271l716 ---| CON 0 02649 M01S02186.271l716 ---| 02650 M01S02187.271l716 ---| VFD 1/0,5/SCLE,6/2 CLEAR *ROLLOUT* AND *ROLLIN* BITS 02651 M01S02188.271l716 ---| VFD 6/52D,6/0 02652 M01S02189.271l716 ---| CON 0 02653 M01S02190.271l716 ---| CON 0 02654 M01S02191.271l716 ---| CON 0 02655 M00S02192.1ds +++| AEJ SPACE 4,10 02656 M00S02193.1ds +++|*** FUNCTION AEJF - ASSIGN EQUIPMENT TO JOB. 02657 M00S02194.1ds +++|* 02658 M00S02195.1ds +++|* ENTRY (IR+3) = EQUIPMENT. 02659 M00S02196.1ds +++| 02660 M00S02197.1ds +++| 02661 M00S02198.1ds +++| AEJ ENTRY ENTRY/EXIT 02662 M00S02199.1ds +++| LDD CP SET OPERATOR ASSIGNED EQUIPMENT 02663 M00S02200.1ds +++| ADN OAEW 02664 M00S02201.1ds +++| CRD CM 02665 M00S02202.1ds +++| LDD IR+3 02666 M00S02203.1ds +++| STD CM+4 02667 M00S02204.1ds +++| LDD CP 02668 M00S02205.1ds +++| ADN OAEW 02669 M00S02206.1ds +++| CWD CM 02670 M00S02207.1ds +++| UJN AEJX RETURN
| Line S02208 Modification History | |
|---|---|
M01 (Removed by) | 1ds21 |
Seq # *Modification Id* Act ----------------------------+ 02671 M01S02208.1ds21 ---| DIS SPACE 4,10 02672 M01S02209.1ds21 ---|*** FUNCTION DISF - CALL DIS TO JOB. 02673 M01S02210.1ds21 ---| 02674 M01S02211.1ds21 ---| 02675 M01S02212.1ds21 ---| DIS ENTRY ENTRY/EXIT 02676 M01S02213.1ds21 ---| RJM LKC LOG COMMAND 02677 M01S02214.1ds21 ---| LDC 2RDI BUILD INPUT REGISTER 02678 M01S02215.1ds21 ---| STD IR 02679 M01S02216.1ds21 ---| LDD CP 02680 M01S02217.1ds21 ---| SHN -7 02681 M01S02218.1ds21 ---| LMC 2L S 02682 M01S02219.1ds21 ---| STD IR+1 02683 M01S02220.1ds21 ---| LDN 0 02684 M01S02221.1ds21 ---| STD IR+2 02685 M01S02222.1ds21 ---| STD IR+3 02686 M01S02223.1ds21 ---| LDC 4000 SET DIRECT CALL 02687 M01S02224.1ds21 ---| STD IR+4 02688 M01S02225.1ds21 ---| LDD MA ENTER *DIS* IN RECALL STACK 02689 M01S02226.1ds21 ---| CWD IR 02690 M01S02227.1ds21 ---| LDN ZERL 02691 M01S02228.1ds21 ---| CRD CM 02692 M01S02229.1ds21 ---| MONITOR RECM 02693 M01S02230.1ds21 ---| LJM PPR EXIT TO PP RESIDENT 02694 M00S02231.1ds +++| CKP SPACE 4,10 02695 M00S02232.1ds +++|*** FUNCTION CKPF - CALL CHECKPOINT TO JOB. 02696 M00S02233.1ds +++| 02697 M00S02234.1ds +++| 02698 M00S02235.1ds +++| CKP ENTRY ENTRY/EXIT 02699 M00S02236.1ds +++| LDN 0 02700 M00S02237.1ds +++| STD CM+1 02701 M00S02238.1ds +++| MONITOR DCPM GET RID OF CP ACTIVITY 02702 M00S02239.1ds +++| LDD CM+1 SAVE STATUS 02703 M00S02240.1ds +++| STD T1 02704 M00S02241.1ds +++| CKP1 PAUSE 02705 M00S02242.1ds +++| LDD CM+1 02706 M00S02243.1ds +++| NJN CKPX IF ERROR 02707 M00S02244.1ds +++| LDD CM+2 02708 M00S02245.1ds +++| LPN 1 02709 M00S02246.1ds +++| NJN CKP3 IF ROLLOUT REQUESTED 02710 M00S02247.1ds +++| LDD CM CHECK PP ACTIVITY 02711 M00S02248.1ds +++| LPN 36 IGNORE THIS PP 02712 M00S02249.1ds +++| ZJN CKP2 IF NO PP ACTIVITY 02713 M00S02250.1ds +++| LDN 77 02714 M00S02251.1ds +++| SBN 1 02715 M00S02252.1ds +++| NJN *-1 IF DELAY NOT FINISHED 02716 M00S02253.1ds +++| UJN CKP1 LOOP 02717 M00S02254.1ds +++| 02718 M00S02255.1ds +++| CKP2 LDD CM+4 02719 M00S02256.1ds +++| SHN -4 02720 M00S02257.1ds +++| NJN CKP3 IF PP RECALL REQUESTS 02721 M00S02258.1ds +++| LDD CP 02722 M00S02259.1ds +++| ADN JCIW 02723 M00S02260.1ds +++| CRD CN 02724 M00S02261.1ds +++| ADK TFSW-JCIW 02725 M00S02262.1ds +++| CRD AB 02726 M00S02263.1ds +++| ADK SPCW-TFSW 02727 M00S02264.1ds +++| CRD CM 02728 M00S02265.1ds +++| LDD CN+3 02729 M00S02266.1ds +++| LPC 600 02730 M00S02267.1ds +++| NJN CKP3 IF USER FILE PRIVACY 02731 M00S02268.1ds +++| LDD CM 02732 M00S02269.1ds +++| CKP3 NJN CKP4 IF *SPCW* BUSY 02733 M00S02270.1ds +++| SFA EJT,AB CHECK FOR SCP CONNECTION 02734 M00S02271.1ds +++| ADK JSNE 02735 M00S02272.1ds +++| CRD AB 02736 M00S02273.1ds +++| LDD AB+4 02737 M00S02274.1ds +++| SHN 21-13 02738 M00S02275.1ds +++| MJN CKP4 IF JOB IS CONNECTED TO A SCP 02739 M00S02276.1ds +++| LDN ZERL 02740 M00S02277.1ds +++| CRD CN 02741 M00S02278.1ds +++| CRD CM 02742 M00S02279.1ds +++| LDC 2RCK BUILD *SPCW* CALL 02743 M00S02280.1ds +++| STD CN 02744 M00S02281.1ds +++| LDC 2L P+20 02745 M00S02282.1ds +++| STD CN+1 02746 M00S02283.1ds +++| LDD CP STORE SPECIAL REQUEST 02747 M00S02284.1ds +++| ADC SPCW 02748 M00S02285.1ds +++| CWD CN 02749 M00S02286.1ds +++| MONITOR ROCM SET ROLLOUT FLAG 02750 M00S02287.1ds +++| CKP4 LDD T1 02751 M00S02288.1ds +++| ZJN CKP6 IF NO ORIGINAL STATUS 02752 M00S02289.1ds +++| LDD RA CHECK SYSTEM REQUEST 02753 M00S02290.1ds +++| SHN 6 02754 M00S02291.1ds +++| ADN 1 02755 M00S02292.1ds +++| CRD CM 02756 M00S02293.1ds +++| LDD CM 02757 M00S02294.1ds +++| NJN CKP5 IF CALL 02758 M00S02295.1ds +++| LDN ZERL CLEAR SYSTEM REQUEST 02759 M00S02296.1ds +++| CRD CM 02760 M00S02297.1ds +++| LDD RA 02761 M00S02298.1ds +++| SHN 6 02762 M00S02299.1ds +++| ADN 1 02763 M00S02300.1ds +++| CWD CM 02764 M00S02301.1ds +++| CKP5 LDD CP INDICATE CPU STATUS AT ROLLOUT 02765 M00S02302.1ds +++| ADN STSW 02766 M00S02303.1ds +++| CRD CM 02767 M00S02304.1ds +++| LDN 2 02768 M00S02305.1ds +++| RAD CM+2 02769 M00S02306.1ds +++| LDD CP 02770 M00S02307.1ds +++| ADN STSW 02771 M00S02308.1ds +++| CWD CM 02772 M00S02309.1ds +++| CKP6 LJM CKPX RETURN
| Line S00113 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02773 M01S00113.271l716 +++| CLR SPACE 4,10 02774 M01S00114.271l716 +++|*** FUNCTION CLRF - SET/CLEAR PAUSE BIT. 02775 M01S00115.271l716 +++|* 02776 M01S00116.271l716 +++|* ENTRY (IR+3) = 0 IF CLEARING PAUSE BIT. 02777 M01S00117.271l716 +++|* = 1 IF SETTING PAUSE BIT. 02778 M01S00118.271l716 +++|* (IR+4) = 6/ KEYBOARD BUFFER OFFSET, 6/. 02779 M01S00119.271l716 +++|* 02780 M01S00120.271l716 +++|* EXIT TO *ISC* IF JOB NOT AT CP. 02781 M01S00121.271l716 +++| 02782 M01S00122.271l716 +++| 02783 M01S00123.271l716 +++| CLR4 LDM CLR SET RETURN ADDRESS 02784 M01S00124.271l716 +++| STM ISC 02785 M01S00125.271l716 +++| LJM ISC+1 INITIATE JOB CALL AND EXIT 02786 M01S00126.271l716 +++| 02787 M01S00127.271l716 +++| CLR ENTRY ENTRY/EXIT 02788 M01S00128.271l716 +++| LDC /1DS/DSDL+/1DS/KBCML FETCH PARAMETER WORD 02789 M01S00129.271l716 +++| CRD FN 02790 M01S00130.271l716 +++| LDN ERLN/10000 SET DEFAULT DAYFILE 02791 M01S00131.271l716 +++| STD T4 02792 M01S00132.271l716 +++| LDD FN+1 02793 M01S00133.271l716 +++| LPN 77 02794 M01S00134.271l716 +++| NJN CLR1 IF NOT JSN FOR SUBSYSTEM 02795 M01S00135.271l716 +++| LDN 1R 02796 M01S00136.271l716 +++| RAD FN+1 02797 M01S00137.271l716 +++| CLR1 LDD FN+2 02798 M01S00138.271l716 +++| NJN CLRX IF INCORRECT JSN 02799 M01S00139.271l716 +++| RJM SSJ SEARCH FOR SPECIFIED JOB 02800 M01S00140.271l716 +++| NJN CLR4 IF JOB NOT FOUND 02801 M01S00141.271l716 +++| CLR2 LDD CP 02802 M01S00142.271l716 +++| ADN SNSW 02803 M01S00143.271l716 +++| CRD CM 02804 M01S00144.271l716 +++| ADN MS2W-SNSW 02805 M01S00145.271l716 +++| CRD CN 02806 M01S00146.271l716 +++| LDN 0 CLEAR MESSAGE 02807 M01S00147.271l716 +++| STD CN 02808 M01S00148.271l716 +++| LDD CM+3 SET/CLEAR PAUSE BIT IN CPA 02809 M01S00149.271l716 +++| SCN 3 02810 M01S00150.271l716 +++| LMD IR+3 02811 M01S00151.271l716 +++| STD CM+3 02812 M01S00152.271l716 +++| LDD CP 02813 M01S00153.271l716 +++| ADN SNSW 02814 M01S00154.271l716 +++| CWD CM 02815 M01S00155.271l716 +++| ADN MS2W-SNSW 02816 M01S00156.271l716 +++| CWD CN 02817 M01S00157.271l716 +++| LDD FL 02818 M01S00158.271l716 +++| ZJN CLR3 IF NO FIELD LENGTH 02819 M01S00159.271l716 +++| LDD RA 02820 M01S00160.271l716 +++| SHN 6 02821 M01S00161.271l716 +++| CRD FS 02822 M01S00162.271l716 +++| LDD FS+3 SET/CLEAR PAUSE FLAGS IN (RA) 02823 M01S00163.271l716 +++| SCN 3 02824 M01S00164.271l716 +++| LMD IR+3 02825 M01S00165.271l716 +++| STD FS+3 02826 M01S00166.271l716 +++| LDD RA STORE (RA) 02827 M01S00167.271l716 +++| SHN 6 02828 M01S00168.271l716 +++| CWD FS 02829 M01S00169.271l716 +++| CLR3 LDD T4 ISSUE DAYFILE MESSAGE 02830 M01S00170.271l716 +++| SHN 14 02831 M01S00171.271l716 +++| ADM CLRA,IR+3 02832 M01S00172.271l716 +++| RJM DFM 02833 M01S00173.271l716 +++| LJM CLRX RETURN 02834 M01S00174.271l716 +++| 02835 M01S00175.271l716 +++| 02836 M01S00176.271l716 +++| CLRA CON MSGA 02837 M01S00177.271l716 +++| CON MSGB 02838 M01S00178.271l716 +++| TITLE OVERLAYABLE SUBROUTINES. 02839 M00S02310.1ds +++| CCP SPACE 4,15 02840 M00S02311.1ds +++|** CCP - CHANGE CONTROL POINT. 02841 M00S02312.1ds +++|* 02842 M00S02313.1ds +++|* ENTRY (T6) = CONTROL POINT NUMBER. 02843 M00S02314.1ds +++|* (T7) = SYSTEM CONTROL POINT NUMBER. 02844 M00S02315.1ds +++|* 02845 M00S02316.1ds +++|* EXIT (A) = 0 IF CHANGE MADE. 02846 M00S02317.1ds +++|*
| Line S02318 Modification History | |
|---|---|
M01 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02847 M01S02318.273l780 ---|* USES T5.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02848 M01S00001.273l780 +++|* USES CM+1, T5. 02849 M00S02319.1ds +++|* 02850 M00S02320.1ds +++|* CALLS CSJ. 02851 M00S02321.1ds +++|*
| Line S02322 Modification History | |
|---|---|
M01 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02852 M01S02322.273l780 ---|* MACROS DELAY, MONITOR, PAUSE.
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02853 M01S00002.273l780 +++|* MACROS DELAY, MONITOR. 02854 M00S02323.1ds +++| 02855 M00S02324.1ds +++|
| Line S02325 Modification History | |
|---|---|
M01 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02856 M01S02325.273l780 ---| CCP2 LDD T7 RESET SYSTEM CP ADDRESS 02857 M01S02326.273l780 ---| SHN 7 02858 M01S02327.273l780 ---| STD CP 02859 M01S02328.273l780 ---| PAUSE NE RESET RA AND FL 02860 M01S02329.273l780 ---| DELAY
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02861 M01S00003.273l780 +++| CCP2 DELAY 02862 M00S02330.1ds +++| SOD T5 02863 M00S02331.1ds +++| PJN CCP1 IF RETRY COUNT NOT EXHAUSTED 02864 M00S02332.1ds +++| 02865 M00S02333.1ds +++| CCP SUBR ENTRY/EXIT 02866 M00S02334.1ds +++| LDN 10-1 SET RETRY COUNT 02867 M00S02335.1ds +++| STD T5 02868 M00S02336.1ds +++| CCP1 LDD T6 CHANGE TO REQUESTED CP
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | ns2765 |
Seq # *Modification Id* Act ----------------------------+ 02869 M01S00007.ns2765 +++| ADD TH SET REJECT ON STORAGE MOVE 02870 M01S00008.ns2765 +++| ERRNZ RCMS-1000 02871 M00S02337.1ds +++| STD CM+1
| Line S02338 Modification History | |
|---|---|
M01 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02872 M01S02338.273l780 ---| SHN 7 SET CP ADDRESS 02873 M01S02339.273l780 ---| STD CP 02874 M00S02340.1ds +++| MONITOR CCAM 02875 M00S02341.1ds +++| LDD CM+1 02876 M00S02342.1ds +++| NJN CCP2 IF CHANGE REJECTED 02877 M00S02343.1ds +++| RJM CSJ RECHECK JSN 02878 M00S02344.1ds +++| ZJN CCPX IF JOB STILL AT CP 02879 M00S02345.1ds +++| LDD T7 02880 M00S02346.1ds +++| STD CM+1
| Line S02347 Modification History | |
|---|---|
M01 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02881 M01S02347.273l780 ---| SHN 7 02882 M01S02348.273l780 ---| STD CP 02883 M00S02349.1ds +++| MONITOR CCAM MOVE BACK TO SYSTEM CP 02884 M00S02350.1ds +++| LDN 1 02885 M00S02351.1ds +++| UJN CCPX RETURN 02886 M00S02352.1ds +++| CSJ SPACE 4,10 02887 M00S02353.1ds +++|** CSJ - CHECK CP FOR SPECIFIED JOB. 02888 M00S02354.1ds +++|* 02889 M00S02355.1ds +++|* ENTRY (T6) = CP NUMBER. 02890 M00S02356.1ds +++|* (FN - FN+1) = JSN OF SPECIFIED JOB. 02891 M00S02357.1ds +++|* 02892 M00S02358.1ds +++|* EXIT (A) = 0 IF JOB EXECUTING AT CP. 02893 M00S02359.1ds +++|* 02894 M00S02360.1ds +++|* USES AB - AB+4, CM - CM+4. 02895 M00S02361.1ds +++|* 02896 M00S02362.1ds +++|* MACROS SFA. 02897 M00S02363.1ds +++| 02898 M00S02364.1ds +++| 02899 M00S02365.1ds +++| CSJ SUBR ENTRY/EXIT 02900 M00S02366.1ds +++| LDD T6 FETCH EJT ORDINAL 02901 M00S02367.1ds +++| SHN 7 02902 M00S02368.1ds +++| ADN TFSW 02903 M00S02369.1ds +++| CRD CM 02904 M00S02370.1ds +++| LDD CM 02905 M00S02371.1ds +++| ZJN CSJ1 IF CP INACTIVE 02906 M00S02372.1ds +++| SFA EJT 02907 M00S02373.1ds +++| ADK JSNE READ EJT ENTRY 02908 M00S02374.1ds +++| CRD AB 02909 M00S02375.1ds +++| LDD AB+1 COMPARE JSN 02910 M00S02376.1ds +++| LMD FN+1 02911 M00S02377.1ds +++| NJN CSJX IF NO MATCH 02912 M00S02378.1ds +++| LDD AB 02913 M00S02379.1ds +++| CSJ1 LMD FN 02914 M00S02380.1ds +++| NJN CSJX IF NO MATCH 02915 M00S02381.1ds +++| LDD AB+4 02916 M00S02382.1ds +++| LPN 76 02917 M00S02383.1ds +++| LMN EXJS*2 02918 M00S02384.1ds +++| UJN CSJX RETURN 02919 M00S02385.1ds +++| SSJ SPACE 4,10 02920 M00S02386.1ds +++|** SEJ - SEARCH CP-S FOR SPECIFIED JOB. 02921 M00S02387.1ds +++|* 02922 M00S02388.1ds +++|* ENTRY (FN - FN+1) = JSN OF SPECIFIED JOB. 02923 M00S02389.1ds +++|* 02924 M00S02390.1ds +++|* EXIT (A) = 0 IF SPECIFIED JOB ACTIVE AT CP. 02925 M00S02391.1ds +++|* (T4) = MESSAGE OFFSET + DAYFILE OPTION. 02926 M00S02392.1ds +++|* 02927 M00S02393.1ds +++|* USES T6, T7. 02928 M00S02394.1ds +++|* 02929 M00S02395.1ds +++|* CALLS CCP, CSJ. 02930 M00S02396.1ds +++| 02931 M00S02397.1ds +++| 02932 M00S02398.1ds +++| SSJ2 LDD FN 02933 M00S02399.1ds +++| LMC 2RSY 02934 M00S02400.1ds +++| NJN SSJX IF NOT SYSTEM JSN 02935 M00S02401.1ds +++| LDD FN+1 02936 M00S02402.1ds +++| LMC 2RS 02937 M00S02403.1ds +++| 02938 M00S02404.1ds +++| SSJ SUBR ENTRY/EXIT 02939 M00S02405.1ds +++| LDN 0 02940 M00S02406.1ds +++| STD T6 02941 M00S02407.1ds +++| LDD CP SET SYSTEM CP NUMBER 02942 M00S02408.1ds +++| SHN -7 02943 M00S02409.1ds +++| STD T7 02944 M00S02410.1ds +++| SSJ1 AOD T6 ADVANCE CP 02945 M00S02411.1ds +++| LMD T7 02946 M00S02412.1ds +++| ZJN SSJ2 IF ALL CP-S CHECKED 02947 M00S02413.1ds +++| RJM CSJ CHECK FOR SPECIFIED JOB 02948 M00S02414.1ds +++| NJN SSJ1 IF JOB NOT ACTIVE AT THIS CP 02949 M00S02415.1ds +++| LDC 2S6 CHANGE DAYFILE/MESSAGE OFFSET 02950 M00S02416.1ds +++| STD T4 02951 M00S02417.1ds +++| RJM CCP CHANGE TO CP 02952 M00S02418.1ds +++| UJN SSJX RETURN 02953 M00S02419.1ds +++| SPACE 4,10 02954 M00S02420.1ds +++|** OVERLAID MESSAGES. 02955 M00S02421.1ds +++| 02956 M00S02422.1ds +++| 02957 M00S02423.1ds +++| MSGA DATA C*DS, GO.* 02958 M00S02424.1ds +++| MSGB DATA C*DS, PAUSE.* 02959 M00S02425.1ds +++| TITLE PRESET.
| Line S00076 Modification History | |
|---|---|
M01 (Added by) | 1ds21 |
Seq # *Modification Id* Act ----------------------------+ 02960 M01S00076.1ds21 +++| QUAL PRESET 02961 M00S02426.1ds +++| PRS SPACE 4,10 02962 M00S02427.1ds +++|** PRS - PRESET. 02963 M00S02428.1ds +++|* 02964 M00S02429.1ds +++|* EXIT (IDSA) = FUNCTION PROCESSOR ADDRESS. 02965 M00S02430.1ds +++|* (IDSC) = ORIGINAL (IR+2). 02966 M00S02431.1ds +++|* (BA) = BUFFER ADDRESS. 02967 M00S02432.1ds +++|* (CA) = COMMAND ADDRESS. 02968 M00S02433.1ds +++|* (FG) = CPU FLAGS. 02969 M00S02434.1ds +++|* (JF) = DEFAULT FIELD LENGTH. 02970 M00S02435.1ds +++|* (CP) = CONTROL POINT ADDRESS.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 1ds25 |
Seq # *Modification Id* Act ----------------------------+ 02971 M01S00001.1ds25 +++|* (QA) = 0. 02972 M00S02436.1ds +++|* (IR+2) = REQ. 02973 M00S02437.1ds +++|* 02974 M00S02438.1ds +++|* CALLS IFP. 02975 M00S02439.1ds +++|*
| Line S02440 Modification History | |
|---|---|
M01 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02976 M01S02440.273l780 ---|* MACROS MONITOR, PAUSE, SFA.
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02977 M01S00004.273l780 +++|* MACROS DELAY, MONITOR, SFA. 02978 M00S02441.1ds +++| 02979 M00S02442.1ds +++| 02980 M00S02443.1ds +++| PRS SUBR ENTRY/EXIT
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 1ds25 |
Seq # *Modification Id* Act ----------------------------+ 02981 M01S00002.1ds25 +++| LDN 0 PRESET DIRECT CELLS 02982 M01S00003.1ds25 +++| STD QA
| Line S02444 Modification History | |
|---|---|
M01 (Removed by) | 1ds21 |
Seq # *Modification Id* Act ----------------------------+ 02983 M01S02444.1ds21 ---| LDC BUF SET SECTOR BUFFER ADDRESS
| Line S00077 Modification History | |
|---|---|
M01 (Added by) | 1ds21 |
Seq # *Modification Id* Act ----------------------------+ 02984 M01S00077.1ds21 +++| LDC /OVERLAY/BUF SET SECTOR BUFFER ADDRESS 02985 M00S02445.1ds +++| STD BA 02986 M00S02446.1ds +++| ADN 2 SET COMMAND ADDRESS 02987 M00S02447.1ds +++| STD CA 02988 M00S02448.1ds +++| LDN CPMR SET RETRY COUNT 02989 M00S02449.1ds +++| STD S1 02990 M00S02450.1ds +++| LDC DFFL/100 SET DEFAULT FIELD LENGTH 02991 M00S02451.1ds +++| STD JF 02992 M00S02452.1ds +++| LDN 5 SET CONSTANT FIVE 02993 M00S02453.1ds +++| STD FV
| Line S02454 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02994 M01S02454.271l716 ---| LDD IR+2 02995 M01S02455.271l716 ---| STM IDSC SAVE PARAMETER
| Line S00179 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02996 M01S00179.271l716 +++| LDN NCPL GET NUMBER OF CP-S 02997 M01S00180.271l716 +++| CRD CM 02998 M01S00181.271l716 +++| ADK MABL-NCPL FETCH HARDWARE OPTIONS 02999 M01S00182.271l716 +++| CRD CN 03000 M01S00183.271l716 +++| ADK PCPP-MABL GET FWA OF PCP AREA 03001 M01S00184.271l716 +++| CRD FS 03002 M01S00185.271l716 +++| AOD CM+1 SET SYSTEM CP NUMBER 03003 M01S00186.271l716 +++| STD NC 03004 M01S00187.271l716 +++| LDD FS+3 03005 M01S00188.271l716 +++| RAM SCPA-1 03006 M01S00189.271l716 +++| LDD FS+4 SET PCP AREA BASE ADDRESS 03007 M01S00190.271l716 +++| STM SCPA 03008 M01S00191.271l716 +++| LDD IR+2 SAVE PARAMETERS 03009 M01S00192.271l716 +++| STM IDSC 03010 M00S02456.1ds +++| LPN 77 GET FUNCTION CODE 03011 M00S02457.1ds +++| STD IR+2 03012 M00S02458.1ds +++| SBN /1DS/MAXF 03013 M00S02459.1ds +++| PJN PRS3 IF INCORRECT FUNCTION 03014 M00S02460.1ds +++| RJM IFP INITIALIZE *SFA* MACRO
| Line S02461 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03015 M01S02461.271l716 ---| LDK MABL GET MAINFRAME TYPE 03016 M01S02462.271l716 ---| CRD CN 03017 M00S02463.1ds +++| LDD CN+1 03018 M00S02464.1ds +++| STD FG 03019 M00S02465.1ds +++| SHN -11 03020 M00S02466.1ds +++| LMN 7 03021 M00S02467.1ds +++| NJN PRS1 IF NOT A CYBER 176
| Line S02468 Modification History | |
|---|---|
M01 (Removed by) | 1ds21 |
Seq # *Modification Id* Act ----------------------------+ 03022 M01S02468.1ds21 ---| AOM ICJF+2
| Line S00078 Modification History | |
|---|---|
M01 (Added by) | 1ds21 |
Seq # *Modification Id* Act ----------------------------+ 03023 M01S00078.1ds21 +++| AOM /OVERLAY/ICJF+2 03024 M00S02469.1ds +++| PRS1 LDM IDSC 03025 M00S02470.1ds +++| SHN 21-12
| Line S02471 Modification History | |
|---|---|
M01 (Removed by) | ns2765 |
Seq # *Modification Id* Act ----------------------------+ 03026 M01S02471.ns2765 ---| MJN PRS2 IF CP HAS MOVED
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | ns2765 |
Seq # *Modification Id* Act ----------------------------+ 03027 M01S00009.ns2765 +++| MJN PRS2 IF CP CHANGE REQUIRED 03028 M00S02472.1ds +++| LJM PRS7 PROCESS FUNCTION 03029 M00S02473.1ds +++| 03030 M00S02474.1ds +++| PRS2 LDD IR+4 SET CP NUMBER 03031 M00S02475.1ds +++| LPN 37 03032 M00S02476.1ds +++| STD TN 03033 M00S02477.1ds +++| NJN PRS4 IF ASSIGNED 03034 M00S02478.1ds +++| PRS3 LJM IDS2 DROP PP 03035 M00S02479.1ds +++|
| Line S02480 Modification History | |
|---|---|
M01 (Removed by) | ns2765 |
Seq # *Modification Id* Act ----------------------------+ 03036 M01S02480.ns2765 ---| PRS4 STD CM+1
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | ns2765 |
Seq # *Modification Id* Act ----------------------------+ 03037 M01S00010.ns2765 +++| PRS4 ADD TH SET REJECT ON STORAGE MOVE 03038 M01S00011.ns2765 +++| ERRNZ RCMS-1000 03039 M01S00012.ns2765 +++| STD CM+1 03040 M01S00013.ns2765 +++| LPN 77 03041 M00S02481.1ds +++| SHN 7
| Line S02482 Modification History | |
|---|---|
M01 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 03042 M01S02482.273l780 ---| STD CP 03043 M00S02483.1ds +++| ADN TFSW READ EJTO AND JSN 03044 M00S02484.1ds +++| CRD CN 03045 M00S02485.1ds +++| LDD CN 03046 M00S02486.1ds +++| ZJN PRS3 IF NO EJTO 03047 M00S02487.1ds +++| SFA EJT READ EJT ENTRY 03048 M00S02488.1ds +++| CRD CN 03049 M00S02489.1ds +++| LDD CN+4 CHECK JOB STATUS 03050 M00S02490.1ds +++| LPN 76 03051 M00S02491.1ds +++| LMN EXJS*2 03052 M00S02492.1ds +++| NJN PRS5 IF JOB NOT AT CONTROL POINT 03053 M00S02493.1ds +++| MONITOR CCAM MOVE TO USER-S CP 03054 M00S02494.1ds +++| LDD CM+1 03055 M00S02495.1ds +++| ZJN PRS6 IF MOVE SUCCESSFUL 03056 M00S02496.1ds +++| DELAY 4*10 DELAY FOR 4 MILLISECONDS 03057 M00S02497.1ds +++| SOD S1 03058 M00S02498.1ds +++| ZJN PRS5 IF RETRY COMPLETE 03059 M00S02499.1ds +++| LDD TN RESET CONTROL POINT NUMBER 03060 M00S02500.1ds +++| UJN PRS4 RETRY CONTROL POINT MOVE 03061 M00S02501.1ds +++| 03062 M00S02502.1ds +++| PRS5 LJM IDS2 DROP PP 03063 M00S02503.1ds +++|
| Line S02504 Modification History | |
|---|---|
M01 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 03064 M01S02504.273l780 ---| PRS6 PAUSE NE RESTORE RA AND FL 03065 M01S02505.273l780 ---| LDD IR+1
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 03066 M01S00005.273l780 +++| PRS6 LDD IR+1 03067 M00S02506.1ds +++| SCN 77 03068 M00S02507.1ds +++| LMD TN 03069 M00S02508.1ds +++| STD IR+1 03070 M00S02509.1ds +++| LDD CP READ JSN FROM EJT ENTRY 03071 M00S02510.1ds +++| ADN TFSW 03072 M00S02511.1ds +++| CRD CM 03073 M00S02512.1ds +++| SFA EJT,CM 03074 M00S02513.1ds +++| CRD CM 03075 M00S02514.1ds +++| LDD CN CHECK FOR SAME JOB 03076 M00S02515.1ds +++| LMD CM 03077 M00S02516.1ds +++| NJN PRS5 IF DIFFERENT JOB 03078 M00S02517.1ds +++| LDD CN+1 03079 M00S02518.1ds +++| LMD CM+1 03080 M00S02519.1ds +++| NJN PRS5 IF DIFFERENT JOB 03081 M00S02520.1ds +++| PRS7 LDD IR+2 GET FUNCTION CODE 03082 M00S02521.1ds +++| SHN 1 03083 M00S02522.1ds +++| STD CM 03084 M00S02523.1ds +++| LDM TRQP,CM SET/GET PROCESSOR ADDRESS 03085 M00S02524.1ds +++| ZJN PRS5 IF FUNCTION NOT DEFINED 03086 M00S02525.1ds +++| STM IDSA 03087 M00S02526.1ds +++| LJM PRSX EXIT 03088 M00S02527.1ds +++| TRQP SPACE 4,10 03089 M00S02528.1ds +++|** TRQP - TABLE OF REQUEST PROCESSORS. 03090 M00S02529.1ds +++|* ENTRY = 2 WORDS. 03091 M00S02530.1ds +++|* INDEXED BY REQUEST NUMBER * 2. 03092 M00S02531.1ds +++|* 03093 M00S02532.1ds +++|*T, 12/ ADDR, 12/ OVLN
Figure
03094 M00S02533.1ds +++|* ADDR ADDRESS OF REQUEST PROCESSOR. 03095 M00S02534.1ds +++|* OVLN OVERLAY NUMBER. 03096 M00S02535.1ds +++| 03097 M00S02536.1ds +++| 03098 M00S02537.1ds +++| TRQP INDEX 03099 M00S02538.1ds +++| 03100 M00S02539.1ds +++|* FUNCTION *FASF* MUST REMAIN FIRST. 03101 M00S02540.1ds +++| 03102 M00S02541.1ds +++| FCN /1DS/FASF,0 03103 M00S02542.1ds +++| 03104 M00S02543.1ds +++| 03105 M00S02544.1ds +++| FCN /1DS/AEJF,AEJ 03106 M00S02545.1ds +++| FCN /1DS/CLRF,CLR 03107 M00S02546.1ds +++| FCN /1DS/CKPF,CKP 03108 M00S02547.1ds +++| FCN /1DS/DCMF,DCM 03109 M00S02548.1ds +++| FCN /1DS/DIAF,DIA 03110 M00S02549.1ds +++| FCN /1DS/DISF,DIS 03111 M00S02550.1ds +++| FCN /1DS/DSPF,DSP 03112 M00S02551.1ds +++| FCN /1DS/DSSF,DSS 03113 M00S02552.1ds +++| FCN /1DS/DWNF,DWN
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2767 |
Seq # *Modification Id* Act ----------------------------+ 03114 M01S00001.ns2767 +++| FCN /1DS/UPCF,DWN 03115 M00S02553.1ds +++| FCN /1DS/EBRF,EBR 03116 M00S02554.1ds +++| FCN /1DS/ECBF,ECB
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2767 |
Seq # *Modification Id* Act ----------------------------+ 03117 M01S00002.ns2767 +++| FCN /1DS/ECPF,ECP 03118 M00S02555.1ds +++| FCN /1DS/EUFF,EUF 03119 M00S02556.1ds +++| FCN /1DS/IASF,IAS 03120 M00S02557.1ds +++| FCN /1DS/ICJF,ICJ
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2767 |
Seq # *Modification Id* Act ----------------------------+ 03121 M01S00003.ns2767 +++| FCN /1DS/IDLF,IDD 03122 M00S02558.1ds +++| FCN /1DS/IJCF,IJC
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns2767 |
Seq # *Modification Id* Act ----------------------------+ 03123 M01S00004.ns2767 +++| FCN /1DS/ILJF,ILJ 03124 M01S00005.ns2767 +++| FCN /1DS/ISCF,ISC 03125 M00S02559.1ds +++| FCN /1DS/ISSF,ISS 03126 M00S02560.1ds +++| FCN /1DS/ITJF,ITJ
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2587 |
Seq # *Modification Id* Act ----------------------------+ 03127 M01S00001.ns2587 +++| FCN /1DS/KIJF,KIJ 03128 M00S02561.1ds +++| FCN /1DS/LODF,LOD 03129 M00S02562.1ds +++| FCN /1DS/MSGF,MSG 03130 M00S02563.1ds +++| FCN /1DS/OCMF,OCM
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | ns2767 |
Seq # *Modification Id* Act ----------------------------+ 03131 M01S00006.ns2767 +++| FCN /1DS/RSTF,RST
| Line S02564 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03132 M01S02564.271l716 ---| FCN /1DS/ROLF,ROL 03133 M00S02565.1ds +++| FCN /1DS/SAMF,SAM 03134 M00S02566.1ds +++| FCN /1DS/SCAF,SCA 03135 M00S02567.1ds +++| FCN /1DS/SCDF,SCD 03136 M00S02568.1ds +++| FCN /1DS/SCHF,IAS 03137 M00S02569.1ds +++| FCN /1DS/SPNF,SPD 03138 M00S02570.1ds +++| FCN /1DS/SERF,SER 03139 M00S02571.1ds +++| FCN /1DS/TPSF,TPS
| Line S02572 Modification History | |
|---|---|
M01 (Removed by) | ns2767 |
Seq # *Modification Id* Act ----------------------------+ 03140 M01S02572.ns2767 ---| FCN /1DS/UPCF,DWN 03141 M00S02573.1ds +++| FCN /1DS/VMSF,VMS 03142 M00S02574.1ds +++| FCN /1DS/VSAF,VSA 03143 M00S02575.1ds +++| FCN /1DS/WARF,WAR
| Line S02576 Modification History | |
|---|---|
M01 (Removed by) | ns2767 |
Seq # *Modification Id* Act ----------------------------+ 03144 M01S02576.ns2767 ---| FCN /1DS/ISCF,ISC 03145 M01S02577.ns2767 ---| FCN /1DS/ILJF,ILJ 03146 M01S02578.ns2767 ---| FCN /1DS/IDLF,IDD
| Line S00193 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | ns2767 |
Seq # *Modification Id* Act ----------------------------+ 03147 M02S00193.ns2767 ---| FCN /1DS/ECPF,ECP
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | ns2767 |
Seq # *Modification Id* Act ----------------------------+ 03148 M01S00007.ns2767 +++| 03149 M00S02579.1ds +++| INDEX /1DS/MAXF*2 03150 M00S02580.1ds +++| SPACE 4,10 03151 M00S02581.1ds +++| IFP HERE REMOTE CODE FOR *SFA* MACRO 03152 M00S02582.1ds +++| SPACE 4,10 03153 M00S02583.1ds +++|
| Line S02584 Modification History | |
|---|---|
M01 (Removed by) | 1ds30 |
Seq # *Modification Id* Act ----------------------------+ 03154 M01S02584.1ds30 ---| OVERFLOW
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 1ds30 |
Seq # *Modification Id* Act ----------------------------+ 03155 M01S00001.1ds30 +++| OVERFLOW PPFW,EPFW 03156 M00S02585.1ds +++| EJECT 03157 M00S02586.1ds +++| OVERLAY (MASS STORAGE FUNCTIONS.)
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2552 |
Seq # *Modification Id* Act ----------------------------+ 03158 M01S00001.ns2552 +++| 2DA SPACE 4,10 03159 M01S00002.ns2552 +++|** COMMON DECK EQUIVALENCES. 03160 M01S00003.ns2552 +++| 03161 M01S00004.ns2552 +++| 03162 M01S00005.ns2552 +++| CKSS EQU /LSD/CKSS 03163 M01S00006.ns2552 +++| DISS EQU /LSD/DISS 03164 M01S00007.ns2552 +++| DKSS EQU /LSD/DKSS 03165 M01S00008.ns2552 +++| MNEC EQU /LSD/MNEC 03166 M01S00009.ns2552 +++| N4SS EQU /LSD/N4SS 03167 M01S00010.ns2552 +++| STVE EQU /LSD/STVE 03168 M01S00011.ns2552 +++| 03169 M01S00012.ns2552 +++| MISD EQU /MMF/MISD 03170 M01S00013.ns2552 +++| MXMF EQU /MMF/MXMF 03171 M00S02587.1ds +++| CIO SPACE 4,10 03172 M00S02588.1ds +++|** CIO - CHECK INITIALIZE OPTIONS. 03173 M00S02589.1ds +++|* 03174 M00S02590.1ds +++|* ENTRY (MS) = MST POINTER. 03175 M00S02591.1ds +++|* 03176 M00S02592.1ds +++|* EXIT (IR+3) = INITIALIZE FLAG BIT NUMBER. 03177 M00S02593.1ds +++|* 03178 M00S02594.1ds +++|* USES CM - CM+4. 03179 M00S02595.1ds +++| 03180 M00S02596.1ds +++| 03181 M00S02597.1ds +++| CIO SUBR ENTRY/EXIT 03182 M00S02598.1ds +++| LDN LIAL 03183 M00S02599.1ds +++| CIOA LMN 0 03184 M00S02600.1ds +++| NJN CIOX IF NOT *AL* OPTION 03185 M00S02601.1ds +++| LDD MS 03186 M00S02602.1ds +++| SHN 3 03187 M00S02603.1ds +++| ADN MDGL FETCH CURRENT RECORDING MODE FROM MST 03188 M00S02604.1ds +++| CRD CM 03189 M00S02605.1ds +++| LDD CM+1 03190 M00S02606.1ds +++| SHN -13 FORM *HT* OR *FT* OPTION 03191 M00S02607.1ds +++| ADN LIFD 03192 M00S02608.1ds +++| ERRNZ LIFD+1-LIHD CODE DEPENDS ON VALUE 03193 M00S02609.1ds +++| STD IR+3 03194 M00S02610.1ds +++| UJN CIOX RETURN 03195 M00S02611.1ds +++| CSD SPACE 4,15 03196 M00S02612.1ds +++|** CSD - CHECK SHARED DEVICE. 03197 M00S02613.1ds +++|* 03198 M00S02614.1ds +++|* ENTRY (MS-4 - MS) = EST ENTRY OF DEVICE. 03199 M00S02615.1ds +++|* 03200 M00S02616.1ds +++|* EXIT (A) = 0 IF NOT SHARED DEVICE, OR IF INITIALIZE NOT 03201 M00S02617.1ds +++|* SET ON SHARED DEVICE FOR ANY MAINFRAME. 03202 M00S02618.1ds +++|* (A) .NE. 0 OTHERWISE, OR IF *EXTENDED MEMORY* ERROR. 03203 M00S02619.1ds +++|* 03204 M00S02620.1ds +++|* USES T3, CM - CM+4, CN - CN+4. 03205 M00S02621.1ds +++|* 03206 M00S02622.1ds +++|* CALLS DFM. 03207 M00S02623.1ds +++|* 03208 M00S02624.1ds +++|* MACROS MONITOR. 03209 M00S02625.1ds +++| 03210 M00S02626.1ds +++| 03211 M00S02627.1ds +++| CSD6 LDN 0 03212 M00S02628.1ds +++| 03213 M00S02629.1ds +++| CSD SUBR ENTRY/EXIT 03214 M00S02630.1ds +++| LDD MS-4 03215 M00S02631.1ds +++| SHN 21-11 03216 M00S02632.1ds +++| PJN CSD6 IF NOT SHARED 03217 M00S02633.1ds +++| SHN 21-4-21+11 03218 M00S02634.1ds +++| MJN CSD6 IF INDEPENDENT SHARED DEVICE 03219 M00S02635.1ds +++| LDK MMFL SET MACHINE ID OF THIS MACHINE 03220 M00S02636.1ds +++| CRD CM 03221 M00S02637.1ds +++| LDD CM 03222 M00S02638.1ds +++| STM CSDA 03223 M00S02639.1ds +++| LDD MS READ MST 03224 M00S02640.1ds +++| SHN 3 03225 M00S02641.1ds +++| ADN SDGL 03226 M00S02642.1ds +++| CRD CN
| Line S02643 Modification History | |
|---|---|
M01 (Removed by) | ns2552 |
Seq # *Modification Id* Act ----------------------------+ 03227 M01S02643.ns2552 ---| LDN /MMF/MXMF
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | ns2552 |
Seq # *Modification Id* Act ----------------------------+ 03228 M01S00014.ns2552 +++| LDN MXMF 03229 M00S02644.1ds +++| STD T3 03230 M00S02645.1ds +++| CSD1 LDD CN+1 SET EXTENDED MEMORY ADDRESS 03231 M00S02646.1ds +++| ADN STLL 03232 M00S02647.1ds +++| STD CM+4 03233 M00S02648.1ds +++| SHN -14 03234 M00S02649.1ds +++| ADD CN 03235 M00S02650.1ds +++| LMC RECS*1000 SET UP MONITOR REQUEST 03236 M00S02651.1ds +++| STD CM+3 03237 M00S02652.1ds +++| LDD MA SET CM ADDRESS FOR READ 03238 M00S02653.1ds +++| STD CM+2 03239 M00S02654.1ds +++| LDN 1-1 SET WORD COUNT 03240 M00S02655.1ds +++|* SHN 6 03241 M00S02656.1ds +++| STD CM+1 03242 M00S02657.1ds +++| MONITOR ECSM 03243 M00S02658.1ds +++| LDD CM+1 CHECK RETURN STATUS 03244 M00S02659.1ds +++| SHN 21-13 03245 M00S02660.1ds +++| PJN CSD4 IF NO ERROR 03246 M00S02661.1ds +++| LDD CM+3 03247 M00S02662.1ds +++| SHN 14 03248 M00S02663.1ds +++| LMD CM+4 03249 M00S02664.1ds +++| ZJN CSD4 IF NO RETRY ERROR 03250 M00S02665.1ds +++| LDC =C*EXTENDED MEMORY ERROR.* 03251 M00S02666.1ds +++| CSD2 RJM DFM 03252 M00S02667.1ds +++| LDN 77 03253 M00S02668.1ds +++| CSD3 LJM CSDX EXIT 03254 M00S02669.1ds +++| 03255 M00S02670.1ds +++| CSD4 LDD MA 03256 M00S02671.1ds +++| CRD CM 03257 M00S02672.1ds +++| LDD CM+2 CHECK MACHINE ID 03258 M00S02673.1ds +++| LMC * 03259 M00S02674.1ds +++| CSDA EQU *-1 03260 M00S02675.1ds +++| ZJN CSD5 IF THIS MACHINE 03261 M00S02676.1ds +++| LDD CM CHECK INITIALIZE BITS 03262 M00S02677.1ds +++| SCN 77 03263 M00S02678.1ds +++|* LPC MLFPR+MLIAL+MLIHD+MLIFD+MLIPF+MLIQF 03264 M00S02679.1ds +++| ERRNZ MLFPR+MLIAL+MLIHD+MLIFD+MLIPF+MLIQF-7700 03265 M00S02680.1ds +++| ZJN CSD5 IF NO INITIALIZE BIT SET 03266 M00S02681.1ds +++| LDC =C*INITIALIZE PENDING ON THIS DEVICE.* 03267 M00S02682.1ds +++| UJN CSD2 SEND ERROR MESSAGE TO DAYFILE 03268 M00S02683.1ds +++| 03269 M00S02684.1ds +++| CSD5 LDN LLLL ADVANCE TO NEXT MAINFRAME 03270 M00S02685.1ds +++| RAD CN+1 03271 M00S02686.1ds +++| SHN -14 03272 M00S02687.1ds +++| RAD CN 03273 M00S02688.1ds +++| SOD T3 03274 M00S02689.1ds +++| ZJN CSD3 IF ALL MAINFRAMES 03275 M00S02690.1ds +++| LJM CSD1 PROCESS NEXT MAINFRAME 03276 M00S02691.1ds +++| CSM SPACE 4,15 03277 M00S02692.1ds +++|** CSM - CHECK SHARED RMS. 03278 M00S02693.1ds +++|* 03279 M00S02694.1ds +++|* ENTRY (T5) = EST ORDINAL. 03280 M00S02695.1ds +++|* (MS) = MST POINTER. 03281 M00S02696.1ds +++|* (IR+4) BIT 2**12 = PRESET FOR SHARED RMS, IF SET. 03282 M00S02697.1ds +++|* 03283 M00S02698.1ds +++|* EXIT (A) = 0, IF NOT INDEPENDENT SHARED DEVICE. 03284 M00S02699.1ds +++|* (A) .GT. 0, IF INDEPENDENT SHARED DEVICE. 03285 M00S02700.1ds +++|* (A) = NEGATIVE, IF INCORRECT CALL. 03286 M00S02701.1ds +++|* 03287 M00S02702.1ds +++|* USES T6, T7, CM - CM+4. 03288 M00S02703.1ds +++|*
| Line S02704 Modification History | |
|---|---|
M01 (Removed by) | ns2552 |
Seq # *Modification Id* Act ----------------------------+ 03289 M01S02704.ns2552 ---|* CALLS RDS, SMI, WDS.
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | ns2552 |
Seq # *Modification Id* Act ----------------------------+ 03290 M01S00015.ns2552 +++|* CALLS CDC, RDS, SMI, WDS. 03291 M00S02705.1ds +++|* 03292 M00S02706.1ds +++|* MACROS ENDMS, SETMS, SFA, SMSTF. 03293 M00S02707.1ds +++| 03294 M00S02708.1ds +++| 03295 M00S02709.1ds +++| CSM7 LDD IR+4 03296 M00S02710.1ds +++| SHN 21-12 03297 M00S02711.1ds +++| MJN CSMX IF INCORRECT PRESET 03298 M00S02712.1ds +++| LDN 0 03299 M00S02713.1ds +++| 03300 M00S02714.1ds +++| CSM SUBR ENTRY/EXIT 03301 M00S02715.1ds +++| SFA EST,T5 03302 M00S02716.1ds +++| ADK EQDE 03303 M00S02717.1ds +++| CRD CM 03304 M00S02718.1ds +++| LDD CM 03305 M00S02719.1ds +++| SHN 21-4 03306 M00S02720.1ds +++| PJN CSM7 IF NOT ISD 03307 M00S02721.1ds +++| SHN 5+21-10 03308 M00S02722.1ds +++| PJN CSM4 IF NON-REMOVABLE DEVICE 03309 M00S02723.1ds +++| CSM1 LDD IR+4 03310 M00S02724.1ds +++| SHN 21-12 03311 M00S02725.1ds +++| PJN CSM2 IF MOUNT ON ISD WITHOUT PRESET 03312 M00S02726.1ds +++| SMSTF GPRS SET ISD PRESET BIT FOR DEVICE 03313 M00S02727.1ds +++| CSM2 LDN 1 03314 M00S02728.1ds +++| CSM3 UJN CSMX RETURN 03315 M00S02729.1ds +++| 03316 M00S02730.1ds +++| CSM4 SHN 10-3 03317 M00S02731.1ds +++| PJN CSM1 IF DEVICE NOT PREVIOUSLY RECOVERED 03318 M00S02732.1ds +++| SETMS IO,(DE,NR) 03319 M00S02733.1ds +++| LDD MS FETCH LABEL TRACK FROM MST 03320 M00S02734.1ds +++| SHN 3 03321 M00S02735.1ds +++| ADN ALGL 03322 M00S02736.1ds +++| CRD CM 03323 M00S02737.1ds +++| LDD CM+1 03324 M00S02738.1ds +++| ZJN CSM1 IF LABEL TRACK UNDEFINED 03325 M00S02739.1ds +++| STD T6 03326 M00S02740.1ds +++| LDN 0 03327 M00S02741.1ds +++| STD T7 03328 M00S02742.1ds +++| LDC BFMS READ LABEL SECTOR 03329 M00S02743.1ds +++| RJM RDS 03330 M00S02744.1ds +++| PJN CSM6 IF NO READ ERROR 03331 M00S02745.1ds +++| ENDMS 03332 M00S02746.1ds +++| LCN 1 03333 M00S02747.1ds +++| CSM5 UJN CSM3 RETURN 03334 M00S02748.1ds +++| 03335 M00S02749.1ds +++| CSM6 RJM SMI SET MACHINE INDEX 03336 M00S02750.1ds +++| STD CM 03337 M00S02751.1ds +++| SHN 2 03338 M00S02752.1ds +++| RAD CM
| Line S02753 Modification History | |
|---|---|
M01 (Removed by) | ns2552 |
Seq # *Modification Id* Act ----------------------------+ 03339 M01S02753.ns2552 ---| LDM /LSD/DISS-5+3,CM 03340 M01S02754.ns2552 ---| SCN 2 CLEAR UNLOAD STATUS 03341 M01S02755.ns2552 ---| STM /LSD/DISS-5+3,CM
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | ns2552 |
Seq # *Modification Id* Act ----------------------------+ 03342 M01S00016.ns2552 +++| LDM DISS-5+3,CM 03343 M01S00017.ns2552 +++| SCN 2 CLEAR UNLOAD STATUS 03344 M01S00018.ns2552 +++| STM DISS-5+3,CM 03345 M01S00019.ns2552 +++| RJM CDC COMPUTE LABEL CHECKSUM 03346 M01S00020.ns2552 +++| STM CKSS 03347 M00S02756.1ds +++| LDC BFMS+WLSF REWRITE LABEL SECTOR 03348 M00S02757.1ds +++| RJM WDS 03349 M00S02758.1ds +++| ENDMS 03350 M00S02759.1ds +++| LDN GLGL-ALGL 03351 M00S02760.1ds +++| STD T7 03352 M00S02761.1ds +++| LDD MS UPDATE GLOBAL MST 03353 M00S02762.1ds +++| SHN 3 03354 M00S02763.1ds +++| ADN ALGL
| Line S02764 Modification History | |
|---|---|
M01 (Removed by) | ns2552 |
Seq # *Modification Id* Act ----------------------------+ 03355 M01S02764.ns2552 ---| CWM /LSD/N4SS+5*ALGL,T7
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | ns2552 |
Seq # *Modification Id* Act ----------------------------+ 03356 M01S00021.ns2552 +++| CWM N4SS+5*ALGL,T7 03357 M00S02765.1ds +++| UJN CSM5 RETURN 03358 M00S02766.1ds +++| C0S SPACE 4,10 03359 M00S02767.1ds +++|** C0S - CALL *0SD*. 03360 M00S02768.1ds +++|* 03361 M00S02769.1ds +++|* ENTRY (A) = 0 IF SPIN UP ALL UNITS. 03362 M00S02770.1ds +++|* = 20B IF SPIN DOWN ALL UNITS. 03363 M00S02771.1ds +++|* 03364 M00S02772.1ds +++|* EXIT (A) = *0SD* PROCESSOR ENTRY ADDRESS. 03365 M00S02773.1ds +++| 03366 M00S02774.1ds +++| 03367 M00S02775.1ds +++| C0S SUBR ENTRY/EXIT 03368 M00S02776.1ds +++| STM L0SD-2 03369 M00S02777.1ds +++| EXECUTE 0SD,L0SD 03370 M00S02778.1ds +++| UJN C0SX RETURN 03371 M00S02779.1ds +++| SFA SPACE 4,15 03372 M00S02780.1ds +++|** SFA - SEARCH FOR FAST ATTACH FILE. 03373 M00S02781.1ds +++|* 03374 M00S02782.1ds +++|* ENTRY (T5) = EST ORDINAL. 03375 M00S02783.1ds +++|* SEARCHES THE FNT FOR ANY FILE OF TYPE 03376 M00S02784.1ds +++|* *FAFT* ASSIGNED TO THIS EQUIPMENT. 03377 M00S02785.1ds +++|* 03378 M00S02786.1ds +++|* EXIT (A) = 0 IF NO FILE FOUND. 03379 M00S02787.1ds +++|* (A) = 1 IF *FAFT* TYPE FILE FOUND ON EQUIPMENT. 03380 M00S02788.1ds +++|* 03381 M00S02789.1ds +++|* USES QA, FN - FN+4, FS - FS+4. 03382 M00S02790.1ds +++|* 03383 M00S02791.1ds +++|* MACROS SFA. 03384 M00S02792.1ds +++| 03385 M00S02793.1ds +++| 03386 M00S02794.1ds +++| SFA SUBR ENTRY/EXIT 03387 M00S02795.1ds +++| LDN 0 03388 M00S02796.1ds +++| STD QA 03389 M00S02797.1ds +++| LDN FNTP READ FNT POINTER 03390 M00S02798.1ds +++| CRD FN 03391 M00S02799.1ds +++| SFA1 AOD QA ADVANCE FNT ORDINAL 03392 M00S02800.1ds +++| LMD FN+2 03393 M00S02801.1ds +++| ZJN SFAX IF END OF FNT 03394 M00S02802.1ds +++| SFA FNT,QA READ FNT ENTRY 03395 M00S02803.1ds +++| CRD FS 03396 M00S02804.1ds +++| LDD FS+4 CHECK FILE TYPE 03397 M00S02805.1ds +++| SHN -6 03398 M00S02806.1ds +++| LMN FAFT 03399 M00S02807.1ds +++| NJN SFA1 IF NOT FAST ATTACH 03400 M00S02808.1ds +++| SFA FNT,QA READ FST ENTRY 03401 M00S02809.1ds +++| ADN FSTG 03402 M00S02810.1ds +++| CRD FS 03403 M00S02811.1ds +++| LDD FS CHECK EQUIPMENT ASSIGNMENT 03404 M00S02812.1ds +++| LMD T5 03405 M00S02813.1ds +++| NJN SFA1 IF NOT SAME EQUIPMENT 03406 M00S02814.1ds +++| LDN 1 03407 M00S02815.1ds +++| UJN SFAX EXIT WITH FAST ATTACH FOUND
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 1ds24 |
Seq # *Modification Id* Act ----------------------------+ 03408 M01S00001.1ds24 +++| SFD SPACE 4,10 03409 M01S00002.1ds24 +++|** SFD - SEARCH FOR DAYFILES. 03410 M01S00003.1ds24 +++|* 03411 M01S00004.1ds24 +++|* ENTRY (IR+4) = EST ORDINAL. 03412 M01S00005.1ds24 +++|* 03413 M01S00006.1ds24 +++|* EXIT (A) = 0, IF SYSTEM DAYFILES ON DEVICE.
Proceed to Part 2
cdc/nos2.source/opl.opl871/deck/1ds.001.txt · Last modified: by 127.0.0.1