cdc:nos2.source:opl.opl871:deck:qfm.002
Deck QFM Part 002
36 Modifications
Listing Sections
- Deck QFM Start
- Deck QFM Part 1 (Line 1519)
- Deck QFM Part 2 (Line 2829)
Source
Seq # *Modification Id* Act ----------------------------+ 02829 M00S02178.qfm +++| 02830 M00S02179.qfm +++| RQL2 ENDMS 02831 M00S02180.qfm +++| RJM SFO SET FAMILY ORDINALS 02832 M00S02181.qfm +++| LDN 0 02833 M00S02182.qfm +++| RJM CQE CREATE QFT ENTRY 02834 M00S02183.qfm +++| LDM IOSS+5*ENTQ+3 02835 M00S02184.qfm +++| ADM IOSS+5*ENTQ+4 02836 M00S02185.qfm +++| ZJN RQL3 IF SPECIAL PROCESSING PRIORITY 02837 M00S02186.qfm +++| LDC RTCL 02838 M00S02187.qfm +++| CRD CM 02839 M00S02188.qfm +++| LDD CM SET NEW ENTRY TIME 02840 M00S02189.qfm +++| STM IOSS+5*ENTQ+3 02841 M00S02190.qfm +++| LDD CM+1 02842 M00S02191.qfm +++| STM IOSS+5*ENTQ+4 02843 M00S02192.qfm +++| RQL3 RJM RFS RELEASE FILE TO SYSTEM 02844 M00S02193.qfm +++| LDN OT UPDATE OUT POINTER 02845 M00S02194.qfm +++| RJM UOP 02846 M00S02195.qfm +++| LJM RQL1 LOOP FOR NEXT ENTRY 02847 M00S02196.qfm +++| TITLE REQUEUE INACTIVE QUEUED FILE. 02848 M00S02197.qfm +++|*** RIQF - REQUEUE INACTIVE QUEUED FILE. (FUNCTION 14) 02849 M00S02198.qfm +++|* 02850 M00S02199.qfm +++|* THE NEXT IQFT ENTRY WILL BE READ FROM THE BUFFER. 02851 M00S02200.qfm +++|* THE FILE ASSOCIATED WITH THE ENTRY WILL BE VALIDATED BY 02852 M00S02201.qfm +++|* READING ITS SYSTEM SECTOR. THE FILE WILL BE PRESERVED 02853 M00S02202.qfm +++|* AND THE LOCAL FNT ENTRY RELEASED. 02854 M00S02203.qfm +++| 02855 M00S02204.qfm +++| 02856 M00S02205.qfm +++| ENTRY RIQ ENTRY/EXIT 02857 M00S02206.qfm +++| RJM RQE READ IQFT ENTRY FROM BUFFER 02858 M00S02207.qfm +++| MJN RIQX IF BUFFER EMPTY 02859 M00S02208.qfm +++| RJM SAF SEARCH FOR ASSIGNED FILE 02860 M00S02209.qfm +++| NJN RIQ1 IF FILE FOUND 02861 M00S02210.qfm +++| ERROR FNFE EC = 1, NO FILE FOUND 02862 M00S02211.qfm +++| 02863 M00S02212.qfm +++| RIQ1 STD BI SAVE FNT OFFSET 02864 M00S02213.qfm +++| RJM SFB SET FILE BUSY 02865 M00S02214.qfm +++| ZJN RIQ2 IF FILE SET BUSY 02866 M00S02215.qfm +++| LDN 0 02867 M00S02216.qfm +++| STD FA 02868 M00S02217.qfm +++| ABORT ERIO * QFM I/O SEQUENCE ERROR.* 02869 M00S02218.qfm +++| 02870 M00S02219.qfm +++| RIQ2 LDD FS SET EQUIPMENT 02871 M00S02220.qfm +++| STD T5 02872 M00S02221.qfm +++| LDD FS+1 SET FIRST TRACK 02873 M00S02222.qfm +++| STD T6 02874 M00S02223.qfm +++| RJM RQS READ SYSTEM SECTOR 02875 M00S02224.qfm +++| ZJN RIQ3 IF NO ERROR ENCOUNTERED
| Line S02225 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02876 M01S02225.v23l617 ---| ERROR INSE EC = 5, INVALID SYSTEM SECTOR
| Line S00036 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02877 M01S00036.v23l617 +++| ERROR INSE EC = 5, INCORRECT SYSTEM SECTOR 02878 M00S02226.qfm +++| 02879 M00S02227.qfm +++| RIQ3 STD FA CLEAR FNT OFFSET 02880 M00S02228.qfm +++| RJM SEI SEARCH FOR EOI
| Line S02229 Modification History | |
|---|---|
M01 (Removed by) | ns2307 |
Seq # *Modification Id* Act ----------------------------+ 02881 M01S02229.ns2307 ---| LDD T3 SET FILE LENGTH 02882 M01S02230.ns2307 ---| STM FLSS+1 02883 M01S02231.ns2307 ---| LDD T2 02884 M01S02232.ns2307 ---| STM FLSS 02885 M01S02233.ns2307 ---| LDD FS+1 RESET FIRST TRACK
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2307 |
Seq # *Modification Id* Act ----------------------------+ 02886 M01S00001.ns2307 +++| LDD T2 SET FILE LENGTH 02887 M01S00002.ns2307 +++| STM FLSS 02888 M01S00003.ns2307 +++| LDD T3 02889 M01S00004.ns2307 +++| SBN 1 02890 M01S00005.ns2307 +++| STM FLSS+1 02891 M01S00006.ns2307 +++| PJN RIQ4 IF NO UNDERFLOW 02892 M01S00007.ns2307 +++| AOM FLSS+1 02893 M01S00008.ns2307 +++| SOM FLSS 02894 M01S00009.ns2307 +++| RIQ4 LDD FS+1 RESET FIRST TRACK 02895 M00S02234.qfm +++| STD T6 02896 M00S02235.qfm +++| STM IQFB+5*ENTQ+1 02897 M00S02236.qfm +++| LDD T5 SET EQUIPMENT 02898 M00S02237.qfm +++| STM IQFB+5*ENTQ 02899 M00S02238.qfm +++| LDN 0 UPDATE SYSTEM SECTOR 02900 M00S02239.qfm +++| RJM USS 02901 M00S02240.qfm +++| LDD BI RESET FNT ADDRESS 02902 M00S02241.qfm +++| STD FA 02903 M00S02242.qfm +++| LDN QFEWL COPY IQFT ENTRY BACK TO BUFFER 02904 M00S02243.qfm +++| STD T1 02905 M00S02244.qfm +++| LDC IQFB 02906 M00S02245.qfm +++| RJM WBB 02907 M00S02246.qfm +++| LDC 4S15+SPFS SET PRESERVED FILE STATUS 02908 M00S02247.qfm +++| RJM STB 02909 M00S02248.qfm +++| RJM RFE RELEASE LOCAL FNT ENTRY 02910 M00S02249.qfm +++| LJM RIQX RETURN 02911 M00S02250.qfm +++| TITLE SUBROUTINES. 02912 M00S02251.qfm +++| CQE SPACE 4,15 02913 M00S02252.qfm +++|** CQE - CREATE QFT ENTRY. 02914 M00S02253.qfm +++|* 02915 M00S02254.qfm +++|* ENTRY (BFMS) = QUEUE FILE SYSTEM SECTOR. 02916 M00S02255.qfm +++|* (A) = 0, ASSIGN A NEW JSN TO THE QFT ENTRY. 02917 M00S02256.qfm +++|* = 1, DO NOT ASSIGN A NEW JSN TO THE QFT ENTRY. 02918 M00S02257.qfm +++|* 02919 M00S02258.qfm +++|* EXIT (QA) = QFT ORDINAL. 02920 M00S02259.qfm +++|* 02921 M00S02260.qfm +++|* USES CM - CM+7, FN - FN+4. 02922 M00S02261.qfm +++|*
| Line S02262 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 02923 M01S02262.242l642 ---|* CALLS CTE, USS.
| Line S02263 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02924 M01S02263.v23l617 ---|*
| Line S00037 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02925 M01S00037.v23l617 +++|* CALLS CTE, RFI, USS.
| Line S00131 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 02926 M01S00131.242l642 +++|* 02927 M00S02264.qfm +++|* MACROS ERROR. 02928 M00S02265.qfm +++| 02929 M00S02266.qfm +++| 02930 M00S02267.qfm +++| CQE SUBR ENTRY/EXIT 02931 M00S02268.qfm +++| STD CM 02932 M00S02269.qfm +++| LDD MA 02933 M00S02270.qfm +++| CWM IOSS,ON 02934 M00S02271.qfm +++| SBN 1 MOVE *JSNQ* TO DIRECT CELLS 02935 M00S02272.qfm +++| CRD CM+3 02936 M00S02273.qfm +++| LDD CM+7 SET INTERLOCK/FILE ASSIGNED/CREATION FLAGS 02937 M00S02274.qfm +++| SCN 77 02938 M00S02275.qfm +++| LMN 7 02939 M00S02276.qfm +++| STD CM+7 02940 M00S02277.qfm +++| LDD CM 02941 M00S02278.qfm +++| SHN 14 02942 M00S02279.qfm +++| LMN PQFT CREATE QFT ENTRY 02943 M00S02280.qfm +++| RJM CTE 02944 M00S02281.qfm +++| NJN CQE1 IF ENTRY CREATED 02945 M00S02282.qfm +++| ERROR FTHE EC = 4, QFT FULL 02946 M00S02283.qfm +++| 02947 M00S02284.qfm +++| CQE1 CRD FN SET NEW JSN 02948 M00S02285.qfm +++| CRM IOSS,ON
| Line S00038 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02949 M01S00038.v23l617 +++| LDC FLSS GET ADDRESS OF SYSTEM SECTOR FILE LENGTH 02950 M01S00039.v23l617 +++| RJM RFI SET FILE SIZE INDEX IN QFT ENTRY 02951 M00S02286.qfm +++| LDD CM+1 SET QFT ORDINAL 02952 M00S02287.qfm +++| STD QA 02953 M00S02288.qfm +++| LDN 2 UPDATE SYSTEM SECTOR 02954 M00S02289.qfm +++| RJM USS
| Line S02290 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02955 M01S02290.v23l617 ---| UJN CQEX RETURN
| Line S00040 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02956 M01S00040.v23l617 +++| UJP CQEX RETURN
| Line S00017 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 02957 M01S00017.ns21000 +++| QRE SPACE 4,10 02958 M01S00018.ns21000 +++|*** QRE - READ EOI SECTOR. (FUNCTION 24). 02959 M01S00019.ns21000 +++|* 02960 M01S00020.ns21000 +++|* THE EOI SECTOR FOR FILE LFN IS READ INTO THE DEFINED 02961 M01S00021.ns21000 +++|* BUFFER. 100 WORDS ARE TRANSFERRED. THE IN POINTER 02962 M01S00022.ns21000 +++|* IS MOVED ACCORDINGLY. 02963 M01S00023.ns21000 +++| 02964 M01S00024.ns21000 +++| 02965 M01S00025.ns21000 +++| ENTRY QRE ENTRY/EXIT
| Line S00026 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | ns2442 |
Seq # *Modification Id* Act ----------------------------+ 02966 M02S00026.ns2442 ---| RJM /CIB/CIB CHECK INPUT BUFFER
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2442 |
Seq # *Modification Id* Act ----------------------------+ 02967 M01S00003.ns2442 +++| RJM CIB CHECK INPUT BUFFER
| Line S00027 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 02968 M01S00027.ns21000 +++| SBD HN 02969 M01S00028.ns21000 +++| PJN QRE1 IF ENOUGH SPACE 02970 M01S00029.ns21000 +++| ABORT ERBS * QFM BUFFER TOO SMALL.* 02971 M01S00030.ns21000 +++| 02972 M01S00031.ns21000 +++| QRE1 RJM CFS CHECK FILE STATUS 02973 M01S00032.ns21000 +++| RJM SEI SKIP TO EOI
| Line S00033 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 02974 M02S00033.242l642 ---| SETMS READ READ SECTOR
| Line S00132 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 02975 M01S00132.242l642 +++| SETMS IO READ SECTOR
| Line S00034 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 02976 M01S00034.ns21000 +++| LDC OVL0 02977 M01S00035.ns21000 +++| RJM RDS
| Line S00036 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 02978 M02S00036.242l642 ---| ENDMS
| Line S00133 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 02979 M01S00133.242l642 +++| PJN QRE2 IF NO ERROR 02980 M01S00134.242l642 +++| RJM MSR REPORT ERROR 02981 M01S00135.242l642 +++| 02982 M01S00136.242l642 +++| QRE2 ENDMS
| Line S00037 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 02983 M01S00037.ns21000 +++| 02984 M01S00038.ns21000 +++|* TRANSFER EOI SECTOR TO FET BUFFER 02985 M01S00039.ns21000 +++| 02986 M01S00040.ns21000 +++| LDD IN SET IN POINTER FOR WRITE 02987 M01S00041.ns21000 +++| STD CA 02988 M01S00042.ns21000 +++| LDD IN+1 02989 M01S00043.ns21000 +++| STD CA+1 02990 M01S00044.ns21000 +++| LDD HN COPY EOI SECTOR TO BUFFER 02991 M01S00045.ns21000 +++| STD T1
| Line S00046 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | qfm10 |
Seq # *Modification Id* Act ----------------------------+ 02992 M02S00046.qfm10 ---| LDC OVL0
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | qfm10 |
Seq # *Modification Id* Act ----------------------------+ 02993 M01S00001.qfm10 +++| LDC OVL0+2
| Line S00047 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 02994 M01S00047.ns21000 +++| RJM WBB 02995 M01S00048.ns21000 +++| LDK ZERL UPDATE IN POINTER 02996 M01S00049.ns21000 +++| CRD CM 02997 M01S00050.ns21000 +++| LDD CA 02998 M01S00051.ns21000 +++| STD CM+3 02999 M01S00052.ns21000 +++| LDD CA+1 03000 M01S00053.ns21000 +++| STD CM+4 03001 M01S00054.ns21000 +++| RJM GFE WRITE UPDATED IN POINTER BACK 03002 M01S00055.ns21000 +++| ADN 2 03003 M01S00056.ns21000 +++| CWD CM 03004 M01S00057.ns21000 +++| RJM CIN CLEAR INTERLOCKS 03005 M01S00058.ns21000 +++| LJM QREX RETURN 03006 M01S00059.ns21000 +++| QWE SPACE 4,15 03007 M01S00060.ns21000 +++|*** QWE - WRITE EOI SECTOR. (FUNCTION 25). 03008 M01S00061.ns21000 +++|* 03009 M01S00062.ns21000 +++|* THE EOI SECTOR FOR FILE LFN IS READ FROM THE DEFINED 03010 M01S00063.ns21000 +++|* BUFFER. 100 WORDS ARE TRANSFERRED. 03011 M01S00064.ns21000 +++| 03012 M01S00065.ns21000 +++| 03013 M01S00066.ns21000 +++| ENTRY QWE ENTRY/EXIT 03014 M01S00067.ns21000 +++| LDD HN READ BUFFER 03015 M01S00068.ns21000 +++| STD T3
| Line S00069 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | qfm10 |
Seq # *Modification Id* Act ----------------------------+ 03016 M02S00069.qfm10 ---| LDC OVL0
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | qfm10 |
Seq # *Modification Id* Act ----------------------------+ 03017 M01S00002.qfm10 +++| LDC OVL0+2
| Line S00070 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 03018 M01S00070.ns21000 +++| RJM RCB 03019 M01S00071.ns21000 +++| RJM CFS CHECK FILE STATUS 03020 M01S00072.ns21000 +++| RJM SEI SKIP TO EOI
| Line S00073 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03021 M02S00073.242l642 ---| SETMS WRITE,NE WRITE EOI
| Line S00137 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03022 M01S00137.242l642 +++| SETMS IO
| Line S00189 Modification History | |
|---|---|
M01 (Added by) | ns2099 |
Seq # *Modification Id* Act ----------------------------+ 03023 M01S00189.ns2099 +++| LDC OVL0
| Line S00074 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 03024 M01S00074.ns21000 +++| RJM WEI
| Line S00075 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03025 M02S00075.242l642 ---| ENDMS
| Line S00138 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03026 M01S00138.242l642 +++| PJN QWE1 IF NO WRITE ERRORS 03027 M01S00139.242l642 +++| RJM MSR CHECK IF THE ERROR IS RECOVERABLE 03028 M01S00140.242l642 +++| 03029 M01S00141.242l642 +++| QWE1 ENDMS
| Line S00076 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 03030 M01S00076.ns21000 +++| NFA FA,R SET WRITE LOCKOUT BIT 03031 M01S00077.ns21000 +++| CRD CN 03032 M01S00078.ns21000 +++| LDD CN+3 03033 M01S00079.ns21000 +++| SCN 1 03034 M01S00080.ns21000 +++| LMN 1 03035 M01S00081.ns21000 +++| STD CN+3 03036 M01S00082.ns21000 +++| NFA FA,R 03037 M01S00083.ns21000 +++| CWD CN 03038 M01S00084.ns21000 +++| RJM CIN CLEAR INTERLOCKS 03039 M01S00085.ns21000 +++| LJM QWEX RETURN 03040 M00S02291.qfm +++| RFS SPACE 4,15 03041 M00S02292.qfm +++|** RFS - RELEASE FILE TO SYSTEM. 03042 M00S02293.qfm +++|* 03043 M00S02294.qfm +++|* ENTRY (QA) = QFT ORDINAL. 03044 M00S02295.qfm +++|* (IOSS) = QFT ENTRY. 03045 M00S02296.qfm +++|* 03046 M00S02297.qfm +++|* EXIT (A) = (QA) = 0. 03047 M00S02298.qfm +++|* 03048 M00S02299.qfm +++|* USES T1. 03049 M00S02300.qfm +++|*
| Line S02301 Modification History | |
|---|---|
M01 (Removed by) | ns2663 |
Seq # *Modification Id* Act ----------------------------+ 03050 M01S02301.ns2663 ---|* CALLS IAM.
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2663 |
Seq # *Modification Id* Act ----------------------------+ 03051 M01S00002.ns2663 +++|* CALLS *0QM*. 03052 M00S02302.qfm +++|*
| Line S02303 Modification History | |
|---|---|
M01 (Removed by) | ns2663 |
Seq # *Modification Id* Act ----------------------------+ 03053 M01S02303.ns2663 ---|* MACROS SFA.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2663 |
Seq # *Modification Id* Act ----------------------------+ 03054 M01S00003.ns2663 +++|* MACROS EXECUTE, SFA. 03055 M00S02304.qfm +++| 03056 M00S02305.qfm +++| 03057 M00S02306.qfm +++| RFS SUBR ENTRY/EXIT 03058 M00S02307.qfm +++| LDM IOSS+4 CLEAR INTERLOCK/FILE ASSIGNED/CREATION 03059 M00S02308.qfm +++| SCN 7 03060 M00S02309.qfm +++|* SCN 5 (DO NOT CLEAR ASSIGNED FLAG) 03061 M00S02310.qfm +++| RFSA EQU *-1 (SET BY *CQF*) 03062 M00S02311.qfm +++| STM IOSS+4 03063 M00S02312.qfm +++| LDN QFTE-1 03064 M00S02313.qfm +++| STD T1 03065 M00S02314.qfm +++| SFA QFT,QA STORE QFT ENTRY 03066 M00S02315.qfm +++| ADN 1 03067 M00S02316.qfm +++| CWM IOSS+5,T1 03068 M00S02317.qfm +++| SBN QFTE 03069 M00S02318.qfm +++| CWM IOSS,ON
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | qfm6 |
Seq # *Modification Id* Act ----------------------------+ 03070 M01S00001.qfm6 +++| LDM RFSA 03071 M01S00002.qfm6 +++| SHN 21-1 03072 M01S00003.qfm6 +++| PJN RFS1 IF FILE NOT REENTERED INTO THE QUEUE
| Line S02319 Modification History | |
|---|---|
M01 (Removed by) | ns2663 |
Seq # *Modification Id* Act ----------------------------+ 03073 M01S02319.ns2663 ---| LDC 3RRRQ ISSUE ACCOUNTING MESSAGE 03074 M01S02320.ns2663 ---| RJM IAM
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns2663 |
Seq # *Modification Id* Act ----------------------------+ 03075 M01S00004.ns2663 +++| LDC 2RAR SET *ARRQ* MESSAGE IDENTIFIER 03076 M01S00005.ns2663 +++| STM OVL0-2 03077 M01S00006.ns2663 +++| LDC 2RRQ 03078 M01S00007.ns2663 +++| STM OVL0-1 03079 M01S00008.ns2663 +++| EXECUTE 0QM,OVL0 ISSUE ACCOUNTING MESSAGE
| Line S02321 Modification History | |
|---|---|
M01 (Removed by) | qfm6 |
Seq # *Modification Id* Act ----------------------------+ 03080 M01S02321.qfm6 ---|* LDN 0 CLEAR QFT ORDINAL
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | qfm6 |
Seq # *Modification Id* Act ----------------------------+ 03081 M01S00004.qfm6 +++| RFS1 LDN 0 CLEAR QFT ORDINAL 03082 M00S02322.qfm +++| STD QA
| Line S02323 Modification History | |
|---|---|
M01 (Removed by) | ns2663 |
Seq # *Modification Id* Act ----------------------------+ 03083 M01S02323.ns2663 ---| UJN RFSX RETURN
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | ns2663 |
Seq # *Modification Id* Act ----------------------------+ 03084 M01S00009.ns2663 +++| LJM RFSX RETURN 03085 M00S02324.qfm +++| SFO SPACE 4,10 03086 M00S02325.qfm +++|** SFO - SET FAMILY ORDINALS. 03087 M00S02326.qfm +++|* 03088 M00S02327.qfm +++|* ENTRY (BFMS) = QUEUE FILE SYSTEM SECTOR. 03089 M00S02328.qfm +++|* 03090 M00S02329.qfm +++|* USES SC, FN - FN+4. 03091 M00S02330.qfm +++|* 03092 M00S02331.qfm +++|* CALLS GFO. 03093 M00S02332.qfm +++|* 03094 M00S02333.qfm +++|* MACROS ABORT. 03095 M00S02334.qfm +++| 03096 M00S02335.qfm +++| 03097 M00S02336.qfm +++| SFO2 LDM TSSA,SC SET SYSTEM SECTOR ADDRESS OF ORDINAL 03098 M00S02337.qfm +++| STD T0 03099 M00S02338.qfm +++| LDI T0 CHANGE FAMILY ORDINAL 03100 M00S02339.qfm +++| LPN 77 03101 M00S02340.qfm +++| SHN 14 03102 M00S02341.qfm +++| LMD FN+4 03103 M00S02342.qfm +++| SHN 6 03104 M00S02343.qfm +++| STI T0 03105 M00S02344.qfm +++| SFO3 SOD SC 03106 M00S02345.qfm +++| PJN SFO1 IF ANOTHER FAMILY NAME TO CHECK 03107 M00S02346.qfm +++| 03108 M00S02347.qfm +++| SFO SUBR ENTRY/EXIT 03109 M00S02348.qfm +++| LDN TSSAL-1 03110 M00S02349.qfm +++| STD SC 03111 M00S02350.qfm +++| SFO1 LDM TSSA,SC SET ADDRESS OF FAMILY NAME 03112 M00S02351.qfm +++| STM SFOA 03113 M00S02352.qfm +++| LDD MA MOVE NAME TO DIRECT CELLS 03114 M00S02353.qfm +++| CWM 0,ON 03115 M00S02354.qfm +++| SFOA EQU *-1 03116 M00S02355.qfm +++| SBN 1 03117 M00S02356.qfm +++| CRD FN 03118 M00S02357.qfm +++| SOD SC DECREMENT TABLE INDEX 03119 M00S02358.qfm +++| LDD FN 03120 M00S02359.qfm +++| ZJN SFO3 IF NULL FAMILY
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | qfm3a |
Seq # *Modification Id* Act ----------------------------+ 03121 M01S00001.qfm3a +++| LDN 0 ENTER FAMILY NAME IN FOT 03122 M00S02360.qfm +++| RJM GFO
| Line S02361 Modification History | |
|---|---|
M01 (Removed by) | qfm3a |
Seq # *Modification Id* Act ----------------------------+ 03123 M01S02361.qfm3a ---| ZJN SFO2 IF FAMILY DEFINED IN FOT
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | qfm3a |
Seq # *Modification Id* Act ----------------------------+ 03124 M01S00002.qfm3a +++| SFO4 ZJN SFO2 IF FAMILY DEFINED IN FOT
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | qfm3 |
Seq # *Modification Id* Act ----------------------------+ 03125 M01S00001.qfm3 +++| SBN 1
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | qfm3 |
M02 (Removed by) | qfm3a |
Seq # *Modification Id* Act ----------------------------+ 03126 M02S00002.qfm3a ---| ZJN SFO2 IF FAMILY ADDED TO THE FOT
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | qfm3a |
Seq # *Modification Id* Act ----------------------------+ 03127 M01S00003.qfm3a +++| ZJN SFO4 IF FAMILY ADDED TO FOT 03128 M00S02362.qfm +++| ABORT ERFF * QFM - FOT FULL.* 03129 M00S02363.qfm +++| 03130 M00S02364.qfm +++| 03131 M00S02365.qfm +++| TSSA BSS 0 TABLE OF SYSTEM SECTOR ADDRESSES
| Line S02366 Modification History | |
|---|---|
M01 (Removed by) | qfm9 |
Seq # *Modification Id* Act ----------------------------+ 03132 M01S02366.qfm9 ---| CON IOSS+5*JSNQ+2,FMSS
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | qfm9 |
Seq # *Modification Id* Act ----------------------------+ 03133 M01S00001.qfm9 +++| CON IOSS+5*JSNQ+2,FOSS 03134 M00S02367.qfm +++| CON IOSS+5*SCLQ+1,FDSS 03135 M00S02368.qfm +++| TSSAL EQU *-TSSA LENGTH OF TABLE
| Line S02369 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03136 M01S02369.242l642 ---| USS SPACE 4,15
| Line S00142 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03137 M01S00142.242l642 +++| USS SPACE 4,25 03138 M00S02370.qfm +++|** USS - UPDATE SYSTEM SECTOR. 03139 M00S02371.qfm +++|* 03140 M00S02372.qfm +++|* ENTRY (A) = QUEUE FILE ACTIVITY STATUS.
| Line S02373 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03141 M01S02373.ns22000 ---|* (T5) = EQUIPMENT.
| Line S00069 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03142 M01S00069.ns22000 +++|* (T5) = EST ORDINAL. 03143 M00S02374.qfm +++|* (T6) = FIRST TRACK. 03144 M00S02375.qfm +++|* (QA) = QFT ORDINAL. 03145 M00S02376.qfm +++|* (FN - FN+1) = FILE NAME (SEQUENCE NUMBER). 03146 M00S02377.qfm +++|* (BFMS) = QUEUE FILE SYSTEM SECTOR. 03147 M00S02378.qfm +++|* 03148 M00S02379.qfm +++|* EXIT SYSTEM SECTOR REWRITTEN. 03149 M00S02380.qfm +++|*
| Line S00143 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03150 M01S00143.242l642 +++|* ERROR THE JOB IS ROLLED OUT IF A NON-SUBSYSTEM JOB 03151 M01S00144.242l642 +++|* ENCOUNTERS A RECOVERABLE I/O ERROR. IF A 03152 M01S00145.242l642 +++|* NON-RECOVERABLE ERROR IS ENCOUNTERED AND/OR THE 03153 M01S00146.242l642 +++|* CALLER IS A SUBSYSTEM, THEN ERROR CODE = *RMSE* (6) 03154 M01S00147.242l642 +++|* IS RETURNED. 03155 M01S00148.242l642 +++|* 03156 M00S02381.qfm +++|* USES T7, CM - CM+4. 03157 M00S02382.qfm +++|*
| Line S02383 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03158 M01S02383.242l642 ---|* CALLS WSS.
| Line S00149 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03159 M01S00149.242l642 +++|* CALLS MSR, WSS. 03160 M00S02384.qfm +++|*
| Line S02385 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03161 M01S02385.242l642 ---|* MACROS SETMS, ENDMS.
| Line S00150 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03162 M01S00150.242l642 +++|* MACROS ENDMS, SETMS. 03163 M00S02386.qfm +++| 03164 M00S02387.qfm +++| 03165 M00S02388.qfm +++| USS SUBR ENTRY/EXIT 03166 M00S02389.qfm +++| STD T7 03167 M00S02390.qfm +++| LDD QA SET QFT ORDINAL 03168 M00S02391.qfm +++| STM GQSS 03169 M00S02392.qfm +++| LDD T5 SET EQUIPMENT IN QFT IMAGE 03170 M00S02393.qfm +++| STM IOSS+5*ENTQ 03171 M00S02394.qfm +++| LDD T6 SET FIRST TRACK 03172 M00S02395.qfm +++| STM IOSS+5*ENTQ+1 03173 M00S02396.qfm +++| LDC MMFL FETCH MACHINE ID 03174 M00S02397.qfm +++| CRD CM 03175 M00S02398.qfm +++| LDD CM SET MACHINE ID 03176 M00S02399.qfm +++| STM RMSS 03177 M00S02400.qfm +++| LDM FGSS SET FILE ACTIVITY STATUS 03178 M00S02401.qfm +++| SCN 2 03179 M00S02402.qfm +++| LMD T7 03180 M00S02403.qfm +++| STM FGSS 03181 M00S02404.qfm +++| LDD FN SET FILE NAME 03182 M00S02405.qfm +++| STM FNSS 03183 M00S02406.qfm +++| LDD FN+1 03184 M00S02407.qfm +++| STM FNSS+1
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | qfm1 |
Seq # *Modification Id* Act ----------------------------+ 03185 M01S00001.qfm1 +++| LDD FA SAVE FNT POINTER 03186 M01S00002.qfm1 +++| STM USSA 03187 M01S00003.qfm1 +++| LDN 0 PREVENT *WSS* UPDATE OF *FNSS* 03188 M01S00004.qfm1 +++| STD FA
| Line S02408 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03189 M01S02408.242l642 ---| SETMS WRITE,RW
| Line S00151 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03190 M01S00151.242l642 +++| SETMS IO,RW 03191 M00S02409.qfm +++| RJM WSS REWRITE SYSTEM SECTOR
| Line S02410 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03192 M01S02410.242l642 ---| ENDMS
| Line S00152 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03193 M01S00152.242l642 +++| PJN USS1 IF NO WRITE ERRORS 03194 M01S00153.242l642 +++| LDM USSA RESET FNT POINTER 03195 M01S00154.242l642 +++| STD FA 03196 M01S00155.242l642 +++| RJM MSR CHECK IF THE ERROR IS RECOVERABLE 03197 M01S00156.242l642 +++| 03198 M01S00157.242l642 +++| USS1 ENDMS
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | qfm1 |
Seq # *Modification Id* Act ----------------------------+ 03199 M01S00005.qfm1 +++| LDC ** RESET FNT POINTER 03200 M01S00006.qfm1 +++| USSA EQU *-1 03201 M01S00007.qfm1 +++| STD FA 03202 M00S02411.qfm +++| LJM USSX RETURN 03203 M00S02412.qfm +++| SPACE 4,10 03204 M00S02413.qfm +++|** COMMON DECKS. 03205 M00S02414.qfm +++| 03206 M00S02415.qfm +++|
| Line S00086 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | ns2442 |
Seq # *Modification Id* Act ----------------------------+ 03207 M02S00086.ns2442 ---| QUAL CIB 03208 M02S00087.ns2442 ---| QUAL$ EQU 0 DO NOT REQUALIFY *COMPCIB*
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns2442 |
M02 (Removed by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 03209 M02S00004.ns2786 ---|*CALL COMPCDD
| Line S00088 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 03210 M01S00088.ns21000 +++|*CALL COMPCIB
| Line S00089 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | ns2442 |
Seq # *Modification Id* Act ----------------------------+ 03211 M02S00089.ns2442 ---| QUAL *
| Line S02416 Modification History | |
|---|---|
M01 (Removed by) | ns2663 |
Seq # *Modification Id* Act ----------------------------+ 03212 M01S02416.ns2663 ---|*CALL COMPIAM
| Line S02417 Modification History | |
|---|---|
M01 (Removed by) | ns2442 |
Seq # *Modification Id* Act ----------------------------+ 03213 M01S02417.ns2442 ---| QUAL WEI 03214 M01S02418.ns2442 ---| QUAL$ EQU 0 DONT REQUALIFY *COMPWEI*
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | ns2442 |
Seq # *Modification Id* Act ----------------------------+ 03215 M01S00005.ns2442 +++| QUAL WEI QUALIFY *WEI*
| Line S02419 Modification History | |
|---|---|
M01 (Removed by) | ns2099 |
Seq # *Modification Id* Act ----------------------------+ 03216 M01S02419.ns2099 ---| BFMS EQU OVL0 REDEFINE EOI BUFFER
| Line S00190 Modification History | |
|---|---|
M01 (Added by) | ns2099 |
Seq # *Modification Id* Act ----------------------------+ 03217 M01S00190.ns2099 +++| WEI$ EQU 0 SELECT CALLER DEFINED BUFFER 03218 M00S02420.qfm +++|*CALL COMPWEI 03219 M00S02421.qfm +++| QUAL * 03220 M00S02422.qfm +++| WEI EQU /WEI/WEI
| Line S02423 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03221 M01S02423.242l642 ---|
| Line S00158 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03222 M01S00158.242l642 +++| SPACE 4,10 03223 M01S00159.242l642 +++| OVL0 EQU *+5 03224 M01S00160.242l642 +++| ERRNG EPFW-OVL0-ZBFL
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | ns2663 |
Seq # *Modification Id* Act ----------------------------+ 03225 M01S00010.ns2663 +++| ERRNG BFMS-OVL0-ZQML OVERFLOW INTO *0QM* 03226 M00S02424.qfm +++| OVERFLOW OVL 03227 M00S02425.qfm +++| OVERLAY (DEQUEUE/ATTACH PROCESSORS.) 03228 M00S02426.qfm +++| DEQF SPACE 4 03229 M00S02427.qfm +++|*** DEQF - DEQUEUE LIST. (FUNCTION 10). 03230 M00S02428.qfm +++|* 03231 M00S02429.qfm +++|* THE SYSTEM SECTORS OF THE FILES ASSOCIATED WITH THE 03232 M00S02430.qfm +++|* IQFT ENTRIES STARTING AT OUT WILL BE INTEROGATED 03233 M00S02431.qfm +++|* WHEN A FILE IS FOUND THAT MEETS THE DATE, FAMILY NAME 03234 M00S02432.qfm +++|* AND FILE SIZE CRITERIA PASSED THROUGH THE FET, ITS IQFT 03235 M00S02433.qfm +++|* ENTRY WILL BE UPDATED. WHEN A FILE DOES NOT MEET THE 03236 M00S02434.qfm +++|* SELECTION CRITERIA, THE FIRST WORD OF THE IQFT ENTRY 03237 M00S02435.qfm +++|* WILL BE ZEROED. THE FUNCTION TERMINATES WHEN ALL ENTRIES 03238 M00S02436.qfm +++|* IN THE BUFFER HAVE BEEN PROCESSED. THE BUFFER POINTERS 03239 M00S02437.qfm +++|* WILL NOT BE CHANGED. 03240 M00S02438.qfm +++| 03241 M00S02439.qfm +++| 03242 M00S02440.qfm +++| ENTRY DEQ ENTRY/EXIT 03243 M00S02441.qfm +++| DEQ1 RJM AQC ATTACH QUEUED FILE TO CONTROL POINT 03244 M00S02442.qfm +++| MJN DEQX IF NO MORE FILES 03245 M00S02443.qfm +++| NJN DEQ2 IF NO FILE ASSIGNED TO CONTROL POINT 03246 M00S02444.qfm +++| RJM VFE VALIDATE FILE SELECTION 03247 M00S02445.qfm +++| ZJN DEQ3 IF FILE TO BE PROCESSED 03248 M00S02446.qfm +++| RJM RFQ RETURN FILE TO QUEUE 03249 M00S02447.qfm +++| DEQ2 LDN ZERL CLEAR FNT ENTRY IN BUFFER 03250 M00S02448.qfm +++| CRD CM 03251 M00S02449.qfm +++| LDD CA 03252 M00S02450.qfm +++| SHN 6 03253 M00S02451.qfm +++| ADD RA 03254 M00S02452.qfm +++| SHN 6 03255 M00S02453.qfm +++| ADD CA+1 03256 M00S02454.qfm +++| CWD CM 03257 M00S02455.qfm +++| UJN DEQ1 03258 M00S02456.qfm +++| 03259 M00S02457.qfm +++|* COMPLETE IQFT ENTRY IN FET BUFFER. 03260 M00S02458.qfm +++| 03261 M00S02459.qfm +++| DEQ3 RJM VEI VERIFY BOI/EOI
| Line S02460 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03262 M01S02460.242l642 ---| SETMS WRITE,RW
| Line S00161 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03263 M01S00161.242l642 +++| SETMS IO,RW 03264 M00S02461.qfm +++| LDM FGSS SET INACTIVE QUEUE FILE STATUS 03265 M00S02462.qfm +++| SCN 2 03266 M00S02463.qfm +++| STM FGSS
| Line S00191 Modification History | |
|---|---|
M01 (Added by) | ns2099 |
Seq # *Modification Id* Act ----------------------------+ 03267 M01S00191.ns2099 +++| LDD FA SAVE FNT POINTER 03268 M01S00192.ns2099 +++| STM DEQA 03269 M01S00193.ns2099 +++| LDN 0 PREVENT *WSS* UPDATE OF *FNSS* 03270 M01S00194.ns2099 +++| STD FA 03271 M00S02464.qfm +++| RJM WSS REWRITE SYSTEM SECTOR
| Line S02465 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03272 M01S02465.242l642 ---| ENDMS
| Line S00162 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03273 M01S00162.242l642 +++| PJN DEQ4 IF NO WRITE ERRORS 03274 M01S00163.242l642 +++| LDM DEQA RESET FNT POINTER 03275 M01S00164.242l642 +++| STD FA 03276 M01S00165.242l642 +++| RJM MSR CHECK IF THE ERROR IS RECOVERABLE 03277 M01S00166.242l642 +++| 03278 M01S00167.242l642 +++| DEQ4 ENDMS
| Line S00195 Modification History | |
|---|---|
M01 (Added by) | ns2099 |
Seq # *Modification Id* Act ----------------------------+ 03279 M01S00195.ns2099 +++| LDC ** 03280 M01S00196.ns2099 +++| DEQA EQU *-1 03281 M01S00197.ns2099 +++| STD FA 03282 M00S02466.qfm +++| RJM UQT UPDATE IQFT ENTRY 03283 M00S02467.qfm +++| RJM RIE RELEASE QFT ENTRY 03284 M00S02468.qfm +++| RJM RFE RELEASE LOCAL FNT ENTRY 03285 M00S02469.qfm +++| LJM DEQ1 PROCESS NEXT FILE 03286 M00S02470.qfm +++| TITLE ATTACH QUEUE FILE. 03287 M00S02471.qfm +++| AQF SPACE 4 03288 M00S02472.qfm +++|*** AQFF - ATTACH QUEUE FILE. (FUNCTION 11). 03289 M00S02473.qfm +++|* 03290 M00S02474.qfm +++|* THE FILES ASSOCIATED WITH THE IQFT ENTRIES STARTING AT OUT 03291 M00S02475.qfm +++|* WILL BE INTERROGATED UNTIL A FILE IS FOUND THAT SATISFIES 03292 M00S02476.qfm +++|* THE DATE, FILE SIZE, AND FAMILY NAME CRITERIA PASSED THROUGH 03293 M00S02477.qfm +++|* THE FET. THIS FILE WILL BE ASSIGNED TO THE CONTROL POINT AND 03294 M00S02478.qfm +++|* ITS IQFT ENTRY WILL BE UPDATED. THE OUT POINTER WILL BE 03295 M00S02479.qfm +++|* ADJUSTED TO THE FIRST WORD OF THIS IQFT ENTRY. 03296 M00S02480.qfm +++| 03297 M00S02481.qfm +++| 03298 M00S02482.qfm +++| AQF6 LDN OT UPDATE OUT POINTER 03299 M00S02483.qfm +++| RJM UOP 03300 M00S02484.qfm +++| 03301 M00S02485.qfm +++| ENTRY AQF ENTRY/EXIT 03302 M00S02486.qfm +++| AQF2 RJM AQC ATTACH QUEUED FILE TO CONTROL POINT 03303 M00S02487.qfm +++| MJN AQF6 IF NO MORE FILES 03304 M00S02488.qfm +++| NJN AQF2 IF NO FILE ASSIGNED 03305 M00S02489.qfm +++| RJM VFE VERIFY FILE ENTRY 03306 M00S02490.qfm +++| ZJN AQF3 IF FILE TO BE PROCESSED 03307 M00S02491.qfm +++| RJM RFQ RETURN FILE TO QUEUE 03308 M00S02492.qfm +++| UJN AQF2 PROCESS NEXT FILE 03309 M00S02493.qfm +++| 03310 M00S02494.qfm +++| AQF3 RJM VEI VERIFY BOI/EOI 03311 M00S02495.qfm +++| LDN CA UPDATE OUT POINTER 03312 M00S02496.qfm +++| RJM UOP 03313 M00S02497.qfm +++| RJM UQT UPDATE IQFT ENTRY 03314 M00S02498.qfm +++| RJM CIN CLEAR INTERLOCKS 03315 M00S02499.qfm +++| LJM AQFX RETURN 03316 M00S02500.qfm +++| TITLE ATTACH INACTIVE QUEUED FILE. 03317 M00S02501.qfm +++| AIQF SPACE 4,10 03318 M00S02502.qfm +++|*** AIQF - ATTACH INACTIVE QUEUED FILE. (FUNCTION 13) 03319 M00S02503.qfm +++|* 03320 M00S02504.qfm +++|* THE INACTIVE QUEUED FILE ASSOCIATED WITH THE NEXT IQFT 03321 M00S02505.qfm +++|* ENTRY IN THE BUFFER WILL BE ATTACHED TO THE CONTROL POINT. 03322 M00S02506.qfm +++| 03323 M00S02507.qfm +++| 03324 M00S02508.qfm +++| ENTRY AIQ ENTRY/EXIT 03325 M00S02509.qfm +++| RJM RQE READ IQFT ENTRY 03326 M00S02510.qfm +++| MJN AIQX IF BUFFER EMPTY 03327 M00S02511.qfm +++| RJM RQS READ SYSTEM SECTOR 03328 M00S02512.qfm +++| ZJN AIQ1 IF NO ERROR ENCOUNTERED
| Line S02513 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03329 M01S02513.v23l617 ---| ERROR INSE EC = 5, INVALID SYSTEM SECTOR
| Line S00041 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03330 M01S00041.v23l617 +++| ERROR INSE EC = 5, INCORRECT SYSTEM SECTOR 03331 M00S02514.qfm +++| 03332 M00S02515.qfm +++| AIQ1 ENDMS
| Line S02516 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03333 M01S02516.ns22000 ---| LDD T5 SAVE EQUIPMENT NUMBER
| Line S00070 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03334 M01S00070.ns22000 +++| LDD T5 SAVE EST ORDINAL 03335 M00S02517.qfm +++| STD SC 03336 M00S02518.qfm +++| LDN NEEQ ASSIGN NULL EQUIPMENT 03337 M00S02519.qfm +++| STD FS 03338 M00S02520.qfm +++| LDN 4 SELECT RETURN ON LOCAL FILE LIMIT 03339 M00S02521.qfm +++| STM OVL0-1 03340 M00S02522.qfm +++| EXECUTE 0BF,OVL0 03341 M00S02523.qfm +++| UJN AIQ2 NO DUPLICATE FILE NAME 03342 M00S02524.qfm +++| 03343 M00S02525.qfm +++|* PROCESS ADVANCE EXIT FROM *0BF* IF FILE ALREADY EXISTS. 03344 M00S02526.qfm +++| 03345 M00S02527.qfm +++| LDN 0 03346 M00S02528.qfm +++| STD FA 03347 M00S02529.qfm +++| ERROR DFNE EC = 16, DUPLICATE FILE NAME 03348 M00S02530.qfm +++| 03349 M00S02531.qfm +++| AIQ2 ZJN AIQ3 IF LOCAL FNT ENTRY CREATED 03350 M00S02532.qfm +++| ERROR FTHE EC = 4, FNT FULL 03351 M00S02533.qfm +++| 03352 M00S02534.qfm +++|* BUILD FNT/FST ENTRY. 03353 M00S02535.qfm +++| 03354 M00S02536.qfm +++| AIQ3 LDN 5 SET FILE NOT BUSY 03355 M00S02537.qfm +++| STD FS+4 03356 M00S02538.qfm +++| LDD SC SET EQUIPMENT 03357 M00S02539.qfm +++| STD FS 03358 M00S02540.qfm +++| LDM FTSS SET FIRST TRACK 03359 M00S02541.qfm +++| STD FS+1 03360 M00S02542.qfm +++| STD FS+2 REWIND THE FILE 03361 M00S02543.qfm +++| LDN FSMS 03362 M00S02544.qfm +++| STD FS+3 03363 M00S02545.qfm +++| NFA FA,R 03364 M00S02546.qfm +++| CWD FN 03365 M00S02547.qfm +++| ADN FSTL 03366 M00S02548.qfm +++| CWD FS 03367 M01S00071.ns22000 +++| ADN FUTL-FSTL UPDATE ACCESS LEVEL IN FNT ENTRY 03368 M01S00072.ns22000 +++| CRD CM 03369 M01S00073.ns22000 +++| LDM IQFB+INSQ*5+3 03370 M01S00074.ns22000 +++| SHN -3 03371 M01S00075.ns22000 +++| LPN 7 03372 M01S00076.ns22000 +++| STD T1 03373 M01S00077.ns22000 +++| LDD CM+2 03374 M01S00078.ns22000 +++| SCN 7 03375 M01S00079.ns22000 +++| LMD T1 03376 M01S00080.ns22000 +++| STD CM+2 03377 M01S00081.ns22000 +++| NFA FA,R 03378 M01S00082.ns22000 +++| ADN FUTL 03379 M01S00083.ns22000 +++| CWD CM 03380 M00S02549.qfm +++| LJM AIQX RETURN 03381 M00S02550.qfm +++| AQC TITLE SUBROUTINES. 03382 M00S02551.qfm +++|** AQC - ATTACH QUEUED FILE TO CONTROL POINT. 03383 M00S02552.qfm +++|* 03384 M00S02553.qfm +++|* ENTRY (OT - OT+1) = OUT POINTER. 03385 M00S02554.qfm +++|* 03386 M00S02555.qfm +++|* EXIT (A) = 0 IF QUEUED FILE ASSIGNED TO CONTROL POINT. 03387 M00S02556.qfm +++|* (A) .LT. 0, IF NO MORE ENTRIES IN BUFFER. 03388 M00S02557.qfm +++|* (A) .GT. 0, IF FILE NOT FOUND. 03389 M00S02558.qfm +++|* (A) = 0, IF FILE ASSIGNED TO CONTROL POINT. 03390 M00S02559.qfm +++|* (FA) = FNT ADDRESS (OFFSET INTO NFL). 03391 M00S02560.qfm +++|* (QA) = QFT ORDINAL.
| Line S02561 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03392 M01S02561.ns22000 ---|* (T5) = EQUIPMENT NUMBER.
| Line S00084 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03393 M01S00084.ns22000 +++|* (T5) = EST ORDINAL. 03394 M00S02562.qfm +++|* (T6) = FIRST TRACK. 03395 M00S02563.qfm +++|* (CA - CA+1) = OUT POINTER TO CURRENT BUFFER ENTRY. 03396 M00S02564.qfm +++|* (FN - FN+4) = LOCAL FNT ENTRY. 03397 M00S02565.qfm +++|* (FS - FS+4) = LOCAL FST ENTRY. 03398 M00S02566.qfm +++|* 03399 M00S02567.qfm +++|* USES T3, CM - CM+4. 03400 M00S02568.qfm +++|* 03401 M00S02569.qfm +++|* CALLS CCE, COB, RBB, RFQ, *0BF*. 03402 M00S02570.qfm +++|* 03403 M00S02571.qfm +++|* MACROS MONITOR, SFA. 03404 M00S02572.qfm +++| 03405 M00S02573.qfm +++| 03406 M00S02574.qfm +++| AQC SUBR ENTRY/EXIT 03407 M00S02575.qfm +++| RJM RQE READ IQFT ENTRY FROM BUFFER 03408 M00S02576.qfm +++| MJN AQCX IF BUFFER EMPTY 03409 M00S02577.qfm +++| 03410 M00S02578.qfm +++|* CHECK QFT ORDINAL. 03411 M00S02579.qfm +++| 03412 M00S02580.qfm +++| LDN QFTP FETCH QFT POINTER 03413 M00S02581.qfm +++| CRD CM 03414 M00S02582.qfm +++| LDM IQFB+5*QFEWL-1
| Line S02583 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03415 M01S02583.v23l617 ---| ZJN AQC1 IF INVALID ORDINAL
| Line S00042 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03416 M01S00042.v23l617 +++| ZJN AQC1 IF INCORRECT ORDINAL 03417 M00S02584.qfm +++| SBD CM+2 03418 M00S02585.qfm +++| MJN AQC2 IF VALID ORDINAL
| Line S02586 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03419 M01S02586.v23l617 ---| AQC1 ABORT ERIQ * QFM INVALID IOQT ORDINAL.*
| Line S00043 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03420 M01S00043.v23l617 +++| AQC1 ABORT ERIQ * QFM INCORRECT QFT ORDINAL.* 03421 M00S02587.qfm +++| 03422 M00S02588.qfm +++| AQC2 ADD CM+2 SAVE QFT ORDINAL 03423 M00S02589.qfm +++| STD QA 03424 M00S02590.qfm +++| LDD CP FETCH EJT ORDINAL 03425 M00S02591.qfm +++| ADN TFSW 03426 M00S02592.qfm +++| CRD CM 03427 M00S02593.qfm +++| LDD CM SET ORDINAL IN *UTEM* PARAMETER BLOCK 03428 M00S02594.qfm +++| STM AQCA+5*2+4 03429 M00S02595.qfm +++| LDD MA STORE PARAMETER BLOCK 03430 M00S02596.qfm +++| CWM AQCA,TR 03431 M00S02597.qfm +++| LDN 1S5+3 03432 M00S02598.qfm +++| STD CM+1 03433 M00S02599.qfm +++| SFA QFT,QA SET ABSOLUTE ADDRESS OF QFT ENTRY 03434 M00S02600.qfm +++| STD CM+4 03435 M00S02601.qfm +++| SHN -14 03436 M00S02602.qfm +++| STD CM+3 03437 M00S02603.qfm +++| MONITOR UTEM ATTACH QUEUED FILE 03438 M00S02604.qfm +++| LDD CM+1 03439 M00S02605.qfm +++| NJN AQC3 IF REQUEST REJECTED 03440 M00S02606.qfm +++| LDN 2 03441 M00S02607.qfm +++| STD T3 03442 M00S02608.qfm +++| LDD MA SAVE ORIGINAL QFT ENTRY PARAMETERS 03443 M00S02609.qfm +++| ADN 1 03444 M00S02610.qfm +++| CRM RFQA,T3 03445 M00S02611.qfm +++| RJM CCE COMPARE ENTRY FROM BUFFER 03446 M00S02612.qfm +++| ZJN AQC4 IF MATCHING ENTRY 03447 M00S02613.qfm +++| RJM RFQ RETURN FILE TO QUEUE 03448 M00S02614.qfm +++| LDN 1 03449 M00S02615.qfm +++| AQC3 LJM AQCX RETURN 03450 M00S02616.qfm +++| 03451 M00S02617.qfm +++|* CREATE LOCAL FNT ENTRY. 03452 M00S02618.qfm +++| 03453 M00S02619.qfm +++| AQC4 STD FN+2 03454 M00S02620.qfm +++| STD FN+3 03455 M00S02621.qfm +++| LDN NEEQ ASSIGN NULL EQUIPMENT 03456 M00S02622.qfm +++| STD FS 03457 M00S02623.qfm +++| LDN 6 RETURN ON NFL INCREASE, LOCAL FILE LIMIT 03458 M00S02624.qfm +++| STM OVL0-1 03459 M00S02625.qfm +++| EXECUTE 0BF,OVL0 03460 M00S02626.qfm +++| UJN AQC5 CHECK RETURN STATUS 03461 M00S02627.qfm +++| 03462 M00S02628.qfm +++|* PROCESS ADVANCE EXIT FROM *0BF* IF FILE ALREADY EXISTS. 03463 M00S02629.qfm +++|
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | qfm8 |
Seq # *Modification Id* Act ----------------------------+ 03464 M01S00001.qfm8 +++| LDN 0 CLEAR LOCAL FILE OFFSET 03465 M01S00002.qfm8 +++| STD FA 03466 M00S02630.qfm +++| RJM RFQ RETURN FILE TO QUEUE
| Line S02631 Modification History | |
|---|---|
M01 (Removed by) | qfm8 |
Seq # *Modification Id* Act ----------------------------+ 03467 M01S02631.qfm8 ---|* LDN 0 03468 M01S02632.qfm8 ---| STD FA 03469 M00S02633.qfm ---| ERROR DFNE EC = 16, DUPLICATE FILE NAME 03470 M00S02634.qfm ---| 03471 M00S02635.qfm ---| AQC5 ZJN AQC6 IF FNT ENTRY CREATED 03472 M00S02636.qfm ---| LMN 4 03473 M00S02637.qfm ---| NJN AQC5.1 IF NOT LOCAL FILE LIMIT 03474 M00S02638.qfm ---| RJM RFQ RETURN FILE TO QUEUE 03475 M00S02639.qfm ---| ERROR FTHE EC = 4, FNT IS FULL 03476 M00S02640.qfm ---| 03477 M00S02641.qfm ---|* ENTER RECALL STACK TO WAIT FOR PENDING NFL INCREASE. 03478 M00S02642.qfm ---| 03479 M00S02643.qfm ---| AQC5.1 RJM RFQ RETURN FILE TO QUEUE 03480 M00S02644.qfm ---| LJM ERS ENTER PP RECALL STACK 03481 M00S02645.qfm ---| 03482 M00S02646.qfm ---|* BUILD FNT/FST ENTRY. 03483 M00S02647.qfm ---| 03484 M00S02648.qfm ---| AQC6 LDC QFFT*100-LOFT*100 SET FILE TYPE 03485 M00S02649.qfm ---| RAD FN+4 03486 M00S02650.qfm ---| LDD CN+1 SET FILE REWOUND 03487 M00S02651.qfm ---| STD CN+2 03488 M00S02652.qfm ---| LDN FSMS 03489 M00S02653.qfm ---| STD CN+3 03490 M00S02654.qfm ---| LDN 4 SET FILE BUSY 03491 M00S02655.qfm ---| STD CN+4 03492 M00S02656.qfm ---| NFA FA,R STORE FNT ENTRY 03493 M00S02657.qfm ---| CWD FN 03494 M00S02658.qfm ---| ADN FSTL 03495 M00S02659.qfm ---| CWD CN 03496 M00S02660.qfm ---| CRD T5 03497 M00S02661.qfm ---| CRD FS
| Line S00085 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03498 M01S00085.ns22000 +++| ADN FUTL-FSTL UPDATE ACCESS LEVEL IN FNT ENTRY 03499 M01S00086.ns22000 +++| CRD CM 03500 M01S00087.ns22000 +++| SFA QFT,QA 03501 M01S00088.ns22000 +++| ADN INSQ 03502 M01S00089.ns22000 +++| CRD T0 03503 M01S00090.ns22000 +++| LDD T3 03504 M01S00091.ns22000 +++| SHN -3 03505 M01S00092.ns22000 +++| LPN 7 03506 M01S00093.ns22000 +++| STD T1 03507 M01S00094.ns22000 +++| LDD CM+2 03508 M01S00095.ns22000 +++| SCN 7 03509 M01S00096.ns22000 +++| LMD T1 03510 M01S00097.ns22000 +++| STD CM+2 03511 M01S00098.ns22000 +++| NFA FA,R 03512 M01S00099.ns22000 +++| ADN FUTL 03513 M01S00100.ns22000 +++| CWD CM 03514 M00S02662.qfm +++| LDN 0 03515 M00S02663.qfm +++| LJM AQCX RETURN 03516 M00S02664.qfm +++| 03517 M00S02665.qfm +++| AQCA VFD 1/1,5/JSNQ,6/4,6/0,42/0 03518 M00S02666.qfm +++| VFD 1/0,5/JSNQ,6/1,6/1,42/1 03519 M00S02667.qfm +++| VFD 1/0,5/ENTQ,6/24D,6/0,42/0 03520 M00S02668.qfm +++| CCE SPACE 4,10 03521 M00S02669.qfm +++|** CCE - CHECK CURRENT ENTRY FROM BUFFER. 03522 M00S02670.qfm +++|* 03523 M00S02671.qfm +++|* ENTRY (QA) = QFT ORDINAL. 03524 M00S02672.qfm +++|* (IQFB) = IQFT ENTRY. 03525 M00S02673.qfm +++|* 03526 M00S02674.qfm +++|* EXIT (A) = 0 IF QFT ENTRY MATCHES ENTRY FROM BUFFER. 03527 M00S02675.qfm +++|* (FN - FN+1) = FILE NAME (SEQUENCE NUMBER) 03528 M00S02676.qfm +++|* (CN - CN+4) = FST INFORMATION. 03529 M00S02677.qfm +++|* 03530 M00S02678.qfm +++|* MACROS SFA. 03531 M00S02679.qfm +++| 03532 M00S02680.qfm +++| 03533 M00S02681.qfm +++| CCE SUBR ENTRY/EXIT 03534 M00S02682.qfm +++| SFA QFT,QA FETCH QFT DATA 03535 M00S02683.qfm +++| CRD FN 03536 M00S02684.qfm +++| ADN ENTQ-JSNQ 03537 M00S02685.qfm +++| CRD CN 03538 M00S02686.qfm +++| LDD CN+1 COMPARE FIRST TRACK 03539 M00S02687.qfm +++| LMM IQFB+5*ENTQ+1 03540 M00S02688.qfm +++| NJN CCEX IF NO MATCH 03541 M00S02689.qfm +++| LDD FN+1 03542 M00S02690.qfm +++| LMM IQFB+5*JSNQ+1 03543 M00S02691.qfm +++| NJN CCEX IF NOT MATCHING SEQUENCE NUMBER 03544 M00S02692.qfm +++| LDD FN 03545 M00S02693.qfm +++| LMM IQFB+5*JSNQ 03546 M00S02694.qfm +++| NJN CCEX IF NOT MATCHING SEQUENCE NUMBER 03547 M00S02695.qfm +++| LDD CN 03548 M00S02696.qfm +++| LMM IQFB+5*ENTQ 03549 M00S02697.qfm +++| UJN CCEX RETURN 03550 M00S02698.qfm +++| RFQ SPACE 4,10 03551 M00S02699.qfm +++|** RFQ - RETURN FILE TO QUEUE. 03552 M00S02700.qfm +++|* 03553 M00S02701.qfm +++|* ENTRY (FA) = NFL FNT ENTRY OFFSET. 03554 M00S02702.qfm +++|* (QA) = QFT ORDINAL. 03555 M00S02703.qfm +++|* 03556 M00S02704.qfm +++|* EXIT (A) = (QA) = 0. 03557 M00S02705.qfm +++|* 03558 M00S02706.qfm +++|* USES CM - CM+4. 03559 M00S02707.qfm +++|* 03560 M00S02708.qfm +++|* CALLS RFE. 03561 M00S02709.qfm +++|* 03562 M00S02710.qfm +++|* MACROS MONITOR, SFA. 03563 M00S02711.qfm +++| 03564 M00S02712.qfm +++| 03565 M00S02713.qfm +++| RFQ SUBR ENTRY/EXIT 03566 M00S02714.qfm +++| LDN 3 03567 M00S02715.qfm +++| STD CM+1 03568 M00S02716.qfm +++| LDD MA STORE *UTEM* PARAMETER BLOCK 03569 M00S02717.qfm +++| CWM RFQA,CM+1 03570 M00S02718.qfm +++| SFA QFT,QA SET ABSOLUTE ADDESS OF QFT ENTRY 03571 M00S02719.qfm +++| STD CM+4 03572 M00S02720.qfm +++| SHN -14 03573 M00S02721.qfm +++| STD CM+3 03574 M00S02722.qfm +++| MONITOR UTEM 03575 M00S02723.qfm +++|* LDN 0 CLEAR QFT ORDINAL 03576 M00S02724.qfm +++| STD QA 03577 M00S02725.qfm +++| RJM RFE RELEASE LOCAL FNT ENTRY 03578 M00S02726.qfm +++|* LDN 0 03579 M00S02727.qfm +++| UJN RFQX RETURN 03580 M00S02728.qfm +++| 03581 M00S02729.qfm +++| RFQA BSS 2*5 *UTEM* PARAMETER BLOCK 03582 M00S02730.qfm +++| VFD 1/0,5/JSNQ,6/1,6/0,42/0 CLEAR QFT ENTRY INTERLOCK 03583 M00S02731.qfm +++| UQT SPACE 4,10 03584 M00S02732.qfm +++|** UQT - UPDATE IQFT ENTRY IN FET BUFFER. 03585 M00S02733.qfm +++|* 03586 M00S02734.qfm +++|* ENTRY (IQFB) = IQFT ENTRY. 03587 M00S02735.qfm +++|* (BFMS) = QUEUE FILE SYSTEM SECTOR. 03588 M00S02736.qfm +++|* 03589 M00S02737.qfm +++|* USES T1. 03590 M00S02738.qfm +++|* 03591 M00S02739.qfm +++|* CALLS WBB. 03592 M00S02740.qfm +++| 03593 M00S02741.qfm +++| 03594 M00S02742.qfm +++| UQT SUBR ENTRY/EXIT 03595 M00S02743.qfm +++| LDM FLSS SET FILE LENGTH 03596 M00S02744.qfm +++| STM CDSS 03597 M00S02745.qfm +++| LDM FLSS+1 03598 M00S02746.qfm +++| STM CDSS+1 03599 M00S02747.qfm +++| LDM RMSS SET MACHINE ID 03600 M00S02748.qfm +++| STM FMSS+4 03601 M00S02749.qfm +++| LDN 5 03602 M00S02750.qfm +++| STD T1 03603 M00S02751.qfm +++| LDD MA UPDATE IQFT ENTRY 03604 M00S02752.qfm +++| CWM CDSS,ON 03605 M00S02753.qfm +++| CWM FMSS,ON 03606 M00S02754.qfm +++| CWM FDSS,ON
| Line S02755 Modification History | |
|---|---|
M01 (Removed by) | ns2419 |
Seq # *Modification Id* Act ----------------------------+ 03607 M01S02755.ns2419 ---| CWM ACSS,ON 03608 M01S02756.ns2419 ---| CWM FOSS,ON
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2419 |
Seq # *Modification Id* Act ----------------------------+ 03609 M01S00001.ns2419 +++| CWM OASS,ON OWNER USER NAME/ USER INDEX 03610 M01S00002.ns2419 +++| CWM FOSS,ON OWNER FAMILY NAME 03611 M00S02757.qfm +++| SBN 5 03612 M00S02758.qfm +++| CRM IQFB+5*10,T1 03613 M00S02759.qfm +++| LDN QFEWL WRITE IQFT ENTRY TO BUFFER 03614 M00S02760.qfm +++| STD T1 03615 M00S02761.qfm +++| LDC IQFB 03616 M00S02762.qfm +++| RJM WBB 03617 M00S02763.qfm +++| LJM UQTX RETURN 03618 M00S02764.qfm +++| VEI SPACE 4,20 03619 M00S02765.qfm +++|** VEI - VERIFY BOI/EOI. 03620 M00S02766.qfm +++|*
| Line S02767 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03621 M01S02767.ns22000 ---|* ENTRY (T5) = EQUIPMENT NUMBER.
| Line S00101 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03622 M01S00101.ns22000 +++|* ENTRY (T5) = EST ORDINAL. 03623 M00S02768.qfm +++|* (T6) = FIRST TRACK. 03624 M00S02769.qfm +++|* (FN - FN+1) = FILE NAME (SEQUENCE NUMBER). 03625 M00S02770.qfm +++|* 03626 M00S02771.qfm +++|* EXIT (FLSS - FLSS+1) = -0 IF BOI/EOI VALIDATION ERROR. 03627 M00S02772.qfm +++|*
| Line S00168 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03628 M01S00168.242l642 +++|* ERROR THE JOB IS ROLLED OUT IF A NON-SUBSYSTEM JOB 03629 M01S00169.242l642 +++|* ENCOUNTERS A RECOVERABLE I/O ERROR. IF A 03630 M01S00170.242l642 +++|* NON-RECOVERABLE ERROR IS ENCOUNTERED AND/OR THE 03631 M01S00171.242l642 +++|* CALLER IS A SUBSYSTEM, THEN ERROR CODE = *RMSE* (6) 03632 M01S00172.242l642 +++|* IS RETURNED. 03633 M01S00173.242l642 +++|* 03634 M00S02773.qfm +++|* USES T6, CM - CM+4, FN - FN+4. 03635 M00S02774.qfm +++|*
| Line S02775 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03636 M01S02775.242l642 ---|* CALLS DFM, RDS, SEI.
| Line S00174 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03637 M01S00174.242l642 +++|* CALLS DFM, MSR, RDS, SEI. 03638 M00S02776.qfm +++|* 03639 M00S02777.qfm +++|* MACROS ENDMS, SETMS. 03640 M00S02778.qfm +++| 03641 M00S02779.qfm +++| 03642 M00S02780.qfm +++| VEI SUBR ENTRY/EXIT 03643 M00S02781.qfm +++| LDN SSTL READ SYSTEM STATUS 03644 M00S02782.qfm +++| CRD CM 03645 M00S02783.qfm +++| LDD CM 03646 M00S02784.qfm +++| LPN 4 03647 M00S02785.qfm +++| LMN 4 03648 M00S02786.qfm +++| ZJN VEIX IF PF VALIDATION DISABLED 03649 M00S02787.qfm +++| RJM SEI SEARCH FOR EOI
| Line S02788 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03650 M01S02788.242l642 ---| SETMS READ
| Line S00175 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03651 M01S00175.242l642 +++| SETMS IO 03652 M00S02789.qfm +++| LDC EOIB READ EOI SECTOR 03653 M00S02790.qfm +++| RJM RDS
| Line S02791 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03654 M01S02791.242l642 ---| ENDMS
| Line S00176 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03655 M01S00176.242l642 +++| PJN VEI1 IF NO ERROR 03656 M01S00177.242l642 +++| RJM MSR CHECK IF THE ERROR IS RECOVERABLE 03657 M01S00178.242l642 +++| 03658 M01S00179.242l642 +++| VEI1 ENDMS 03659 M00S02792.qfm +++| LDM FTSS RESTORE FIRST TRACK 03660 M00S02793.qfm +++| STD T6 03661 M00S02794.qfm +++| LDD FS+1 03662 M00S02795.qfm +++| LMM EOIB+FTEI 03663 M00S02796.qfm +++| ZJN VEIX IF BOI/EOI VERIFIES 03664 M00S02797.qfm +++| LCN 0 FLAG LENGTH ERROR FOR IQF 03665 M00S02798.qfm +++| STM FLSS 03666 M00S02799.qfm +++| STM FLSS+1 03667 M00S02800.qfm +++| LDD MA MOVE FILE NAME TO MESSAGE 03668 M00S02801.qfm +++| CWD FN 03669 M00S02802.qfm +++| CRM VEIB,ON 03670 M00S02803.qfm +++| LDC 2L.. 03671 M00S02804.qfm +++| STM VEIB+2 03672 M00S02805.qfm +++| LDN 0 SET MESSAGE TERMINATOR 03673 M00S02806.qfm +++| STM VEIB+3 03674 M00S02807.qfm +++| LDC VEIA+NMSN ISSUE MESSAGE TO SYSTEM DAYFILE 03675 M00S02808.qfm +++| RJM DFM 03676 M00S02809.qfm +++| LDC VEIA+ERLN ISSUE MESSAGE TO ERRLOG 03677 M00S02810.qfm +++| RJM DFM 03678 M00S02811.qfm +++| LJM VEIX RETURN 03679 M00S02812.qfm +++| 03680 M00S02813.qfm +++| VEIA DATA H* QF LENGTH ERROR * 03681 M00S02814.qfm +++| VEIB BSS 5
| Line S02815 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03682 M01S02815.242l642 ---| VFE SPACE 4,14
| Line S00180 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03683 M01S00180.242l642 +++| VFE SPACE 4,20 03684 M00S02816.qfm +++|** VFE - VERIFY FILE ENTRY. 03685 M00S02817.qfm +++|*
| Line S02818 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03686 M01S02818.ns22000 ---|* ENTRY (T5) = EQUIPMENT NUMBER.
| Line S00102 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03687 M01S00102.ns22000 +++|* ENTRY (T5) = EST ORDINAL. 03688 M00S02819.qfm +++|* (T6) = FIRST TRACK. 03689 M00S02820.qfm +++|* (FN - FN+1) = FILE NAME (SEQUENCE NUMBER). 03690 M00S02821.qfm +++|* 03691 M00S02822.qfm +++|* EXIT (A) = 0 IF FILE SATISFIES SELECTION CRITERIA. 03692 M00S02823.qfm +++|*
| Line S00181 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03693 M01S00181.242l642 +++|* ERROR THE JOB IS ROLLED OUT IF A NON-SUBSYSTEM JOB 03694 M01S00182.242l642 +++|* ENCOUNTERS A RECOVERABLE I/O ERROR. IF A 03695 M01S00183.242l642 +++|* NON-RECOVERABLE ERROR IS ENCOUNTERED AND/OR THE 03696 M01S00184.242l642 +++|* CALLER IS A SUBSYSTEM, THEN ERROR CODE = *RMSE* (6) 03697 M01S00185.242l642 +++|* IS RETURNED. 03698 M01S00186.242l642 +++|* 03699 M00S02824.qfm +++|* USES T0, CM - CM+4, CN - CN+4. 03700 M00S02825.qfm +++|*
| Line S02826 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03701 M01S02826.242l642 ---|* CALLS GFE, IFI, RSS.
| Line S00187 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03702 M01S00187.242l642 +++|* CALLS GFE, IFI, MSR, RSS. 03703 M00S02827.qfm +++|* 03704 M00S02828.qfm +++|* MACROS ENDMS, SETMS. 03705 M00S02829.qfm +++| 03706 M00S02830.qfm +++| 03707 M00S02831.qfm +++| VFE SUBR ENTRY/EXIT 03708 M00S02832.qfm +++| 03709 M00S02833.qfm +++|* GET SELECTION CRITERIA FROM FET. 03710 M00S02834.qfm +++| 03711 M00S02835.qfm +++| RJM GFE 03712 M00S02836.qfm +++| ADN 5 FAMILY NAME/UI LOWER BOUND 03713 M00S02837.qfm +++| CRD CN 03714 M00S02838.qfm +++| ADN 1 DATE RANGE/UI UPPER BOUND 03715 M00S02839.qfm +++| CRD CM 03716 M00S02840.qfm +++| ADN 2 MACHINE ID/FILE SIZE CRITERIA 03717 M00S02841.qfm +++| CRM VFEF,ON 03718 M00S02842.qfm +++| 03719 M00S02843.qfm +++|* CHECK VALIDATION REQUIRED. 03720 M00S02844.qfm +++| 03721 M00S02845.qfm +++| LDD CM 03722 M00S02846.qfm +++| ADD CM+2 03723 M00S02847.qfm +++| ADD CN 03724 M00S02848.qfm +++| ADD CN+3 03725 M00S02849.qfm +++| ADD CN+4 03726 M00S02850.qfm +++| ADM VFEF 03727 M00S02851.qfm +++| ADM VFEF+1 03728 M00S02852.qfm +++| ADM VFEF+2 03729 M00S02853.qfm +++| ADM VFEF+3 03730 M00S02854.qfm +++| ADM VFEF+4 03731 M00S02855.qfm +++| ADD CM+3 03732 M00S02856.qfm +++| ADD CM+4 03733 M00S02857.qfm +++| ZJN VFE2 IF NO VALIDATION REQUIRED
| Line S02858 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03734 M01S02858.242l642 ---| SETMS READ
| Line S00188 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03735 M01S00188.242l642 +++| SETMS IO 03736 M00S02859.qfm +++| LDN 0 READ SYSTEM SECTOR 03737 M00S02860.qfm +++| RJM RSS 03738 M00S02861.qfm +++| ZJN VFE3 IF NO ERROR ENCOUNTERED
| Line S02862 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03739 M01S02862.242l642 ---| LDC ERSE * QFM SYSTEM SECTOR ERROR.*
| Line S00189 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03740 M01S00189.242l642 +++| PJN VFE1 IF ERROR OTHER THAN READ 03741 M01S00190.242l642 +++| RJM MSR CHECK IF THE ERROR IS RECOVERABLE 03742 M01S00191.242l642 +++| 03743 M01S00192.242l642 +++| VFE1 LDC ERSE * QFM SYSTEM SECTOR ERROR.* 03744 M00S02863.qfm +++| RJM IFI ISSUE FILE IGNORED MESSAGE 03745 M00S02864.qfm +++| LDN 1 03746 M00S02865.qfm +++| VFE2 LJM VFEX RETURN 03747 M00S02866.qfm +++| 03748 M00S02867.qfm +++| VFE3 ENDMS 03749 M00S02868.qfm +++| RJM GFE RESET INCLUSIVE DATES/MACHINE ID 03750 M00S02869.qfm +++| ADN 6 03751 M00S02870.qfm +++| CRD CM 03752 M00S02871.qfm +++| LDD CM+1 03753 M00S02872.qfm +++| SCN 77 03754 M00S02873.qfm +++| STD CM+1 03755 M00S02874.qfm +++| 03756 M00S02875.qfm +++|* CHECK FAMILY NAME SELECTION. 03757 M00S02876.qfm +++| 03758 M00S02877.qfm +++| LDD CN 03759 M00S02878.qfm +++| ZJN VFE6 IF NO FAMILY NAME COMPARISON 03760 M00S02879.qfm +++| VFE4 LDD CN COMPARE FAMILY NAME 03761 M00S02880.qfm +++| LMM FMSS 03762 M00S02881.qfm +++| NJN VFE2 IF NO MATCH 03763 M00S02882.qfm +++| LDM FMSS+1 03764 M00S02883.qfm +++| LMD CN+1 03765 M00S02884.qfm +++| NJN VFE2 IF NO MATCH 03766 M00S02885.qfm +++| LDM FMSS+2 03767 M00S02886.qfm +++| LMD CN+2 03768 M00S02887.qfm +++| VFE5 NJN VFE2 IF NO MATCH 03769 M00S02888.qfm +++| LDM FMSS+3 03770 M00S02889.qfm +++| LMD CN+3 03771 M00S02890.qfm +++| SCN 77 03772 M00S02891.qfm +++| NJN VFE5 IF NO MATCH 03773 M00S02892.qfm +++| 03774 M00S02893.qfm +++|* CHECK USER INDEX SELECTION. 03775 M00S02894.qfm +++| 03776 M00S02895.qfm +++| VFE6 LDD CN+3 03777 M00S02896.qfm +++| LPN 77 03778 M00S02897.qfm +++| STD T0
| Line S02898 Modification History | |
|---|---|
M01 (Removed by) | ns2419 |
Seq # *Modification Id* Act ----------------------------+ 03779 M01S02898.ns2419 ---| LDM ACSS+3
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2419 |
Seq # *Modification Id* Act ----------------------------+ 03780 M01S00003.ns2419 +++| LDM OASS+3 03781 M00S02899.qfm +++| LPN 77 03782 M00S02900.qfm +++| SBD T0 03783 M00S02901.qfm +++| SHN 14
| Line S02902 Modification History | |
|---|---|
M01 (Removed by) | ns2419 |
Seq # *Modification Id* Act ----------------------------+ 03784 M01S02902.ns2419 ---| ADM ACSS+4
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns2419 |
Seq # *Modification Id* Act ----------------------------+ 03785 M01S00004.ns2419 +++| ADM OASS+4 03786 M00S02903.qfm +++| SBD CN+4 03787 M00S02904.qfm +++| MJN VFE5 IF BELOW LOWER USER INDEX
| Line S02905 Modification History | |
|---|---|
M01 (Removed by) | ns2419 |
Seq # *Modification Id* Act ----------------------------+ 03788 M01S02905.ns2419 ---| LDM ACSS+3
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | ns2419 |
Seq # *Modification Id* Act ----------------------------+ 03789 M01S00005.ns2419 +++| LDM OASS+3 03790 M00S02906.qfm +++| LPN 77 03791 M00S02907.qfm +++| STD T0 03792 M00S02908.qfm +++| LDD CM+3 03793 M00S02909.qfm +++| LPN 77 03794 M00S02910.qfm +++| SBD T0 03795 M00S02911.qfm +++| SHN 14 03796 M00S02912.qfm +++| ADD CM+4
| Line S02913 Modification History | |
|---|---|
M01 (Removed by) | ns2419 |
Seq # *Modification Id* Act ----------------------------+ 03797 M01S02913.ns2419 ---| SBM ACSS+4
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | ns2419 |
Seq # *Modification Id* Act ----------------------------+ 03798 M01S00006.ns2419 +++| SBM OASS+4 03799 M00S02914.qfm +++| VFE7 MJN VFE5 IF ABOVE UPPER USER INDEX 03800 M00S02915.qfm +++| 03801 M00S02916.qfm +++|* CHECK MACHINE ID. 03802 M00S02917.qfm +++| 03803 M00S02918.qfm +++| LDM VFEF 03804 M00S02919.qfm +++| ZJN VFE8 IF NO MACHINE ID SPECIFIED 03805 M00S02920.qfm +++| LMM RMSS
| Line S02921 Modification History | |
|---|---|
M01 (Removed by) | qfm2 |
Seq # *Modification Id* Act ----------------------------+ 03806 M01S02921.qfm2 ---| NJN VFE7 IF NO MATCH
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | qfm2 |
Seq # *Modification Id* Act ----------------------------+ 03807 M01S00001.qfm2 +++| NJP VFEX IF NO MATCH ON MACHINE ID 03808 M00S02922.qfm +++| 03809 M00S02923.qfm +++|* CHECK CREATION DATE SELECTION. 03810 M00S02924.qfm +++| 03811 M00S02925.qfm +++| VFE8 LDM CDSS+2 03812 M00S02926.qfm +++| SBD CM 03813 M00S02927.qfm +++| MJN VFE7 IF BELOW LOWER DATE 03814 M00S02928.qfm +++| NJN VFE9 IF DATE WITHIN RANGE 03815 M00S02929.qfm +++| LDM CDSS+3 03816 M00S02930.qfm +++| SCN 77 03817 M00S02931.qfm +++| SBD CM+1 03818 M00S02932.qfm +++| MJN VFE7 IF DATE NOT WITHIN RANGE 03819 M00S02933.qfm +++| VFE9 LDD CM+2 CHECK MAXIMUM DATE 03820 M00S02934.qfm +++| ZJN VFE11 IF DATE NOT SPECIFIED 03821 M00S02935.qfm +++| SBM CDSS+2 03822 M00S02936.qfm +++| VFE10 MJN VFE7 IF DATE NOT WITHIN RANGE 03823 M00S02937.qfm +++| NJN VFE11 IF DATE WITHIN RANGE 03824 M00S02938.qfm +++| LDD CM+3 03825 M00S02939.qfm +++| SCN 77 03826 M00S02940.qfm +++| STD T0 03827 M00S02941.qfm +++| LDM CDSS+3 03828 M00S02942.qfm +++| SCN 77 03829 M00S02943.qfm +++| SBD T0 03830 M00S02944.qfm +++| ZJN VFE11 IF DATE WITHIN RANGE
| Line S02945 Modification History | |
|---|---|
M01 (Removed by) | ns2450 |
Seq # *Modification Id* Act ----------------------------+ 03831 M01S02945.ns2450 ---| PJN VFE14 IF NOT WITHIN RANGE
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2450 |
Seq # *Modification Id* Act ----------------------------+ 03832 M01S00001.ns2450 +++| PJP VFEX IF NOT WITHIN RANGE 03833 M00S02946.qfm +++| VFE11 LDM FLSS CHECK FILE SIZE 03834 M00S02947.qfm +++| SBM VFEF+1 03835 M00S02948.qfm +++| MJN VFE14 IF BELOW RANGE 03836 M00S02949.qfm +++| NJN VFE12 IF WITHIN RANGE 03837 M00S02950.qfm +++| LDM FLSS+1 03838 M00S02951.qfm +++| SBM VFEF+2 03839 M00S02952.qfm +++| MJN VFE10 IF BELOW RANGE 03840 M00S02953.qfm +++| VFE12 LDM VFEF+3 CHECK UPPER BOUND 03841 M01S00002.ns2450 +++| SHN 14 03842 M01S00003.ns2450 +++| LMM VFEF+4 03843 M01S00004.ns2450 +++| LMC 777777 03844 M01S00005.ns2450 +++| ZJN VFE14 IF UNLIMITED UPPER VALUE 03845 M01S00006.ns2450 +++| LDM VFEF+3 03846 M00S02954.qfm +++| SBM FLSS
| Line S02955 Modification History | |
|---|---|
M01 (Removed by) | ns2450 |
Seq # *Modification Id* Act ----------------------------+ 03847 M01S02955.ns2450 ---| MJN VFE10 IF ABOVE RANGE
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | ns2450 |
Seq # *Modification Id* Act ----------------------------+ 03848 M01S00007.ns2450 +++| MJN VFE14 IF ABOVE RANGE 03849 M00S02956.qfm +++| NJN VFE13 IF WITHIN RANGE 03850 M00S02957.qfm +++| LDM VFEF+4 03851 M00S02958.qfm +++| SBM FLSS+1 03852 M00S02959.qfm +++| MJN VFE14 IF ABOVE RANGE 03853 M00S02960.qfm +++| VFE13 LDN 0 03854 M00S02961.qfm +++| VFE14 LJM VFEX RETURN 03855 M00S02962.qfm +++| 03856 M00S02963.qfm +++| VFEF BSS 5 FILE SIZE RANGE DATA 03857 M00S02964.qfm +++| SPACE 4 03858 M00S02965.qfm +++| EOIB EQU BFMS-502 EOI BUFFER 03859 M00S02966.qfm +++| ERRPL *-EOIB 03860 M00S02967.qfm +++| SPACE 4,10
| Line S02968 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03861 M01S02968.242l642 ---| ERRNG OVL0-5-* CHECK LOAD ADDRESS LOCATION-FREE ROUTINES
| Line S00193 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 03862 M01S00193.242l642 +++| OVL0 EQU *+5 03863 M01S00194.242l642 +++| ERRNG EPFW-OVL0-ZBFL 03864 M00S02969.qfm +++| 03865 M00S02970.qfm +++| OVERFLOW OVL 03866 M00S02971.qfm +++| SPACE 4 03867 M00S02972.qfm +++| TTL QFM - QUEUE FILE MANAGER. 03868 M00S02973.qfm +++| END
cdc/nos2.source/opl.opl871/deck/qfm.002.txt · Last modified: (external edit)