cdc:nos2.source:opl.opl871:deck:tfm.004
Deck TFM Part 004
23 Modifications
Listing Sections
- Deck TFM Start
- Deck TFM Part 1 (Line 1907)
- Deck TFM Part 2 (Line 3122)
- Deck TFM Part 3 (Line 4465)
- Deck TFM Part 4 (Line 5778)
- Deck TFM Part 5 (Line 7760)
- Deck TFM Part 6 (Line 9105)
- Deck TFM Part 7 (Line 10810)
Source
Seq # *Modification Id* Act ----------------------------+ 05778 M01S05082.tfm +++| RJM CAA CHECK ALTERNATE USER ACCESS 05779 M01S05083.tfm +++| LIA CBES,BP 05780 M01S05084.tfm +++| STD KA 05781 M01S05085.tfm +++| RJM VIS VSN INDEXED SEARCH
| Line S05086 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | t2807 |
Seq # *Modification Id* Act ----------------------------+ 05782 M02S05086.t2807 ---| ZJN SMF12 IF VSN FOUND 05783 M01S00060.t2807 +++| ZJN SMF11 IF VSN FOUND 05784 M01S05087.tfm +++| ERROR ECD *ERROR IN CATALOG DATA.* 05785 M01S05088.tfm +++|
| Line S05089 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | t2807 |
Seq # *Modification Id* Act ----------------------------+ 05786 M02S05089.t2807 ---| LDM CBST,BP CHECK DATA ERROR FLAG 05787 M01S00061.t2807 +++| SMF11 LDM CBST,BP CHECK DATA ERROR FLAG 05788 M01S05090.tfm +++| SHN 21-1
| Line S05091 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | t2807 |
Seq # *Modification Id* Act ----------------------------+ 05789 M02S05091.t2807 ---| PJN SMF11 IF NOT DATA ERROR
| Line S05092 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | t2807 |
Seq # *Modification Id* Act ----------------------------+ 05790 M02S05092.t2807 ---| ERROR EFD * ERROR IN FILE DATA.*
| Line S05093 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | t2807 |
Seq # *Modification Id* Act ----------------------------+ 05791 M02S05093.t2807 ---|
| Line S05094 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | t2807 |
Seq # *Modification Id* Act ----------------------------+ 05792 M02S05094.t2807 ---| SMF11 MMOVE VBES,BP,PESN,,VSKL 05793 M01S00062.t2807 +++| PJN SMF12 IF NO DATA ERROR 05794 M01S00063.t2807 +++| LDM PBTO+1 CHECK FOR *TO=C* 05795 M01S00064.t2807 +++| SHN 21-11 05796 M01S00065.t2807 +++| MJN SMF11.1 IF CHECK FOR CATALOG ERROR 05797 M01S00066.t2807 +++| SHN 21-7-21+11 05798 M01S00067.t2807 +++| MJN SMF12 IF IGNORE CATALOG ERROR 05799 M01S00068.t2807 +++| SMF11.1 ERROR EFD * ERROR IN FILE DATA.* 05800 M01S00069.t2807 +++| 05801 M01S05095.tfm +++| SMF12 MMOVE VBES,BP,PESN,,VSKL 05802 M01S05096.tfm +++| MMOVE VBVS,BP,PVSN,,VSKL 05803 M01S05097.tfm +++| LDM VBRC,BP SET REEL NUMBER 05804 M01S05098.tfm +++| SHN -6 05805 M01S05099.tfm +++| SBN 1 05806 M01S05100.tfm +++| STM PESN+4 05807 M01S05101.tfm +++| LDN FV SET FIRST VOLUME BUSY 05808 M01S05102.tfm +++| STD KA 05809 M01S05103.tfm +++| RJM VIS VSN INDEXED SEARCH 05810 M01S05104.tfm +++| NJP SMF3 IF VSN NOT FOUND 05811 M01S05105.tfm +++| RJM SVB SET VSN BUSY 05812 M01S05106.tfm +++| RJM WRP WRITE UPDATED VSN 05813 M01S05107.tfm +++| RESTP SMFA RESTORE CATALOG INDEX POINTERS 05814 M01S05108.tfm +++| LDN ZERL SET CATALOG INDEX 05815 M01S05109.tfm +++| CRD CM 05816 M01S05110.tfm +++| LDD CI 05817 M01S05111.tfm +++| SHN 6 05818 M01S05112.tfm +++| LMD RI 05819 M01S05113.tfm +++| STD CM+3 05820 M01S05114.tfm +++| LDD RI+1 05821 M01S05115.tfm +++| STD CM+4 05822 M01S05116.tfm +++| LDM PBTO+1 CHECK FOR *TO=D* 05823 M01S05117.tfm +++| SHN 21-0 05824 M01S05118.tfm +++| MJN SMF13 IF *TO=D* SPECIFIED 05825 M01S05119.tfm +++| LDM PFTD SAVE WRITE FLAG 05826 M01S05120.tfm +++| LPC 4000 05827 M01S05121.tfm +++| STM PFTD
| Line S05122 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 05828 M02S05122.274l797 ---| LDM CBTD,BP SET LABEL, TRACK, DENSITY, CONVERSION 05829 M01S00256.274l797 +++| LDM CBTD,BP SET LABEL, TAPE TYPE, DENSITY, CONVERSION 05830 M01S05123.tfm +++| LPC 3777 05831 M01S05124.tfm +++| RAM PFTD 05832 M01S05125.tfm +++| LDM CBTD+2,BP SET FORMAT/NOISE 05833 M01S05126.tfm +++| STM PFTD+2 05834 M01S05127.tfm +++| LDM CBTD+3,BP SET BLOCK SIZE 05835 M01S05128.tfm +++| STM PFTD+3 05836 M01S05129.tfm +++| LDM CBTD+4,BP 05837 M01S05130.tfm +++| STM PFTD+4 05838 M01S05131.tfm +++| SMF13 LDN TFUN-TFES+1 UPDATE FET 05839 M01S05132.tfm +++| STD T1 05840 M01S05133.tfm +++| LDA IR+3,REL 05841 M01S05134.tfm +++| ADN TFRR 05842 M01S05135.tfm +++| CWD CM 05843 M01S05136.tfm +++| ADN TFES-TFRR 05844 M01S05137.tfm +++| CWM PESN,T1 05845 M01S05138.tfm +++| LJM SMFX RETURN 05846 M01S05139.tfm +++| 05847 M01S05140.tfm +++| SMFA BSS 5 CATALOG INDEX
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | tfm1 |
M02 (Updated by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 05848 M02S00002.274l797 ---| TITLE 5TD - SUBROUTINES 05849 M01S00257.274l797 +++| TITLE SUBROUTINES. 05850 M01S00003.tfm1 +++|VSI SPACE 4,10 05851 M01S00004.tfm1 +++|** VSI - VERIFY SET IDENTIFIER 05852 M01S00005.tfm1 +++|* 05853 M01S00006.tfm1 +++|* ENTRY (PBSI - PBSI+2) = SET ID FROM TAPE CATALOG 05854 M01S00007.tfm1 +++|* 05855 M01S00008.tfm1 +++|* EXIT IF VALID SET IDENTIFIER 05856 M01S00009.tfm1 +++|* 05857 M01S00010.tfm1 +++|* ERROR *MULTI-FILE PROCESSING ERROR* IF SET ID 05858 M01S00011.tfm1 +++|* IS ZEROES OR BLANKS. 05859 M01S00012.tfm1 +++|* 05860 M01S00013.tfm1 +++|* USES T1, T2. 05861 M01S00014.tfm1 +++| 05862 M01S00015.tfm1 +++| 05863 M01S00016.tfm1 +++| VSI4 ERROR MPE *MULTI-FILE PROCESSING ERROR.* 05864 M01S00017.tfm1 +++| 05865 M01S00018.tfm1 +++| VSI SUBR ENTRY/EXIT 05866 M01S00019.tfm1 +++| LDN 0 CHECK FOR ZEROES 05867 M01S00020.tfm1 +++| STD T2 05868 M01S00021.tfm1 +++| VSI1 LDN 3 VERIFY SET IDENTIFIER 05869 M01S00022.tfm1 +++| STD T1 05870 M01S00023.tfm1 +++| VSI2 SOD T1 05871 M01S00024.tfm1 +++| MJN VSI4 IF INCORRECT SET IDENTIFIER 05872 M01S00025.tfm1 +++| LDM PBSI,T1 05873 M01S00026.tfm1 +++| LMD T2 05874 M01S00027.tfm1 +++| NJN VSI3 IF VALID CHARACTERS 05875 M01S00028.tfm1 +++| UJN VSI2 05876 M01S00029.tfm1 +++| 05877 M01S00030.tfm1 +++| VSI3 LDD T2 05878 M01S00031.tfm1 +++| NJN VSIX IF NEITHER BLANKS NOR ZEROES 05879 M01S00032.tfm1 +++| LDC 2R CHECK FOR BLANKS 05880 M01S00033.tfm1 +++| STD T2 05881 M01S00034.tfm1 +++| UJN VSI1 VERIFY SET IDENTIFIER 05882 M01S05141.tfm +++| SPACE 4,10 05883 M01S05142.tfm +++|*** COMMON DECKS. 05884 M01S05143.tfm +++| 05885 M01S05144.tfm +++| AUS$ EQU 1 DEFINE AUS - ALTERNATE USERNAME SEARCH 05886 M01S05145.tfm +++| CAA$ EQU 1 DEFINE CAA - CHECK ALTERNATE USER ACCESS 05887 M01S05146.tfm +++| FTC$ EQU 1 DEFINE FTC - FIND TAPE CATALOG 05888 M01S05147.tfm +++| IBC$ EQU 1 DEFINE IBC - INITIALIZE BLOCK CHAIN 05889 M01S05148.tfm +++| LTC$ EQU 1 DEFINE LTC - LOCATE TAPE CATALOG 05890 M01S05149.tfm +++| SVB$ EQU 1 DEFINE SVB - SET VSN BUSY 05891 M01S05150.tfm +++| VIS$ EQU 1 DEFINE VIS - VSN INDEXED SEARCH 05892 M01S05151.tfm +++| VSP$ EQU 1 DEFINE VSP - VERIFY/SET CATALOG POINTERS 05893 M01S05152.tfm +++| VUB$ EQU 1 DEFINE VUB - VERIFY USER BLOCK 05894 M01S05153.tfm +++| 05895 M01S05154.tfm +++|*CALL COMPTFM 05896 M01S05155.tfm +++|*CALL COMPWEI 05897 M01S05156.tfm +++| SPACE 4,10 05898 M01S05157.tfm +++|** BUFFERS. 05899 M01S05158.tfm +++| 05900 M01S05159.tfm +++| 05901 M01S05160.tfm +++| BUFA BSS TAEL*5 05902 M01S05161.tfm +++| BUFB BSS TAEL*5 05903 M01S05162.tfm +++| SPACE 4,10 05904 M01S05163.tfm +++| ERRNG BUF2-* 05905 M01S00258.274l797 +++| TITLE PRESET. 05906 M01S05164.tfm +++| PRS SPACE 4,15 05907 M01S05165.tfm +++|** PRS - PRESET. 05908 M01S05166.tfm +++|* 05909 M01S05167.tfm +++|* ENTRY (CPCB - CPCB+4) = CATALOG BUFFER POINTERS. 05910 M01S05168.tfm +++|* (FV - FV+2) = FIRST VSN. 05911 M01S05169.tfm +++|* (CN - CN+2) = FIRST VSN. 05912 M01S05170.tfm +++|* 05913 M01S05171.tfm +++|* EXIT (A) = 0 IF FILE EXTENSION. 05914 M01S05172.tfm +++|* 05915 M01S05173.tfm +++|* USES BA, BP, CI, KA, RI - R1+1. 05916 M01S05174.tfm +++|* 05917 M01S05175.tfm +++|* CALLS SIB, VIS, VSP. 05918 M01S05176.tfm +++|* 05919 M01S05177.tfm +++|* MACROS ERROR, LDA, MMOVE, RESTP, SAVEP. 05920 M01S05178.tfm +++| 05921 M01S05179.tfm +++| 05922 M01S05180.tfm +++| PRS SUBR ENTRY/EXIT 05923 M01S05181.tfm +++| RESTP CPSI RESTORE SECONDARY VSN INDEX POINTERS 05924 M01S05182.tfm +++| MMOVE VBFV,BP,FV,,VSKL 05925 M01S05183.tfm +++| MMOVE FV,,CN,,VSKL 05926 M01S05184.tfm +++| LDN FV 05927 M01S05185.tfm +++| STD KA 05928 M01S05186.tfm +++| LDD BA 05929 M01S05187.tfm +++| ADN 2 05930 M01S05188.tfm +++| STD BP 05931 M01S05189.tfm +++| RJM SIB SEARCH FOR VSN IN BUFFER 05932 M01S05190.tfm +++| ZJN PRS2 IF VSN FOUND 05933 M01S05191.tfm +++| RJM VIS VSN INDEXED SEARCH 05934 M01S05192.tfm +++| ZJN PRS2 IF VSN FOUND 05935 M01S05193.tfm +++| PRS1 ERROR EID *ERROR IN INDEX DATA.* 05936 M01S05194.tfm +++| 05937 M01S05195.tfm +++| PRS2 LDM VBCI,BP 05938 M01S05196.tfm +++| ZJN PRS1 IF NO CATALOG ENTRY 05939 M01S05197.tfm +++| SHN 14 05940 M01S05198.tfm +++| STD CI 05941 M01S05199.tfm +++| SHN -14 05942 M01S05200.tfm +++| STD RI 05943 M01S05201.tfm +++| LDM VBCI+1,BP 05944 M01S05202.tfm +++| STD RI+1 05945 M01S05203.tfm +++| LDC BUF2 05946 M01S05204.tfm +++| STD BA 05947 M01S05205.tfm +++| RJM VSP VERIFY/SET CATALOG POINTERS 05948 M01S05206.tfm +++| SAVEP SMFA SAVE CATALOG POINTERS 05949 M01S05207.tfm +++| LDA PBQN,ABS 05950 M01S05208.tfm +++| LMC 9999D 05951 M01S05209.tfm +++| ZJN PRS3 IF EXTENSION 05952 M01S05210.tfm +++| LDM PBTO+1 05953 M01S05211.tfm +++| SHN 21-5 05954 M01S05212.tfm +++| PJN PRS6 IF NOT EXTENSION 05955 M01S05213.tfm +++| LDM PBQN 05956 M01S05214.tfm +++| SCN 77 05957 M01S05215.tfm +++| LMN 9999D/1S12 05958 M01S05216.tfm +++| STM PBQN 05959 M01S05217.tfm +++| LDC 9999D 05960 M01S05218.tfm +++| STM PBQN+1 05961 M01S05219.tfm +++| PRS3 LDM PAUN 05962 M01S05220.tfm +++| ZJN PRS4 IF NOT ALTERNATE USER 05963 M01S05221.tfm +++| ERROR FCI *FILE CREATION NOT ALLOWED.* 05964 M01S05222.tfm +++| 05965 M01S05223.tfm +++| PRS4 STM PESN FORCE SEARCH ON LOGICAL FILENAME 05966 M01S05224.tfm +++| PRS5 LJM PRSX RETURN 05967 M01S05225.tfm +++| 05968 M01S05226.tfm +++| PRS6 LDM PBTO+1 05969 M01S05227.tfm +++| SHN 21-5 05970 M01S05228.tfm +++| PJN PRS7 IF NOT *TO=D* 05971 M01S05229.tfm +++| LDN CBLI FORCE SEARCH ON LOGICAL FILENAME 05972 M01S05230.tfm +++| STM LTCA 05973 M01S05231.tfm +++| PRS7 LDN 1 05974 M01S05232.tfm +++| UJN PRS5 RETURN 05975 M01S05233.tfm +++| SPACE 4,10 05976 M01S05234.tfm +++| OVERFLOW OVL1,BUF1
| Line S05235 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 05977 M02S05235.274l797 ---| OVERLAY (SUBFUNCTIONS CPPS, MFAS.),OVL1 05978 M01S00259.274l797 +++| OVERLAY (CLEAR *POSMF* POINTER / MULTI-FILE ASSIGNMENT.),OVL1 05979 M01S05236.tfm +++| SPACE 4,10 05980 M01S05237.tfm +++|*** DIRECT CELLS. 05981 M01S05238.tfm +++| 05982 M01S05239.tfm +++| 05983 M01S05240.tfm +++| FV EQU S1+2 - S1+4 FIRST VOLUME OF MULTI-FILE SET 05984 M01S05241.tfm +++| CN EQU S2 - S2+4 SCRATCH 05985 M01S05242.tfm +++| CPP SPACE 4,10 05986 M01S05243.tfm +++|*** CPPS - CLEAR *POSMF* CATALOG POINTER. 05987 M01S05244.tfm +++|* 05988 M01S05245.tfm +++|* IF THE CATALOG POINTED TO BY THE *POSMF* CATALOG HAS 05989 M01S05246.tfm +++|* NOT BEEN A VALIDATED TAPE LABEL, THE CATALOG ENTRY 05990 M01S05247.tfm +++|* IS PURGED. 05991 M01S05248.tfm +++|* 05992 M01S05249.tfm +++|* ENTRY NONE. 05993 M01S05250.tfm +++|* 05994 M01S05251.tfm +++|* EXIT *POSMF* FLAG CLEARED. 05995 M01S05252.tfm +++|* CATALOG ENTRY DELETED IF EXTENSION. 05996 M01S05253.tfm +++|* 05997 M01S05254.tfm +++|* USES BA, CI, KA, T1, CM - CM+4, CN - CN+4, RI - RI+1. 05998 M01S05255.tfm +++|* 05999 M01S05256.tfm +++|* CALLS DCE, RRP, VIS, VSP. 06000 M01S05257.tfm +++|* 06001 M01S05258.tfm +++|* MACROS ERROR, LDA, UDTRD, UDTWT. 06002 M01S05259.tfm +++| 06003 M01S05260.tfm +++| 06004 M01S05261.tfm +++| CPP ENTRY ENTRY/EXIT 06005 M01S05262.tfm +++| UDTRD CN,/MTX/UTCI,1 06006 M01S05263.tfm +++| LDD CN+1 06007 M01S05264.tfm +++| SHN 14 06008 M01S05265.tfm +++| STD CI 06009 M01S05266.tfm +++| SHN -14 06010 M01S05267.tfm +++| STD RI 06011 M01S05268.tfm +++| LDD CN+2 06012 M01S05269.tfm +++| STD RI+1 06013 M01S05270.tfm +++| LDC BUF2 06014 M01S05271.tfm +++| STD BA 06015 M01S05272.tfm +++| RJM RRP GET CATALOG BLOCK 06016 M01S05273.tfm +++| RJM VSP VERIFY/SET CATALOG POINTERS 06017 M01S05274.tfm +++| PJN CPP2 IF NO ERROR 06018 M01S05275.tfm +++| CPP1 LDN 0 06019 M01S05276.tfm +++| STD CN+1 06020 M01S05277.tfm +++| STD CN+2 06021 M01S05278.tfm +++| UDTWT CN,/MTX/UTCI,1 06022 M01S05279.tfm +++| LJM CPPX RETURN 06023 M01S05280.tfm +++| 06024 M01S05281.tfm +++| CPP2 LDA CBQN,BP 06025 M01S05282.tfm +++| LMC 9999D 06026 M01S05283.tfm +++| NJN CPP1 IF NOT *POSMF 9999* 06027 M01S05284.tfm +++| LDD CN+3 SAVE VSN POINTER TO CATALOG 06028 M01S05285.tfm +++| STD CM 06029 M01S05286.tfm +++| LDD CN+4 06030 M01S05287.tfm +++| STD CM+1 06031 M01S05288.tfm +++| CPP3 LDD CM COMPARE NEXT CATALOG INDEX TO CURRENT 06032 M01S05289.tfm +++| SHN 14 06033 M01S05290.tfm +++| STD CI 06034 M01S05291.tfm +++| SHN -14 06035 M01S05292.tfm +++| LMD RI 06036 M01S05293.tfm +++| SHN 14 06037 M01S05294.tfm +++| LMD CM+1 06038 M01S05295.tfm +++| LMD RI+1 06039 M01S05296.tfm +++| ZJN CPP4 IF SAME CATALOG BLOCK 06040 M01S05297.tfm +++| LDD CM 06041 M01S05298.tfm +++| LPN 77 06042 M01S05299.tfm +++| STD RI 06043 M01S05300.tfm +++| LDD CM+1 06044 M01S05301.tfm +++| STD RI+1 06045 M01S05302.tfm +++| RJM RRP GET CATALOG BLOCK 06046 M01S05303.tfm +++| CPP4 RJM VSP VERIFY/SET CATALOG POINTERS 06047 M01S05304.tfm +++| PJN CPP6 IF NO ERROR 06048 M01S05305.tfm +++| CPP5 ERROR ECD *ERROR IN CATALOG DATA.* 06049 M01S05306.tfm +++| 06050 M01S05307.tfm +++| CPP6 LDM CBNC,BP COMPARE NEXT CATALOG 06051 M01S05308.tfm +++| LMD CN+1 06052 M01S05309.tfm +++| NJN CPP7 IF NOT *POSMF 9999* CATALOG 06053 M01S05310.tfm +++| LDM CBNC+1,BP 06054 M01S05311.tfm +++| LMD CN+2 06055 M01S05312.tfm +++| ZJN CPP8 IF *POSMF 9999* CATALOG 06056 M01S05313.tfm +++| CPP7 LDM CBNC,BP 06057 M01S05314.tfm +++| ZJN CPP5 IF NO NEXT CATALOG 06058 M01S05315.tfm +++| STD CM 06059 M01S05316.tfm +++| LDM CBNC+1,BP 06060 M01S05317.tfm +++| STD CM+1 06061 M01S05318.tfm +++| LJM CPP3 CHECK NEXT CATALOG ENTRY 06062 M01S05319.tfm +++| 06063 M01S05320.tfm +++| CPP8 LDN 0 06064 M01S05321.tfm +++| STM CBNC,BP 06065 M01S05322.tfm +++| STM CBNC+1,BP 06066 M01S05323.tfm +++| LDD CN+1 06067 M01S05324.tfm +++| SHN 14 06068 M01S05325.tfm +++| STD CI 06069 M01S05326.tfm +++| SHN -14 06070 M01S05327.tfm +++| LMD RI 06071 M01S05328.tfm +++| NJN CPP9 IF DIFFERENT PRU 06072 M01S05329.tfm +++| LDD CN+2 06073 M01S05330.tfm +++| LMD RI+1 06074 M01S05331.tfm +++| ZJN CPP10 IF SAME PRU 06075 M01S05332.tfm +++| CPP9 RJM WRP WRITE RANDOM PRU 06076 M01S05333.tfm +++| LDD CN+1 06077 M01S05334.tfm +++| LPN 77 06078 M01S05335.tfm +++| STD RI 06079 M01S05336.tfm +++| LDD CN+2 06080 M01S05337.tfm +++| STD RI+1 06081 M01S05338.tfm +++| RJM RRP READ RANDOM PRU 06082 M01S05339.tfm +++| CPP10 RJM VSP VERIFY/SET CATALOG ENTRY 06083 M01S05340.tfm +++| MJP CPP5 IF ERROR 06084 M01S05341.tfm +++| LDN 0 06085 M01S05342.tfm +++| STD CN+1 06086 M01S05343.tfm +++| STD CN+2 06087 M01S05344.tfm +++| UDTWT CN,/MTX/UTCI,1 06088 M01S05345.tfm +++| RJM PCE PURGE CATALOG ENTRIES 06089 M01S05346.tfm +++| LJM CPPX RETURN 06090 M01S05347.tfm +++| MFA SPACE 4,24 06091 M01S05348.tfm +++|*** MFAS - *RESEX* MULTI-FILE ASSIGNMENT. 06092 M01S05349.tfm +++|* 06093 M01S05350.tfm +++|* CALLED BY *RESEX* TO TRANSLATE A MULTI-FILE SET REQUEST 06094 M01S05351.tfm +++|* BY SYMBOLIC FILE NAME. 06095 M01S05352.tfm +++|* 06096 M01S05353.tfm +++|* ENTRY (IR+3 - IR+4) = FET ADDRESS - 06097 M01S05354.tfm +++|* 06098 M01S05355.tfm +++|*T FET+0 42/ FILE NAME,1/R,8/ AT,6/ CODE,3/ST
Figure FET+0
06099 M01S05356.tfm +++|*T, +12 60/ FILE IDENTIFIER
Figure +12
06100 M01S05357.tfm +++|*T, +13 42/ FILE IDENTIFIER (CONT.),18/ SEQ. NUM
Figure +13
06101 M01S05358.tfm +++|*T, +14 36/ SET I.D.,9/ VER.,15/ GEN.
Figure +14
06102 M01S05359.tfm +++|*T, +15 30/ RETENTION DATE,30/ CREATION DATE
Figure +15
06103 M01S05360.tfm +++|*T, +16 42/ ALTERNATE USERNAME,18/ TO
Figure +16
06104 M01S05361.tfm +++|*T, +17 42/ PASSWORD,6/ AC,6/ CT,6/ MD
Figure +17
06105 M01S05362.tfm +++|* 06106 M01S05363.tfm +++|* EXIT IF THE FILE IS FOUND, THE VALUES IN THE CATALOG 06107 M01S05364.tfm +++|* ENTRY ARE PLACED IN THE FET. IF THE FILE IS AN 06108 M01S05365.tfm +++|* EXTENSION, THE VALUES FROM THE UDT ARE PLACED IN 06109 M01S05366.tfm +++|* THE FET. 06110 M01S05367.tfm +++|* 06111 M01S05368.tfm +++|* USES KA, T1. 06112 M01S05369.tfm +++|* 06113 M01S05370.tfm +++|* CALLS CPP, DCE, FTC, PRS, VIS. 06114 M01S05371.tfm +++|* 06115 M01S05372.tfm +++|* MACROS COMPARE, ERROR, LDA, LIA, MMOVE. 06116 M01S05373.tfm +++| 06117 M01S05374.tfm +++| 06118 M01S05375.tfm +++| MFA ENTRY ENTRY/EXIT 06119 M01S05376.tfm +++| RJM PRS PRESET 06120 M01S05377.tfm +++| ZJN MFAX IF NON-SYMBOLIC ACCESS 06121 M01S05378.tfm +++| LDM VBCI,BP GET FIRST CATALOG ENTRY FOR VSN 06122 M01S05379.tfm +++| SHN 14 06123 M01S05380.tfm +++| STD CI 06124 M01S05381.tfm +++| SHN -14 06125 M01S05382.tfm +++| STD RI 06126 M01S05383.tfm +++| LDM VBCI+1,BP 06127 M01S05384.tfm +++| STD RI+1 06128 M01S05385.tfm +++| LDC BUF2 06129 M01S05386.tfm +++| STD BA 06130 M01S05387.tfm +++| RJM RRP READ RANDOM PRU 06131 M01S05388.tfm +++| RJM VSP VERIFY/SET CATALOG POINTERS 06132 M01S05389.tfm +++| PJN MFA1 IF NO ERROR 06133 M01S05390.tfm +++| ERROR EID *ERROR IN INDEX DATA.* 06134 M01S05391.tfm +++| 06135 M01S05392.tfm +++| MFA1 COMPARE PBUN,,CWUN,BA,UNKL FLAG ALTERNATE USER ACCESS 06136 M01S05393.tfm +++| STM PAUN 06137 M01S05394.tfm +++| MMOVE CWUN,BA,PBUN,,UNKL 06138 M01S05395.tfm +++| SAVEP MFAA SAVE CATALOG POINTERS 06139 M01S05396.tfm +++| LDD CN+1 CHECK FOR INTERRUPTED *POSMF* 06140 M01S05397.tfm +++| ZJN MFA2 IF NO *POSMF* 06141 M01S05398.tfm +++| EXSUB CPP CLEAR *POSMF* CATALOG POINTER 06142 M01S05399.tfm +++| RESTP MFAA RESTORE FIRST CATALOG ENTRY 06143 M01S05400.tfm +++| RJM RRP READ RANDOM PRU 06144 M01S05401.tfm +++| MFA2 LDM UTMS+2 CHECK IF FILE WAS WRITTEN ON 06145 M01S05402.tfm +++| ZJN MFA3 IF NOT WRITTEN ON 06146 M01S05403.tfm +++| RJM DCE DELETE EXCESS CATALOG ENTRIES 06147 M01S05404.tfm +++| RESTP MFAA RESTORE FIRST CATALOG ENTRY 06148 M01S05405.tfm +++| RJM RRP READ RANDOM PRU 06149 M01S05406.tfm +++| MFA3 RJM LTC FIND TAPE CATALOG 06150 M01S05407.tfm +++| NJN MFA5 IF FOUND 06151 M01S05408.tfm +++| LDM PBTO+1 06152 M01S05409.tfm +++| SHN 21-5 06153 M01S05410.tfm +++| PJN MFA4 IF NOT TAPE FILE EXTENSION 06154 M01S05411.tfm +++| MMOVE CBSI,BP,PBSI,,6 06155 M01S05412.tfm +++| LJM MFA8 UPDATE FET 06156 M01S05413.tfm +++| 06157 M01S05414.tfm +++| MFA4 ERROR FNF *(FILE) NOT FOUND 06158 M01S05415.tfm +++| 06159 M01S05416.tfm +++| MFA5 LDM POFI COMPARE FILE IDENTIFIERS 06160 M01S05417.tfm +++| ZJN MFA6 IF NOT SPECIFIED 06161 M01S05418.tfm +++| LDD BP 06162 M01S05419.tfm +++| ADM LTCA 06163 M01S05420.tfm +++| STD T1 06164 M01S05421.tfm +++| COMPARE ,,POFI,,FIKL 06165 M01S05422.tfm +++| NJN MFA4 IF NO MATCH 06166 M01S05423.tfm +++| MFA6 LDM PAUN 06167 M01S05424.tfm +++| ZJN MFA7 IF NOT ALTERNATE USER ACCESS 06168 M01S05425.tfm +++| COMPARE PPWD,,CBPW,BP,PWKL 06169 M01S05426.tfm +++| NJN MFA4 IF INCORRECT PASSWORD
| Line S05427 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | t2807 |
Seq # *Modification Id* Act ----------------------------+ 06170 M02S05427.t2807 ---| MFA7 LDM PBTO+1 06171 M01S00070.t2807 +++| MFA7 LDM CBST,BP CHECK FOR DATA ERROR 06172 M01S00071.t2807 +++| SHN 21-1 06173 M01S00072.t2807 +++| PJN MFA7.2 IF NO DATA ERROR 06174 M01S00073.t2807 +++| LDM PBTO+1 CHECK FOR *TO=C* 06175 M01S00074.t2807 +++| SHN 21-11 06176 M01S00075.t2807 +++| MJN MFA7.1 IF CHECK FOR CATALOG ERROR 06177 M01S00076.t2807 +++| SHN 21-7-21+11 06178 M01S00077.t2807 +++| MJN MFA7.2 IF IGNORE CATALOG ERROR 06179 M01S00078.t2807 +++| MFA7.1 ERROR EFD * ERROR IN FILE DATA.* 06180 M01S00079.t2807 +++| 06181 M01S00080.t2807 +++| MFA7.2 LDM PBTO+1 06182 M01S05428.tfm +++| SHN 21-0 06183 M01S05429.tfm +++| MJN MFA9 IF *TO=D* SPECIFIED 06184 M01S05430.tfm +++| MMOVE CBVS,BP,PVSN,,5*10D 06185 M01S05431.tfm +++| MFA8 LDN TFUN-TFES+1 UPDATE FET 06186 M01S05432.tfm +++| STD T1 06187 M01S05433.tfm +++| LDA IR+3,REL 06188 M01S05434.tfm +++| ADN TFES 06189 M01S05435.tfm +++| CWM PBUF,T1 06190 M01S05436.tfm +++| MFA9 LJM MFAX RETURN 06191 M01S05437.tfm +++| 06192 M01S05438.tfm +++| MFAA BSS 5 FIRST CATALOG ENTRY FOR VSN
| Line S05439 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 06193 M02S05439.274l797 ---| TITLE ".Y." - SUBROUTINES. 06194 M01S00260.274l797 +++| TITLE SUBROUTINES. 06195 M01S05440.tfm +++| PEC SPACE 4,10 06196 M01S05441.tfm +++|** PEC - PURGE EXCESS CATALOG ENTRIES. 06197 M01S05442.tfm +++|* 06198 M01S05443.tfm +++|* ENTRY NONE. 06199 M01S05444.tfm +++|* 06200 M01S05445.tfm +++|* EXIT EXCESS CATALOGS RELEASED. 06201 M01S05446.tfm +++|* EOI VSN STATUS SET. 06202 M01S05447.tfm +++|* REEL WRITTEN ON CLEARED. 06203 M01S05448.tfm +++|* 06204 M01S05449.tfm +++|* USES KA, CN - CN+4. 06205 M01S05450.tfm +++|* 06206 M01S05451.tfm +++|* CALLS DCE, VIS, WRP. 06207 M01S05452.tfm +++|* 06208 M01S05453.tfm +++|* MACROS COMPARE, ERROR, MMOVE, UDTRD. 06209 M01S05454.tfm +++| 06210 M01S05455.tfm +++| 06211 M01S05456.tfm +++| PEC3 LDM VBST,BP SET *EOI* VOLUME 06212 M01S05457.tfm +++| SCN EOIV/1S12 06213 M01S05458.tfm +++| LMN EOIV/1S12 06214 M01S05459.tfm +++| STM VBST,BP 06215 M01S05460.tfm +++| RJM WRP UPDATE STATUS 06216 M01S05461.tfm +++| PEC4 LDN 0 CLEAR *REEL WRITTEN* FLAG 06217 M01S05462.tfm +++| STM UTMS+2 06218 M01S05463.tfm +++| 06219 M01S05464.tfm +++| PEC ENTRY ENTRY/EXIT 06220 M01S05465.tfm +++| UDTRD CN,/MTX/UTCI,1 06221 M01S05466.tfm +++| RJM DCE DELETE CATALOG ENTRIES 06222 M01S05467.tfm +++| LDC PESN 06223 M01S05468.tfm +++| STD KA 06224 M01S05469.tfm +++| RJM VIS VSN INDEXED SEARCH 06225 M01S05470.tfm +++| NJN PEC4 IF NOT FOUND 06226 M01S05471.tfm +++| COMPARE VBFV,BP,PESN,,VSKL 06227 M01S05472.tfm +++| ZJN PEC1 IF FIRST VOLUME 06228 M01S05473.tfm +++| MMOVE VBFV,BP,PESN,,VSKL 06229 M01S05474.tfm +++| RJM VIS VSN INDEXED SEARCH 06230 M01S05475.tfm +++| NJN PEC2 IF FOUND 06231 M01S05476.tfm +++| PEC1 LDM VBRC,BP CHECK FOR *EOI* VOLUME 06232 M01S05477.tfm +++| SHN -6 06233 M01S05478.tfm +++| LMM UTMS+2 06234 M01S05479.tfm +++| ZJP PEC3 IF *EOI* VOLUME 06235 M01S05480.tfm +++| MMOVE VBNV,BP,PESN,,VSKL 06236 M01S05481.tfm +++| RJM VIS 06237 M01S05482.tfm +++| ZJN PEC1 IF NEXT VSN FOUND 06238 M01S05483.tfm +++| PEC2 ERROR EID *ERROR IN INDEX DATA.* 06239 M01S05484.tfm +++| RDC SPACE 4,10 06240 M01S05485.tfm +++|*** RDC - RELEASE DELETED CATALOG ENTRIES. 06241 M01S05486.tfm +++|* 06242 M01S05487.tfm +++|* ANY CATALOG ENTRIES WHICH FOLLOW THE CURRENT CATALOG ARE 06243 M01S05488.tfm +++|* DELETED BECAUSE THE FILES ON THE TAPE WERE OVERWRITTEN. 06244 M01S05489.tfm +++|* 06245 M01S05490.tfm +++|* ENTRY NONE. 06246 M01S05491.tfm +++|* 06247 M01S05492.tfm +++|* EXIT TO PMF TO PROCESS MULTI-FILE SET REQUEST. 06248 M01S05493.tfm +++|* 06249 M01S05494.tfm +++|* USES CN - CN+4. 06250 M01S05495.tfm +++|* 06251 M01S05496.tfm +++|* CALLS CPP, DCE, PMF. 06252 M01S05497.tfm +++|* 06253 M01S05498.tfm +++|* MACROS EXOVL, EXSUB, UDTRD. 06254 M01S05499.tfm +++| 06255 M01S05500.tfm +++| 06256 M01S05501.tfm +++| RDC ENTRY ENTRY/EXIT 06257 M01S05502.tfm +++| UDTRD CN,/MTX/UTCI,1 06258 M01S05503.tfm +++| LDD CN+1 CHECK FOR POSMF IN PROGRESS 06259 M01S05504.tfm +++| ZJN RDC1 IF NOT *POSMF* 06260 M01S05505.tfm +++| EXSUB CPP CLEAR *POSMF* CATALOG POINTER 06261 M01S05506.tfm +++| RDC1 LDC BUF2 06262 M01S05507.tfm +++| STD BA 06263 M01S05508.tfm +++| RJM DCE DELETE EXCESS CATALOG ENTRIES 06264 M01S05509.tfm +++| ZJN RDCX IF NO CATALOG ENTRY 06265 M01S05510.tfm +++| EXOVL PMF POSITION MULTI-FILE 06266 M01S05511.tfm +++| DCE SPACE 4,10 06267 M01S05512.tfm +++|** DCE - DELETE EXCESS CATALOG ENTRIES 06268 M01S05513.tfm +++|* 06269 M01S05514.tfm +++|* ENTRY (CN - CN+4) = *UTCI* FROM UDT. 06270 M01S05515.tfm +++|* 06271 M01S05516.tfm +++|* EXIT (A) = 0 IF NO CATALOG ENTRY. 06272 M01S05517.tfm +++|* 06273 M01S05518.tfm +++|* USES CI, KA, RI - RI+1. 06274 M01S05519.tfm +++|* 06275 M01S05520.tfm +++|* CALLS CSN, IAM, PCE, RRP, VIS, VSP, WRP. 06276 M01S05521.tfm +++|* 06277 M01S05522.tfm +++|* MACROS ERROR, LDA, MMOVE, RESTP. 06278 M01S05523.tfm +++| 06279 M01S05524.tfm +++| 06280 M01S05525.tfm +++| DCE5 LDN 0 06281 M01S05526.tfm +++| 06282 M01S05527.tfm +++| DCE SUBR ENTRY/EXIT 06283 M01S05528.tfm +++| LDD CN+3 06284 M01S05529.tfm +++| ZJN DCEX IF NO CATALOG ENTRY 06285 M01S05530.tfm +++| SHN 14 06286 M01S05531.tfm +++| STD CI 06287 M01S05532.tfm +++| SHN -14 06288 M01S05533.tfm +++| STD RI 06289 M01S05534.tfm +++| LDD CN+4 06290 M01S05535.tfm +++| STD RI+1 06291 M01S05536.tfm +++| RJM RRP READ RANDOM PRU 06292 M01S05537.tfm +++| RJM VSP VERIFY/SET CATALOG POINTERS 06293 M01S05538.tfm +++| MJN DCE5 IF ERROR 06294 M01S05539.tfm +++| SAVEP CPCB SAVE CATALOG BUFFER POINTERS 06295 M01S05540.tfm +++| LIA CBES,BP 06296 M01S05541.tfm +++| STD KA 06297 M01S05542.tfm +++| LDI KA 06298 M01S05543.tfm +++| ZJP DCE2 IF NO FIRST VSN 06299 M01S05544.tfm +++| RJM VIS VSN INDEXED SEARCH 06300 M01S05545.tfm +++| NJP DCE2 IF NO FIRST VSN 06301 M01S05546.tfm +++| LDM VBRC,BP GET REEL COUNT 06302 M01S05547.tfm +++| SHN -6 06303 M01S05548.tfm +++| STD T0 06304 M01S05549.tfm +++| LDM UTMS+2 GET LAST REEL NUMBER 06305 M01S05550.tfm +++| SBD T0 06306 M01S05551.tfm +++| ADN 1 06307 M01S05552.tfm +++| STD S1 REEL COUNT 06308 M01S05553.tfm +++| MMOVE PESN,,DCEA,,VSKL SAVE CURRENT VSN 06309 M01S05554.tfm +++| MMOVE VBFV,BP,PESN,,VSKL 06310 M01S05555.tfm +++| RESTP CPCB RESTORE CATALOG BUFFER POINTERS 06311 M01S05556.tfm +++| LDD S1 06312 M01S05557.tfm +++| STM CBRC,BP 06313 M01S05558.tfm +++| LDM CBNC,BP 06314 M01S05559.tfm +++| NJN DCE1 IF NEXT CATALOG FOUND 06315 M01S05560.tfm +++| RJM WRP WRITE RANDOM PRU (CATALOG ENTRY) 06316 M01S05561.tfm +++| MMOVE DCEA,,PESN,,VSKL RESTORE CURRENT VSN 06317 M01S05562.tfm +++| LDN 1 06318 M01S05563.tfm +++| LJM DCEX RETURN 06319 M01S05564.tfm +++| 06320 M01S05565.tfm +++| DCE1 SHN 14 SET NEXT CATALOG POINTER 06321 M01S05566.tfm +++| STM CPCB+2 06322 M01S05567.tfm +++| SHN -14 06323 M01S05568.tfm +++| STM CPCB+3 06324 M01S05569.tfm +++| LDM CBNC+1,BP 06325 M01S05570.tfm +++| STM CPCB+4 06326 M01S05571.tfm +++| LDD BA 06327 M01S05572.tfm +++| STM CPCB 06328 M01S05573.tfm +++| LDN 0 CLEAR NEXT CATALOG POINTER 06329 M01S05574.tfm +++| STM CBNC,BP 06330 M01S05575.tfm +++| STM CBNC+1,BP 06331 M01S05576.tfm +++| RJM WRP WRITE RANDOM PRU 06332 M01S05577.tfm +++| RESTP CPCB RESTORE CATALOG POINTERS 06333 M01S05578.tfm +++| RJM RRP READ RANDOM PRU 06334 M01S05579.tfm +++| RJM VSP VERIFY/SET CATALOG POINTERS 06335 M01S05580.tfm +++| PJN DCE3 IF NO ERROR 06336 M01S05581.tfm +++| DCE2 ERROR ECD *ERROR IN CATALOG DATA.* 06337 M01S05582.tfm +++| 06338 M01S05583.tfm +++| DCE3 LDD BP SAVE BUFFER POINTER 06339 M01S05584.tfm +++| STM CPCB+1 06340 M01S05585.tfm +++| LDM CBST,BP 06341 M01S05586.tfm +++| SHN 21-10 06342 M01S05587.tfm +++| MJP DCE4 IF CATALOG NOT RESERVED 06343 M01S05588.tfm +++| LDA CBQN,BP 06344 M01S05589.tfm +++| RJM CSN CONVERT SEQUENCE NUMBER TO DISPLAY CODE 06345 M01S05590.tfm +++| LDN ZERL 06346 M01S05591.tfm +++| CRD CM 06347 M01S05592.tfm +++| LDN 1 RELEASE VSN/CATALOG ENTRY 06348 M01S05593.tfm +++| RJM IAM ISSUE ACCOUNT FILE MESSAGE 06349 M01S05594.tfm +++| DCE4 RJM PCE PURGE CATALOG ENTRIES 06350 M01S05595.tfm +++| MMOVE DCEA,,PESN,,VSKL RESTORE CURRENT VSN 06351 M01S05596.tfm +++| LDN 1 06352 M01S05597.tfm +++| LJM DCEX RETURN 06353 M01S05598.tfm +++| 06354 M01S05599.tfm +++| DCEA BSS VSKL SAVE CURRENT VSN 06355 M01S05600.tfm +++| SPACE 4,10 06356 M01S05601.tfm +++|*** COMMON DECKS. 06357 M01S05602.tfm +++| 06358 M01S05603.tfm +++| BSE$ EQU 1 DEFINE BSE - BACKSPACE ONE ENTRY 06359 M01S05604.tfm +++| DDE$ EQU 1 DEFINE DDE - DELETE DATA ENTRY 06360 M01S05605.tfm +++| DLB$ EQU 1 DEFINE DLB - DELINK BLOCK 06361 M01S05606.tfm +++| GNB$ EQU 1 DEFINE GNB - GET NEXT BLOCK 06362 M01S05607.tfm +++| GNL$ EQU 1 DEFINE GNL - GET NEXT LINK 06363 M01S05608.tfm +++| GPL$ EQU 1 DEFINE GPL - GET PREVIOUS LINK 06364 M01S05609.tfm +++| IAM$ EQU 1 DEFINE IAM - ISSUE ACCOUNT FILE MESSAGE 06365 M01S05610.tfm +++| ISK$ EQU 1 DEFINE ISK - INDEXED SEARCH WITH KEY 06366 M01S05611.tfm +++| LTC$ EQU 1 DEFINE FTC - FIND TAPE CATALOG 06367 M01S05612.tfm +++| PCE$ EQU 1 DEFINE PCE - PURGE CATALOG ENTRIES 06368 M01S05613.tfm +++| PLI$ EQU 1 DEFINE PLI - POSITION TO LAAT INDEX 06369 M01S05614.tfm +++| SIB$ EQU 1 DEFINE SIB - SEARCH IN BUFFER 06370 M01S05615.tfm +++| TBA$ EQU 1 DEFINE TBA - TOGGLE BUFFER ASSIGNMENT 06371 M01S05616.tfm +++| VIS$ EQU 1 DEFINE VIS - VSN INDEXED SEARCH 06372 M01S05617.tfm +++| VSP$ EQU 1 DEFINE VSP - VERIFY/SET CATALOG POINTERS 06373 M01S05618.tfm +++| VUB$ EQU 1 DEFINE VUB - VERIFY USER BLOCK 06374 M01S05619.tfm +++| 06375 M01S05620.tfm +++|*CALL COMPC2D 06376 M01S05621.tfm +++|*CALL COMPTFM 06377 M01S05622.tfm +++| SPACE 4,10 06378 M01S05623.tfm +++|** BUFFERS. 06379 M01S05624.tfm +++| 06380 M01S05625.tfm +++| 06381 M01S05626.tfm +++| BUFA BSS TAEL*5 06382 M01S05627.tfm +++| BUFB BSS TAEL*5 06383 M01S05628.tfm +++| SPACE 4,10 06384 M01S05629.tfm +++| ERRNG BUF2-* 06385 M01S00261.274l797 +++| TITLE PRESET. 06386 M01S05630.tfm +++| PRS SPACE 4,10 06387 M01S05631.tfm +++|** PRS - PRESET FOR SUBFUNCTION MFAS. 06388 M01S05632.tfm +++|* 06389 M01S05633.tfm +++|* ENTRY NONE 06390 M01S05634.tfm +++|* 06391 M01S05635.tfm +++|* EXIT (A) = 0 IF NOT A SYMBOLIC ACCESS REQUEST. 06392 M01S05636.tfm +++|* (CN - CN+4) = *UTCI* FROM *MAGNET*. 06393 M01S05637.tfm +++|* 06394 M01S05638.tfm +++|* USES BA, CI, KA, T1, CN - CN+4, FV - FV+4, RI - RI+1. 06395 M01S05639.tfm +++|* 06396 M01S05640.tfm +++|* CALLS RRP, VIS, VSP. 06397 M01S05641.tfm +++|* 06398 M01S05642.tfm +++|* MACROS COMPARE, ERROR, LDA, MMOVE, UDTRD. 06399 M01S05643.tfm +++| 06400 M01S05644.tfm +++| 06401 M01S05645.tfm +++| PRS6 ERROR EID *ERROR IN INDEX DATA.* 06402 M01S05646.tfm +++| 06403 M01S05647.tfm +++| PRS7 LDI T1 SPACE FILL LAST CHARACTER 06404 M01S05648.tfm +++| LPN 77 06405 M01S05649.tfm +++| LMC 1S6*1R 06406 M01S05650.tfm +++| STI T1 06407 M01S05651.tfm +++| PRS8 LDM PBTO+1 06408 M01S05652.tfm +++| SHN 21-5 06409 M01S05653.tfm +++| MJN PRS9 IF *TO=A* SPECIFIED 06410 M01S05654.tfm +++| LDA PBQN,ABS CHECK FOR MULTI-FILE EXTENSION 06411 M01S05655.tfm +++| LMC 9999D 06412 M01S05656.tfm +++| NJN PRSX IF NOT MULTI-FILE EXTENSION 06413 M01S05657.tfm +++| PRS9 LDC 9999D FORCE MULTI-FILE SET EXTENSION 06414 M01S05658.tfm +++| STM PBQN+1 06415 M01S05659.tfm +++| LDM PBQN 06416 M01S05660.tfm +++| SCN 77 06417 M01S05661.tfm +++| LMN 9999D/1S12 06418 M01S05662.tfm +++| STM PBQN 06419 M01S05663.tfm +++| LDM PBTO+1 SET *TO=A* 06420 M01S05664.tfm +++| SCN 1S5 06421 M01S05665.tfm +++| LMN 1S5 06422 M01S05666.tfm +++| STM PBTO+1 06423 M01S05667.tfm +++| UJN PRSX RETURN 06424 M01S05668.tfm +++| 06425 M01S05669.tfm +++| PRS10 LDN 0 NON-SYMBOLIC ACCESS REQUEST 06426 M01S05670.tfm +++| 06427 M01S05671.tfm +++| PRS SUBR ENTRY/EXIT 06428 M01S05672.tfm +++| LDM UDTA 06429 M01S05673.tfm +++| ZJN PRSX IF NOT MULTI-FILE 06430 M01S05674.tfm +++| LDM UTMS+4 06431 M01S05675.tfm +++| LPC RSSA 06432 M01S05676.tfm +++| ZJN PRSX IF NON-SYMBOLIC ACCESS 06433 M01S05677.tfm +++| LDM PBTO+1 06434 M01S05678.tfm +++| LPN 1 06435 M01S05679.tfm +++| NJN PRS1 IF *TO=D* NOT SPECIFIED 06436 M01S05680.tfm +++| LDN CBLI SEARCH FOR LOGICAL FILE IDENTIFIER 06437 M01S05681.tfm +++| STM LTCA 06438 M01S05682.tfm +++| PRS1 UDTRD FV,/MTX/USID,1 06439 M01S05683.tfm +++| RJM VSI VERIFY SET IDENTIFIER 06440 M01S05684.tfm +++| MMOVE FV,,PBSI,,6 06441 M01S05685.tfm +++| UDTRD FV,/MTX/UESN,1 06442 M01S05686.tfm +++| UDTRD CN,/MTX/UTCI,1 06443 M01S05687.tfm +++| LDN FV 06444 M01S05688.tfm +++| STD KA 06445 M01S05689.tfm +++| RJM VIS VSN INDEXED SEARCH 06446 M01S05690.tfm +++| NJP PRS10 IF VSN NOT FOUND 06447 M01S05691.tfm +++| COMPARE VBFV,BP,FV,,VSKL 06448 M01S05692.tfm +++| ZJN PRS2 IF FIRST VSN 06449 M01S05693.tfm +++| MMOVE VBFV,BP,FV,,VSKL 06450 M01S05694.tfm +++| RJM VIS VSN INDEXED SEARCH 06451 M01S05695.tfm +++| ZJN PRS2 IF FOUND 06452 M01S05696.tfm +++| ERROR EID *ERROR IN INDEX DATA.* 06453 M01S05697.tfm +++| 06454 M01S05698.tfm +++| PRS2 LDM POFI 06455 M01S05699.tfm +++| NJP PRS8 IF FILE NAME SUPPLIED 06456 M01S05700.tfm +++| LDA IR+3,REL GENERATE FILE IDENTIFIER FROM FILE NAME 06457 M01S05701.tfm +++| CRM POFI,ON 06458 M01S05702.tfm +++| LDC POFI 06459 M01S05703.tfm +++| STD T1 06460 M01S05704.tfm +++| LDM 3,T1 06461 M01S05705.tfm +++| SCN 77 06462 M01S05706.tfm +++| STM 3,T1 06463 M01S05707.tfm +++| PRS3 LDI T1 SEARCH FOR ZERO BYTE 06464 M01S05708.tfm +++| SCN 77 06465 M01S05709.tfm +++| ZJN PRS5 IF ZERO BYTE 06466 M01S05710.tfm +++| LDI T1 06467 M01S05711.tfm +++| LPN 77 06468 M01S05712.tfm +++| ZJN PRS4 IF ZERO BYTE 06469 M01S05713.tfm +++| AOD T1 06470 M01S05714.tfm +++| UJN PRS3 CONTINUE SEARCH 06471 M01S05715.tfm +++| 06472 M01S05716.tfm +++| PRS4 LDI T1 MERGE SPACE IN LOWER BYTE 06473 M01S05717.tfm +++| LMC 1S6*1R 06474 M01S05718.tfm +++| PRS5 LMC 2R 06475 M01S05719.tfm +++| STI T1 06476 M01S05720.tfm +++| AOD T1 06477 M01S05721.tfm +++| LMC POFI+10 06478 M01S05722.tfm +++| ZJP PRS7 IF DONE WITH SPACE FILL 06479 M01S05723.tfm +++| LDN 0 06480 M01S05724.tfm +++| UJN PRS5 CONTINUE SPACE FILL 06481 M01S05725.tfm +++| VSI SPACE 4,10 06482 M01S05726.tfm +++|** VSI - VERIFY SET IDENTIFIER. 06483 M01S05727.tfm +++|* 06484 M01S05728.tfm +++|* ENTRY (FV - FV+2) = SET ID FROM *UDT*. 06485 M01S05729.tfm +++|* 06486 M01S05730.tfm +++|* EXIT IF VALID SET IDENTIFIER. 06487 M01S05731.tfm +++|* 06488 M01S05732.tfm +++|* ERROR *MULTI-FILE PROCESSING ERROR* IF SET ID 06489 M01S05733.tfm +++|* IS ZEROES OR BLANKS. 06490 M01S05734.tfm +++|* 06491 M01S05735.tfm +++|* USES T1, T2. 06492 M01S05736.tfm +++| 06493 M01S05737.tfm +++| 06494 M01S05738.tfm +++| VSI4 ERROR MPE *MULTI-FILE PROCESSING ERROR.* 06495 M01S05739.tfm +++| 06496 M01S05740.tfm +++| VSI SUBR ENTRY/EXIT 06497 M01S05741.tfm +++| LDN 0 CHECK FOR ZEROES 06498 M01S05742.tfm +++| STD T2 06499 M01S05743.tfm +++| VSI1 LDN 3 VERIFY SET IDENTIFIER 06500 M01S05744.tfm +++| STD T1 06501 M01S05745.tfm +++| VSI2 SOD T1
| Line S05746 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | nos252 |
Seq # *Modification Id* Act ----------------------------+ 06502 M02S05746.nos252 ---| MJN VSI4 IF INVALID SET IDENTIFIER 06503 M01S00058.nos252 +++| MJN VSI4 IF INCORRECT SET IDENTIFIER 06504 M01S05747.tfm +++| LDM FV,T1 06505 M01S05748.tfm +++| LMD T2 06506 M01S05749.tfm +++| NJN VSI3 IF VALID CHARACTERS 06507 M01S05750.tfm +++| UJN VSI2 CHECK NEXT TWO CHARACTERS 06508 M01S05751.tfm +++| 06509 M01S05752.tfm +++| VSI3 LDD T2 06510 M01S05753.tfm +++| NJN VSIX IF NEITHER BLANKS NOR ZEROES 06511 M01S05754.tfm +++| LDC 2R CHECK FOR BLANKS 06512 M01S05755.tfm +++| STD T2 06513 M01S05756.tfm +++| UJN VSI1 VERIFY SET IDENTIFIER 06514 M01S05757.tfm +++| SPACE 4,10 06515 M01S05758.tfm +++| ERRNG BUF1-*
| Line S05759 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 06516 M02S05759.274l797 ---| OVERLAY (POSITION MULTI-FILE.),OVL1 06517 M01S00262.274l797 +++| OVERLAY (POSITION MULTI-FILE.),OVL1 06518 M01S05760.tfm +++| SPACE 4,10 06519 M01S05761.tfm +++|*** DIRECT CELLS. 06520 M01S05762.tfm +++| 06521 M01S05763.tfm +++| 06522 M01S05764.tfm +++| CT EQU S1 CATEGORY 06523 M01S05765.tfm +++| MD EQU S1+1 MODE 06524 M01S05766.tfm +++| CB EQU S3 - S3+1 CATALOG BUFFER POINTER 06525 M01S05767.tfm +++| QUAL PMF 06526 M01S05768.tfm +++| CB EQU /".Y."/CB FOR *ENTER CATALOG IMAGE* 06527 M01S05769.tfm +++| QUAL * 06528 M01S05770.tfm +++| PMF SPACE 4,10 06529 M01S05771.tfm +++|** PMF - POSITION MULTI-FILE. 06530 M01S05772.tfm +++|* 06531 M01S05773.tfm +++|* *PMF* READS THE *POSMF* REQUEST FROM THE USER-S FET, 06532 M01S05774.tfm +++|* AND VALIDATES THAT IT IS ACCESSIBLE TO THE USER. IF 06533 M01S05775.tfm +++|* THE USER IS ALLOWED TO USE IT, IT UPDATES THE ACCESS 06534 M01S05776.tfm +++|* COUNTS AND SETS THE *POSMF* FLAGS IN THE *UDT*. 06535 M01S05777.tfm +++|* 06536 M01S05778.tfm +++|* ENTRY NONE. 06537 M01S05779.tfm +++|* 06538 M01S05780.tfm +++|* EXIT *POSMF* CATALOG ENTRY PLACED IN *UDT*. 06539 M01S05781.tfm +++|* 06540 M01S05782.tfm +++|* USES CI, KA, CB - CB+1, CM - CM+4, RI - RI+1. 06541 M01S05783.tfm +++|* 06542 M01S05784.tfm +++|* CALLS ECI, RRP, VIS, VSP. 06543 M01S05785.tfm +++|* 06544 M01S05786.tfm +++|* MACROS COMPARE, ERROR, MMOVE. 06545 M01S05787.tfm +++| 06546 M01S05788.tfm +++| 06547 M01S05789.tfm +++| PMF ENTRY ENTRY/EXIT 06548 M01S05790.tfm +++| RJM PRS PRESET 06549 M01S05791.tfm +++| ZJN PMFX IF NON-SYMBOLIC ACCESS 06550 M01S05792.tfm +++| RJM RRP GET CATALOG BLOCK 06551 M01S05793.tfm +++| RJM VSP VERIFY/SET CATALOG POINTERS
| Line S05794 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | nos252 |
Seq # *Modification Id* Act ----------------------------+ 06552 M02S05794.nos252 ---| MJP PMF14 IF INVALID POINTERS 06553 M01S00059.nos252 +++| MJP PMF14 IF INCORRECT POINTERS 06554 M01S05795.tfm +++| COMPARE PBUN,,CWUN,BA,UNKL 06555 M01S05796.tfm +++| ZJN PMF1 IF NOT ALTERNATE USER 06556 M01S05797.tfm +++| MMOVE PBUN,,PAUN,,UNKL 06557 M01S05798.tfm +++| MMOVE CWUN,BA,PBUN,,UNKL 06558 M01S05799.tfm +++| LDM PBTO+1 CHECK FOR EXTENSION 06559 M01S05800.tfm +++| SHN 21-5 06560 M01S05801.tfm +++| PJN PMF1 IF NOT EXTENSION
| Line S05802 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | nos252 |
Seq # *Modification Id* Act ----------------------------+ 06561 M02S05802.nos252 ---| ERROR FCI *FILE CREATION INVALID* 06562 M01S00060.nos252 +++| ERROR FCI *FILE CREATION INCORRECT* 06563 M01S05803.tfm +++| 06564 M01S05804.tfm +++| PMF1 SAVEP CPCB SAVE CATALOG BUFFERS 06565 M01S05805.tfm +++| LDA PBQN,ABS 06566 M01S05806.tfm +++| ZJP PMF7 IF QN NOT SPECIFIED 06567 M01S05807.tfm +++| LMM CBQN+1,BP COMPARE SEQUENCE NUMBER WITH CATALOG 06568 M01S05808.tfm +++| STD T0 06569 M01S05809.tfm +++| SHN -14 06570 M01S05810.tfm +++| LMM CBQN,BP 06571 M01S05811.tfm +++| LPN 77 06572 M01S05812.tfm +++| ADD T0 06573 M01S05813.tfm +++| NJP PMF8 IF NOT CORRECT CATALOG 06574 M01S05814.tfm +++| PMF2 LDM PESN SAVE VSN 06575 M01S05815.tfm +++| STM PMFA 06576 M01S05816.tfm +++| LDN 0 CLEAR VSN (IN CASE CAA ERROR) 06577 M01S05817.tfm +++| STM PESN 06578 M01S05818.tfm +++| LDM POFI 06579 M01S05819.tfm +++| NJN PMF3 IF FILE IDENTIFIER SPECIFIED 06580 M01S05820.tfm +++| MMOVE PMFC,,POFI,,FIKL 06581 M01S05821.tfm +++| PMF3 RJM CAA CHECK ALTERNATE USER ACCESS
| Line S05822 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | t2807 |
Seq # *Modification Id* Act ----------------------------+ 06582 M02S05822.t2807 ---| LDM CBST,BP CHECK DATA ERROR FLAG
| Line S05823 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | t2807 |
Seq # *Modification Id* Act ----------------------------+ 06583 M02S05823.t2807 ---| SHN 21-1
| Line S05824 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | t2807 |
Seq # *Modification Id* Act ----------------------------+ 06584 M02S05824.t2807 ---| PJN PMF4 IF NOT DATA ERROR
| Line S05825 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | t2807 |
Seq # *Modification Id* Act ----------------------------+ 06585 M02S05825.t2807 ---| ERROR EFD * ERROR IN FILE DATA.*
| Line S05826 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | t2807 |
Seq # *Modification Id* Act ----------------------------+ 06586 M02S05826.t2807 ---| 06587 M01S05827.tfm +++| PMF4 LDC 0 RESTORE VSN 06588 M01S05828.tfm +++|* LDC (PESN) 06589 M01S05829.tfm +++| PMFA EQU *-1 06590 M01S05830.tfm +++| STM PESN 06591 M01S05831.tfm +++| AOM CBAC+1,BP INCREMENT ACCESS COUNT 06592 M01S05832.tfm +++| SHN -14 06593 M01S05833.tfm +++| RAM CBAC,BP 06594 M01S05834.tfm +++| LIA CBAD,BP 06595 M01S05835.tfm +++| RJM EDT ENTER PACKED DATE/TIME 06596 M01S05836.tfm +++| LDM PFTD+1 CHECK FOR WRITE ACCESS 06597 M01S05837.tfm +++| SHN 21-4 06598 M01S05838.tfm +++| PJN PMF5 IF NOT WRITE ACCESS 06599 M01S05839.tfm +++| LIA CBMD,BP MODIFICATION DATE 06600 M01S05840.tfm +++| RJM EDT ENTER PACKED DATE/TIME 06601 M01S05841.tfm +++| PMF5 RJM WRP WRITE RANDOM PRU 06602 M01S05842.tfm +++| COMPARE PESN,,CBES,BP,VSKL 06603 M01S05843.tfm +++| ZJN PMF6 IF SAME VOLUME 06604 M01S05844.tfm +++| LDM UTMS+3 SET REWIND FILE FLAG 06605 M01S05845.tfm +++| SCN WURF 06606 M01S05846.tfm +++| LMN WURF 06607 M01S05847.tfm +++| STM UTMS+3 06608 M01S05848.tfm +++| PMF6 UDTRD CM,/MTX/UTCI,1 06609 M01S05849.tfm +++| LDM CPCB+2 06610 M01S05850.tfm +++| SHN 6 06611 M01S05851.tfm +++| LMM CPCB+3 06612 M01S05852.tfm +++| STD CM+1 06613 M01S05853.tfm +++| LDM CPCB+4 06614 M01S05854.tfm +++| STD CM+2 06615 M01S05855.tfm +++| UDTWT CM,/MTX/UTCI,1 06616 M01S05856.tfm +++| LJM PMFX RETURN 06617 M01S05857.tfm +++| 06618 M01S05858.tfm +++| PMF7 COMPARE POFI,,CBPI,BP,FIKL 06619 M01S05859.tfm +++| ZJP PMF2 IF FILE FOUND 06620 M01S05860.tfm +++| PMF8 LDM CBNC,BP POSITION TO NEXT CATALOG 06621 M01S05861.tfm +++| SHN 14 06622 M01S05862.tfm +++| STD CI 06623 M01S05863.tfm +++| SHN -14 06624 M01S05864.tfm +++| LMD RI 06625 M01S05865.tfm +++| SHN 14 06626 M01S05866.tfm +++| LMM CBNC+1,BP 06627 M01S05867.tfm +++| LMD RI+1 06628 M01S05868.tfm +++| ZJN PMF9 IF SAME CATALOG BLOCK 06629 M01S05869.tfm +++| LDM CBNC,BP SAVE RANDOM INDEX 06630 M01S05870.tfm +++| LPN 77 06631 M01S05871.tfm +++| STD RI 06632 M01S05872.tfm +++| SHN 14 06633 M01S05873.tfm +++| LMM CBNC+1,BP 06634 M01S05874.tfm +++| STD RI+1 06635 M01S05875.tfm +++| ZJN PMF10 IF END OF CATALOG BLOCKS 06636 M01S05876.tfm +++| RJM RRP READ RANDOM PRU (CATALOG) 06637 M01S05877.tfm +++| PMF9 RJM VSP VERIFY/SET CATALOG POINTERS 06638 M01S05878.tfm +++| PJP PMF1 IF VALID POINTER 06639 M01S05879.tfm +++| ERROR ECD *ERROR IN CATALOG DATA.* 06640 M01S05880.tfm +++| 06641 M01S05881.tfm +++| PMF10 LDM PBTO+1 CHECK FOR EXTENSION 06642 M01S05882.tfm +++| SHN 21-5 06643 M01S05883.tfm +++| PJP PMFX IF NOT APPENDING FILE 06644 M01S05884.tfm +++| LDM CPCB+2 SAVE CATALOG POINTERS 06645 M01S05885.tfm +++| SHN 6 06646 M01S05886.tfm +++| LMM CPCB+3 06647 M01S05887.tfm +++| STD CB 06648 M01S05888.tfm +++| LDM CPCB+4 06649 M01S05889.tfm +++| STD CB+1 06650 M01S05890.tfm +++| RESTP CPSI RESTORE SECONDARY VSN POINTERS 06651 M01S05891.tfm +++| LDC PVSN 06652 M01S05892.tfm +++| STD KA 06653 M01S05893.tfm +++| PMF11 LDM UTMS+2 06654 M01S05894.tfm +++| ZJN PMF13 IF TAPE NOT WRITTEN ON 06655 M01S05895.tfm +++| LDM VBRC,BP CHECK FOR LAST REEL 06656 M01S05896.tfm +++| SHN -6 06657 M01S05897.tfm +++| LMM UTMS+2 06658 M01S05898.tfm +++| NJN PMF12 IF NOT LAST REEL 06659 M01S05899.tfm +++| LDN EOIV/1S12 06660 M01S05900.tfm +++| RAM PMFB 06661 M01S05901.tfm +++| PMF12 LDM VBST,BP SET *EOI* VOLUME 06662 M01S05902.tfm +++| SCN EOIV/1S12 06663 M01S05903.tfm +++| LMN 0 NOT *EOI* VOLUME 06664 M01S05904.tfm +++|* LMN EOIV/1S12 (*EOI* VOLUME) 06665 M01S05905.tfm +++| PMFB EQU *-1 06666 M01S05906.tfm +++| STM VBST,BP 06667 M01S05907.tfm +++| PMF13 LDM VBST,BP 06668 M01S05908.tfm +++| LPN EOIV/1S12 06669 M01S05909.tfm +++| NJN PMF15 IF LAST VOLUME 06670 M01S05910.tfm +++| LDM VBNV,BP 06671 M01S05911.tfm +++| ZJP PMF16 IF LAST VOLUME 06672 M01S05912.tfm +++| MMOVE VBNV,BP,,KA,VSKL 06673 M01S05913.tfm +++| RJM SFV SEARCH FOR VOLUME 06674 M01S05914.tfm +++| ZJP PMF11 IF VSN FOUND 06675 M01S05915.tfm +++| PMF14 ERROR EID *ERROR IN INDEX DATA.* 06676 M01S05916.tfm +++| 06677 M01S05917.tfm +++| PMF15 COMPARE PESN,,PVSN,,VSKL 06678 M01S05918.tfm +++| ZJN PMF16 IF SAME VOLUME 06679 M01S05919.tfm +++| LDM UTMS+3 SET REWIND FLAG 06680 M01S05920.tfm +++| SCN WURF 06681 M01S05921.tfm +++| LMN WURF 06682 M01S05922.tfm +++| STM UTMS+3 06683 M01S05923.tfm +++| PMF16 MMOVE VBES,BP,PESN,,VSKL 06684 M01S05924.tfm +++| MMOVE VBVS,BP,,KA,VSKL 06685 M01S05925.tfm +++| LDM PBTO+1 FORCE SYMBOLIC ACCESS 06686 M01S05926.tfm +++| SCN 4 06687 M01S05927.tfm +++| LMN 4 06688 M01S05928.tfm +++| STM PBTO+1 06689 M01S05929.tfm +++| LDM PBSN 06690 M01S05930.tfm +++| SCN 77 06691 M01S05931.tfm +++| STM PBSN 06692 M01S05932.tfm +++| LDN 1 06693 M01S05933.tfm +++| STM PBSN+1 06694 M01S05934.tfm +++| EXOVL ECI CREATE CATALOG ENTRY 06695 M01S05935.tfm +++| 06696 M01S05936.tfm +++| PMFC DATA 17HREQUESTED FILE
| Line S05937 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 06697 M02S05937.274l797 ---| TITLE ".Y." - SUBROUTINES. 06698 M01S00263.274l797 +++| TITLE SUBROUTINES. 06699 M01S05938.tfm +++| SFV SPACE 4,10 06700 M01S05939.tfm +++|** SFV - SEARCH FOR VSN 06701 M01S05940.tfm +++|* 06702 M01S05941.tfm +++|* ENTRY (BA) = SECONDARY INDEX BLOCK. 06703 M01S05942.tfm +++|* (KA) = KEY ADDRESS. 06704 M01S05943.tfm +++|* 06705 M01S05944.tfm +++|* EXIT (A) = 0 IF VSN FOUND. 06706 M01S05945.tfm +++|* 06707 M01S05946.tfm +++|* USES BP. 06708 M01S05947.tfm +++|* 06709 M01S05948.tfm +++|* CALLS SIB, VIS. 06710 M01S05949.tfm +++|* 06711 M01S05950.tfm +++|* MACROS SAVEP. 06712 M01S05951.tfm +++| 06713 M01S05952.tfm +++| 06714 M01S05953.tfm +++| SFV1 SAVEP CPSI SAVE SECONDARY VSN INDEX POINTERS 06715 M01S05954.tfm +++| LDN 0 EXIT *VSN FOUND* 06716 M01S05955.tfm +++| 06717 M01S05956.tfm +++| SFV SUBR ENTRY/EXIT 06718 M01S05957.tfm +++| LDD BA 06719 M01S05958.tfm +++| ADN 2 06720 M01S05959.tfm +++| STD BP 06721 M01S05960.tfm +++| RJM SIB SEARCH INDEXED BUFFER (VSN) 06722 M01S05961.tfm +++| ZJN SFV1 IF FOUND IN THIS BUFFER 06723 M01S05962.tfm +++| RJM VIS VSN INDEXED SEARCH 06724 M01S05963.tfm +++| ZJN SFV1 IF VSN FOUND 06725 M01S05964.tfm +++| UJN SFVX RETURN 06726 M01S05965.tfm +++| SPACE 4,10 06727 M01S05966.tfm +++|*** COMMON DECKS. 06728 M01S05967.tfm +++| 06729 M01S05968.tfm +++| AUS$ EQU 1 DEFINE AUS - ALTERNATE USERNAME SEARCH 06730 M01S05969.tfm +++| CAA$ EQU 1 DEFINE CAA - CHECK ALTERNATE USER ACCESS 06731 M01S05970.tfm +++| FTC$ EQU 1 DEFINE FTC - FIND TAPE CATALOG 06732 M01S05971.tfm +++| IBC$ EQU 1 DEFINE IBC - INITIALIZE BLOCK CHAIN 06733 M01S05972.tfm +++| VSP$ EQU 1 DEFINE VSP - VERIFY/SET CATALOG POINTERS 06734 M01S05973.tfm +++| VUB$ EQU 1 DEFINE VUB - VERIFY USER BLOCK 06735 M01S05974.tfm +++| 06736 M01S05975.tfm +++|*CALL COMPTFM 06737 M01S05976.tfm +++|*CALL COMPWEI 06738 M01S05977.tfm +++| SPACE 4,10 06739 M01S05978.tfm +++| SPACE 4,10 06740 M01S05979.tfm +++|*** BUFFERS. 06741 M01S05980.tfm +++| 06742 M01S05981.tfm +++| 06743 M01S05982.tfm +++| BUFA BSS TAEL*5 06744 M01S05983.tfm +++| BUFB BSS TAEL*5 06745 M01S05984.tfm +++| SPACE 4,10 06746 M01S05985.tfm +++| ERRNG BUF2-* 06747 M01S00264.274l797 +++| TITLE PRESET SUBROUTINES. 06748 M01S05986.tfm +++| CDB SPACE 4,10 06749 M01S05987.tfm +++|** CDB - CONVERT DECIMAL DISPLAY CODE TO BINARY. 06750 M01S05988.tfm +++|* 06751 M01S05989.tfm +++|* ENTRY (A) = ADDRESS OF STRING (BITS 0-11). 06752 M01S05990.tfm +++|* = CHARACTER COUNT (BITS 12-14). 06753 M01S05991.tfm +++|* = HALF BYTE FLAG (BIT 15). 06754 M01S05992.tfm +++|* 06755 M01S05993.tfm +++|* EXIT (A) = CONVERTED VALUE. 06756 M01S05994.tfm +++|* 06757 M01S05995.tfm +++|* USES S2, S1 - S1+4. 06758 M01S05996.tfm +++|* 06759 M01S05997.tfm +++|* MACROS ERROR. 06760 M01S05998.tfm +++| 06761 M01S05999.tfm +++| 06762 M01S06000.tfm +++| CDB SUBR ENTRY/EXIT 06763 M01S06001.tfm +++| STD S2 ADDRESS OF STRING 06764 M01S06002.tfm +++| SHN -14 COUNT AND HALF BYTE FLAG 06765 M01S06003.tfm +++| STD S1 06766 M01S06004.tfm +++| SHN -3 HALF BYTE FLAG 06767 M01S06005.tfm +++| STD S1+1 06768 M01S06006.tfm +++| LDD S1 CHARACTER COUNT 06769 M01S06007.tfm +++| LPN 7 06770 M01S06008.tfm +++| ADD S1+1 06771 M01S06009.tfm +++| STD S1 06772 M01S06010.tfm +++| LDD S1+1 CHECK IF FIELD SPECIFIED 06773 M01S06011.tfm +++| SHN 21-0 06774 M01S06012.tfm +++| LMI S2 06775 M01S06013.tfm +++| MJN CDB1 IF HALF BYTE 06776 M01S06014.tfm +++| SHN -6 06777 M01S06015.tfm +++| CDB1 LPN 77 06778 M01S06016.tfm +++| ZJN CDBX IF NOT SPECIFIED 06779 M01S06017.tfm +++| LDN 0 06780 M01S06018.tfm +++| STD S1+3 ACCUMULATOR (HIGH) 06781 M01S06019.tfm +++| STD S1+4 ACCUMULATOR (LOW) 06782 M01S06020.tfm +++| CDB2 LDD S1+1 06783 M01S06021.tfm +++| SHN -1 06784 M01S06022.tfm +++| ADD S2 06785 M01S06023.tfm +++| STD T0 06786 M01S06024.tfm +++| LDD S1+1 06787 M01S06025.tfm +++| LPN 1 06788 M01S06026.tfm +++| SHN 21-0 06789 M01S06027.tfm +++| LMI T0 06790 M01S06028.tfm +++| MJN CDB3 IF ODD BYTE 06791 M01S06029.tfm +++| SHN -6 06792 M01S06030.tfm +++| CDB3 LPN 77 06793 M01S06031.tfm +++| SBN 1R0 06794 M01S06032.tfm +++| PJN CDB5 IF POSSIBLE VALID DIGIT 06795 M01S06033.tfm +++| CDB4 ERROR BAE *BUFFER ARGUMENT ERROR.* 06796 M01S06034.tfm +++| 06797 M01S06035.tfm +++| CDB5 STD T0 06798 M01S06036.tfm +++| SBN 1R9-1R0+1 06799 M01S06037.tfm +++| PJN CDB4 IF NOT VALID DIGIT 06800 M01S06038.tfm +++| LDD S1+3 CALCULATE 10D * ACCUMULATED RESULT 06801 M01S06039.tfm +++| SHN 14 06802 M01S06040.tfm +++| ADD S1+4 06803 M01S06041.tfm +++| SHN 2+6 TIMES 4 06804 M01S06042.tfm +++| ADD S1+3 TIMES 5 06805 M01S06043.tfm +++| SHN 14 06806 M01S06044.tfm +++| ADD S1+4 06807 M01S06045.tfm +++| SHN 1 TIMES 10D 06808 M01S06046.tfm +++| ADD T0 ADD THIS DIGIT 06809 M01S06047.tfm +++| STD S1+4 STORE RESULT 06810 M01S06048.tfm +++| SHN -14 06811 M01S06049.tfm +++| STD S1+3 06812 M01S06050.tfm +++| AOD S1+1 06813 M01S06051.tfm +++| SBD S1 06814 M01S06052.tfm +++| NJP CDB2 IF MORE TO CONVERT 06815 M01S06053.tfm +++| LDD S1+3 06816 M01S06054.tfm +++| SHN 14 06817 M01S06055.tfm +++| LMD S1+4 06818 M01S06056.tfm +++| LJM CDBX RETURN
| Line S06057 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 06819 M02S06057.274l797 ---| ELA SPACE 4 06820 M01S00265.274l797 +++| ELA SPACE 4,10 06821 M01S06058.tfm +++|** ELA - EXTENDED LABELS ADDRESS PROCESSING. 06822 M01S06059.tfm +++|* 06823 M01S06060.tfm +++|* ENTRY (T6 - T7) = POSITION TO START AT IN BUFFER. 06824 M01S06061.tfm +++|* 06825 M01S06062.tfm +++|* EXIT (A) = ABSOLUTE ADDRESS. 06826 M01S06063.tfm +++|* (A) = 0, END OF LABEL BUFFER. 06827 M01S06064.tfm +++| 06828 M01S06065.tfm +++| 06829 M01S06066.tfm +++| ELA2 LDN 0 INDICATE END OF BUFFER 06830 M01S06067.tfm +++| 06831 M01S06068.tfm +++| ELA SUBR ENTRY/EXIT 06832 M01S06069.tfm +++| LDA CM+3,REL 06833 M01S06070.tfm +++| ADN 11 06834 M01S06071.tfm +++| CRD S1 06835 M01S06072.tfm +++| LDD S1+3 06836 M01S06073.tfm +++| SHN 14 06837 M01S06074.tfm +++| STD S1+1 06838 M01S06075.tfm +++| SHN -14 06839 M01S06076.tfm +++| STD S1+3 06840 M01S06077.tfm +++| SHN 14 06841 M01S06078.tfm +++| LMD S1+4 06842 M01S06079.tfm +++| SBN 2 06843 M01S06080.tfm +++| MJN ELA2 IF NO LABEL BUFFER 06844 M01S06081.tfm +++| LDD S1+2 06845 M01S06082.tfm +++| SHN 6 06846 M01S06083.tfm +++| LMD S1+1 06847 M01S06084.tfm +++| STD S1+2 06848 M01S06085.tfm +++| SHN -14 06849 M01S06086.tfm +++| STD S1+1 06850 M01S06087.tfm +++| LDD T6 06851 M01S06088.tfm +++| SBD S1+1 06852 M01S06089.tfm +++| SHN 14 06853 M01S06090.tfm +++| ADD T7 06854 M01S06091.tfm +++| SBD S1+2 06855 M01S06092.tfm +++| ADN 11 ALLOW FOR LABEL 06856 M01S06093.tfm +++| PJP ELA2 IF END OF LABEL BUFFER 06857 M01S06094.tfm +++| LDD S1+1 CHECK IF BUFFER WITHIN FL 06858 M01S06095.tfm +++| ADD S1+3 06859 M01S06096.tfm +++| SHN 14 06860 M01S06097.tfm +++| ADD S1+2 06861 M01S06098.tfm +++| ADD S1+4 06862 M01S06099.tfm +++| SHN -6 06863 M01S06100.tfm +++| SBD FL 06864 M01S06101.tfm +++| MJN ELA1 IF BUFFER WITHIN FL 06865 M01S06102.tfm +++| ERROR BAE *BUFFER ARGUMENT ERROR.* 06866 M01S06103.tfm +++| 06867 M01S06104.tfm +++| ELA1 LDD S1+3 CALCULATE LABEL ADDRESS 06868 M01S06105.tfm +++| ADD T6 06869 M01S06106.tfm +++| SHN 6 06870 M01S06107.tfm +++| ADD RA 06871 M01S06108.tfm +++| SHN 6 06872 M01S06109.tfm +++| ADD S1+4 06873 M01S06110.tfm +++| ADD T7 06874 M01S06111.tfm +++| LJM ELAX RETURN 06875 M01S06112.tfm +++| PRS SPACE 4,10
| Line S06113 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 06876 M02S06113.274l797 ---|** PRS - PRESET FOR SUBFUNCTION PMFS 06877 M01S00266.274l797 +++|** PRS - PRESET FOR SUBFUNCTION PMFS. 06878 M01S06114.tfm +++|* 06879 M01S06115.tfm +++|* ENTRY NONE 06880 M01S06116.tfm +++|* 06881 M01S06117.tfm +++|* EXIT (A) = 0 IF NOT A SYMBOLIC TAPE REQUEST. 06882 M01S06118.tfm +++|* 06883 M01S06119.tfm +++|* USES BA, CI, KA, CM - CM+4, RI - RI+1. 06884 M01S06120.tfm +++|* 06885 M01S06121.tfm +++|* CALLS RLF, SFV, VIS. 06886 M01S06122.tfm +++|* 06887 M01S06123.tfm +++|* MACROS COMPARE, ERROR, MMOVE. 06888 M01S06124.tfm +++| 06889 M01S06125.tfm +++| 06890 M01S06126.tfm +++| PRS3 LDN 0 NOT A SYMBOLIC TAPE REQUEST 06891 M01S06127.tfm +++| 06892 M01S06128.tfm +++| PRS SUBR ENTRY/EXIT 06893 M01S06129.tfm +++| RJM RLF READ LABELS FROM FET 06894 M01S06130.tfm +++| LDC PESN FIND FIRST VOLUME 06895 M01S06131.tfm +++| STD KA 06896 M01S06132.tfm +++| RJM VIS VSN INDEX SEARCH 06897 M01S06133.tfm +++| NJN PRS3 IF NOT FOUND 06898 M01S06134.tfm +++| LDC PVSN 06899 M01S06135.tfm +++| STD KA 06900 M01S06136.tfm +++| MMOVE VBFV,BP,,KA,VSKL 06901 M01S06137.tfm +++| COMPARE PESN,,,KA,VSKL 06902 M01S06138.tfm +++| ZJN PRS1 IF FIRST VOLUME 06903 M01S06139.tfm +++| RJM SFV SEARCH FOR VOLUME 06904 M01S06140.tfm +++| ZJN PRS1 IF VSN FOUND 06905 M01S06141.tfm +++| ERROR EID *ERROR IN INDEX DATA.* 06906 M01S06142.tfm +++| 06907 M01S06143.tfm +++| PRS1 LDM VBCI,BP GET CATALOG ENTRY 06908 M01S06144.tfm +++| SHN 14 06909 M01S06145.tfm +++| STD CI 06910 M01S06146.tfm +++| SHN -14 06911 M01S06147.tfm +++| STD RI 06912 M01S06148.tfm +++| LDM VBCI+1,BP 06913 M01S06149.tfm +++| STD RI+1 06914 M01S06150.tfm +++| LDC BUF2 06915 M01S06151.tfm +++| STD BA 06916 M01S06152.tfm +++| LDD CP CHECK FOR *POSMF* FROM *RESEX* 06917 M01S06153.tfm +++| ADN JCIW 06918 M01S06154.tfm +++| CRD CM 06919 M01S06155.tfm +++| LDD CM CPU PRIORITY
| Line S06156 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | tfm20 |
Seq # *Modification Id* Act ----------------------------+ 06920 M02S06156.tfm20 ---| SHN -1 06921 M01S00005.tfm20 +++| LPC 177 06922 M01S06157.tfm +++| LMN /PRD/RXCS 06923 M01S06158.tfm +++| NJN PRS2 IF NOT RESEX CP PRIORITY 06924 M01S06159.tfm +++| LDM PRSA SKIP PASSWORD CHECK 06925 M01S06160.tfm +++| STM CAAB 06926 M01S06161.tfm +++| PRS2 LJM PRSX RETURN 06927 M01S06162.tfm +++| 06928 M01S06163.tfm +++| PRSA BSS 0 06929 M01S06164.tfm +++| LOC CAAB 06930 M01S06165.tfm +++| UJN CAA3 SKIP PASSWORD CHECK 06931 M01S06166.tfm +++| LOC *O 06932 M01S06167.tfm +++| SPACE 4 06933 M01S06168.tfm +++| ERRNG BUF1-* 06934 M01S06169.tfm +++| RLF SPACE 4,10 06935 M01S06170.tfm +++|** READ *HDR1* LABEL FROM USER-S FET. 06936 M01S06171.tfm +++|* 06937 M01S06172.tfm +++|* ENTRY (UDTA) = UDT ADDRESS. 06938 M01S06173.tfm +++|* 06939 M01S06174.tfm +++|* EXIT POFI UPDATED FROM USER-S FET. 06940 M01S06175.tfm +++|* PBSI UPDATED FROM USER-S FET. 06941 M01S06176.tfm +++|* PBQN UPDATED FROM USER-S FET. 06942 M01S06177.tfm +++|* 06943 M01S06178.tfm +++|* USES T1, T5, T6, T7, CM - CM+4, S1 - S1+4, S2 - S2+4 06944 M01S06179.tfm +++|* 06945 M01S06180.tfm +++|* CALLS CDB, ELA. 06946 M01S06181.tfm +++|* 06947 M01S06182.tfm +++|* MACROS ERROR, UDTRD. 06948 M01S06183.tfm +++| 06949 M01S06184.tfm +++| 06950 M01S06185.tfm +++| RLF SUBR ENTRY/EXIT 06951 M01S06186.tfm +++| UDTRD S1,/MTX/UCIB,1 FET OPTIONS 06952 M01S06187.tfm +++| UDTRD CM,/MTX/UCIA,1 FET ADDRESS 06953 M01S06188.tfm +++| LDD S1+1 06954 M01S06189.tfm +++| SHN 21-5 06955 M01S06190.tfm +++| PJP RLF8 IF NOT EXTENDED LABELS 06956 M01S06191.tfm +++| LDN 0 06957 M01S06192.tfm +++| STD T6 06958 M01S06193.tfm +++| STD T7 06959 M01S06194.tfm +++| RLF1 RJM ELA SEARCH FOR *HDR1* LABEL 06960 M01S06195.tfm +++| ZJN RLF3 IF END OF LABEL BUFFER 06961 M01S06196.tfm +++| CRD S1 06962 M01S06197.tfm +++| ADN 1 06963 M01S06198.tfm +++| CRD S2 06964 M01S06199.tfm +++| LDD S1+4 06965 M01S06200.tfm +++| ZJN RLF3 IF END OF LABELS IN BUFFER 06966 M01S06201.tfm +++| LMC 80D 06967 M01S06202.tfm +++| NJN RLF3 IF NOT CORRECT LENGTH 06968 M01S06203.tfm +++| LDD S2 06969 M01S06204.tfm +++| LMC 2RHD 06970 M01S06205.tfm +++| NJN RLF2 IF NOT *HDR1* LABEL 06971 M01S06206.tfm +++| LDD S2+1 06972 M01S06207.tfm +++| LMC 2RR1 06973 M01S06208.tfm +++| ZJN RLF4 IF LABEL IS *HDR1* 06974 M01S06209.tfm +++| RLF2 LDN 11 INCREMENT LABEL POINTER 06975 M01S06210.tfm +++| RAD T7 06976 M01S06211.tfm +++| SHN -14 06977 M01S06212.tfm +++| RAD T6 06978 M01S06213.tfm +++| UJN RLF1 CONTINUE SEARCH 06979 M01S06214.tfm +++| 06980 M01S06215.tfm +++| RLF3 ERROR BAE *BUFFER ARGUMENT ERROR.* 06981 M01S06216.tfm +++| 06982 M01S06217.tfm +++| RLF4 LDN 10 READ *HDR1* LABEL 06983 M01S06218.tfm +++| STD T5 06984 M01S06219.tfm +++| RJM ELA SEARCH FOR *HDR1* LABEL 06985 M01S06220.tfm +++| ADN 1 OFFSET RECORD LENGTH 06986 M01S06221.tfm +++| CRM BUF0,T5 06987 M01S06222.tfm +++| MMOVE BUF0+2,,POFI,,FIKL 06988 M01S06223.tfm +++| LDN 2 MOVE SET-ID WITH SHIFT 06989 M01S06224.tfm +++| STD T7 06990 M01S06225.tfm +++| RLF5 LDM BUF0+10D,T7 HIGH ORDER BYTE 06991 M01S06226.tfm +++| LPN 77 06992 M01S06227.tfm +++| SHN 14 06993 M01S06228.tfm +++| LMM BUF0+11D,T7 LOW ORDER BYTE 06994 M01S06229.tfm +++| SHN 14 06995 M01S06230.tfm +++| STM PBSI,T7 06996 M01S06231.tfm +++| SOD T7 06997 M01S06232.tfm +++| PJN RLF5 IF MOVE NOT COMPLETE 06998 M01S06233.tfm +++| LDM PBQN CLEAR PBQN 06999 M01S06234.tfm +++| SCN 77 07000 M01S06235.tfm +++| STM PBQN 07001 M01S06236.tfm +++| LDC 14S12+BUF0+15D 07002 M01S06237.tfm +++| RJM CDB CONVERT DECIMAL TO BINARY
| Line S06238 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07003 M02S06238.274l797 ---| RLS6 STM PBQN+1 SAVE FILE SEQUENCE NUMBER 07004 M01S00267.274l797 +++| STM PBQN+1 SAVE FILE SEQUENCE NUMBER 07005 M01S06239.tfm +++| SHN -14 07006 M01S06240.tfm +++| RAM PBQN 07007 M01S06241.tfm +++| LPN 77 07008 M01S06242.tfm +++| SHN 14 07009 M01S06243.tfm +++| ADM PBQN+1 07010 M01S06244.tfm +++| LMC 9999D
| Line S06245 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07011 M02S06245.274l797 ---| NJN RLS7 IF NOT EXTENSION 07012 M01S00268.274l797 +++| NJN RLF7 IF NOT EXTENSION 07013 M01S06246.tfm +++| LDM PBTO+1 SET *TO=A* 07014 M01S06247.tfm +++| SCN 1S5 07015 M01S06248.tfm +++| LMN 1S5 07016 M01S06249.tfm +++| STM PBTO+1
| Line S06250 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07017 M02S06250.274l797 ---| RLS7 LJM RLFX RETURN 07018 M01S00269.274l797 +++| RLF7 LJM RLFX RETURN 07019 M01S06251.tfm +++| 07020 M01S06252.tfm +++| RLF8 LDN 4 07021 M01S06253.tfm +++| STD T1 07022 M01S06254.tfm +++| LDA CM+3,ABS 07023 M01S06255.tfm +++| SBN 2 07024 M01S06256.tfm +++| PJN RLF10 IF FET IN BOUNDS 07025 M01S06257.tfm +++| RLF9 LJM RLF3 BUFFER ARGUMENT ERROR 07026 M01S06258.tfm +++| 07027 M01S06259.tfm +++| RLF10 ADC 77+2+15 07028 M01S06260.tfm +++| SHN -6 07029 M01S06261.tfm +++| SBD FL 07030 M01S06262.tfm +++| PJN RLF9 IF FET OUT OF BOUNDS 07031 M01S06263.tfm +++| LDA CM+3,REL 07032 M01S06264.tfm +++| ADN 11 07033 M01S06265.tfm +++| CRM BUF0,T1 07034 M01S06266.tfm +++| MMOVE BUF0,,POFI,,FIKL 07035 M01S06267.tfm +++| MMOVE BUF0+15,,PBSI,,6 07036 M01S06268.tfm +++| LDM PBQN 07037 M01S06269.tfm +++| SCN 77 07038 M01S06270.tfm +++| STM PBQN 07039 M01S06271.tfm +++| LDC 13S12+BUF0+8D 07040 M01S06272.tfm +++| RJM CDB CONVERT DECIMAL TO BINARY 07041 M01S06273.tfm +++| ADC -999D 07042 M01S06274.tfm +++| NJN RLF11 IF NOT *POSMF 9999* 07043 M01S06275.tfm +++| LDC 9000D 07044 M01S06276.tfm +++| RLF11 LJM RLF5 STORE FILE SEQUENCE NUMBER 07045 M01S06277.tfm +++| SPACE 4,10 07046 M01S06278.tfm +++| ERRNG BUF0-* 07047 M01S06279.tfm +++| SPACE 4
| Line S06280 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07048 M02S06280.274l797 ---| OVERLAY (SUBFUNCTIONS UCES, VTLS.),OVL1 07049 M01S00270.274l797 +++| OVERLAY (VERIFY TAPE LABELS / UPDATE CATALOG ENTRY.),OVL1 07050 M01S06281.tfm +++| SPACE 4,10 07051 M01S06282.tfm +++|*** DIRECT CELLS. 07052 M01S06283.tfm +++| 07053 M01S06284.tfm +++| 07054 M01S06285.tfm +++| FV EQU S1 - S1+2 FIRST VOLUME 07055 M01S06286.tfm +++| RC EQU S1+3 REEL COUNT 07056 M01S06287.tfm +++| CN EQU S2 - S2+4 SCRATCH 07057 M01S06288.tfm +++| FE EQU CN+1 - CN+2 FINAL CATALOG ENTRY 07058 M01S06289.tfm +++| CB EQU CN+3 - CN+4 CURRENT CATALOG ENTRY 07059 M01S06290.tfm +++| VTL SPACE 4,10 07060 M01S06291.tfm +++|*** VTL - VERIFY TAPE LABELS. 07061 M01S06292.tfm +++|* 07062 M01S06293.tfm +++|* VTL COMPARES THE TAPE LABELS WITH THE CATALOG ENTRY TO ENSURE 07063 M01S06294.tfm +++|* THAT THE TAPE HAD NOT BEEN MODIFIED IF IT HAD BEEN REMOVED 07064 M01S06295.tfm +++|* FROM THE CONTROL OF THE TAPE MANAGEMENT SYSTEM. 07065 M01S06296.tfm +++|* 07066 M01S06297.tfm +++|* ENTRY PARAMETER BLOCK SET UP BY GUO. 07067 M01S06298.tfm +++|* 07068 M01S06299.tfm +++|* EXIT CATALOG ENTRY VERIFIED. 07069 M01S06300.tfm +++|* 07070 M01S06301.tfm +++|* CALLS FCE, MCE, VCE. 07071 M01S06302.tfm +++| 07072 M01S06303.tfm +++| 07073 M01S06304.tfm +++| VTL ENTRY ENTRY/EXIT 07074 M01S06305.tfm +++| RJM FCE FIND CATALOG ENTRY 07075 M01S06306.tfm +++| ZJN VTLX IF CATALOG NOT FOUND 07076 M01S06307.tfm +++| RJM CPC CHECK FOR PURGED CATALOGS 07077 M01S06308.tfm +++| LDM CBSI,BP CHECK FOR ORIGINAL TMS CATALOG ENTRY 07078 M01S06309.tfm +++| ZJN VTL1 IF SETID NOT SPECIFIED
| Line S06310 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | t5519 |
Seq # *Modification Id* Act ----------------------------+ 07079 M02S06310.t5519 ---| LDM CBLD,BP 07080 M01S00084.t5519 +++| LDM CBLD+2,BP CHECK RETENTION DATE 07081 M01S00085.t5519 +++| LPN 77 07082 M01S06311.tfm +++| ZJN VTL1 IF RETENTION DATE NOT SPECIFIED 07083 M01S06312.tfm +++| LDM CBST,BP CHECK FOR RECOVERED FILE 07084 M01S06313.tfm +++| LPC 2000 07085 M01S06314.tfm +++| ZJN VTL2 IF NOT RECOVERED FILE 07086 M01S06315.tfm +++| VTL1 RJM UCT UPDATE CATALOG ENTRY FROM TAPE LABEL 07087 M01S06316.tfm +++| UJN VTLX RETURN 07088 M01S06317.tfm +++| 07089 M01S06318.tfm +++| VTL2 RJM VCE VERIFY CATALOG ENTRY 07090 M01S06319.tfm +++| UJN VTLX RETURN 07091 M01S06320.tfm +++| UCE SPACE 4,10 07092 M01S06321.tfm +++|*** UCES - UPDATE CATALOG ENTRY SUBFUNCTION. 07093 M01S06322.tfm +++|* 07094 M01S06323.tfm +++|* UPDATE THE CATALOG ENTRY TO MATCH THE INFORMATION WRITTEN ON 07095 M01S06324.tfm +++|* THE TAPE. 07096 M01S06325.tfm +++|* 07097 M01S06326.tfm +++|* ENTRY PARAMETER BLOCK SET UP BY *GUO*. 07098 M01S06327.tfm +++|* 07099 M01S06328.tfm +++|* EXIT CATALOG ENTRY UPDATED. 07100 M01S06329.tfm +++|* 07101 M01S06330.tfm +++|* CALLS FCE, UCT. 07102 M01S06331.tfm +++| 07103 M01S06332.tfm +++| 07104 M01S06333.tfm +++| UCE ENTRY ENTRY/EXIT 07105 M01S06334.tfm +++| RJM FCE FIND CATALOG ENTRY 07106 M01S06335.tfm +++| ZJN UCEX IF NOT FOUND 07107 M01S06336.tfm +++| RJM UCT UPDATE CATALOG ENTRY FROM TAPE LABEL 07108 M01S06337.tfm +++| UJN UCEX RETURN
| Line S06338 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07109 M02S06338.274l797 ---| TITLE ".Y." - SUBROUTINES. 07110 M01S00271.274l797 +++| TITLE SUBROUTINES. 07111 M01S06339.tfm +++| CPC SPACE 4,10 07112 M01S06340.tfm +++|** CPC - CHECK TO PURGE CATALOGS. 07113 M01S06341.tfm +++|* 07114 M01S06342.tfm +++|* ENTRY (UTMS+2) = TAPE WRITTEN ON. 07115 M01S06343.tfm +++|* (CI - RI+1) = CURRENT TAPE CATALOG. 07116 M01S06344.tfm +++|* (CB - CB+1) = *UTCI* CURRENT CATALOG. 07117 M01S06345.tfm +++|* 07118 M01S06346.tfm +++|* EXIT TO *RDC* IF TAPE WRITTEN ON AND CURRENT CATALOG 07119 M01S06347.tfm +++|* POINTERS DO NOT MATCH. 07120 M01S06348.tfm +++|* 07121 M01S06349.tfm +++|* CALLS CPF. 07122 M01S06350.tfm +++| 07123 M01S06351.tfm +++| 07124 M01S06352.tfm +++| CPC SUBR ENTRY/EXIT 07125 M01S06353.tfm +++| LDM UTMS+2 07126 M01S06354.tfm +++| ZJN CPCX IF NOT WRITTEN ON 07127 M01S06355.tfm +++| LDD CI COMPARE CATALOG ENTRIES 07128 M01S06356.tfm +++| SHN 6 07129 M01S06357.tfm +++| LMD RI (A) = CURRENT TAPE CATALOG 07130 M01S06358.tfm +++| LMD CB 07131 M01S06359.tfm +++| NJN CPC1 IF NOT SAME CATALOG 07132 M01S06360.tfm +++| LDD RI+1 07133 M01S06361.tfm +++| LMD CB+1 07134 M01S06362.tfm +++| ZJN CPCX IF SAME CATALOG 07135 M01S06363.tfm +++| CPC1 LDM UTMS+4 RE-ISSUE CURRENT REQUEST 07136 M01S06364.tfm +++| SCN RSRR 07137 M01S06365.tfm +++| LMN RSRR 07138 M01S06366.tfm +++| STM UTMS+4 07139 M01S06367.tfm +++| EXOVL PEC PURGE EXCESS CATALOG ENTRIES 07140 M01S06368.tfm +++| CTC SPACE 4,10 07141 M01S06369.tfm +++|** CTC - COMPLETE *MAGNET* *TFM* CALL. 07142 M01S06370.tfm +++|* 07143 M01S06371.tfm +++|* ENTRY NONE. 07144 M01S06372.tfm +++|* 07145 M01S06373.tfm +++|* EXIT *TFM* REQUEST FLAG CLEARED, AND NORMAL COMPLETION 07146 M01S06374.tfm +++|* SET IN *UDT*. EXIT IS TO *DPP*. 07147 M01S06375.tfm +++|* 07148 M01S06376.tfm +++|* MACROS UDTWT. 07149 M01S06377.tfm +++| 07150 M01S06378.tfm +++| 07151 M01S06379.tfm +++| CTC ENTRY ENTRY 07152 M01S06380.tfm +++| LDM UTMS+4 CLEAR TFM REQUEST FLAG 07153 M01S06381.tfm +++| SCN RSIL 07154 M01S06382.tfm +++| STM UTMS+4 07155 M01S06383.tfm +++| UDTWT UTMS,/MTX/UTMS,1 07156 M01S06384.tfm +++| LDN ZERL SET NORMAL COMPLETION 07157 M01S06385.tfm +++| CRD CM 07158 M01S06386.tfm +++| LDN /MTX/NCP 07159 M01S06387.tfm +++| STD CM 07160 M01S06388.tfm +++| UDTWT CM,/MTX/UXRQ,1 07161 M01S06389.tfm +++| LJM DPP EXIT PP 07162 M01S06390.tfm +++| FCE SPACE 4,10 07163 M01S06391.tfm +++|** FCE - FIND CATALOG ENTRY. 07164 M01S06392.tfm +++|* 07165 M01S06393.tfm +++|* ENTRY PARAMETER BLOCK SET UP BY *GUO*. 07166 M01S06394.tfm +++|* 07167 M01S06395.tfm +++|* EXIT (A) = 0 IF CATALOG ENTRY NOT FOUND. 07168 M01S06396.tfm +++|* (CB - CB+1) = CURRENT CATALOG ENTRY. 07169 M01S06397.tfm +++|* (FE - FE+1) = *POSMF* CATALOG ENTRY. 07170 M01S06398.tfm +++|* 07171 M01S06399.tfm +++|* USES CI, KA, RC, CM - CM+4, CN - CN+4, 07172 M01S06400.tfm +++|* FV - FV+2, R1 - RI+1. 07173 M01S06401.tfm +++|* 07174 M01S06402.tfm +++|* CALLS RRP, VIS, VSP. 07175 M01S06403.tfm +++|* 07176 M01S06404.tfm +++|* MACROS COMPARE, ERROR, MMOVE, SAVEP, UDTRD. 07177 M01S06405.tfm +++| 07178 M01S06406.tfm +++| 07179 M01S06407.tfm +++| FCE11 LDN 0 CATALOG ENTRY NOT FOUND 07180 M01S06408.tfm +++| 07181 M01S06409.tfm +++| FCE SUBR ENTRY/EXIT 07182 M01S06410.tfm +++| LDC PESN 07183 M01S06411.tfm +++| STD KA 07184 M01S06412.tfm +++| RJM VIS VSN INDEXED SEARCH 07185 M01S06413.tfm +++| NJN FCE11 IF NOT FOUND 07186 M01S06414.tfm +++| LDM VBRC,BP 07187 M01S06415.tfm +++| SHN -6 07188 M01S06416.tfm +++| STD RC 07189 M01S06417.tfm +++| UDTRD POFI,/MTX/UFID,2 READ FILE IDENTIFIER 07190 M01S06418.tfm +++| UDTRD CM,/MTX/USID,1 READ SEQUENCE NUMBER 07191 M01S06419.tfm +++| LDM PBQN 07192 M01S06420.tfm +++| SCN 77 07193 M01S06421.tfm +++| STM PBQN 07194 M01S06422.tfm +++| LDD CM+3 07195 M01S06423.tfm +++| LPN 77 07196 M01S06424.tfm +++| RAM PBQN 07197 M01S06425.tfm +++| LDD CM+4 07198 M01S06426.tfm +++| STM PBQN+1 07199 M01S06427.tfm +++| UDTRD PBCR,/MTX/UDAT,1 READ CREATION AND RETENTION DATES 07200 M01S06428.tfm +++| MMOVE VBFV,BP,FV,,VSKL 07201 M01S06429.tfm +++| COMPARE PESN,,FV,,VSKL 07202 M01S06430.tfm +++| ZJN FCE1 IF FIRST VOLUME 07203 M01S06431.tfm +++| LDN FV READ FIRST VOLUME 07204 M01S06432.tfm +++| STD KA 07205 M01S06433.tfm +++| RJM VIS READ FIRST VOLUME 07206 M01S06434.tfm +++| NJN FCE2 IF VSN NOT FOUND 07207 M01S06435.tfm +++| FCE1 LDM VBCI,BP SEARCH FOR CATALOG ENTRY 07208 M01S06436.tfm +++| NJN FCE3 IF CATALOG ENTRY FOUND 07209 M01S06437.tfm +++| FCE2 ERROR EID *ERROR IN INDEX DATA.* 07210 M01S06438.tfm +++| 07211 M01S06439.tfm +++| FCE3 SHN 14 SET POINTERS TO CATALOG 07212 M01S06440.tfm +++| STD CI 07213 M01S06441.tfm +++| SHN -14 07214 M01S06442.tfm +++| STD RI 07215 M01S06443.tfm +++| LDM VBCI+1,BP 07216 M01S06444.tfm +++| STD RI+1 07217 M01S06445.tfm +++| LDC BUF2 07218 M01S06446.tfm +++| STD BA 07219 M01S06447.tfm +++| FCE4 RJM RRP GET CATALOG BLOCK 07220 M01S06448.tfm +++| FCE5 RJM VSP VERIFY/SET CATALOG POINTERS
| Line S06449 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | nos252 |
Seq # *Modification Id* Act ----------------------------+ 07221 M02S06449.nos252 ---| MJN FCE2 IF INVALID POINTERS 07222 M01S00061.nos252 +++| MJN FCE2 IF INCORRECT POINTERS 07223 M01S06450.tfm +++| LDM PBQN CHECK FOR CURRENT CATALOG 07224 M01S06451.tfm +++| LMM CBQN,BP 07225 M01S06452.tfm +++| LPN 77 07226 M01S06453.tfm +++| NJN FCE6 IF NOT CURRENT CATALOG 07227 M01S06454.tfm +++| LDM PBQN+1 07228 M01S06455.tfm +++| LMM CBQN+1,BP 07229 M01S06456.tfm +++| ZJN FCE7 IF CURRENT CATALOG (TO FCE10) 07230 M01S06457.tfm +++| FCE6 LDA CBQN,BP 07231 M01S06458.tfm +++| LMC 9999D 07232 M01S06459.tfm +++| FCE7 ZJN FCE10 IF CATALOG CREATED BY *POSMF* 07233 M01S06460.tfm +++| LDM CBNC,BP 07234 M01S06461.tfm +++| NJN FCE8 IF NEXT CATALOG EXISTS 07235 M01S06462.tfm +++| ERROR MPE *MULTI-FILE PROCESSING ERROR.* 07236 M01S06463.tfm +++| 07237 M01S06464.tfm +++| FCE8 SHN 14 SET NEXT CATALOG POINTER 07238 M01S06465.tfm +++| STD CI 07239 M01S06466.tfm +++| SHN -14 07240 M01S06467.tfm +++| LMD RI 07241 M01S06468.tfm +++| NJN FCE9 IF NOT IN CURRENT BLOCK 07242 M01S06469.tfm +++| LDM CBNC+1,BP 07243 M01S06470.tfm +++| LMD RI+1 07244 M01S06471.tfm +++| ZJP FCE5 IF CURRENT BLOCK 07245 M01S06472.tfm +++| FCE9 LDM CBNC,BP 07246 M01S06473.tfm +++| LPN 77 07247 M01S06474.tfm +++| STD RI 07248 M01S06475.tfm +++| LDM CBNC+1,BP 07249 M01S06476.tfm +++| STD RI+1 07250 M01S06477.tfm +++| LJM FCE4 READ NEXT CATALOG ENTRY 07251 M01S06478.tfm +++| 07252 M01S06479.tfm +++| FCE10 UDTRD CN,/MTX/UTCI,1 READ (FE - FE+1), (CB - CB+1) 07253 M01S06480.tfm +++| SAVEP CPCB SAVE CATALOG BUFFER POINTERS 07254 M01S06481.tfm +++| LJM FCEX RETURN 07255 M01S06482.tfm +++| SBS SPACE 4,10 07256 M01S06483.tfm +++|** SBS - SET BUSY STATUS. 07257 M01S06484.tfm +++|* 07258 M01S06485.tfm +++|* SET CATALOG BUSY ON THE CURRENT CATALOG ENTRY, AND CLEAR 07259 M01S06486.tfm +++|* CATALOG BUSY ON THE PREVIOUS CATALOG ENTRY. 07260 M01S06487.tfm +++|* 07261 M01S06488.tfm +++|* ENTRY (BA - RI+1) = CURRENT CATALOG ENTRY POINTERS. 07262 M01S06489.tfm +++|* (CB - CB+1) = LAST CATALOG ENTRY RANDOM INDEX. 07263 M01S06490.tfm +++|* 07264 M01S06491.tfm +++|* EXIT BUSY STATUS SET. 07265 M01S06492.tfm +++|* CATALOG ENTRIES WRITTEN. 07266 M01S06493.tfm +++|* 07267 M01S06494.tfm +++|* USES CI, CB - CB+1, FE - FE+1, RI - RI+1. 07268 M01S06495.tfm +++|* 07269 M01S06496.tfm +++|* CALLS RRP, VSP, WRP. 07270 M01S06497.tfm +++|* 07271 M01S06498.tfm +++|* MACROS ERROR, UDTWT. 07272 M01S06499.tfm +++| 07273 M01S06500.tfm +++| 07274 M01S06501.tfm +++| SBS SUBR ENTRY/EXIT 07275 M01S06502.tfm +++| LDM CBST,BP SET BUSY STATUS 07276 M01S06503.tfm +++| SCN 1 07277 M01S06504.tfm +++| LMN 1 07278 M01S06505.tfm +++| STM CBST,BP 07279 M01S06506.tfm +++| LDD CB 07280 M01S06507.tfm +++| LMD RI 07281 M01S06508.tfm +++| LPN 77 07282 M01S06509.tfm +++| NJN SBS1 IF DIFFERENT CATALOG BLOCKS 07283 M01S06510.tfm +++| LDD CB+1 07284 M01S06511.tfm +++| LMD RI+1 07285 M01S06512.tfm +++| NJN SBS1 IF DIFFERENT CATALOG BLOCKS 07286 M01S06513.tfm +++| LDD CB 07287 M01S06514.tfm +++| SHN -6 07288 M01S06515.tfm +++| LMD CI 07289 M01S06516.tfm +++| ZJN SBS4 IF SAME CATALOG ENTRY 07290 M01S06517.tfm +++| UJN SBS2 CLEAR BUSY FLAG 07291 M01S06518.tfm +++| 07292 M01S06519.tfm +++| SBS1 RJM WRP WRITE RANDOM PRU (CATALOG) 07293 M01S06520.tfm +++| LDD CB+1 07294 M01S06521.tfm +++| STM RI+1 07295 M01S06522.tfm +++| LDD CB 07296 M01S06523.tfm +++| LPN 77 07297 M01S06524.tfm +++| STD RI 07298 M01S06525.tfm +++| RJM RRP GET INITIAL BLOCK (CATALOG) 07299 M01S06526.tfm +++| SBS2 LDD CB 07300 M01S06527.tfm +++| SHN -6 07301 M01S06528.tfm +++| STD CI 07302 M01S06529.tfm +++| RJM VSP VERIFY/SET CATALOG POINTERS 07303 M01S06530.tfm +++| PJN SBS3 IF NO ERROR 07304 M01S06531.tfm +++| ERROR MPE *MULTI-FILE PROCESSING ERROR.* 07305 M01S06532.tfm +++| 07306 M01S06533.tfm +++| SBS3 LDM CBST,BP 07307 M01S06534.tfm +++| SCN 1 07308 M01S06535.tfm +++| STM CBST,BP 07309 M01S06536.tfm +++| SBS4 RJM WRP WRITE RANDOM PRU 07310 M01S06537.tfm +++| LDM CPCB+2 SET NEW CATALOG INDEX 07311 M01S06538.tfm +++| SHN 6 07312 M01S06539.tfm +++| LMM CPCB+3 07313 M01S06540.tfm +++| STD CB 07314 M01S06541.tfm +++| LDM CPCB+4 07315 M01S06542.tfm +++| STD CB+1 07316 M01S06543.tfm +++| LDD FE 07317 M01S06544.tfm +++| LMD CB 07318 M01S06545.tfm +++| NJN SBS5 IF *POSMF* NOT COMPLETE 07319 M01S06546.tfm +++| LDD FE+1 07320 M01S06547.tfm +++| LMD CB+1 07321 M01S06548.tfm +++| NJN SBS5 IF *POSMF* NOT COMPLETE 07322 M01S06549.tfm +++| STD FE 07323 M01S06550.tfm +++| STD FE+1 07324 M01S06551.tfm +++| SBS5 UDTWT CN,/MTX/UTCI,1 UPDATE CATALOG INDICIES IN UDT 07325 M01S06552.tfm +++| LJM SBSX RETURN 07326 M01S06553.tfm +++| UCT SPACE 4,10 07327 M01S06554.tfm +++|** UCT - UPDATE CATALOG ENTRY FROM TAPE LABEL. 07328 M01S06555.tfm +++|* 07329 M01S06556.tfm +++|* ENTRY (BA - RI+1) = CATALOG ENTRY POINTERS. 07330 M01S06557.tfm +++|* 07331 M01S06558.tfm +++|* EXIT CATALOG UPDATED. 07332 M01S06559.tfm +++|* 07333 M01S06560.tfm +++|* CALLS SBS. 07334 M01S06561.tfm +++|* 07335 M01S06562.tfm +++|* MACROS CMOVE, COMPARE, ERROR, RESTP. 07336 M01S06563.tfm +++| 07337 M01S06564.tfm +++| 07338 M01S06565.tfm +++| UCT SUBR ENTRY/EXIT 07339 M01S06566.tfm +++| LDN 0 CLEAR DIFFERENCES CELL FOR *CMOVE* 07340 M01S06567.tfm +++| STD T3 07341 M01S06568.tfm +++| LDM UTMS+3 CHECK FOR FIRST *HDR1* OF VOLUME 07342 M01S06569.tfm +++| LPC WUFL 07343 M01S06570.tfm +++| ZJN UCT1 IF NOT FIRST LABEL OF VOLUME 07344 M01S06571.tfm +++| LMM UTMS+3 CLEAR FIRST *HDR1* FLAG 07345 M01S06572.tfm +++| STM UTMS+3 07346 M01S06573.tfm +++| LJM UCT2 UPDATE CATALOG 07347 M01S06574.tfm +++| 07348 M01S06575.tfm +++| UCT1 LDM CBSN,BP SET SEQUENCE NUMBER 07349 M01S06576.tfm +++| SCN 77 07350 M01S06577.tfm +++| STM CBSN,BP 07351 M01S06578.tfm +++| LDM PBSN 07352 M01S06579.tfm +++| LPN 77 07353 M01S06580.tfm +++| RAM CBSN,BP 07354 M01S06581.tfm +++| LDM PBSN+1 07355 M01S06582.tfm +++| STM CBSN+1,BP 07356 M01S06583.tfm +++| CMOVE PESN,,CBES,BP,VSKL/2 COMPARE/SET EXTERNAL VSN 07357 M01S06584.tfm +++| CMOVE PVSN,,CBVS,BP,VSKL/2 COMPARE/SET INTERNAL VSN 07358 M01S06585.tfm +++| UCT2 CMOVE POFI,,CBPI,BP,2*10D COMPARE/SET FILE ID, SEQ. NUMBER 07359 M01S06586.tfm +++| CMOVE PFTD,,CBTD,BP,5 COMPARE/SET TAPE CHARACTERISTICS 07360 M01S06587.tfm +++|* LDD T3 CHECK TOTAL COMPARE MISMATCHES 07361 M01S06588.tfm +++| ZJN UCT3 IF NO CHANGE DETECTED 07362 M01S06589.tfm +++| LDM CBST,BP SET *ISSUE RECOVERY MESSAGE* FLAG 07363 M01S06590.tfm +++| LPC 7377 07364 M01S06591.tfm +++| LMC 400 07365 M01S06592.tfm +++| STM CBST,BP 07366 M01S06593.tfm +++| UCT3 LDM CBFA,BP 07367 M01S06594.tfm +++| LPN 77 07368 M01S06595.tfm +++| STM CBFA,BP 07369 M01S06596.tfm +++| LDM PBFA 07370 M01S06597.tfm +++| SCN 77 07371 M01S06598.tfm +++| RAM CBFA,BP 07372 M01S06599.tfm +++| LDM UTMS CHECK FUNCTION 07373 M01S06600.tfm +++| LMN UCES 07374 M01S06601.tfm +++| NJP UCT5 IF NOT UPDATE CATALOG 07375 M01S06602.tfm +++| LIA CBES,BP FIND FIRST VSN 07376 M01S06603.tfm +++| STD KA 07377 M01S06604.tfm +++| COMPARE PESN,,,KA,VSKL 07378 M01S06605.tfm +++| ZJN UCT4 IF FIRST VSN 07379 M01S06606.tfm +++| RJM VIS 07380 M01S06607.tfm +++| NJN UCT6 IF VSN NOT FOUND 07381 M01S06608.tfm +++| LDM VBRC,BP CALCULATE REEL COUNT 07382 M01S06609.tfm +++| SHN -6 07383 M01S06610.tfm +++| STD T0 07384 M01S06611.tfm +++| LDD RC 07385 M01S06612.tfm +++| SBD T0 07386 M01S06613.tfm +++| UCT4 ADN 1 FIRST REEL 07387 M01S06614.tfm +++| STD RC 07388 M01S06615.tfm +++| RESTP CPCB RESTORE CATALOG BUFFER POINTERS 07389 M01S06616.tfm +++| LDD RC 07390 M01S06617.tfm +++| STM CBRC,BP 07391 M01S06618.tfm +++| UCT5 RJM SBS SET CATALOG BUSY STATUS 07392 M01S06619.tfm +++| LJM UCTX RETURN 07393 M01S06620.tfm +++| 07394 M01S06621.tfm +++| UCT6 ERROR ECD *ERROR IN CATALOG DATA.* 07395 M01S06622.tfm +++| VCE SPACE 4,10 07396 M01S06623.tfm +++|** VCE - VERIFY CATALOG ENTRY. 07397 M01S06624.tfm +++|* 07398 M01S06625.tfm +++|* ENTRY PARAMETER BLOCK SET UP. 07399 M01S06626.tfm +++|* (BA) = CATALOG BUFFER POINTER. 07400 M01S06627.tfm +++|* (BP) = CATALOG ENTRY POINTER. 07401 M01S06628.tfm +++|* 07402 M01S06629.tfm +++|* EXIT CATALOG ENTRY VERIFIED. 07403 M01S06630.tfm +++|* 07404 M01S06631.tfm +++|* USES KA. 07405 M01S06632.tfm +++|* 07406 M01S06633.tfm +++|* CALLS VIS, WRP. 07407 M01S06634.tfm +++|* 07408 M01S06635.tfm +++|* MACROS COMPARE, ERROR. 07409 M01S06636.tfm +++| 07410 M01S06637.tfm +++| 07411 M01S06638.tfm +++| VCE SUBR ENTRY/EXIT 07412 M01S06639.tfm +++| LDM UTMS+3 CHECK FOR FIRST *HDR1* ON VOLUME 07413 M01S06640.tfm +++| LPC WUFL 07414 M01S06641.tfm +++| ZJP VCE3 IF NOT FIRST LABEL OF VOLUME 07415 M01S06642.tfm +++| LMM UTMS+3 CLEAR FIRST LABEL FLAG 07416 M01S06643.tfm +++| STM UTMS+3 07417 M01S06644.tfm +++| LIA CBES,BP DETERMINE CORRECT SECTION NUMBER 07418 M01S06645.tfm +++| STD KA 07419 M01S06646.tfm +++| LDI KA 07420 M01S06647.tfm +++| NJN VCE2 IF EXTERNAL VSN FOUND 07421 M01S06648.tfm +++| VCE1 ERROR ECD ERROR IN CATALOG DATA 07422 M01S06649.tfm +++| 07423 M01S06650.tfm +++| VCE2 RJM VIS VSN INDEXED SEARCH 07424 M01S06651.tfm +++| NJN VCE1 IF VSN NOT FOUND 07425 M01S06652.tfm +++| LDM VBRC,BP GET REEL COUNT FROM FIRST VOLUME OF FILE 07426 M01S06653.tfm +++| SHN -6 07427 M01S06654.tfm +++| STD T0 07428 M01S06655.tfm +++| LDM PBSN ADJUST SECTION NUMBER 07429 M01S06656.tfm +++| LPN 7 07430 M01S06657.tfm +++| SHN 14 07431 M01S06658.tfm +++| ADM PBSN+1 07432 M01S06659.tfm +++| SBD RC CURRENT REEL 07433 M01S06660.tfm +++| ADD T0 FIRST REEL 07434 M01S06661.tfm +++| STM PBSN+1 07435 M01S06662.tfm +++| SHN -14 07436 M01S06663.tfm +++| LPN 7 07437 M01S06664.tfm +++| STD T0 07438 M01S06665.tfm +++| LDM PBSN 07439 M01S06666.tfm +++| SCN 7 07440 M01S06667.tfm +++| LMD T0 07441 M01S06668.tfm +++| STM PBSN 07442 M01S06669.tfm +++| RESTP CPCB RESTORE CATALOG POINTERS 07443 M01S06670.tfm +++| UJN VCE4 COMPARE SECTION NUMBERS 07444 M01S06671.tfm +++| 07445 M01S06672.tfm +++| VCE3 COMPARE PESN,,CBES,BP,VSKL 07446 M01S06673.tfm +++| NJN VCE5 IF NO MATCH 07447 M01S06674.tfm +++| COMPARE PVSN,,CBVS,BP,VSKL 07448 M01S06675.tfm +++| NJN VCE7 IF NO MATCH 07449 M01S06676.tfm +++| VCE4 LDM PBSN COMPARE FILE SECTION NUMBERS 07450 M01S06677.tfm +++| LMM CBSN,BP 07451 M01S06678.tfm +++| LPN 7 07452 M01S06679.tfm +++| VCE5 NJN VCE7 IF NO MATCH 07453 M01S06680.tfm +++| LDM PBSN+1 07454 M01S06681.tfm +++| LMM CBSN+1,BP 07455 M01S06682.tfm +++| NJN VCE7 IF NO MATCH 07456 M01S06683.tfm +++| VCE6 COMPARE POFI,,CBPI,BP,4*10D 07457 M01S06684.tfm +++| ZJN VCE8 IF CATALOG DATA MATCHES PHYSICAL DATA 07458 M01S06685.tfm +++| VCE7 LDM CBST,BP SET CATALOG ERROR 07459 M01S06686.tfm +++| SCN 2 07460 M01S06687.tfm +++| LMN 2 07461 M01S06688.tfm +++| STM CBST,BP 07462 M01S06689.tfm +++| RJM WRP WRITE RANDOM PRU 07463 M01S06690.tfm +++| ERROR MPE *MULTI-FILE PROCESSING ERROR.* 07464 M01S06691.tfm +++| 07465 M01S06692.tfm +++| VCE8 RJM SBS SET BUSY STATUS 07466 M01S06693.tfm +++| LJM VCEX RETURN 07467 M01S06694.tfm +++| SPACE 4,10 07468 M01S06695.tfm +++|*** COMMON DECKS 07469 M01S06696.tfm +++| 07470 M01S06697.tfm +++| 07471 M01S06698.tfm +++| BSE$ EQU 1 DEFINE BSE - BACK SPACE ONE ENTRY 07472 M01S06699.tfm +++| GNB$ EQU 1 DEFINE GNB - GET NEXT BLOCK 07473 M01S06700.tfm +++| GNL$ EQU 1 DEFINE GNL - GET NEXT LINK 07474 M01S06701.tfm +++| GPL$ EQU 1 DEFINE GPL - GET PREVIOUS LINK 07475 M01S06702.tfm +++| ISK$ EQU 1 DEFINE ISK - INDEX SEARCH FOR KEY 07476 M01S06703.tfm +++| PLI$ EQU 1 DEFINE PLI - POSITION TO LAST INDEX 07477 M01S06704.tfm +++| SIB$ EQU 1 DEFINE SIB - SEARCH IN BLOCK 07478 M01S06705.tfm +++| TBA$ EQU 1 DEFINE TBA - TOGGLE BUFFER ASSIGNMENT 07479 M01S06706.tfm +++| VIS$ EQU 1 DEFINE VIS - VSN INDEXED SEARCH 07480 M01S06707.tfm +++| VSP$ EQU 1 DEFINE VSP - VERIFY/SET CATALOG POINTERS 07481 M01S06708.tfm +++| 07482 M01S06709.tfm +++|*CALL COMPTFM 07483 M01S06710.tfm +++| SPACE 4,10 07484 M01S06711.tfm +++|*** BUFFERS. 07485 M01S06712.tfm +++| SPACE 4,10 07486 M01S06713.tfm +++| ERRNG BUF2-* 07487 M01S06714.tfm +++| OVERLAY (ENTER CATALOG IMAGE.),OVL1 07488 M01S06715.tfm +++| SPACE 4,10 07489 M01S06716.tfm +++|** LOCAL DIRECT CELL LOCATIONS. 07490 M01S06717.tfm +++| 07491 M01S06718.tfm +++| 07492 M01S06719.tfm +++| CN EQU S1 - S1+4 SCRATCH (5 LOCATIONS) 07493 M01S06720.tfm +++| CB EQU /PMF/CB CATALOG BUFFER POINTER 07494 M01S06721.tfm +++| ECIS SPACE 4,10 07495 M01S06722.tfm +++|** ECIS - ENTER CATALOG IMAGE. 07496 M01S06723.tfm +++|* 07497 M01S06724.tfm +++|* *ECIS* IS A INTERNAL FUNCTION USED TO 07498 M01S06725.tfm +++|* CREATE THE TAPE CATALOG AND THE USERNAME 07499 M01S06726.tfm +++|* INDEX (IF REQUIRED). 07500 M01S06727.tfm +++|* 07501 M01S06728.tfm +++|* ENTRY NONE. 07502 M01S06729.tfm +++|* 07503 M01S06730.tfm +++|* EXIT (CPCB - CPCB+4) = CATALOG POINTERS. 07504 M01S06731.tfm +++|* USERNAME INDEX CREATED IF REQUIRED. 07505 M01S06732.tfm +++|* CATALOG IMAGE CREATED. 07506 M01S06733.tfm +++|* 07507 M01S06734.tfm +++|* USES BA, CI, CM - CM+4, KA, PB, RI - RI+1, 07508 M01S06735.tfm +++|* T1. 07509 M01S06736.tfm +++|*
| Line S06737 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07510 M02S06737.274l797 ---|* CALLS ABC, ASR, CAC, CCT, CFM, EDT, IBC, PRS, RRP, WRP. 07511 M01S00272.274l797 +++|* CALLS ABC, ASR, CAC, CCT, CFM, EDT, IBC, PRS, RRP, SSP, WRP. 07512 M01S06738.tfm +++|* 07513 M01S06739.tfm +++|* MACROS CLEAR, ERROR, EXOVL, LIA, LDA, MMOVE, 07514 M01S06740.tfm +++|* RESTP, SAVEP. 07515 M01S06741.tfm +++| 07516 M01S06742.tfm +++| 07517 M01S06743.tfm +++| ECI ENTRY ENTRY/EXIT 07518 M01S06744.tfm +++| LDC PBUN 07519 M01S06745.tfm +++| STD KA 07520 M01S06746.tfm +++| RJM UIS USERNAME INDEXED SEARCH 07521 M01S06747.tfm +++| ZJP ECI2 IF USERNAME FOUND 07522 M01S06748.tfm +++| LDC BUFA 07523 M01S06749.tfm +++| ECI1 STD PB CREATE/UPDATE USERNAME INDEX 07524 M01S06750.tfm +++| LDC BUF2 07525 M01S06751.tfm +++| STD BA 07526 M01S06752.tfm +++| RJM IBC INITIALIZE BLOCK CHAIN 07527 M01S06753.tfm +++| SAVEP CPCB SAVE CATALOG POINTERS 07528 M01S06754.tfm +++| RESTP CPSI RESTORE INDEX POINTERS 07529 M01S06755.tfm +++| LDM CPCB+3 07530 M01S06756.tfm +++| STM UBCI,PB 07531 M01S06757.tfm +++| LDM CPCB+4 07532 M01S06758.tfm +++| STM UBCI+1,PB 07533 M01S06759.tfm +++| MMOVE ,KA,,PB,UNKL 07534 M01S06760.tfm +++| RJM CIE CREATE INDEXED ENTRY 07535 M01S06761.tfm +++| ECIA EQU *-1 (RJM TO *WRP* IF UPDATE) 07536 M01S06762.tfm +++| RESTP CPCB RESTORE CATALOG POINTERS 07537 M01S06763.tfm +++| LJM ECI7 ENTER CATALOG IMAGE 07538 M01S06764.tfm +++| 07539 M01S06765.tfm +++| ECI2 LDM UBCI,BP SET FIRST CATALOG BLOCK 07540 M01S06766.tfm +++| LPN 77 07541 M01S06767.tfm +++| STD RI 07542 M01S06768.tfm +++| SHN 14 07543 M01S06769.tfm +++| LMM UBCI+1,BP 07544 M01S06770.tfm +++| STD RI+1 07545 M01S06771.tfm +++| NJN ECI3 IF CATALOG INDEX 07546 M01S06772.tfm +++| LDC WRP 07547 M01S06773.tfm +++| STM ECIA 07548 M01S06774.tfm +++| LDD BP 07549 M01S06775.tfm +++| LJM ECI1 UPDATE USERNAME INDEX 07550 M01S06776.tfm +++| 07551 M01S06777.tfm +++| ECI3 LDM PBTO+1 CHECK ACCESS TYPE 07552 M01S06778.tfm +++| LPN 4 07553 M01S06779.tfm +++| ZJN ECI4 IF NOT SYMBOLIC ACCESS 07554 M01S06780.tfm +++| LDC POFI 07555 M01S06781.tfm +++| ECI4 STD KA SET SEARCH TYPE 07556 M01S06782.tfm +++| LDC BUF2 SET CATALOG BUFFER 07557 M01S06783.tfm +++| STD BA 07558 M01S06784.tfm +++| RJM SCB SEARCH CATALOG BUFFER 07559 M01S06785.tfm +++| ZJN ECI5 IF FILE NOT FOUND 07560 M01S06786.tfm +++| ERROR FAR *(FILENAME) ALREADY RESERVED.* 07561 M01S06787.tfm +++| 07562 M01S06788.tfm +++| ECI5 LDM CPHP CHECK IF HOLE FOUND 07563 M01S06789.tfm +++| ZJN ECI6 IF HOLE NOT FOUND 07564 M01S06790.tfm +++| RESTP CPHP RESTORE HOLE POINTERS 07565 M01S06791.tfm +++| RJM RRP READ RANDOM PRU 07566 M01S06792.tfm +++| UJN ECI8 CREATE CATALOG IMAGE 07567 M01S06793.tfm +++| 07568 M01S06794.tfm +++| ECI6 LDC BUF2 DEFINE CATALOG BUFFER 07569 M01S06795.tfm +++| STD BA 07570 M01S06796.tfm +++| LDN CWRI EXTEND CATALOG FILE 07571 M01S06797.tfm +++| RJM ABC ADD BLOCK TO CHAIN 07572 M01S06798.tfm +++| ECI7 LDC RTCB*100 SET RECORD TYPE/LEVEL 07573 M01S06799.tfm +++| STM CWRT,BA 07574 M01S06800.tfm +++| LDN TCEL 07575 M01S06801.tfm +++| STM CWEL,BA 07576 M01S06802.tfm +++| MMOVE PBUN,,CWUN,BA,UNKL 07577 M01S06803.tfm +++| LDM CWFE,BA 07578 M01S06804.tfm +++| RJM MBP MOVE BUFFER POINTER 07579 M01S06805.tfm +++| LDN 1 07580 M01S06806.tfm +++| STD CI 07581 M01S06807.tfm +++| ECI8 SAVEP CPCB SAVE CATALOG POINTERS 07582 M01S06808.tfm +++| LDM CWUW,BA CREATE CATALOG IMAGE 07583 M01S06809.tfm +++| SBN TCEL 07584 M01S06810.tfm +++| STM CWUW,BA 07585 M01S06811.tfm +++| AOM CWNE,BA 07586 M01S06812.tfm +++| RJM DCE BUILD DEFAULT CATALOG ENTRY 07587 M01S06813.tfm +++| RJM CAC CHANGE ALTERNATE CATALOG LIST ATTRIBUTE 07588 M01S06814.tfm +++| RJM CCT CHANGE FILE CATEGORY 07589 M01S06815.tfm +++| RJM CFM CHANGE FILE MODE 07590 M01S06816.tfm +++| RJM WRP WRITE RANDOM PRU 07591 M01S06817.tfm +++| LDM UDTA 07592 M01S06818.tfm +++| NJP ECI9 IF MULTI-FILE 07593 M01S06819.tfm +++| LDN ZERL UPDATE FET 07594 M01S06820.tfm +++| CRD CM 07595 M01S06821.tfm +++| LDD CI 07596 M01S06822.tfm +++| LPN 77 07597 M01S06823.tfm +++| SHN 6 07598 M01S06824.tfm +++| LMD RI 07599 M01S06825.tfm +++| STD CM+3 07600 M01S06826.tfm +++| LDD RI+1 07601 M01S06827.tfm +++| STD CM+4 07602 M01S06828.tfm +++| LDA IR+3,REL 07603 M01S06829.tfm +++| ADN TFRR 07604 M01S06830.tfm +++| CWM CM,ON 07605 M01S06831.tfm +++| CWM PESN,TR 07606 M01S06832.tfm +++| CWM POFI,TR 07607 M01S06833.tfm +++| CLEAR PVES,,TSVL*10D 07608 M01S00273.274l797 +++| LDM CBTD,BP DETERMINE TAPE TYPE 07609 M01S00274.274l797 +++| SHN -7 07610 M01S00275.274l797 +++| LPN 3 07611 M01S00276.274l797 +++| RJM SSP SET SCRATCH POOL ADDRESS 07612 M01S06834.tfm +++| EXOVL ASR ASSIGN SCRATCH VOLUME (NO RETURN) 07613 M01S06835.tfm +++| 07614 M01S06836.tfm +++| ECI9 LDD CB GET ASSIGNED CATALOG 07615 M01S06837.tfm +++| SHN 14 07616 M01S06838.tfm +++| STD CI 07617 M01S06839.tfm +++| SCN 77 07618 M01S06840.tfm +++| LMD CB+1 07619 M01S06841.tfm +++| ZJP ECIX IF NOT ASSIGNED 07620 M01S06842.tfm +++| STD RI+1 07621 M01S06843.tfm +++| SHN -14 07622 M01S06844.tfm +++| STD RI 07623 M01S06845.tfm +++| RJM RRP GET INITIAL BLOCK 07624 M01S06846.tfm +++| RJM VSP VERIFY/SET CATALOG POINTER 07625 M01S06847.tfm +++| UDTRD CN,/MTX/UTCI,1 07626 M01S06848.tfm +++| LDM CPCB+2 SET MULTI-FILE LINKAGE 07627 M01S06849.tfm +++| SHN 6 07628 M01S06850.tfm +++| LMM CPCB+3 07629 M01S06851.tfm +++| STD CN+1 07630 M01S06852.tfm +++| STM CBNC,BP 07631 M01S06853.tfm +++| LDM CPCB+4 07632 M01S06854.tfm +++| STD CN+2 07633 M01S06855.tfm +++| STM CBNC+1,BP 07634 M01S06856.tfm +++| RJM WRP WRITE RANDOM PRU (CATALOG) 07635 M01S06857.tfm +++| UDTWT CN,/MTX/UTCI,1 07636 M01S06858.tfm +++| LJM ECIX RETURN
| Line S06859 Modification History | |
|---|---|
M01 (Added by) | tfm |
M02 (Updated by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07637 M02S06859.274l797 ---| TITLE ".Y." SUBROUTINES. 07638 M01S00277.274l797 +++| TITLE SUBROUTINES. 07639 M01S06860.tfm +++| CAC SPACE 4,10 07640 M01S06861.tfm +++|** CAC - CHANGE ALTERNATE CATALOG LIST ATTRIBUTE 07641 M01S06862.tfm +++|* 07642 M01S06863.tfm +++|* ENTRY (PPWD+3) = ALTERNATE LIST ATTRIBUTE. 07643 M01S06864.tfm +++|* 07644 M01S06865.tfm +++|* EXIT LIST ATTRIBUTE CHANGED AS REQUIRED. 07645 M01S06866.tfm +++|* 07646 M01S06867.tfm +++|* USES T1. 07647 M01S06868.tfm +++| 07648 M01S06869.tfm +++| 07649 M01S06870.tfm +++| CAC1 LDM CBST,BP CHANGE CATALOG LIST ATTRIBUTE 07650 M01S06871.tfm +++| SHN 0-13+22 07651 M01S06872.tfm +++| SCN 1 07652 M01S06873.tfm +++| LMD T1 07653 M01S06874.tfm +++| LMN 1 07654 M01S06875.tfm +++| SHN 13-0 07655 M01S06876.tfm +++| STM CBST,BP 07656 M01S06877.tfm +++| 07657 M01S06878.tfm +++| CAC SUBR ENTRY/EXIT 07658 M01S06879.tfm +++| LDM PBAC 07659 M01S06880.tfm +++| LPN 77 07660 M01S06881.tfm +++| ZJN CACX IF ATTRIBUTE NOT SPECIFIED 07661 M01S06882.tfm +++| SBN FAYS 07662 M01S06883.tfm +++| STD T1 07663 M01S06884.tfm +++| SBN FANO 07664 M01S06885.tfm +++| MJN CAC1 IF VALID ATTRIBUTE 07665 M01S06886.tfm +++| UJN CACX RETURN 07666 M01S06887.tfm +++| CCT SPACE 4,10 07667 M01S06888.tfm +++|** CCT - CHANGE CATEGORY TYPE. 07668 M01S06889.tfm +++|* 07669 M01S06890.tfm +++|* ENTRY (PBCT) = FILE CATEGORY. 07670 M01S06891.tfm +++|* 07671 M01S06892.tfm +++|* EXIT FILE CATEGORY CHANGED AS REQUIRED. 07672 M01S06893.tfm +++|* 07673 M01S06894.tfm +++|* USES T1. 07674 M01S06895.tfm +++| 07675 M01S06896.tfm +++| 07676 M01S06897.tfm +++| CCT1 LDM CBCT,BP CHANGE FILE CATEGORY 07677 M01S06898.tfm +++| LPN 77 07678 M01S06899.tfm +++| LMD T1 07679 M01S06900.tfm +++| STM CBCT,BP 07680 M01S06901.tfm +++| 07681 M01S06902.tfm +++| CCT SUBR ENTRY/EXIT 07682 M01S06903.tfm +++| LDM PBCT 07683 M01S06904.tfm +++| SCN 77 07684 M01S06905.tfm +++| ZJN CCTX IF CATEGORY NOT SPECIFIED 07685 M01S06906.tfm +++| STD T1 07686 M01S06907.tfm +++| SHN -6 07687 M01S06908.tfm +++| SBN FCMX 07688 M01S06909.tfm +++| MJN CCT1 IF VALID CATEGORY TYPE 07689 M01S06910.tfm +++| UJN CCTX RETURN 07690 M01S06911.tfm +++| CFM SPACE 4,10 07691 M01S06912.tfm +++|** CFM - CHANGE FILE MODE. 07692 M01S06913.tfm +++|* 07693 M01S06914.tfm +++|* ENTRY (PBMD) = FILE ASSESS MODE. 07694 M01S06915.tfm +++|* 07695 M01S06916.tfm +++|* EXIT FILE MODE CHANGED AS REQUIRED. 07696 M01S06917.tfm +++|* 07697 M01S06918.tfm +++|* USES T1. 07698 M01S06919.tfm +++| 07699 M01S06920.tfm +++| 07700 M01S06921.tfm +++| CFM1 LDM CBCT,BP CHANGE FILE MODE 07701 M01S06922.tfm +++| SCN 77 07702 M01S06923.tfm +++| LMD T1 07703 M01S06924.tfm +++| STM CBCT,BP 07704 M01S06925.tfm +++| 07705 M01S06926.tfm +++| CFM SUBR ENTRY/EXIT 07706 M01S06927.tfm +++| LDM PBMD 07707 M01S06928.tfm +++| LPN 77 07708 M01S06929.tfm +++| ZJN CFMX IF MODE NOT SPECIFIED 07709 M01S06930.tfm +++| STD T1 07710 M01S06931.tfm +++| SBN FMMX 07711 M01S06932.tfm +++| MJN CFM1 IF VALID FILE MODE 07712 M01S06933.tfm +++| UJN CFMX RETURN 07713 M01S06934.tfm +++| DCE SPACE 4,10 07714 M01S06935.tfm +++|** DCE - BUILD DEFAULT CATALOG IMAGE. 07715 M01S06936.tfm +++|* 07716 M01S06937.tfm +++|* ENTRY (BA) = BUFFER ADDRESS (CATALOG). 07717 M01S06938.tfm +++|* (BP) = BUFFER POINTER (CATALOG). 07718 M01S06939.tfm +++|* (UDTA) NON-ZERO IF MULTI-FILE. 07719 M01S06940.tfm +++|* 07720 M01S06941.tfm +++|* EXIT CATALOG ENTRY BUILT FROM THE FET 07721 M01S06942.tfm +++|* PARAMETERS AND UDT IF MULTI-FILE. 07722 M01S06943.tfm +++|* 07723 M01S06944.tfm +++|* USES CM - CM+4. 07724 M01S06945.tfm +++|* 07725 M01S06946.tfm +++|* CALLS EDT. 07726 M01S06947.tfm +++|* 07727 M01S06948.tfm +++|* MACROS CLEAR, LDA, LIA, MMOVE, UDTRD, ZJM. 07728 M01S06949.tfm +++| 07729 M01S06950.tfm +++| 07730 M01S06951.tfm +++| DCE SUBR ENTRY/EXIT 07731 M01S06952.tfm +++| CLEAR ,BP,TCEL*10D 07732 M01S06953.tfm +++| MMOVE POFI,,CBLI,BP,FIKL 07733 M01S06954.tfm +++| LDC 1401 SET CATALOG STATUS FLAGS 07734 M01S06955.tfm +++| STM CBST,BP 07735 M01S06956.tfm +++| LDM PBTO+1 SET SYMBOLIC ACCESS IF REQUIRED 07736 M01S06957.tfm +++| LPN 4 07737 M01S06958.tfm +++| RAM CBST,BP 07738 M01S06959.tfm +++| LDM PFTD 07739 M01S06960.tfm +++| SHN 21-12 07740 M01S06961.tfm +++| MJN DCE1 IF LABEL TAPE FILE 07741 M01S06962.tfm +++| CLEAR POFI,,FIKL 07742 M01S06963.tfm +++| DCE1 LDM PBQN CONVERT SEQUENCE NUMBER TO DISPLAY CODE 07743 M01S06964.tfm +++| LPN 77 07744 M01S06965.tfm +++| ADM PBQN+1 07745 M01S06966.tfm +++| NJN DCE2 IF SPECIFIED 07746 M01S06967.tfm +++| LDN 1 07747 M01S06968.tfm +++| STM PBQN+1 07748 M01S06969.tfm +++| LDM PBTO 07749 M01S06970.tfm +++| SHN 21-2 07750 M01S06971.tfm +++| PJN DCE2 IF NOT SYMBOLIC ACCESS 07751 M01S06972.tfm +++| LDC 9999D SET MULTI-FILE EXTENSION 07752 M01S06973.tfm +++| STM PBQN+1 07753 M01S06974.tfm +++| SHN -14 07754 M01S06975.tfm +++| RAM PBQN 07755 M01S06976.tfm +++| DCE2 LDM PBGN SET GENERATION NUMBER 07756 M01S06977.tfm +++| LPN 7 07757 M01S06978.tfm +++| ADM PBGN+1 07758 M01S06979.tfm +++| NJN DCE3 IF SPECIFIED 07759 M01S06980.tfm +++| LDN 1
Proceed to Part 5
cdc/nos2.source/opl.opl871/deck/tfm.004.txt · Last modified: by 127.0.0.1