Action unknown: copypageplugin__copy
cdc:nos2.source:opl.opl871:deck:sfm.001
Deck SFM Part 001
26 Modifications
Listing Sections
- Deck SFM Start
- Deck SFM Part 1 (Line 1709)
- Deck SFM Part 2 (Line 3481)
- Deck SFM Part 3 (Line 5287)
- Deck SFM Part 4 (Line 7112)
Source
Seq # *Modification Id* Act ----------------------------+ 01709 M01S01482.ns2685 ---|*** FUNCTION *CDRF* - CHANGE (DM*) FILE TO TYPE *ROFT*. 01710 M01S01483.ns2685 ---|* 01711 M01S01484.ns2685 ---|* THE CALLING PROGRAM MUST BE *RESTART*. 01712 M01S01485.ns2685 ---|* THE NAME IN FET+0 MUST BE (DM*). 01713 M01S01486.ns2685 ---| 01714 M01S01487.ns2685 ---| 01715 M01S01488.ns2685 ---| RFD LDD CP CHECK *RESTART* FLAG 01716 M01S01489.ns2685 ---| ADC SEPW 01717 M01S01490.ns2685 ---| CRD FS 01718 M01S01491.ns2685 ---| LDD FS+2 01719 M01S01492.ns2685 ---| SHN 21-13 01720 M01S01493.ns2685 ---| MJN RFD2 IF CALLING PROGRAM *RESTART* 01721 M01S01494.ns2685 ---| ABORT /MESS/ERIR * SFM INCORRECT REQUEST.* 01722 M01S01495.ns2685 ---| 01723 M01S01496.ns2685 ---| RFD2 RJM SAF SEARCH FOR ASSIGNED FILE 01724 M01S01497.ns2685 ---| NJN RFD3 IF FILE FOUND 01725 M01S01498.ns2685 ---| ABORT /MESS/ERFF * SFM FILE NOT FOUND.* 01726 M01S01499.ns2685 ---| 01727 M01S01500.ns2685 ---| RFD3 RJM CFS CHECK FILE STATUS 01728 M01S01501.ns2685 ---| LDN 0 01729 M01S01502.ns2685 ---| STD CM+2 01730 M01S01503.ns2685 ---| STD CM+3 01731 M01S01504.ns2685 ---| LDD CM+4 SET *ROFT* 01732 M01S01505.ns2685 ---| LPN 77 01733 M01S01506.ns2685 ---| LMC ROFT*100 01734 M01S01507.ns2685 ---| STD CM+4 01735 M01S01508.ns2685 ---| NFA FA,R STORE FNT ENTRY 01736 M01S01509.ns2685 ---| CWD CM 01737 M01S01510.ns2685 ---| LJM SFMX RETURN 01738 M00S01511.sfm +++| GDI SPACE 4,10 01739 M00S01512.sfm +++|*** FUNCTION *GDIF* - GET DEVICE INFORMATION. 01740 M00S01513.sfm +++|* 01741 M00S01514.sfm +++|* COPY DEVICE INFORMATION SECTOR FOR SPECIFIED DEVICE 01742 M00S01515.sfm +++|* INTO CENTRAL BUFFER STARTING AT *FIRST*. 01743 M00S01516.sfm +++|* 01744 M00S01517.sfm +++|* THE CALLING PROGRAM MUST HAVE SYSTEM ORIGIN AND 01745 M00S01518.sfm +++|* AN *SSJ=* ENTRY POINT. 01746 M00S01519.sfm +++| 01747 M00S01520.sfm +++| 01748 M00S01521.sfm +++| GDI BSS 0 ENTRY 01749 M00S01522.sfm +++| LDD HN VALIDATE BUFFER POINTERS 01750 M00S01523.sfm +++| RJM VBP 01751 M00S01524.sfm +++| MJN GDI1 IF DATA FITS IN BUFFER AND IN FL 01752 M00S01525.sfm +++| ABORT /MESS/ERAE * SFM ARGUMENT ERROR.* 01753 M00S01526.sfm +++| 01754 M00S01527.sfm +++| GDI1 RJM GFE READ EST ORDINAL 01755 M00S01528.sfm +++| ADN 7 01756 M00S01529.sfm +++| CRD CM 01757 M00S01530.sfm +++| LDD CM VALIDATE EQUIPMENT 01758 M00S01531.sfm +++| RJM VEQ 01759 M00S01532.sfm +++| RJM RDI READ DEVICE INFORMATION SECTOR 01760 M00S01533.sfm +++| ENDMS 01761 M00S01534.sfm +++| LDD CN+3 WRITE SECTOR TO CENTRAL BUFFER 01762 M00S01535.sfm +++| SHN 6 01763 M00S01536.sfm +++| ADD RA 01764 M00S01537.sfm +++| SHN 6 01765 M00S01538.sfm +++| ADD CN+4 01766 M00S01539.sfm +++| CWM BFMS+2,HN 01767 M00S01540.sfm +++| LDN 0 UPDATE BUFFER POINTERS 01768 M00S01541.sfm +++| STD CN 01769 M00S01542.sfm +++| STD CN+1 01770 M00S01543.sfm +++| STD CN+2 01771 M00S01544.sfm +++| RJM GFE SET (OUT) = (FIRST) 01772 M00S01545.sfm +++| ADN 3 01773 M00S01546.sfm +++| CWD CN 01774 M00S01547.sfm +++| LDD T1 SET (IN) = (FIRST) + (WORDS TRANSFERRED) 01775 M00S01548.sfm +++| RAD CN+4 01776 M00S01549.sfm +++| SHN -14 01777 M00S01550.sfm +++| RAD CN+3 01778 M00S01551.sfm +++| RJM GFE 01779 M00S01552.sfm +++| ADN 2 01780 M00S01553.sfm +++| CWD CN 01781 M00S01554.sfm +++| LDN 22 LAST STATUS = EOR 01782 M00S01555.sfm +++| STD LS 01783 M00S01556.sfm +++| LJM SFMX EXIT 01784 M00S01557.sfm +++| SDF SPACE 4,10 01785 M00S01558.sfm +++|*** FUNCTION *SDFF* - SET DEVICE INFORMATION. 01786 M00S01559.sfm +++|* 01787 M00S01560.sfm +++|* SET FIELDS IN DEVICE INFORMATION SECTOR OF 01788 M00S01561.sfm +++|* SPECIFIED DEVICE. WORD AT *WI* IS UPDATED WITH DATA 01789 M00S01562.sfm +++|* FOUND IN CENTRAL BUFFER AT *FIRST*. 01790 M00S01563.sfm +++|* 01791 M00S01564.sfm +++|* THE CALLING PROGRAM MUST HAVE SYSTEM ORIGIN 01792 M00S01565.sfm +++|* PRIVILEGES AND AN *SSJ=* ENTRY POINT. 01793 M00S01566.sfm +++| 01794 M00S01567.sfm +++| 01795 M00S01568.sfm +++| SDF BSS 0 ENTRY 01796 M00S01569.sfm +++| RJM GFE READ *FIRST* 01797 M00S01570.sfm +++| ADN 1 01798 M00S01571.sfm +++| CRD CN 01799 M00S01572.sfm +++| ADN 7-1 READ (FET+7) 01800 M00S01573.sfm +++| CRD CM 01801 M00S01574.sfm +++| LDD CN+3 01802 M00S01575.sfm +++| LPN 37 01803 M00S01576.sfm +++| STD CN+3 01804 M00S01577.sfm +++| SHN 14 01805 M00S01578.sfm +++| LMD CN+4 01806 M00S01579.sfm +++| SHN -6 01807 M00S01580.sfm +++| SBD FL 01808 M00S01581.sfm +++| MJN SDF1 IF DATA WITHIN FL 01809 M00S01582.sfm +++| ABORT /MESS/ERAE * SFM ARGUMENT ERROR.* 01810 M00S01583.sfm +++| 01811 M00S01584.sfm +++| SDF1 LDD CM+4 SAVE WORD INDEX 01812 M00S01585.sfm +++| LPN 77 01813 M00S01586.sfm +++| STM SDFA 01814 M00S01587.sfm +++| SBN MNIT 01815 M00S01588.sfm +++| PJN SDF2 IF NOT RESERVED WORD 01816 M00S01589.sfm +++| ABORT /MESS/ERIR * SFM INCORRECT REQUEST.* 01817 M00S01590.sfm +++| 01818 M00S01591.sfm +++| SDF2 LDD CM VALIDATE EQUIPMENT 01819 M00S01592.sfm +++| RJM VEQ 01820 M00S01593.sfm +++| LDN 0 FORCE LABEL TRACK INTERLOCK 01821 M00S01594.sfm +++| STM RDIA 01822 M00S01595.sfm +++| RJM RDI READ DEVICE INFORMATION SECTOR 01823 M00S01596.sfm +++| LDC * CALCULATE ADDRESS OF WORD IN BUFFER 01824 M00S01597.sfm +++| SDFA EQU *-1 (INDEX OF WORD TO UPDATE) 01825 M00S01598.sfm +++| SHN 2 01826 M00S01599.sfm +++| ADM SDFA 01827 M00S01600.sfm +++| ADC BFMS+2 01828 M00S01601.sfm +++| STM SDFB 01829 M00S01602.sfm +++| LDD CN+3 01830 M00S01603.sfm +++| SHN 6 01831 M00S01604.sfm +++| ADD RA 01832 M00S01605.sfm +++| SHN 6 01833 M00S01606.sfm +++| ADD CN+4 01834 M00S01607.sfm +++| CRM *,ON UPDATE WORD 01835 M00S01608.sfm +++| SDFB EQU *-1 (ADDRESS OF WORD WITHIN BUFFER) 01836 M00S01609.sfm +++| LDN PDTL UPDATE SECTOR MODIFICATION DATE 01837 M00S01610.sfm +++| CRM BFMS+2+SMIT*5,ON
| Line S01611 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01838 M01S01611.242l642 ---| SETMS WRITE,RW REWRITE SECTOR 01839 M01S01612.242l642 ---| LDC BFMS+WLSF 01840 M01S01613.242l642 ---| RJM WDS 01841 M01S01614.242l642 ---| ENDMS 01842 M01S01615.242l642 ---| LDD T6 CLEAR LABEL TRACK INTERLOCK 01843 M01S01616.242l642 ---| RJM CTI
| Line S00135 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01844 M01S00135.242l642 +++| LDC BFMS+WLSF REWRITE SECTOR 01845 M01S00136.242l642 +++| RJM WMS 01846 M01S00137.242l642 +++| ENDMS 01847 M01S00138.242l642 +++| RJM RTI RELEASE LABEL TRACK INTERLOCK 01848 M00S01617.sfm +++| LJM SFMX EXIT
| Line S01618 Modification History | |
|---|---|
M01 (Removed by) | ns2357 |
Seq # *Modification Id* Act ----------------------------+ 01849 M01S01618.ns2357 ---| SCD SPACE 4,10 01850 M01S01619.ns2357 ---|*** FUNCTION *SCDF* - SET *CPD* DROP FLAG. 01851 M01S01620.ns2357 ---|* 01852 M01S01621.ns2357 ---|* THIS FUNCTION WILL SET THE *CPD* DROP FLAG IN CMR. AS A
| Line S01622 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
M02 (Removed by) | ns2357 |
Seq # *Modification Id* Act ----------------------------+ 01853 M02S01622.ns2357 ---|* RESULT, ALL COPIES OF *CPD* THAT ARE RUNNING IN THE 01854 M02S01623.ns2357 ---|* SYSTEM WILL TERMINATE.
| Line S00139 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Removed by) | ns2357 |
Seq # *Modification Id* Act ----------------------------+ 01855 M02S00139.ns2357 ---|* RESULT, THE COPY OF *CPD* THAT IS RUNNING WILL TERMINATE.
| Line S01624 Modification History | |
|---|---|
M01 (Removed by) | ns2357 |
Seq # *Modification Id* Act ----------------------------+ 01856 M01S01624.ns2357 ---| 01857 M01S01625.ns2357 ---| 01858 M01S01626.ns2357 ---| SCD BSS 0 ENTRY 01859 M01S01627.ns2357 ---| 01860 M01S01628.ns2357 ---|* CHECK IF *CPD* IS ACTIVE. 01861 M01S01629.ns2357 ---| 01862 M01S01630.ns2357 ---| LDN PPCP SET PP COMMUNICATION AREA ADDRESSES 01863 M01S01631.ns2357 ---| CRD CM 01864 M01S01632.ns2357 ---| LDD CM+4 01865 M01S01633.ns2357 ---| STD T1 01866 M01S01634.ns2357 ---| LDN PPUL 01867 M01S01635.ns2357 ---| CRD CM 01868 M01S01636.ns2357 ---| LDD CM+2 01869 M01S01637.ns2357 ---| SHN 3 01870 M01S01638.ns2357 ---| ADD T1 01871 M01S01639.ns2357 ---| STD T2 01872 M01S01640.ns2357 ---| SCD1 LDD T1 CHECK PP PROGRAM NAME 01873 M01S01641.ns2357 ---| CRD CM 01874 M01S01642.ns2357 ---| LDD CM+1 01875 M01S01643.ns2357 ---| SCN 77 01876 M01S01644.ns2357 ---| SHN 6 01877 M01S01645.ns2357 ---| LMD CM 01878 M01S01646.ns2357 ---| LMC 3RDCP 01879 M01S01647.ns2357 ---| ZJN SCD2 IF *CPD* FOUND 01880 M01S01648.ns2357 ---| LDN 10 INCREMENT PPU COMMUNICATION AREA ADDRESS 01881 M01S01649.ns2357 ---| RAD T1 01882 M01S01650.ns2357 ---| LMD T2 01883 M01S01651.ns2357 ---| NJN SCD1 IF MORE PPUS TO CHECK 01884 M01S01652.ns2357 ---| ERROR /ERR/CNF EC=5, * CPD NOT ACTIVE.* 01885 M01S01653.ns2357 ---| 01886 M01S01654.ns2357 ---| SCD2 LDN 1 SET *CPD* DROP FLAG 01887 M01S01655.ns2357 ---| STD CM+1 01888 M01S01656.ns2357 ---| STD CM+2 01889 M01S01657.ns2357 ---| LDD MA 01890 M01S01658.ns2357 ---| CWM SCDA,ON 01891 M01S01659.ns2357 ---| MONITOR UADM
| Line S01660 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
M02 (Removed by) | ns2357 |
Seq # *Modification Id* Act ----------------------------+ 01892 M02S01660.ns2357 ---| LJM SFMX DROP PPU
| Line S00140 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Removed by) | ns2357 |
Seq # *Modification Id* Act ----------------------------+ 01893 M02S00140.ns2357 ---| SCD3 DELAY 01894 M02S00141.ns2357 ---| PAUSE 01895 M02S00142.ns2357 ---| LDD CM+1 01896 M02S00143.ns2357 ---| NJN SCD4 IF ERROR FLAG SET 01897 M02S00144.ns2357 ---| LDD T1 01898 M02S00145.ns2357 ---| CRD CM 01899 M02S00146.ns2357 ---| LDD CM+1 01900 M02S00147.ns2357 ---| SCN 77 01901 M02S00148.ns2357 ---| SHN 6 01902 M02S00149.ns2357 ---| LMD CM 01903 M02S00150.ns2357 ---| LMC 3RDCP 01904 M02S00151.ns2357 ---| ZJN SCD3 IF *CPD* FOUND 01905 M02S00152.ns2357 ---| SCD4 LJM SFMX DROP PPU
| Line S01661 Modification History | |
|---|---|
M01 (Removed by) | ns2357 |
Seq # *Modification Id* Act ----------------------------+ 01906 M01S01661.ns2357 ---| 01907 M01S01662.ns2357 ---| SCDA CON LIOS INCREMENT LOW CORE FIELD BY ONE 01908 M01S01663.ns2357 ---| CON INWL WORD ADDRES 01909 M01S01664.ns2357 ---| CON 2*100+1 BIT ADDRESS/FIELD WIDTH 01910 M01S01665.ns2357 ---| CON 0 01911 M01S01666.ns2357 ---| CON 0 01912 M00S01667.sfm +++| RSD SPACE 4,10 01913 M00S01668.sfm +++| TITLE SUBROUTINES. 01914 M00S01669.sfm +++| CBL SPACE 4,10 01915 M00S01670.sfm +++|** CBL - CHECK DAYFILE BUFFER LENGTH. 01916 M00S01671.sfm +++|* 01917 M00S01672.sfm +++|* ENTRY (TY) = DAYFILE TYPE. 01918 M00S01673.sfm +++|* 01919 M00S01674.sfm +++|* EXIT (A) = BUFFER LENGTH. 01920 M00S01675.sfm +++|* TO *ABT* IF ZERO LENGTH DAYFILE BUFFER. 01921 M00S01676.sfm +++|* 01922 M00S01677.sfm +++|* USES FA, CM - CM+4. 01923 M00S01678.sfm +++|* 01924 M00S01679.sfm +++|* CALLS SDA. 01925 M00S01680.sfm +++| 01926 M00S01681.sfm +++| 01927 M00S01682.sfm +++| CBL SUBR ENTRY/EXIT 01928 M00S01683.sfm +++| RJM SDA SET DAYFILE ADDRESS 01929 M00S01684.sfm +++| SBN 1 READ BUFFER LENGTH (OUT POINTER) WORD 01930 M00S01685.sfm +++| CRD CM 01931 M00S01686.sfm +++| LDD CM+2 01932 M00S01687.sfm +++| NJN CBLX IF NOT ZERO LENGTH BUFFER 01933 M00S01688.sfm +++| STD FA CLEAR FST ADDRESS 01934 M00S01689.sfm +++| ABORT /MESS/ERFE * SFM FILE EMPTY.* 01935 M00S01690.sfm +++| CDF SPACE 4,10 01936 M00S01691.sfm +++|** CDF - COPY DAYFILE. 01937 M00S01692.sfm +++|* 01938 M00S01693.sfm +++|* ENTRY (CN+3 - CN+4) = IN POINTER. 01939 M00S01694.sfm +++|* 01940 M00S01695.sfm +++|* EXIT (CN+3 - CN+4) ADVANCED. 01941 M00S01696.sfm +++|* 01942 M00S01697.sfm +++|* USES T1 - T3, CM - CM+7. 01943 M00S01698.sfm +++|* 01944 M00S01699.sfm +++|* CALLS SBA, SDA. 01945 M00S01700.sfm +++| 01946 M00S01701.sfm +++| 01947 M00S01702.sfm +++| CDF SUBR ENTRY/EXIT 01948 M00S01703.sfm +++| RJM SDA SET DAYFILE FET ADDRESS 01949 M00S01704.sfm +++| SBN 1 01950 M00S01705.sfm +++| CRD CM+3 01951 M00S01706.sfm +++| SBN 1 01952 M00S01707.sfm +++| CRD CM 01953 M00S01708.sfm +++| LDD HN SET BLOCK SIZE FOR READ 01954 M00S01709.sfm +++| STD T3 01955 M00S01710.sfm +++| CDF1 LDD CM+4 IN - OUT 01956 M00S01711.sfm +++| SBD CM+7 01957 M00S01712.sfm +++| ZJN CDFX IF BUFFER EMPTY 01958 M00S01713.sfm +++| PJN CDF2 IF IN .GT. OUT 01959 M00S01714.sfm +++| ADD CM+5 ADD BUFFER LENGTH 01960 M00S01715.sfm +++| CDF2 SBD T3 01961 M00S01716.sfm +++| PJN CDF3 IF FULL BLOCK IN BUFFER 01962 M00S01717.sfm +++| ADD HN ADJUST BLOCK SIZE 01963 M00S01718.sfm +++| STD T3 01964 M00S01719.sfm +++| CDF3 LDD T3 SET WORD COUNT FOR READ 01965 M00S01720.sfm +++| STD T2 01966 M00S01721.sfm +++| ADD CM+7 ADD OUT - BUFFER LENGTH 01967 M00S01722.sfm +++| SBD CM+5 01968 M00S01723.sfm +++| MJN CDF4 IF NO WRAP AROUND 01969 M00S01724.sfm +++| ZJN CDF4 IF NO WRAP AROUND 01970 M00S01725.sfm +++| STD T1 WORD COUNT FOR FIRST READ 01971 M00S01726.sfm +++| LDD CM+5 WORD COUNT FROM OUT TO END OF BUFFER 01972 M00S01727.sfm +++| SBD CM+7 01973 M00S01728.sfm +++| STD T2 01974 M00S01729.sfm +++| SHN 2 01975 M00S01730.sfm +++| ADD T2 01976 M00S01731.sfm +++| ADC BFMS BUFFER ADDRESS FOR FIRST READ 01977 M00S01732.sfm +++| STM CDFA 01978 M00S01733.sfm +++| RJM SBA READ WRAP AROUND 01979 M00S01734.sfm +++| CRM *,T1 01980 M00S01735.sfm +++| CDFA EQU *-1 01981 M00S01736.sfm +++| CDF4 RJM SBA READ DAYFILE BLOCK 01982 M00S01737.sfm +++| ADD CM+7 01983 M00S01738.sfm +++| CRM BFMS,T2 01984 M00S01739.sfm +++| LDD CN+3 STORE DATA READ 01985 M00S01740.sfm +++| SHN 6 01986 M00S01741.sfm +++| ADD RA 01987 M00S01742.sfm +++| SHN 6 01988 M00S01743.sfm +++| ADD CN+4 01989 M00S01744.sfm +++| CWM BFMS,T3 01990 M00S01745.sfm +++| LDD T3 ADVANCE IN POINTER 01991 M00S01746.sfm +++| RAD CN+4 01992 M00S01747.sfm +++| SHN -14 01993 M00S01748.sfm +++| RAD CN+3 01994 M00S01749.sfm +++| LDD T3 ADVANCE DAYFILE OUT POINTER 01995 M00S01750.sfm +++| RAD CM+7 01996 M00S01751.sfm +++| SBD CM+5 01997 M00S01752.sfm +++| MJN CDF5 IF NO WRAP AROUND 01998 M00S01753.sfm +++| STD CM+7 01999 M00S01754.sfm +++| CDF5 LJM CDF1 LOOP FOR NEXT BLOCK
| Line S01755 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 02000 M01S01755.242l642 ---| CIB SPACE 4,10
| Line S00153 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 02001 M01S00153.242l642 +++| CIB SPACE 4,15 02002 M00S01756.sfm +++|** CIB - CLEAR FST INTERLOCK BIT. 02003 M00S01757.sfm +++|* THE TRACK INTERLOCK BIT IN THE FST FOR THE OLD 02004 M00S01758.sfm +++|* DAYFILE IS CLEARED. 02005 M00S01759.sfm +++|* 02006 M00S01760.sfm +++|* ENTRY (IR+3 - IR+4) = FET ADDRESS. 02007 M00S01761.sfm +++|* 02008 M00S01762.sfm +++|* EXIT FST ENTRY REWRITTEN. 02009 M00S01763.sfm +++|* 02010 M00S01764.sfm +++|* USES FA, CM - CM+4, FN - FN+4. 02011 M00S01765.sfm +++|* 02012 M00S01766.sfm +++|* CALLS GFE, SAF. 02013 M00S01767.sfm +++|* 02014 M00S01768.sfm +++|* MACROS NFA. 02015 M00S01769.sfm +++| 02016 M00S01770.sfm +++| 02017 M00S01771.sfm +++| CIB SUBR ENTRY/EXIT 02018 M00S01772.sfm +++| RJM GFE GET FET ADDRESS 02019 M00S01773.sfm +++| CRD FN READ FILE NAME 02020 M00S01774.sfm +++| RJM SAF SEARCH FOR ASSIGNED FILE 02021 M00S01775.sfm +++| ZJN CIBX IF FILE NOT FOUND 02022 M00S01776.sfm +++| NFA FA,R 02023 M00S01777.sfm +++| ADN FSTL 02024 M00S01778.sfm +++| CRD CM READ FST ENTRY 02025 M00S01779.sfm +++| LDD CM+4 CLEAR INTERLOCK BIT 02026 M00S01780.sfm +++| LPC 6777 02027 M00S01781.sfm +++| STD CM+4 02028 M00S01782.sfm +++| NFA FA,R 02029 M00S01783.sfm +++| ADN FSTL 02030 M00S01784.sfm +++| CWD CM REWRITE FST ENTRY 02031 M00S01785.sfm +++| LDN 0 CLEAR FNT ORDINAL 02032 M00S01786.sfm +++| STD FA 02033 M00S01787.sfm +++| UJN CIBX RETURN 02034 M00S01788.sfm +++| SBA SPACE 4,10 02035 M00S01789.sfm +++|** SBA - SET BUFFER ADDRESS. 02036 M00S01790.sfm +++|* 02037 M00S01791.sfm +++|* ENTRY (TY) = DAYFILE TYPE. 02038 M00S01792.sfm +++|* (CM - CM+1) = DAYFILE BUFFER ADDRESS. 02039 M00S01793.sfm +++|* 02040 M00S01794.sfm +++|* EXIT (A) = DAYFILE BUFFER ADDRESS. 02041 M00S01795.sfm +++|* 02042 M00S01796.sfm +++|* MACROS NFA. 02043 M00S01797.sfm +++| 02044 M00S01798.sfm +++| 02045 M00S01799.sfm +++| SBA1 NFA DAYN SET JOB DAYFILE BUFFER ADDRESS 02046 M00S01800.sfm +++| 02047 M00S01801.sfm +++| SBA SUBR ENTRY/EXIT 02048 M00S01802.sfm +++| LDD TY 02049 M00S01803.sfm +++| ZJN SBA1 IF JOB DAYFILE 02050 M00S01804.sfm +++| LDD CM SET SYSTEM DAYFILE BUFFER ADDRESS 02051 M00S01805.sfm +++| SHN 14 02052 M00S01806.sfm +++| ADD CM+1 02053 M00S01807.sfm +++| UJN SBAX RETURN 02054 M00S01808.sfm +++| RDI SPACE 4,20 02055 M00S01809.sfm +++|** RDI - READ DEVICE INFORMATION SECTOR. 02056 M00S01810.sfm +++|* 02057 M00S01811.sfm +++|* ENTRY (T5) = EQUIPMENT.
| Line S01812 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 02058 M01S01812.242l642 ---|* (CM - CM+4) = EST ENTRY. 02059 M00S01813.sfm +++|* (RDIA) = *PSN* IF LABEL TRACK IS TO BE INTERLOCKED. 02060 M00S01814.sfm +++|*
| Line S01815 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 02061 M01S01815.242l642 ---|* EXIT (BFMS - BFMS+502) = DEVICE INFORMATION SECTOR. 02062 M01S01816.242l642 ---|* (T6) = LABEL TRACK. 02063 M01S01817.242l642 ---|* (T7) = *DILT* SECTOR. 02064 M01S01818.242l642 ---|* TO *DPP* IF ERROR FLAG SET. 02065 M01S01819.242l642 ---|* 02066 M01S01820.242l642 ---|* USES T6, T7, T0 - T0+4. 02067 M01S01821.242l642 ---|* 02068 M01S01822.242l642 ---|* CALLS LLT, RDS, WTI.
| Line S00154 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 02069 M01S00154.242l642 +++|* EXIT (T6) = LABEL TRACK. 02070 M01S00155.242l642 +++|* (T7) = *DILT* SECTOR. 02071 M01S00156.242l642 +++|* (BFMS) = DEVICE INFORMATION SECTOR. 02072 M01S00157.242l642 +++|* 02073 M01S00158.242l642 +++|* ERROR TO *DPP* IF ERROR FLAG SET. 02074 M01S00159.242l642 +++|* 02075 M01S00160.242l642 +++|* CALLS LLT, RMS, WTI. 02076 M00S01823.sfm +++|* 02077 M00S01824.sfm +++|* MACROS SETMS. 02078 M00S01825.sfm +++| 02079 M00S01826.sfm +++| 02080 M00S01827.sfm +++| RDI SUBR ENTRY/EXIT 02081 M00S01828.sfm +++| RJM LLT LOCATE LABEL TRACK 02082 M00S01829.sfm +++| RDIA UJN RDI2 BYPASS LABEL TRACK INTERLOCK 02083 M00S01830.sfm +++|* PSN (*SETDI* FUNCTION) 02084 M00S01831.sfm +++| RJM WTI SET LABEL TRACK INTERLOCK
| Line S01832 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 02085 M01S01832.242l642 ---| ZJN RDI2 IF LABEL TRACK INTERLOCK SET 02086 M01S01833.242l642 ---| LJM DPP DROP PPU 02087 M01S01834.242l642 ---|
| Line S00161 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 02088 M01S00161.242l642 +++| NJP DPP IF ERROR FLAG SET 02089 M01S00162.242l642 +++| LDD T6 02090 M01S00163.242l642 +++| STM RTIA 02091 M00S01835.sfm +++| RDI2 LDN DILT SET SECTOR 02092 M00S01836.sfm +++| STD T7
| Line S01837 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 02093 M01S01837.242l642 ---| SETMS READ READ SECTOR 02094 M01S01838.242l642 ---| LDC BFMS 02095 M01S01839.242l642 ---| RJM RDS 02096 M01S01840.242l642 ---| LJM RDIX RETURN
| Line S00164 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 02097 M01S00164.242l642 +++| SETMS IO,RW 02098 M01S00165.242l642 +++| LDC BFMS READ SECTOR 02099 M01S00166.242l642 +++| RJM RMS 02100 M01S00167.242l642 +++| UJP RDIX RETURN 02101 M00S01841.sfm +++| VBP SPACE 4,15 02102 M00S01842.sfm +++|** VBP - VALIDATE BUFFER POINTERS. 02103 M00S01843.sfm +++|* 02104 M00S01844.sfm +++|* ENTRY (A) = BUFFER LENGTH REQUIRED. 02105 M00S01845.sfm +++|* 02106 M00S01846.sfm +++|* EXIT (A) .LT. 0 IF VALID POINTERS. 02107 M00S01847.sfm +++|* (CN+3 - CN+4) = (FIRST). 02108 M00S01848.sfm +++|* 02109 M00S01849.sfm +++|* USES T0, T1, CN - CN+4, T2 - T2+4. 02110 M00S01850.sfm +++|* 02111 M00S01851.sfm +++|* CALLS GFE. 02112 M00S01852.sfm +++| 02113 M00S01853.sfm +++| 02114 M00S01854.sfm +++| VBP SUBR ENTRY/EXIT 02115 M00S01855.sfm +++| STD T1 02116 M00S01856.sfm +++| RJM GFE READ *FIRST* 02117 M00S01857.sfm +++| ADN 1 02118 M00S01858.sfm +++| CRD CN 02119 M00S01859.sfm +++| ADN 3 READ *LIMIT* 02120 M00S01860.sfm +++| CRD T2 02121 M00S01861.sfm +++| LDD T2+3 02122 M00S01862.sfm +++| LPN 37 02123 M00S01863.sfm +++| STD T2+3 02124 M00S01864.sfm +++| SHN 14 02125 M00S01865.sfm +++| LMD T2+4 02126 M00S01866.sfm +++| SBN 1 02127 M00S01867.sfm +++| SHN -6 02128 M00S01868.sfm +++| SBD FL 02129 M00S01869.sfm +++| PJN VBPX IF LIMIT .GT. FL 02130 M00S01870.sfm +++| LDD CN+3 02131 M00S01871.sfm +++| LPN 37 02132 M00S01872.sfm +++| STD CN+3 02133 M00S01873.sfm +++| SHN 14 02134 M00S01874.sfm +++| LMD CN+4 02135 M00S01875.sfm +++| ADD T1 FIRST+BUFL 02136 M00S01876.sfm +++| STD T2 02137 M00S01877.sfm +++| SHN -14 02138 M00S01878.sfm +++| SBD T2+3 02139 M00S01879.sfm +++| NJN VBPX IF (FIRST+BUFL) .NE. LIMIT 02140 M00S01880.sfm +++| LDD T2 02141 M00S01881.sfm +++| SBD T2+4 02142 M00S01882.sfm +++| UJN VBPX RETURN 02143 M00S01883.sfm +++| VEQ SPACE 4,10 02144 M00S01884.sfm +++|** VEQ - VALIDATE EQUIPMENT. 02145 M00S01885.sfm +++|* 02146 M00S01886.sfm +++|* ENTRY (A) = EST ORDINAL. 02147 M00S01887.sfm +++|* 02148 M00S01888.sfm +++|* EXIT (CM - CM+4) = EST ENTRY. 02149 M00S01889.sfm +++|* TO *ABT* IF INCORRECT EQUIPMENT. 02150 M00S01890.sfm +++|* 02151 M00S01891.sfm +++|* USES T5, CM - CM+4. 02152 M00S01892.sfm +++|* 02153 M00S01893.sfm +++|* MACROS ABORT, SFA. 02154 M00S01894.sfm +++| 02155 M00S01895.sfm +++| 02156 M00S01896.sfm +++| VEQ SUBR ENTRY/EXIT 02157 M00S01897.sfm +++| STD T5 02158 M00S01898.sfm +++| ZJN VEQ1 IF NOT LEGAL EST ORDINAL 02159 M00S01899.sfm +++| SFA EST READ EST ENTRY 02160 M00S01900.sfm +++| ADK EQDE 02161 M00S01901.sfm +++| CRD CM 02162 M00S01902.sfm +++| LDD CM 02163 M00S01903.sfm +++| SHN 21-13 02164 M00S01904.sfm +++| MJN VEQX IF MASS STORAGE EQUIPMENT 02165 M00S01905.sfm +++| VEQ1 ABORT /MESS/EREQ * SFM INCORRECT EQUIPMENT.* 02166 M00S01906.sfm +++| SPACE 4 02167 M00S01907.sfm +++| SPACE 4 02168 M00S01908.sfm +++| OVL0 EQU BFMS-ZDFL 02169 M00S01909.sfm +++| ERRNG OVL0-*-5 OVERFLOW INTO ZERO LEVEL OVERLAY AREA 02170 M00S01910.sfm +++| ERRNG EPFW-OVL0-ZBFL CHECK LENGTH OF *0BF* 02171 M00S01911.sfm +++| ERRNG EPFW-OVL0-ZTDL CHECK LENGTH OF *0TD* 02172 M00S01912.sfm +++| PRS TITLE PRESET. 02173 M00S01913.sfm +++|** PRS - PRESET PROGRAM. 02174 M00S01914.sfm +++|* 02175 M00S01915.sfm +++|* EXIT (LS) = LAST FET STATUS. 02176 M00S01916.sfm +++|* (FA) = 0. 02177 M00S01917.sfm +++|* (FI) = 0. 02178 M00S01918.sfm +++|* (MI) = 1. 02179 M00S01919.sfm +++|* (TE) = NUMBER OF ENTRIES IN FNT. 02180 M00S01920.sfm +++|* (FN - FN+4) = FIRST WORD OF FET. 02181 M00S01921.sfm +++| 02182 M00S01922.sfm +++| 02183 M00S01923.sfm +++| PRS SUBR ENTRY/EXIT 02184 M00S01924.sfm +++| LDN 0 CLEAR FST ADDRESS 02185 M00S01925.sfm +++| STD T1 02186 M00S01926.sfm +++| STD FA 02187 M00S01927.sfm +++| STD FI 02188 M00S01928.sfm +++| LDN 1 PRESET MACHINE INDEX 02189 M00S01929.sfm +++| STD MI 02190 M00S01930.sfm +++| RJM CRS CHECK RECALL STATUS 02191 M00S01931.sfm +++| ZJN PRS1 IF RECALL NOT SET 02192 M00S01932.sfm +++| 02193 M00S01933.sfm +++|* CHECK FUNCTION CODE. 02194 M00S01934.sfm +++| 02195 M00S01935.sfm +++| LDD IR+2 CHECK FUNCTION CODE 02196 M00S01936.sfm +++| SHN 1 02197 M00S01937.sfm +++| ADD IR+2 02198 M00S01938.sfm +++| STD T7 02199 M00S01939.sfm +++| SBK MXFN*3 02200 M00S01940.sfm +++| MJN PRS2 IF LEGAL CODE 02201 M00S01941.sfm +++| PRS1 ABORT /MESS/ERIR * SFM INCORRECT REQUEST.* 02202 M00S01942.sfm +++| 02203 M00S01943.sfm +++|* CHECK FET ADDRESS. 02204 M00S01944.sfm +++| 02205 M00S01945.sfm +++| PRS2 LDD IR+3 CHECK FET ADDRESS 02206 M00S01946.sfm +++| LPN 77 02207 M00S01947.sfm +++| STD IR+3 02208 M00S01948.sfm +++| SHN 14
| Line S01949 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02209 M01S01949.261l700 ---| MJN PRS3 IF OUT OF RANGE
| Line S00032 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02210 M01S00032.261l700 +++| MJN PRS2.1 IF OUT OF RANGE 02211 M00S01950.sfm +++| LMD IR+4 02212 M00S01951.sfm +++| ADN 1 02213 M00S01952.sfm +++| SHN -6 02214 M00S01953.sfm +++| SBD FL
| Line S01954 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02215 M01S01954.261l700 ---| PJN PRS3 IF OUT OF RANGE
| Line S00033 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02216 M01S00033.261l700 +++| MJN PRS2.2 IF NOT OUT OF RANGE 02217 M01S00034.261l700 +++| PRS2.1 ABORT /MESS/ERAE * SFM ARGUMENT ERROR.* 02218 M00S01955.sfm +++| 02219 M00S01956.sfm +++|* CHECK FET LENGTH. 02220 M00S01957.sfm +++|
| Line S01958 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02221 M01S01958.261l700 ---| LDM TFCN+2,T7
| Line S00035 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02222 M01S00035.261l700 +++| PRS2.2 LDM TFCN+2,T7 02223 M00S01959.sfm +++| LPN 77 02224 M00S01960.sfm +++| STM FETL SAVE REQUIRED FET LENGTH
| Line S01961 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02225 M01S01961.261l700 ---| ZJN PRS2.1 IF NO FET REQUIRED
| Line S00036 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02226 M01S00036.261l700 +++| ZJN PRS2.3 IF NO FET REQUIRED 02227 M00S01962.sfm +++| RJM GFE GET FET ADDRESS 02228 M00S01963.sfm +++| ADN 1 02229 M00S01964.sfm +++| CRD CM 02230 M00S01965.sfm +++| LDD CM+3 SET FET LENGTH 02231 M00S01966.sfm +++| SHN -6 02232 M00S01967.sfm +++| ADN 5 02233 M00S01968.sfm +++| STD T1 02234 M00S01969.sfm +++| LDM FETL CHECK FET LENGTH 02235 M00S01970.sfm +++| SBD T1
| Line S01971 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02236 M01S01971.261l700 ---| PJN PRS3 IF FET NOT LONG ENOUGH 02237 M01S01972.261l700 ---| PRS2.1 LDD IR+3
| Line S00037 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02238 M01S00037.261l700 +++| PJN PRS2.1 IF FET NOT LONG ENOUGH 02239 M01S00038.261l700 +++| PRS2.3 LDD IR+3 02240 M00S01973.sfm +++| SHN 14 02241 M00S01974.sfm +++| LMD IR+4 02242 M00S01975.sfm +++| ADD T1 02243 M00S01976.sfm +++| SHN -6 02244 M00S01977.sfm +++| SBD FL
| Line S01978 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02245 M01S01978.261l700 ---| MJN PRS3.1 IF IN RANGE 02246 M01S01979.261l700 ---| PRS3 ABORT /MESS/ERAE * SFM ARGUMENT ERROR.*
| Line S00039 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02247 M01S00039.261l700 +++| PJN PRS2.1 IF OUT OF RANGE 02248 M00S01980.sfm +++|
| Line S01981 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02249 M01S01981.261l700 ---|* CHECK IF THIS REQUEST NEEDS AT LEAST ONE SPECIAL PRIVILEGE. 02250 M01S01982.261l700 ---|* MOST LID/PID FUNCTION PROCESSORS REQUIRE THAT THE USER MUST 02251 M01S01983.261l700 ---|* HAVE EITHER SYSTEM ORIGIN PRIVILEGES OR AN SSJ= ENTRY POINT, 02252 M01S01984.261l700 ---|* BUT NOT NECESSARILY BOTH. NOTABLY, *NVF* DOES NOT HAVE AN 02253 M01S01985.261l700 ---|* SSJ= ENTRY POINT BUT STILL MUST ISSUE LID/PID FUNCTIONS.
| Line S00040 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02254 M01S00040.261l700 +++|* CHECK FOR PRIVILEGED ANALYST ACCESS. 02255 M00S01986.sfm +++|
| Line S01987 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02256 M01S01987.261l700 ---| PRS3.1 LDM TFCN+2,T7
| Line S00041 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02257 M01S00041.261l700 +++| LDM TFCN+2,T7 02258 M01S00042.261l700 +++| SHN 21-7 02259 M01S00043.261l700 +++| PJN PRS3 IF NOT CHECKING FOR PRIVILEGED ANALYST 02260 M01S00044.261l700 +++| RJM VPA VALIDATE PRIVILEGED ANALYST 02261 M01S00045.261l700 +++| ZJN PRS3.1 IF PRIVILEGED ANALYST ACCESS ALLOWED 02262 M01S00046.261l700 +++| 02263 M01S00047.261l700 +++|* CHECK FOR EITHER SYSTEM ORIGIN PRIVILEGES OR *SSJ=*. 02264 M01S00048.261l700 +++| 02265 M01S00049.261l700 +++| PRS3 LDM TFCN+2,T7 02266 M00S01988.sfm +++| SHN 21-10
| Line S01989 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02267 M01S01989.261l700 ---| PJN PRS4 IF NOT CHECKING SYOT OR SSJ=
| Line S00050 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02268 M01S00050.261l700 +++| PJN PRS4 IF NOT CHECKING FOR *SYOT* OR *SSJ=* 02269 M00S01990.sfm +++| RJM CUA CHECK USER ACCESS
| Line S01991 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02270 M01S01991.261l700 ---| ZJN PRS4 IF USER SYSTEM ORIGIN 02271 M01S01992.261l700 ---| LDD CP CHECK FOR SSJ=
| Line S00051 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02272 M01S00051.261l700 +++| ZJN PRS3.1 IF CALLER HAS SYSTEM ORIGIN PRIVILEGES 02273 M01S00052.261l700 +++| LDD CP CHECK FOR *SSJ=* 02274 M00S01993.sfm +++| ADK SEPW 02275 M00S01994.sfm +++| CRD CM 02276 M00S01995.sfm +++| LDD CM 02277 M00S01996.sfm +++| SHN 21-2
| Line S01997 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02278 M01S01997.261l700 ---| PJN PRS5 IF NO SSJ= PRIVILEGES
| Line S00053 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02279 M01S00053.261l700 +++| PJN PRS5 IF CALLER IS NOT *SSJ=* 02280 M01S00054.261l700 +++| PRS3.1 LJM PRS7 PROCESS FUNCTION 02281 M00S01998.sfm +++|
| Line S01999 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02282 M01S01999.261l700 ---|* CHECK ORIGIN CODE FOR LEGAL OPERATION.
| Line S00055 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02283 M01S00055.261l700 +++|* CHECK FOR SYSTEM ORIGIN PRIVILEGES. 02284 M00S02000.sfm +++| 02285 M00S02001.sfm +++| PRS4 LDM TFCN+2,T7 CHECK USER ACCESS REQUIRMENTS 02286 M00S02002.sfm +++| SHN 21-12 02287 M00S02003.sfm +++| PJN PRS6 IF NO REQUIREMENTS 02288 M00S02004.sfm +++| RJM CUA CHECK USER ACCESS
| Line S02005 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02289 M01S02005.261l700 ---| ZJN PRS6 IF USER VALIDATED
| Line S00056 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02290 M01S00056.261l700 +++| ZJN PRS6 IF CALLER HAS SYSTEM ORIGIN PRIVILEGES 02291 M00S02006.sfm +++| LDD CM CHECK MAINTENANCE ACCESS 02292 M00S02007.sfm +++| NJN PRS5 IF NOT MAINTENANCE ACCESS 02293 M00S02008.sfm +++| LDM TFCN+2,T7 02294 M00S02009.sfm +++| SHN 21-11 02295 M00S02010.sfm +++| MJN PRS6 IF MAINTENANCE ACCESS ALLOWED 02296 M00S02011.sfm +++| PRS5 LJM PRS1 * SFM INCORRECT REQUEST.* 02297 M00S02012.sfm +++|
| Line S02013 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02298 M01S02013.261l700 ---| PRS6 LDM TFCN+2,T7 CHECK IF SSJ REQUIRED
| Line S00057 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02299 M01S00057.261l700 +++|* CHECK FOR *SSJ=*. 02300 M01S00058.261l700 +++| 02301 M01S00059.261l700 +++| PRS6 LDM TFCN+2,T7 02302 M00S02014.sfm +++| SHN 21-13
| Line S02015 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02303 M01S02015.261l700 ---| PJN PRS7 IF SSJ= NOT REQUIRED
| Line S00060 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02304 M01S00060.261l700 +++| PJN PRS7 IF NOT CHECKING FOR *SSJ=* 02305 M00S02016.sfm +++| LDD CP READ SPECIAL ENTRY POINTS 02306 M00S02017.sfm +++| ADC SEPW 02307 M00S02018.sfm +++| CRD CM 02308 M00S02019.sfm +++| LDD CM 02309 M00S02020.sfm +++| SHN 21-2
| Line S02021 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02310 M01S02021.261l700 ---| PJN PRS5 IF SSJ= NOT PRESENT
| Line S00061 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02311 M01S00061.261l700 +++| PJN PRS5 IF *SSJ=* NOT PRESENT 02312 M01S00062.261l700 +++| 02313 M01S00063.261l700 +++|* PROCESS FUNCTION. 02314 M01S00064.261l700 +++| 02315 M00S02022.sfm +++| PRS7 LDM TFCN,T7 SET OVERLAY NAME
| Line S02023 Modification History | |
|---|---|
M01 (Removed by) | ns2357 |
Seq # *Modification Id* Act ----------------------------+ 02316 M01S02023.ns2357 ---| STM SFME 02317 M01S02024.ns2357 ---| LDM TFCN+1,T7 SET PROCESSOR ADDRESS 02318 M01S02025.ns2357 ---| STM SFMA
| Line S00028 Modification History | |
|---|---|
M01 (Added by) | ns2357 |
Seq # *Modification Id* Act ----------------------------+ 02319 M01S00028.ns2357 +++| STM SFMA 02320 M01S00029.ns2357 +++| LDM TFCN+1,T7 SET PROCESSOR ADDRESS 02321 M01S00030.ns2357 +++| STM SFMB 02322 M00S02026.sfm +++| RJM GFE GET FET ADDRESS 02323 M00S02027.sfm +++| CRD FN 02324 M00S02028.sfm +++| LDD FN+4 SAVE LAST FET STATUS 02325 M00S02029.sfm +++| LPC 1776 02326 M00S02030.sfm +++| STD LS 02327 M00S02031.sfm +++| LDN DFPP READ DAYFILE POINTER WORD 02328 M00S02032.sfm +++| CRD CM
| Line S02033 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 02329 M01S02033.251l664 ---| SOD CM SET DAYFILE POINTER 02330 M01S02034.251l664 ---| STM SDAA
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 02331 M01S00005.251l664 +++| LDD CM SET FWA-1 OF DAYFILE POINTERS 02332 M01S00006.251l664 +++| SHN 14 02333 M01S00007.251l664 +++| LMD CM+1 02334 M01S00008.251l664 +++| SBN 1 02335 M01S00009.251l664 +++| STM SDAA+1 02336 M01S00010.251l664 +++| SHN -14 02337 M01S00011.251l664 +++| RAM SDAA 02338 M00S02035.sfm +++| LDN FNTP SET FNT POINTER 02339 M00S02036.sfm +++| CRD CM 02340 M00S02037.sfm +++| LDD CM+2 SET NUMBER OF ENTRIES 02341 M00S02038.sfm +++| STD TE 02342 M00S02039.sfm +++| RJM IFP INITIALIZE TABLE ACCESS ROUTINES 02343 M00S02040.sfm +++| LJM PRSX RETURN 02344 M00S02041.sfm +++| 02345 M00S02042.sfm +++| 02346 M00S02043.sfm +++| IFP HERE DUMP *IFP* REMOTE CODE 02347 M00S02044.sfm +++| SPACE 4,10 02348 M00S02045.sfm +++|** COMMON DECKS. 02349 M00S02046.sfm +++| 02350 M00S02047.sfm +++| 02351 M00S02048.sfm +++|*CALL COMPCRS 02352 M00S02049.sfm +++| SSJ$ EQU 1 SET SSJ CHECKING FOR *COMPCUA* 02353 M00S02050.sfm +++|*CALL COMPCUA
| Line S00065 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02354 M01S00065.261l700 +++|*CALL COMPVPA 02355 M00S02051.sfm +++| TFCN SPACE 4,20 02356 M00S02052.sfm +++|** TFCN - TABLE OF FUNCTION CODE PROCESSORS. 02357 M00S02053.sfm +++|*
| Line S02054 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02358 M01S02054.261l700 ---|*T, 12/O,12/N,1/S,1/P,1/M,1/E,2/0,6/L
Figure
| Line S00066 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02359 M01S00066.261l700 +++|*T, 12/O,12/N,1/S,1/P,1/M,1/E,1/A,1/0,6/L
Figure
02360 M00S02055.sfm +++|* 02361 M00S02056.sfm +++|* N FUNCTION PROCESSOR ADDRESS. 02362 M00S02057.sfm +++|* O OVERLAY NAME.
| Line S02058 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02363 M01S02058.261l700 ---|* S SSJ= ENTRY POINT REQUIRED.
| Line S00067 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02364 M01S00067.261l700 +++|* S *SSJ=* ENTRY POINT REQUIRED. 02365 M00S02059.sfm +++|* P SYSTEM ORIGIN PRIVILEGES REQUIRED. 02366 M00S02060.sfm +++|* M MAINTENANCE ACCESS ALLOWED.
| Line S02061 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02367 M01S02061.261l700 ---|* E EITHER SSJ= OR SYSTEM ORIGIN PRIVILEGES REQUIRED.
| Line S00068 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02368 M01S00068.261l700 +++|* E EITHER *SSJ=* OR SYSTEM ORIGIN PRIVILEGES REQUIRED. 02369 M01S00069.261l700 +++|* A ALLOW ACCESS IF CALLER HAS PRIVILEGED ANALYST 02370 M01S00070.261l700 +++|* VALIDATION AND IF *PRIVILEGED ANALYST MODE* ENABLED. 02371 M00S02062.sfm +++|* L REQUIRED FET LENGTH - 1. 02372 M00S02063.sfm +++| 02373 M00S02064.sfm +++| 02374 M00S02065.sfm +++| TFCN FCN
| Line S02066 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02375 M01S02066.261l700 ---| FCN TAFF,TAD,6,P,SSJ 02376 M01S02067.261l700 ---| FCN AMDF,ADF,5,P 02377 M01S02068.261l700 ---| FCN AAFF,AAC,5,P 02378 M01S02069.261l700 ---| FCN AELF,AER,5,P,,M 02379 M01S02070.261l700 ---| FCN AMLF,AMF,5,P,,M 02380 M01S02071.261l700 ---| FCN AUDF,AUD,5 02381 M01S02072.261l700 ---| FCN RDTF,RDT,4,P 02382 M01S02073.261l700 ---| FCN PADF,PDF,6,P,SSJ 02383 M01S02074.261l700 ---| FCN CDBF,CDB,6,P,SSJ 02384 M01S02075.261l700 ---| FCN EFAF,EGF,5,P,SSJ 02385 M01S02076.261l700 ---| FCN DFAF,DFA,5,P,SSJ
| Line S00168 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Removed by) | ns2357 |
M03 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02386 M03S00168.261l700 ---| FCN RFAF,DFA,5,P,SSJ
| Line S00031 Modification History | |
|---|---|
M01 (Added by) | ns2357 |
M02 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02387 M02S00031.261l700 ---| FCN ECFF,ECF,5,P,SSJ
| Line S02077 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02388 M01S02077.261l700 ---| FCN ATDF,ATD,6,,SSJ 02389 M01S02078.261l700 ---| FCN EGFF,EGF,5,P,SSJ 02390 M01S02079.261l700 ---| FCN ELFF,ELF,5,P,SSJ 02391 M01S02080.261l700 ---| FCN CDRF,RFD,4,,SSJ 02392 M01S02081.261l700 ---| FCN GDIF,GDI,6,P,SSJ 02393 M01S02082.261l700 ---| FCN SDFF,SDF,6,P,SSJ 02394 M01S02083.261l700 ---| FCN RSDF,RSD,0,,,,E 02395 M01S02084.261l700 ---| FCN CSTF,CST,0,P 02396 M01S02085.261l700 ---| FCN SSTF,CST,0,P 02397 M01S02086.261l700 ---| FCN SCDF,SCD,4,P 02398 M01S02087.261l700 ---| FCN CFFF,CFA,5,P,SSJ 02399 M01S02088.261l700 ---| FCN MDFF,DMM,4,P 02400 M01S02089.261l700 ---| FCN GLAF,GLA,0 02401 M01S02090.261l700 ---| FCN GLTF,GLT,4,,,,E 02402 M01S02091.261l700 ---| FCN GLPF,GLP,0,,,,E 02403 M01S02092.261l700 ---| FCN GSSF,GSS,0 02404 M01S02093.261l700 ---| FCN GEAF,GEA,0 02405 M01S02094.261l700 ---| FCN GSMF,GSM,0 02406 M01S02095.261l700 ---| FCN SPTF,SPT,0,,,,E 02407 M01S02096.261l700 ---| FCN ILTF,INT,0,,,,E 02408 M01S02097.261l700 ---| FCN GLCF,GLC,0,,,,E 02409 M01S02098.261l700 ---| FCN SUSF,SSS,0,P
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02410 M02S00004.261l700 ---| FCN GTSF,GTS,0
| Line S00071 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02411 M01S00071.261l700 +++| FCN TAFF,TAD,6,P,SSJ TERMINATE ACTIVE DAYFILE 02412 M01S00072.261l700 +++| FCN AMDF,ADF,5,P,,,,A ACCESS MASTER DAYFILE 02413 M01S00073.261l700 +++| FCN AAFF,AAC,5,P,,,,A ACCESS ACCOUNT DAYFILE 02414 M01S00074.261l700 +++| FCN AELF,AER,5,P,,M,,A ACCESS ERROR LOG 02415 M01S00075.261l700 +++| FCN AMLF,AMF,5,P,,M ACCESS MAINTENANCE LOG 02416 M01S00076.261l700 +++| FCN AUDF,AUD,5 ACCESS USER DAYFILE 02417 M01S00077.261l700 +++| FCN RDTF,RDT,4,P RETURN DEVICE TYPE 02418 M01S00078.261l700 +++| FCN PADF,PDF,6,P,SSJ PROTECT ACTIVE DAYFILE 02419 M01S00079.261l700 +++| FCN CDBF,CDB,6,P,SSJ CLEAR DAYFILE BYTE 02420 M01S00080.261l700 +++| FCN EFAF,EGF,5,P,SSJ ENTER LOCAL FAST ATTACH FILE 02421 M01S00081.261l700 +++| FCN DFAF,DFA,5,P,SSJ DELETE FAST ATTACH FILE 02422 M01S00082.261l700 +++| FCN ECFF,ECF,5,P,SSJ ENTER *CPD* SAMPLE FILE 02423 M01S00083.261l700 +++| FCN ATDF,ATD,6,,SSJ ATTACH INACTIVE DAYFILE 02424 M01S00084.261l700 +++| FCN EGFF,EGF,5,P,SSJ ENTER GLOBAL FAST ATTACH FILE 02425 M01S00085.261l700 +++| FCN ELFF,ELF,5,P,SSJ ENTER LINK FAST ATTACH FILE
| Line S00086 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
M02 (Removed by) | ns2685 |
Seq # *Modification Id* Act ----------------------------+ 02426 M02S00086.ns2685 ---| FCN CDRF,RFD,4,,SSJ CHANGE DM* FILE TO TYPE *ROFT*
| Line S00087 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02427 M01S00087.261l700 +++| FCN GDIF,GDI,6,P,SSJ GET DEVICE INFORMATION 02428 M01S00088.261l700 +++| FCN SDFF,SDF,6,P,SSJ SET DEVICE INFORMATION 02429 M01S00089.261l700 +++| FCN RSDF,RSD,0,,,,E RETURN SYSTEM DATA 02430 M01S00090.261l700 +++| FCN CSTF,CST,0,P CLEAR SUBSYSTEM ACCESS FLAG 02431 M01S00091.261l700 +++| FCN SSTF,CST,0,P SET SUBSYSTEM ACCESS FLAG 02432 M01S00092.261l700 +++| FCN SCDF,SCD,4,P SET *CPD* DROP FLAG 02433 M01S00093.261l700 +++| FCN CFFF,CFA,5,P,SSJ COUNT FAST ATTACH FILES 02434 M01S00094.261l700 +++| FCN MDFF,DMM,4,P DUMP MACHINE MEMORY 02435 M01S00095.261l700 +++| FCN GLAF,GLA,0 GET LID ATTRIBUTES 02436 M01S00096.261l700 +++| FCN GLTF,GLT,4,,,,E GET LID TABLE 02437 M01S00097.261l700 +++| FCN GLPF,GLP,0,,,,E GET PID ATTRIBUTES 02438 M01S00098.261l700 +++| FCN GSSF,GSS,0 GET ORIGIN TYPE ACCESS LEVELS 02439 M01S00099.261l700 +++| FCN GEAF,GEA,0 GET EQUIPMENT ACCESS LEVEL LIMITS 02440 M01S00100.261l700 +++| FCN GSMF,GSM,0 GET SYSTEM SECURITY MODE 02441 M01S00101.261l700 +++| FCN SPTF,SPT,0,,,,E SET PID ATTRIBUTES 02442 M01S00102.261l700 +++| FCN ILTF,INT,0,,,,E INITIALIZE LDT 02443 M01S00103.261l700 +++| FCN GLCF,GLC,0,,,,E GET LID CONFIGURATION 02444 M01S00104.261l700 +++| FCN SUSF,SSS,0,P SET SUBSYSTEM STATUS 02445 M01S00105.261l700 +++| FCN GTSF,GTS,0 GET *TMS* STATUS
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 02446 M01S00004.282l826 +++| FCN TPDF,TPD,0,,SSJ TRANSFER RESOURCE PREVIEW DATA 02447 M00S02099.sfm +++| FCN MXFN 02448 M00S02100.sfm +++| SPACE 4,10 02449 M00S02101.sfm +++| OVERFLOW 02450 M00S02102.sfm +++| OVERLAY (ERROR PROCESSOR.) 02451 M00S02103.sfm +++| ABP SPACE 4,15 02452 M00S02104.sfm +++|** ABP - ABORT JOB. 02453 M00S02105.sfm +++|* 02454 M00S02106.sfm +++|* ENTRY (DA) = MESSAGE ADDRESS. 02455 M00S02107.sfm +++|* (FS - FS+4) = FST ENTRY. 02456 M00S02108.sfm +++|* (FA) = FST ADDRESS. 02457 M00S02109.sfm +++|* (FA) = 0, IF NO FILE. 02458 M00S02110.sfm +++|* 02459 M00S02111.sfm +++|* USES CM+1, FS+4. 02460 M00S02112.sfm +++|*
| Line S02113 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 02461 M01S02113.242l642 ---|* CALLS DFM.
| Line S00169 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 02462 M01S00169.242l642 +++|* CALLS CFB, DFM. 02463 M00S02114.sfm +++|* 02464 M00S02115.sfm +++|* MACROS MONITOR. 02465 M00S02116.sfm +++| 02466 M00S02117.sfm +++| 02467 M00S02118.sfm +++| ABP ENTRY ENTRY 02468 M00S02119.sfm +++| LDD DA ISSUE MESSAGE TO DAYFILE 02469 M00S02120.sfm +++| ZJN ABP2 IF NO DAYFILE MESSAGE 02470 M00S02121.sfm +++| ABP0 RJM DFM
| Line S02122 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 02471 M01S02122.242l642 ---| AOD FS+4 SET FILE COMPLETE 02472 M01S02123.242l642 ---| LDD FA 02473 M01S02124.242l642 ---| ZJN ABP1 IF FILE NOT BUSY 02474 M01S02125.242l642 ---| NFA FA,R 02475 M01S02126.242l642 ---| ADN FSTL 02476 M01S02127.242l642 ---| CWD FS STORE FST ENTRY
| Line S00170 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 02477 M01S00170.242l642 +++| RJM CFB CLEAR FILE BUSY 02478 M00S02128.sfm +++| ABP1 MONITOR ABTM ABORT PROGRAM 02479 M00S02129.sfm +++| LJM PPR EXIT TO PP RESIDENT 02480 M00S02130.sfm +++| 02481 M00S02131.sfm +++| ABP2 LDC /MESS/ERIE * SFM INTERNAL ERROR.* 02482 M00S02132.sfm +++| UJN ABP0 ISSUE MESSAGE 02483 M00S02133.sfm +++| 02484 M00S02134.sfm +++| 02485 M00S02135.sfm +++|* DAYFILE ERROR MESSAGES. 02486 M00S02136.sfm +++| 02487 M00S02137.sfm +++| 02488 M00S02138.sfm +++| QUAL MESS 02489 M00S02139.sfm +++| ERAB DATA C* SFM ABORTED.* 02490 M00S02140.sfm +++| ERAE DATA C* SFM ARGUMENT ERROR.* 02491 M00S02141.sfm +++| ERAF DATA C* SFM FAMILY STILL ACTIVE.* 02492 M00S02142.sfm +++| ERDA DATA C* SFM DIRECT ACCESS FILE ERROR.* 02493 M00S02143.sfm +++| ERDC DATA C* SFM INCORRECT DAYFILE CODE.* 02494 M00S02144.sfm +++| ERDF DATA C* SFM DUPLICATE FILE FOUND.* 02495 M00S02145.sfm +++| EREQ DATA C* SFM INCORRECT EQUIPMENT.* 02496 M00S02146.sfm +++| ERFA DATA C* SFM LINK FAST ATTACH FILE NOT FOUND.* 02497 M00S02147.sfm +++| ERFE DATA C* SFM FILE EMPTY.* 02498 M00S02148.sfm +++| ERFF DATA C* SFM FILE NOT FOUND.* 02499 M00S02149.sfm +++| ERFN DATA C* SFM FILE NAME ERROR.* 02500 M00S02150.sfm +++| ERFT DATA C* SFM INCORRECT FILE TYPE.* 02501 M00S02151.sfm +++| ERFU DATA C* SFM FNT FULL.* 02502 M00S02152.sfm +++| ERIO DATA C* SFM I/O SEQUENCE ERROR.* 02503 M00S02153.sfm +++| ERIR DATA C* SFM INCORRECT REQUEST.* 02504 M00S02154.sfm +++| ERLE DATA C* SFM UNRECOVERABLE LINK DEVICE ERROR.* 02505 M00S02155.sfm +++| ERMS DATA C* SFM FILE NOT ON MASS STORAGE.* 02506 M00S02156.sfm +++| ERNH DATA C* SFM GLOBAL FAST ATTACH LIMIT.* 02507 M00S02157.sfm +++| ERSE DATA C* SFM SYSTEM SECTOR ERROR.* 02508 M00S02158.sfm +++| ERTE DATA C* SFM TRACK INTERLOCK ERROR.* 02509 M00S02159.sfm +++| ERUD DATA C* SFM UNABLE TO INTERLOCK DEVICE.* 02510 M00S02160.sfm +++| ERWC DATA C* SFM BML MESSAGE LENGTH ERROR.* 02511 M00S02161.sfm +++| ERIE DATA C* SFM INTERNAL ERROR.* 02512 M00S02162.sfm +++| QUAL * 02513 M00S02163.sfm +++| ERP SPACE 4,10 02514 M00S02164.sfm +++|** ERP - COMMON ERROR EXIT FROM SFM. 02515 M00S02165.sfm +++|* 02516 M00S02166.sfm +++|* ENTRY (DA) = ERROR CODE. 02517 M00S02167.sfm +++|* 02518 M00S02168.sfm +++|* USES DA, LS, CM - CM+4. 02519 M00S02169.sfm +++|* 02520 M00S02170.sfm +++|* CALLS GFE. 02521 M00S02171.sfm +++| 02522 M00S02172.sfm +++| 02523 M00S02173.sfm +++| ERP ENTRY ENTRY 02524 M00S02174.sfm +++| LDM FETL CHECK FET LENGTH 02525 M00S02175.sfm +++| ZJN ERP0 IF ONE-WORD FET 02526 M00S02176.sfm +++| RJM GFE GET FET ADDRESS 02527 M00S02177.sfm +++| ADN 1 02528 M00S02178.sfm +++| CRD CM 02529 M00S02179.sfm +++| LDD CM+1 CHECK IF EP BIT SET 02530 M00S02180.sfm +++| SHN 21-10 02531 M00S02181.sfm +++| PJN ERP1 IF EP BIT NOT SET 02532 M00S02182.sfm +++| ERP0 LDD DA SET ERROR CODE IN FET+0 02533 M00S02183.sfm +++| SHN 12 02534 M00S02184.sfm +++| RAD LS 02535 M00S02185.sfm +++| SHN -14
| Line S02186 Modification History | |
|---|---|
M01 (Removed by) | ns2357 |
Seq # *Modification Id* Act ----------------------------+ 02536 M01S02186.ns2357 ---| STM SFMB
| Line S00032 Modification History | |
|---|---|
M01 (Added by) | ns2357 |
Seq # *Modification Id* Act ----------------------------+ 02537 M01S00032.ns2357 +++| STM SFMC 02538 M00S02187.sfm +++| LJM SFMX RETURN TO USER 02539 M00S02188.sfm +++| 02540 M00S02189.sfm +++| ERP1 LDD DA CHECK ERROR TYPE 02541 M00S02190.sfm +++| LMN /ERR/DFB 02542 M00S02191.sfm +++| NJN ERP2 IF NOT DAYFILE BUSY ERROR 02543 M00S02192.sfm +++| LDN TIRR REASON CODE = TRACK INTERLOCK 02544 M00S02193.sfm +++| LJM ERS ENTER PP RECALL STACK 02545 M00S02194.sfm +++| 02546 M00S02195.sfm +++| ERP2 LDM TEMT,DA SET ERROR MESSAGE ADDRESS 02547 M00S02196.sfm +++| STD DA 02548 M00S02197.sfm +++| LJM ABP ABORT JOB 02549 M00S02198.sfm +++| SPACE 4,10 02550 M00S02199.sfm +++|** DEFINED ERROR CODES. 02551 M00S02200.sfm +++|* 02552 M00S02201.sfm +++|* EC DESCRIPTION 02553 M00S02202.sfm +++|* 1 DAYFILE BUSY. 02554 M00S02203.sfm +++|* 2 MASS STORAGE NOT AVAILABLE. 02555 M00S02204.sfm +++|* 3 FILE NOT FOUND. 02556 M00S02205.sfm +++|* 4 UNCORRECTABLE RMS ERROR. 02557 M00S02206.sfm +++|* 5 *CPD* NOT ACTIVE 02558 M00S02207.sfm +++|* 6 RETURN INFORMATION TOO LONG FOR BUFFER. 02559 M00S02208.sfm +++|* 7 LID UNKNOWN OR NOT LEGAL. 02560 M00S02209.sfm +++|* 10 INCORRECT LID ATTRIBUTES. 02561 M00S02210.sfm +++|* 11 CURRENT ATTRIBUTES NOT IN LID TABLE. 02562 M00S02211.sfm +++|* 12 LID TABLE OVERFLOW. 02563 M00S02212.sfm +++|* 13 TOO MANY HOST LIDS. 02564 M00S02213.sfm +++|* 14 INCORRECT SUBFUNCTION CODE. 02565 M00S02214.sfm +++|* 15 INCORRECT NETWORK STATUS PARAMETER. 02566 M00S02215.sfm +++|* 16 CHECK PARAMETER BLOCK ENTRIES FOR ERROR. 02567 M00S02216.sfm +++| 02568 M00S02217.sfm +++| 02569 M00S02218.sfm +++| TEMT INDEX 02570 M00S02219.sfm +++| INDEX /ERR/DFB,ERPA 02571 M00S02220.sfm +++| INDEX /ERR/TKL,ERPB 02572 M00S02221.sfm +++| INDEX /ERR/FNF,ERPC 02573 M00S02222.sfm +++| INDEX /ERR/RMS,ERPD 02574 M00S02223.sfm +++| INDEX /ERR/CNF,ERPE 02575 M00S02224.sfm +++| INDEX /ERR/LTL,ERPF 02576 M00S02225.sfm +++| INDEX /ERR/LNL,NMSG 02577 M00S02226.sfm +++| INDEX /ERR/ILA,NMSG 02578 M00S02227.sfm +++| INDEX /ERR/LOA,NMSG 02579 M00S02228.sfm +++| INDEX /ERR/LTO,NMSG 02580 M00S02229.sfm +++| INDEX /ERR/TMH,NMSG 02581 M00S02230.sfm +++| INDEX /ERR/IFC,NMSG 02582 M00S02231.sfm +++| INDEX /ERR/IST,NMSG 02583 M00S02232.sfm +++| INDEX /ERR/CPB,NMSG 02584 M00S02233.sfm +++| INDEX /ERR/MXSE 02585 M00S02234.sfm +++| 02586 M00S02235.sfm +++| 02587 M00S02236.sfm +++| ERPA DATA C* SFM - DAYFILE BUSY.* 02588 M00S02237.sfm +++| ERPB DATA C* SFM - TRACK LIMIT.* 02589 M00S02238.sfm +++| ERPC DATA C* SFM - FILE NOT FOUND.* 02590 M00S02239.sfm +++| ERPD DATA C* SFM - UNCORRECTABLE RMS ERROR.* 02591 M00S02240.sfm +++| ERPE DATA C+ *CPD* NOT ACTIVE.+ 02592 M00S02241.sfm +++| ERPF DATA C* SFM - LID TABLE TOO LONG FOR BUFFER.* 02593 M00S02242.sfm +++| 02594 M00S02243.sfm +++| NMSG EQU 0 (NO DAYFILE MESSAGE ISSUED) 02595 M00S02244.sfm +++| SPACE 4,10 02596 M00S02245.sfm +++| OVERFLOW OVLA 02597 M00S02246.sfm +++| OVERLAY (FAST ATTACH PROCESSORS.) 02598 M00S02247.sfm +++| SPACE 4 02599 M00S02248.sfm +++| EFA TITLE FUNCTION PROCESSORS 02600 M00S02249.sfm +++| CFA SPACE 4,10
| Line S02250 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02601 M01S02250.261l700 ---|*** FUNCTION *CFAF* - COUNT FAST ATTACH FILES.
| Line S00106 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02602 M01S00106.261l700 +++|*** FUNCTION *CFFF* - COUNT FAST ATTACH FILES. 02603 M00S02251.sfm +++|* 02604 M00S02252.sfm +++|* *CFA* COUNTS FAST ATTACH FILES FOR THE FAMILY OF THE CALLING 02605 M00S02253.sfm +++|* PROGRAM AND COMPARES IT TO THE DAF COUNT OF THE SAME FAMILY. 02606 M00S02254.sfm +++|* *CFA* MUST BE CALLED BY A SPECIAL SYSTEM JOB. 02607 M00S02255.sfm +++|* 02608 M00S02256.sfm +++|* ENTRY (IR+3 - IR+4) = FET FWA. 02609 M00S02257.sfm +++|* 02610 M00S02258.sfm +++|* EXIT (FET+5) = 36/ 0, 24/ C 02611 M00S02259.sfm +++|* 02612 M00S02260.sfm +++|* MACROS SFA. 02613 M00S02261.sfm +++| 02614 M00S02262.sfm +++| 02615 M00S02263.sfm +++| CFA ENTRY ENTRY 02616 M00S02264.sfm +++| LDD CP GET FAMILY NAME 02617 M00S02265.sfm +++| ADN PFCW 02618 M00S02266.sfm +++| CRD CM 02619 M00S02267.sfm +++| SFA EST,CM+3 02620 M00S02268.sfm +++| ADK EQDE 02621 M00S02269.sfm +++| CRD CM 02622 M00S02270.sfm +++| LDD CM+4 02623 M00S02271.sfm +++| SHN 3 02624 M00S02272.sfm +++| ADN PFGL 02625 M00S02273.sfm +++| CRD CM 02626 M00S02274.sfm +++| 02627 M00S02275.sfm +++|* COUNT FAST ATTACH FILES ON SPECIFIED FAMILY. 02628 M00S02276.sfm +++| 02629 M00S02277.sfm +++| LDN 0 INITIALIZE FAFT COUNT 02630 M00S02278.sfm +++| STD T1 02631 M00S02279.sfm +++| STD QA 02632 M00S02280.sfm +++| CFA1 AOD QA ADVANCE FNT ORDINAL 02633 M00S02281.sfm +++| LMD TE 02634 M00S02282.sfm +++| ZJN CFA3 IF END OF FNT 02635 M00S02283.sfm +++| SFA FNT,QA READ FNT ENTRY 02636 M00S02284.sfm +++| CRD CN 02637 M00S02285.sfm +++| ADN FSTG READ FST INFORMATION 02638 M00S02286.sfm +++| CRD T3 02639 M00S02287.sfm +++| LDD CN+4 CHECK FILE TYPE 02640 M00S02288.sfm +++| SHN -6 02641 M00S02289.sfm +++| LMN FAFT 02642 M00S02290.sfm +++| NJN CFA1 IF NOT FAFT 02643 M00S02291.sfm +++| LDD T3 02644 M00S02292.sfm +++| STD T2 SAVE EST ORDINAL 02645 M00S02293.sfm +++| SFA EST 02646 M00S02294.sfm +++| ADK EQDE 02647 M00S02295.sfm +++| CRD T3 EST WORD 02648 M00S02296.sfm +++| LDD T3+4 READ FAMILY NAME 02649 M00S02297.sfm +++| SHN 3 02650 M00S02298.sfm +++| ADN PFGL 02651 M00S02299.sfm +++| CRD T3 02652 M00S02300.sfm +++| RJM CFM COMPARE FAMILY NAMES 02653 M00S02301.sfm +++| NJN CFA1 IF NOT SAME FAMILY 02654 M00S02302.sfm +++| AOD T1 INCREMENT FAFT COUNT 02655 M00S02303.sfm +++| UJN CFA1 LOOP 02656 M00S02304.sfm +++| 02657 M00S02305.sfm +++|* GET DIRECT ACCESS FILE (DAF) COUNT FOR SPECIFIED FAMILY. 02658 M00S02306.sfm +++| 02659 M00S02307.sfm +++| CFA3 LDN ESTP GET EST POINTER 02660 M00S02308.sfm +++| CRD FN 02661 M00S02309.sfm +++| LDD FN+3 SAVE LAST MASS STORAGE ORDINAL + 1 02662 M00S02310.sfm +++| STD FN+1 02663 M00S02311.sfm +++| LDN 0 INITIALIZE DAF COUNT 02664 M00S02312.sfm +++| STD FN+3 02665 M00S02313.sfm +++| STD FN+4 02666 M00S02314.sfm +++| LDN NOPE-1 INITIALIZE EST ORDINAL FOR SEARCH 02667 M00S02315.sfm +++| STD FN 02668 M00S02316.sfm +++| CFA4 AOD FN GET NEXT EST ENTRY 02669 M00S02317.sfm +++| LMD FN+1 02670 M00S02318.sfm +++| ZJN CFA5 IF END OF MASS STORAGE EQUIPMENTS 02671 M00S02319.sfm +++| SFA EST,FN READ EST ENTRY 02672 M00S02320.sfm +++| ADK EQDE 02673 M00S02321.sfm +++| CRD CN 02674 M00S02322.sfm +++| LDD CN 02675 M00S02323.sfm +++| SHN 21-13 02676 M00S02324.sfm +++| PJN CFA4 IF NOT MS EQUIPMENT 02677 M00S02325.sfm +++| LDD CN+4 GET FAMILY NAME 02678 M00S02326.sfm +++| SHN 3 02679 M00S02327.sfm +++| ADN PFGL 02680 M00S02328.sfm +++| CRD T3 02681 M00S02329.sfm +++| RJM CFM COMPARE FAMILY NAMES 02682 M00S02330.sfm +++| NJN CFA4 IF NOT SAME FAMILY 02683 M00S02331.sfm +++| LDD CN+4 GET DAF COUNT 02684 M00S02332.sfm +++| SHN 3 02685 M00S02333.sfm +++| ADN STLL 02686 M00S02334.sfm +++| CRD CN 02687 M00S02335.sfm +++| LDD CN+3 INCREMENT DAF COUNT 02688 M00S02336.sfm +++| RAD FN+4 02689 M00S02337.sfm +++| SHN -14 02690 M00S02338.sfm +++| RAD FN+3 02691 M00S02339.sfm +++| UJN CFA4 SEARCH FOR ANOTHER FAMILY DEVICE 02692 M00S02340.sfm +++| 02693 M00S02341.sfm +++|* STORE RESULT. 02694 M00S02342.sfm +++| 02695 M00S02343.sfm +++| CFA5 LDN ZERL 02696 M00S02344.sfm +++| CRD CM 02697 M00S02345.sfm +++| LDD FN+3 02698 M00S02346.sfm +++| SHN 14 02699 M00S02347.sfm +++| ADD FN+4 02700 M00S02348.sfm +++| SBD T1 (DAF COUNT) - (FAFT COUNT) 02701 M00S02349.sfm +++| STD CM+4 02702 M00S02350.sfm +++| SHN -14 02703 M00S02351.sfm +++| STD CM+3 02704 M00S02352.sfm +++| RJM GFE WRITE FET+5 02705 M00S02353.sfm +++| ADN 5 02706 M00S02354.sfm +++| CWD CM 02707 M00S02355.sfm +++| LJM SFMX EXIT
| Line S00033 Modification History | |
|---|---|
M01 (Added by) | ns2357 |
Seq # *Modification Id* Act ----------------------------+ 02708 M01S00033.ns2357 +++| ECF SPACE 4,10 02709 M01S00034.ns2357 +++|*** FUNCTION *ECFF* - ENTER *CPD* SAMPLE FILE. 02710 M01S00035.ns2357 +++|* 02711 M01S00036.ns2357 +++|* SPECIFIED FILE MUST BE A DIRECT ACCESS FILE. 02712 M01S00037.ns2357 +++|* NO ACTION TAKEN IF SPECIFIED FILE ALREADY ENTERED. 02713 M01S00038.ns2357 +++| 02714 M01S00039.ns2357 +++| 02715 M01S00040.ns2357 +++| ECF ENTRY ENTRY 02716 M01S00041.ns2357 +++| LCN FAFT-PMFT ENABLE SEARCH FOR *PMFT* FILE 02717 M01S00042.ns2357 +++| RAM FATC 02718 M01S00043.ns2357 +++| RJM VLF VERIFY LOCAL FILE 02719 M01S00044.ns2357 +++| NJN ECF1 IF FILE UNDEFINED IN SYSTEM FNT 02720 M01S00045.ns2357 +++| LJM SFMX RETURN 02721 M01S00046.ns2357 +++| 02722 M01S00047.ns2357 +++| ECF1 RJM IFA INITIALIZE SYSTEM FNT ENTRY 02723 M01S00048.ns2357 +++| LDD QA 02724 M01S00049.ns2357 +++| STM ECFA+2 SET FNT ORDINAL FOR *CPD* CALL 02725 M01S00050.ns2357 +++| NFA FA,R 02726 M01S00051.ns2357 +++| ADN FSTL RESTORE FST INFORMATION 02727 M01S00052.ns2357 +++| CRD FS 02728 M01S00053.ns2357 +++| LDD IR+3 SET FET ADDRESS 02729 M01S00054.ns2357 +++| STM ECFA+3 02730 M01S00055.ns2357 +++| LDD IR+4 02731 M01S00056.ns2357 +++| STM ECFA+4 02732 M01S00057.ns2357 +++| RJM GFE READ LIMIT WORD 02733 M01S00058.ns2357 +++| ADN 4 02734 M01S00059.ns2357 +++| CRD CN 02735 M01S00060.ns2357 +++| LDD FA SET LOCAL FNT OFFSET 02736 M01S00061.ns2357 +++| STD CN 02737 M01S00062.ns2357 +++| RJM GFE UPDATE FET 02738 M01S00063.ns2357 +++| ADN 4 02739 M01S00064.ns2357 +++| CWD CN 02740 M01S00065.ns2357 +++| LDC ECFA ENABLE *CPD* CALL 02741 M01S00066.ns2357 +++| STM SFMF 02742 M01S00067.ns2357 +++| LJM SFMX RETURN 02743 M01S00068.ns2357 +++| 02744 M01S00069.ns2357 +++| 02745 M01S00070.ns2357 +++| ECFA VFD 18/3RCPD,6/40,12/0,24/0 02746 M00S02356.sfm +++| EFA SPACE 4,10 02747 M00S02357.sfm +++|*** FUNCTION *EFAF* - ENTER LOCAL FAST ATTACH FILE. 02748 M00S02358.sfm +++|* 02749 M00S02359.sfm +++|* SPECIFIED FILE MUST BE A DIRECT ACCESS FILE. 02750 M00S02360.sfm +++|* NO ACTION TAKEN IF SPECIFIED FILE ALREADY ENTERED. 02751 M00S02361.sfm +++| EGF SPACE 4 02752 M00S02362.sfm +++|*** FUNCTION *EGFF* - ENTER GLOBAL FAST ATTACH FILE. 02753 M00S02363.sfm +++|* 02754 M00S02364.sfm +++|* THE SPECIFIED FILE IS ENTERED INTO THE GLOBAL FAST 02755 M00S02365.sfm +++|* ATTACH STATUS IF IT RESIDES ON A SHARED DEVICE. IF THE 02756 M00S02366.sfm +++|* FILE IS NOT ON A SHARED DEVICE, THE FUNCTION IS EXACTLY 02757 M00S02367.sfm +++|* THE SAME AS FUNCTION *EFAF*, ENTER LOCAL FAST ATTACH. 02758 M00S02368.sfm +++|* 02759 M00S02369.sfm +++|* THE SPECIFIED FILE MUST BE A DIRECT ACCESS FILE. 02760 M00S02370.sfm +++| 02761 M00S02371.sfm +++| 02762 M00S02372.sfm +++| EGF ENTRY ENTRY 02763 M00S02373.sfm +++| RJM VLF VERIFY LOCAL FILE 02764 M00S02374.sfm +++| NJN EGF1 IF FAST ATTACH FILE NOT FOUND 02765 M00S02375.sfm +++| LJM SFMX EXIT 02766 M00S02376.sfm +++| 02767 M00S02377.sfm +++| EGF1 LDD ES CHECK FILE ON SHARED DEVICE 02768 M00S02378.sfm +++| SHN 21-11 02769 M00S02379.sfm +++| PJN EGF2 IF NOT SHARED DEVICE 02770 M00S02380.sfm +++| LDD IR+2 02771 M00S02381.sfm +++| LMN EFAF 02772 M00S02382.sfm +++| NJN EGF3 IF NOT LOCAL FAST ATTACH 02773 M00S02383.sfm +++| RJM SMI GET MACHINE INDEX 02774 M00S02384.sfm +++| STD MI 02775 M00S02385.sfm +++| EGF2 UJN EGF6 UPDATE SYSTEM SECTOR 02776 M00S02386.sfm +++| 02777 M00S02387.sfm +++| EGF3 SOM EGFA 02778 M00S02388.sfm +++| RJM SMP SET MMF PARAMETERS 02779 M00S02389.sfm +++| LDD ES 02780 M00S02390.sfm +++| SHN 21-4 02781 M00S02391.sfm +++| MJN EGF6 IF INDEPENDENT SHARED DEVICE 02782 M00S02392.sfm +++| LDN DATI SET *DATI* INTERLOCK 02783 M00S02393.sfm +++| RJM SFR 02784 M00S02394.sfm +++| RJM SFT SEARCH *FAT* TABLE 02785 M00S02395.sfm +++| NJN EGF4 IF ENTRY FOUND 02786 M00S02396.sfm +++| RJM EFI ENTER *FAT* TABLE ENTRY 02787 M00S02397.sfm +++| ZJN EGF5 IF HOLE USED FOR ENTRY 02788 M00S02398.sfm +++| RJM IFC INCREMENT FAST ATTACH COUNT 02789 M00S02399.sfm +++| UJN EGF5 02790 M00S02400.sfm +++| 02791 M00S02401.sfm +++| EGF4 RJM UFI UPDATE *FAT* ENTRY 02792 M00S02402.sfm +++| EGF5 LDN DATI CLEAR *DATI* INTERLOCK 02793 M00S02403.sfm +++| RJM CFI 02794 M00S02404.sfm +++| EGF6 LDD MI SET SYSTEM SECTOR ADDRESS OF WRITE FLAG 02795 M00S02405.sfm +++| STD BA 02796 M00S02406.sfm +++| SHN 2 02797 M00S02407.sfm +++| ADC UCSS 02798 M00S02408.sfm +++| RAD BA 02799 M00S02409.sfm +++| RJM IFA INITIALIZE FAST ATTACH FILE 02800 M00S02410.sfm +++| LDN 1 READ SYSTEM SECTOR 02801 M00S02411.sfm +++| RJM RFS 02802 M00S02412.sfm +++| NJN EGF8 IF SYSTEM SECTOR ERROR 02803 M00S02413.sfm +++| LDD ES 02804 M00S02414.sfm +++| LPN 20 02805 M00S02415.sfm +++| ZJN EGF7 IF NOT INDEPENDENT SHARED DEVICE 02806 M00S02416.sfm +++| LDN 4 SET MACHINE ACTIVE FLAG 02807 M00S02417.sfm +++| EGF7 ADN 1 SET LOCAL WRITE FLAG 02808 M00S02418.sfm +++|* ADN 0 (CLEAR LOCAL WRITE FLAG - GLOBAL FILE) 02809 M00S02419.sfm +++| EGFA EQU *-1 02810 M00S02420.sfm +++| STI BA 02811 M00S02421.sfm +++| LDC 4000 SET FAST ATTACH INDICATOR 02812 M00S02422.sfm +++| LMD FI 02813 M00S02423.sfm +++| STM FISS 02814 M00S02424.sfm +++| LDM CASS CLEAR CURRENT ACCESS MODE 02815 M00S02425.sfm +++| SCN 37 02816 M00S02426.sfm +++| STM CASS 02817 M00S02427.sfm +++| LDD QA SET FNT ORDINAL 02818 M00S02428.sfm +++| STM FASS 02819 M00S02429.sfm +++| LDD MA COPY FILE NAME TO SYSTEM SECTOR 02820 M00S02430.sfm +++| CWD FN 02821 M00S02431.sfm +++| CRM FNSS,ON 02822 M00S02432.sfm +++| RJM WFS REWRITE SYSTEM SECTOR 02823 M00S02433.sfm +++| EGF8 LDD FI SET *FAT* INDEX IN FNT ENTRY 02824 M00S02434.sfm +++| RAD FN+3 02825 M00S02435.sfm +++| SFA FNT,QA STORE FNT ENTRY 02826 M00S02436.sfm +++| CWD FN 02827 M00S02437.sfm +++| ADN FSTG 02828 M00S02438.sfm +++| CWD FS 02829 M00S02439.sfm +++| LJM SFMX RETURN 02830 M00S02440.sfm +++| ELF SPACE 4 02831 M00S02441.sfm +++|*** FUNCTION *ELFF* - ENTER LINK FAST ATTACH FILE. 02832 M00S02442.sfm +++|* 02833 M00S02443.sfm +++|* A SEARCH IS MADE OF THE ECS/FAT TABLE IN ORDER TO DETERMINE 02834 M00S02444.sfm +++|* IF A FILE WITH THE SPECIFIED NAME HAS ALREADY BEEN ENTERED 02835 M00S02445.sfm +++|* INTO GLOBAL FAST ATTACH STATUS. THE EST ORDINAL AND 02836 M00S02446.sfm +++|* FIRST TRACK RETURNED FROM *PFM* IN *TERW* ARE USED TO 02837 M00S02447.sfm +++|* UNIQUELY IDENTIFY THE FILE. 02838 M00S02448.sfm +++| 02839 M00S02449.sfm +++| 02840 M00S02450.sfm +++| ELF ENTRY ENTRY 02841 M00S02451.sfm +++| LDD CP SET EQUIPMENT AND FIRST TRACK 02842 M00S02452.sfm +++| ADN TERW 02843 M00S02453.sfm +++| CRD CM 02844 M00S02454.sfm +++| LDD CM+4 SET TRACK 02845 M00S02455.sfm +++| STD FS+1 02846 M00S02456.sfm +++| LDD CM+3 SET EQUIPMENT 02847 M00S02457.sfm +++| LPC 777 02848 M00S02458.sfm +++| STD FS 02849 M00S02459.sfm +++| STD T5 02850 M00S02460.sfm +++| SFA EST SET EQUIPMENT EST 02851 M00S02461.sfm +++| ADK EQDE 02852 M00S02462.sfm +++| CRD ES 02853 M00S02463.sfm +++| LDD ES CHECK FILE ON SHARED DEVICE 02854 M00S02464.sfm +++| SHN 21-11 02855 M00S02465.sfm +++| PJN ELF1 IF FILE NOT ON SHARED DEVICE 02856 M00S02466.sfm +++| RJM SMP SET MMF PARAMETERS 02857 M00S02467.sfm +++| LDD ES 02858 M00S02468.sfm +++| SHN 21-4 02859 M00S02469.sfm +++| MJN ELF4 IF INDEPENDENT SHARED DEVICE 02860 M00S02470.sfm +++| LDN DATI SET *DATI* INTERLOCK 02861 M00S02471.sfm +++| RJM SFR 02862 M00S02472.sfm +++| RJM SFT SEARCH *FAT* TABLE 02863 M00S02473.sfm +++| NJN ELF2 IF FILE FOUND 02864 M00S02474.sfm +++| ELF1 ABORT /MESS/ERFA * SFM LINK FAST ATTACH FILE NOT FOUND.* 02865 M00S02475.sfm +++| 02866 M00S02476.sfm +++| ELF2 LDD MI CHECK MACHINE ALREADY ENTERED 02867 M00S02477.sfm +++| SHN 2 OFFSET = (MI+1)*5+(BA) 02868 M00S02478.sfm +++| ADD MI 02869 M00S02479.sfm +++| ADN 5 02870 M00S02480.sfm +++| ADD BA 02871 M00S02481.sfm +++| STD T1 02872 M00S02482.sfm +++| LDI T1 02873 M00S02483.sfm +++| ZJN ELF5 IF MACHINE NOT ENTERED YET 02874 M00S02484.sfm +++| LDN DATI CLEAR *DATI* INTERLOCK 02875 M00S02485.sfm +++| RJM CFI 02876 M00S02486.sfm +++| ELF3 LJM SFMX RETURN 02877 M00S02487.sfm +++| 02878 M00S02488.sfm +++| ELF4 LDD ES+4 READ FAMILY NAME 02879 M00S02489.sfm +++| SHN 3 02880 M00S02490.sfm +++| ADN PFGL 02881 M00S02491.sfm +++| CRD CN 02882 M00S02492.sfm +++| LDD MA MOVE FILE NAME 02883 M00S02493.sfm +++| CWD FN 02884 M00S02494.sfm +++| CRD CM 02885 M00S02495.sfm +++| RJM FAT SEARCH FOR FAST ATTACH FILE 02886 M00S02496.sfm +++| NJN ELF6 IF FILE NOT FOUND 02887 M00S02497.sfm +++| UJN ELF3 RETURN 02888 M00S02498.sfm +++| 02889 M00S02499.sfm +++| ELF5 RJM UFI UPDATE *FAT* TABLE 02890 M00S02500.sfm +++| LDN DATI CLEAR *DATI* INTERLOCK 02891 M00S02501.sfm +++| RJM CFI 02892 M00S02502.sfm +++| ELF6 RJM IFA INITIALIZE FAST ATTACH FILE 02893 M00S02503.sfm +++| LDD ES 02894 M00S02504.sfm +++| LPN 20 02895 M00S02505.sfm +++| ZJN ELF7 IF NOT INDEPENDENT SHARED DEVICE 02896 M00S02506.sfm +++| RJM RFS READ SYSTEM SECTOR 02897 M00S02507.sfm +++| NJN ELF3 IF SYSTEM SECTOR ERROR 02898 M00S02508.sfm +++| LDD MI 02899 M00S02509.sfm +++| SHN 2 02900 M00S02510.sfm +++| ADD MI 02901 M00S02511.sfm +++| ADC UCSS 02902 M00S02512.sfm +++| STD T1 02903 M00S02513.sfm +++| LDN 4 SET MACHINE ACTIVE FLAG 02904 M00S02514.sfm +++| RAI T1 02905 M00S02515.sfm +++| RJM WFS REWRITE SYSTEM SECTOR 02906 M00S02516.sfm +++| ELF7 LDD FI SET *FAT* INDEX IN FNT ENTRY 02907 M00S02517.sfm +++| RAD FN+3 02908 M00S02518.sfm +++| SFA FNT,QA STORE FNT ENTRY 02909 M00S02519.sfm +++| CWD FN 02910 M00S02520.sfm +++| ADN FSTG 02911 M00S02521.sfm +++| CWD FS 02912 M00S02522.sfm +++| LDD FS SET EST ORDINAL 02913 M00S02523.sfm +++| STD CM+1 02914 M00S02524.sfm +++| LDN IUCS INCREMENT USER COUNT 02915 M00S02525.sfm +++| STD CM+3
| Line S02526 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02916 M01S02526.253l688 ---| MONITOR STBM
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02917 M01S00001.253l688 +++| MONITOR SMDM 02918 M00S02527.sfm +++| LJM SFMX 02919 M00S02528.sfm +++| DFA SPACE 4 02920 M00S02529.sfm +++|*** FUNCTION *DFAF* - DELETE FAST ATTACH FILE. 02921 M00S02530.sfm +++|* 02922 M00S02531.sfm +++|* SPECIFIED FILE MUST BE ASSIGNED TO CONTROL POINT.
| Line S00171 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Removed by) | ns2357 |
Seq # *Modification Id* Act ----------------------------+ 02923 M02S00171.ns2357 ---| RFA SPACE 4,10 02924 M02S00172.ns2357 ---|*** FUNCTION *RFAF* - RETURN FAST ATTACH FILE. 02925 M02S00173.ns2357 ---|* 02926 M02S00174.ns2357 ---|* THIS FUNCTION RETURNS A FAST ATTACH FILE WITHOUT REQUIRING 02927 M02S00175.ns2357 ---|* AN IDLE FAMILY. 02928 M00S02532.sfm +++| 02929 M00S02533.sfm +++| 02930 M00S02534.sfm +++| DFA ENTRY ENTRY 02931 M00S02535.sfm +++| RJM VLF VERIFY LOCAL FILE 02932 M00S02536.sfm +++| ZJN DFA1 IF FAST ATTACH FILE FOUND 02933 M00S02537.sfm +++| LJM SFMX 02934 M00S02538.sfm +++|
| Line S02539 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 02935 M01S02539.252l678 ---| DFA1 LDD CP CHECK FAMILY ACTIVITY COUNT
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 02936 M01S00005.252l678 +++| DFA1 LDC DFAB-4 PRESET TABLE ADDRESS 02937 M01S00006.252l678 +++| STD CM 02938 M01S00007.252l678 +++| DFA1.1 LDN 4 INCREMENT ADDRESS FOR NEXT ENTRY 02939 M01S00008.252l678 +++| RAD CM 02940 M01S00009.252l678 +++| LDM 0,CM 02941 M01S00010.252l678 +++| ZJN DFA1.2 IF END OF TABLE 02942 M01S00011.252l678 +++| LMD FN 02943 M01S00012.252l678 +++| NJN DFA1.1 IF NO FILE NAME MATCH 02944 M01S00013.252l678 +++| LDM 1,CM 02945 M01S00014.252l678 +++| LMD FN+1 02946 M01S00015.252l678 +++| NJN DFA1.1 IF NO FILE NAME MATCH 02947 M01S00016.252l678 +++| LDM 2,CM 02948 M01S00017.252l678 +++| LMD FN+2 02949 M01S00018.252l678 +++| NJN DFA1.1 IF NO FILE NAME MATCH 02950 M01S00019.252l678 +++| LDM 3,CM 02951 M01S00020.252l678 +++| LMD FN+3 02952 M01S00021.252l678 +++| SCN 77 02953 M01S00022.252l678 +++| ZJN DFA2 IF IGNORE FAMILY ACTIVITY COUNT 02954 M01S00023.252l678 +++| DFA1.2 LDD CP CHECK FAMILY ACTIVITY COUNT 02955 M00S02540.sfm +++| ADN PFCW 02956 M00S02541.sfm +++| CRD CM 02957 M00S02542.sfm +++| SFA EST,CM+3 02958 M00S02543.sfm +++| ADK EQDE 02959 M00S02544.sfm +++| CRD CM 02960 M00S02545.sfm +++| LDD CM+4 02961 M00S02546.sfm +++| SHN 3 02962 M00S02547.sfm +++| ADN DULL 02963 M00S02548.sfm +++| CRD CM 02964 M00S02549.sfm +++| LDD CM+4 02965 M00S02550.sfm +++| LPC 3777 02966 M00S02551.sfm +++| SBN 1 02967 M00S02552.sfm +++| ZJN DFA2 IF NO FAMILY ACTIVITY
| Line S00176 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Removed by) | ns2357 |
Seq # *Modification Id* Act ----------------------------+ 02968 M02S00176.ns2357 ---| LDD IR+2 02969 M02S00177.ns2357 ---| LMN RFAF 02970 M02S00178.ns2357 ---| ZJN DFA2 IF *RFAF* FUNCTION 02971 M00S02553.sfm +++| ABORT /MESS/ERAF * SFM FAMILY STILL ACTIVE.* 02972 M00S02554.sfm +++| 02973 M00S02555.sfm +++| DFA2 LDD FS+4 CLEAR FAST ATTACH INDICATOR 02974 M00S02556.sfm +++| LPC 5777 02975 M00S02557.sfm +++| STD FS+4 02976 M00S02558.sfm +++| LDC SYFT*100 SET FILE TYPE 02977 M00S02559.sfm +++| STD FN+4 02978 M00S02560.sfm +++| LDN ZERL 02979 M00S02561.sfm +++| CRD CN 02980 M00S02562.sfm +++| LDD T1 SET FNT ORDINAL 02981 M00S02563.sfm +++| STD QA 02982 M00S02564.sfm +++| SFA FNT READ FNT ENTRY 02983 M00S02565.sfm +++| CRD CM 02984 M00S02566.sfm +++| CWD FN 02985 M00S02567.sfm +++| ADN FSTG 02986 M00S02568.sfm +++| CWD CN 02987 M00S02569.sfm +++| LDD CM+3 CHECK GLOBAL FAST ATTACH 02988 M00S02570.sfm +++| LPN 77 02989 M00S02571.sfm +++| ZJN DFA3 IF NOT GLOBAL FAST ATTACH 02990 M00S02572.sfm +++| RJM SMP 02991 M00S02573.sfm +++| LDD ES 02992 M00S02574.sfm +++| SHN 21-4 02993 M00S02575.sfm +++| PJN DFA7 IF NOT INDEPENDENT SHARED DEVICE 02994 M00S02576.sfm +++| 02995 M00S02577.sfm +++|* CLEAR FST ADDRESS FROM SYSTEM SECTOR. 02996 M00S02578.sfm +++| 02997 M00S02579.sfm +++| DFA3 LDD FS RESTORE EQUIPMENT 02998 M00S02580.sfm +++| STD T5 02999 M00S02581.sfm +++| LDD FS+1 RESTORE FIRST TRACK 03000 M00S02582.sfm +++| STD T6 03001 M00S02583.sfm +++| LDN 0 READ SYSTEM SECTOR 03002 M00S02584.sfm +++| RJM RFS 03003 M00S02585.sfm +++| NJN DFA6 IF SYSTEM SECTOR ERROR 03004 M00S02586.sfm +++| LDD ES 03005 M00S02587.sfm +++| LPN 20 03006 M00S02588.sfm +++| ZJN DFA4 IF NOT SHARED DEVICE 03007 M00S02589.sfm +++| RJM SMI GET MACHINE INDEX 03008 M00S02590.sfm +++| STD MI 03009 M00S02591.sfm +++| RJM CAC 03010 M00S02592.sfm +++| ZJN DFA4 IF LAST MACHINE RELEASING FILE 03011 M00S02593.sfm +++| LDN 0 CLEAR ACCESS MODE 03012 M00S02594.sfm +++| STM CASS 03013 M00S02595.sfm +++| STI T2 CLEAR LOCAL WRITE FLAG 03014 M00S02596.sfm +++| UJN DFA5 REWRITE SYSTEM SECTOR 03015 M00S02597.sfm +++| 03016 M00S02598.sfm +++| DFA4 STM FISS 03017 M00S02599.sfm +++| DFA5 RJM WFS REWRITE SYSTEM SECTOR 03018 M00S02600.sfm +++| DFA6 LJM DFA11 DECREMENT USER COUNT 03019 M00S02601.sfm +++| 03020 M00S02602.sfm +++|* PROCESS MMF FAST ATTACH FILE. 03021 M00S02603.sfm +++| 03022 M00S02604.sfm +++| DFA7 LDN DATI SET *DATI* INTERLOCK 03023 M00S02605.sfm +++| RJM SFR 03024 M00S02606.sfm +++| RJM SFT SEARCH *FAT* TABLE 03025 M00S02607.sfm +++| NJN DFA8 IF FILE FOUND 03026 M00S02608.sfm +++| ABORT /MESS/ERFF * SFM FILE NOT FOUND.* 03027 M00S02609.sfm +++| 03028 M00S02610.sfm +++| DFA8 LDD MI SET LOCAL WORD OFFSET 03029 M00S02611.sfm +++| SHN 2 03030 M00S02612.sfm +++| ADD MI 03031 M00S02613.sfm +++| ADN 5 03032 M00S02614.sfm +++| ADD BA 03033 M00S02615.sfm +++| STM DFAA 03034 M00S02616.sfm +++| LDN ZERL DELETE LOCAL ENTRY 03035 M00S02617.sfm +++| CRM *,ON 03036 M00S02618.sfm +++| DFAA EQU *-1
| Line S02619 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 03037 M01S02619.253l688 ---| LDM 2*5,BA CHECK FOR OTHER MACHINES 03038 M01S02620.253l688 ---| ADM 3*5,BA 03039 M01S02621.253l688 ---| ADM 4*5,BA 03040 M01S02622.253l688 ---| ADM 5*5,BA
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 03041 M01S00002.253l688 +++| LDN MXMF PRESET SEARCH LOOP 03042 M01S00003.253l688 +++| STD T0 03043 M01S00004.253l688 +++| DFA8.1 SOD T0 CHECK FOR OTHER MACHINES 03044 M01S00005.253l688 +++| MJN DFA9 IF NO OTHER MACHINES ACTIVE 03045 M01S00006.253l688 +++| SHN 2 03046 M01S00007.253l688 +++| ADD T0 03047 M01S00008.253l688 +++| ADD BA 03048 M01S00009.253l688 +++| STD T1 03049 M01S00010.253l688 +++| LDM 2*5,T1 03050 M00S02623.sfm +++| NJN DFA10 IF NOT LAST MACHINE OUT
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 03051 M01S00011.253l688 +++| UJN DFA8.1 CHECK NEXT MACHINE SLOT 03052 M00S02624.sfm +++| 03053 M00S02625.sfm +++|* PROCESS LAST ENTRY REMOVED. 03054 M00S02626.sfm +++| 03055 M00S02627.sfm +++| DFA9 LDN ZERL SET TO DELETE ENTRY 03056 M00S02628.sfm +++| CRD CM
| Line S02629 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 03057 M01S02629.253l688 ---| LDD MA 03058 M01S02630.253l688 ---| CWD CM 03059 M01S02631.253l688 ---| LDD DA+1 SET *FAT* TRACK 03060 M01S02632.253l688 ---| STD T6 03061 M01S02633.253l688 ---| LDN FAST SET FIRST *FAT* SECTOR 03062 M01S02634.253l688 ---| STD T7 03063 M01S02635.253l688 ---| RJM CEA CONVERT EXTENDED MEMORY ADDRESS 03064 M01S02636.253l688 ---| LDD FI CLEAR *FAT* ENTRY 03065 M01S02637.253l688 ---| SHN 3 03066 M01S02638.253l688 ---| RAD CM+4 03067 M01S02639.253l688 ---| SHN -14 03068 M01S02640.253l688 ---| ADC WECS*1000 SET TO WRITE EXTENDED MEMORY 03069 M01S02641.253l688 ---| RAD CM+3 03070 M01S02642.253l688 ---| LDN 1-1 SET TO WRITE 1 WORD 03071 M01S02643.253l688 ---| RJM ECS WRITE EXTENDED MEMORY
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 03072 M01S00012.253l688 +++| LDN 0 CLEAR WORD ZERO OF *FAT* ENTRY 03073 M01S00013.253l688 +++| RJM WFW 03074 M00S02644.sfm +++| LDN DATI CLEAR *DATI* INTERLOCK 03075 M00S02645.sfm +++| RJM CFI 03076 M00S02646.sfm +++| LJM DFA3 UPDATE SYSTEM SECTOR AND FST 03077 M00S02647.sfm +++| 03078 M00S02648.sfm +++| DFA10 LDC LDNI CLEAR LOCAL ENTRY 03079 M00S02649.sfm +++| STM UFIA 03080 M00S02650.sfm +++| RJM UFI UPDATE *FAT* ENTRY 03081 M00S02651.sfm +++| LDN DATI CLEAR *DATI* INTERLOCK 03082 M00S02652.sfm +++| RJM CFI 03083 M00S02653.sfm +++| RJM CFE CLEAR LOCAL FNT ENTRY 03084 M00S02654.sfm +++| LDD FS DECREMENT COUNT FOR FAST ATTACH 03085 M00S02655.sfm +++| STD CM+1 03086 M00S02656.sfm +++| LDN DUCS 03087 M00S02657.sfm +++| STD CM+3
| Line S02658 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 03088 M01S02658.253l688 ---| MONITOR STBM
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 03089 M01S00014.253l688 +++| MONITOR SMDM 03090 M00S02659.sfm +++| DFA11 LDD FS DECREMENT COUNT FOR LOCAL FILE 03091 M00S02660.sfm +++| STD CM+1 SET EQUIPMENT 03092 M00S02661.sfm +++| LDN DUCS 03093 M00S02662.sfm +++| STD CM+3
| Line S02663 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 03094 M01S02663.253l688 ---| MONITOR STBM
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 03095 M01S00015.253l688 +++| MONITOR SMDM 03096 M00S02664.sfm +++| LJM SFMX
| Line S00024 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 03097 M01S00024.252l678 +++| 03098 M01S00025.252l678 +++| 03099 M01S00026.252l678 +++|* TABLE OF SYSTEM FILES FOR FAMILY ACTIVITY OVERRIDE. 03100 M01S00027.252l678 +++| 03101 M01S00028.252l678 +++| DFAB BSS 0 03102 M01S00029.252l678 +++| DATA 7L"TMFC" TMS DATABASE 03103 M01S00030.252l678 +++| CON 0 END OF TABLE 03104 M01S00031.252l678 +++| GTS SPACE 4,10 03105 M01S00032.252l678 +++|*** FUNCTION *GTSF* - GET TMS STATUS. 03106 M01S00033.252l678 +++|* 03107 M01S00034.252l678 +++|* ENTRY (IR+3 - IR+4) = PARAMETER WORD ADDRESS. 03108 M01S00035.252l678 +++|* 03109 M01S00036.252l678 +++|* EXIT (ADDRESS) = BIT 59 SET IF TMS IS ENABLED. 03110 M01S00037.252l678 +++|* BIT 58 SET IF TFM BINARIES ON SYSTEM. 03111 M01S00038.252l678 +++|* BIT 57 SET IF TMS ACTIVE ON FAMILY. 03112 M01S00039.252l678 +++|* BIT 1 SET IF DEFAULT *TO=E*. 03113 M01S00040.252l678 +++|* BIT 0 SET IF DEFAULT *TO=F*. 03114 M01S00041.252l678 +++| 03115 M01S00042.252l678 +++| 03116 M01S00043.252l678 +++| GTS ENTRY ENTRY 03117 M01S00044.252l678 +++| LDD CP GET FAMILY EST ORDINAL 03118 M01S00045.252l678 +++| ADN PFCW 03119 M01S00046.252l678 +++| CRD CM 03120 M01S00047.252l678 +++| SFA EST,CM+3 GET EST ENTRY 03121 M01S00048.252l678 +++| CRD CM 03122 M01S00049.252l678 +++| LDD CM+4 GET FAMILY NAME FROM MST 03123 M01S00050.252l678 +++| SHN 3 03124 M01S00051.252l678 +++| ADN PFGL 03125 M01S00052.252l678 +++| CRD CN 03126 M01S00053.252l678 +++| LDD MA GET TAPE CATALOG NAME 03127 M01S00054.252l678 +++| CWM GTSC,ON 03128 M01S00055.252l678 +++| LDD MA 03129 M01S00056.252l678 +++| CRD CM 03130 M01S00057.252l678 +++| RJM FAT FIND FAST ATTACH FILE 03131 M01S00058.252l678 +++| STD CM 03132 M01S00059.252l678 +++| LDN ZERL PRESET PARAMETER WORD 03133 M01S00060.252l678 +++| CRD CN 03134 M01S00061.252l678 +++| LDD CM SET FILE STATUS 03135 M01S00062.252l678 +++| LMN 1 03136 M01S00063.252l678 +++| SHN 11-0 03137 M01S00064.252l678 +++| STD CN 03138 M01S00065.252l678 +++| EXECUTE TFM,= 03139 M01S00066.252l678 +++| LDC 100+1RT SET NAME OF TMS PP PROGRAM *TFM* 03140 M01S00067.252l678 +++| STD CM+2 03141 M01S00068.252l678 +++| LDC 2RFM 03142 M01S00069.252l678 +++| STD CM+3 03143 M01S00070.252l678 +++| MONITOR SPLM SEARCH PERIPHERAL LIBRARY 03144 M01S00071.252l678 +++| LDD CM+4 CHECK IF TMS BINARIES IN SYSTEM 03145 M01S00072.252l678 +++| ADD CM+3 03146 M01S00073.252l678 +++| ZJN GTS1 IF NO BINARIES 03147 M01S00074.252l678 +++| LDC 2000 FLAG BINARIES IN SYSTEM 03148 M01S00075.252l678 +++| RAD CN 03149 M01S00076.252l678 +++| GTS1 LDN SSTL GET TMS ENABLED/DISABLED STATUS 03150 M01S00077.252l678 +++| CRD CM 03151 M01S00078.252l678 +++| LDD CM+2 03152 M01S00079.252l678 +++| LPN 1 03153 M01S00080.252l678 +++| LMN 1 03154 M01S00081.252l678 +++| SHN 13-0 03155 M01S00082.252l678 +++| RAD CN 03156 M01S00083.252l678 +++| NFA TMSN GET TMS CONTROL WORD 03157 M01S00084.252l678 +++| CRD CM 03158 M01S00085.252l678 +++| LDD CM+4 PRESET USER DEFAULTS 03159 M01S00086.252l678 +++| SHN 1-12 03160 M01S00087.252l678 +++| STD CN+4 03161 M01S00088.252l678 +++| SHN 21-13-1+12 03162 M01S00089.252l678 +++| MJN GTS3 IF DEFAULTS SET BY USER 03163 M01S00090.252l678 +++| LDD CP FETCH EJT ORDINAL 03164 M01S00091.252l678 +++| ADK TFSW 03165 M01S00092.252l678 +++| CRD CM 03166 M01S00093.252l678 +++| SFA EJT,CM CALCULATE EJT ENTRY ABSOLUTE ADDRESS 03167 M01S00094.252l678 +++| ADK SCLE GET JOB ORIGIN TYPE 03168 M01S00095.252l678 +++| CRD CM 03169 M01S00096.252l678 +++| LDD CM 03170 M01S00097.252l678 +++| LPN 17 03171 M01S00098.252l678 +++| NJN GTS2 IF NOT SYSTEM ORIGIN 03172 M01S00099.252l678 +++| AOM GTSA CHANGE SHIFT COUNTS 03173 M01S00100.252l678 +++| AOM GTSB 03174 M01S00101.252l678 +++| GTS2 LDK TFML GET TMS SYSTEM STATUS WORD 03175 M01S00102.252l678 +++| CRD CM 03176 M01S00103.252l678 +++| LDD CM+4 SET *TO=F* OR *TO=T* 03177 M01S00104.252l678 +++| GTSA SHN 0-12 03178 M01S00105.252l678 +++|* SHN 0-11 SYSTEM ORIGIN 03179 M01S00106.252l678 +++| LPN 1 03180 M01S00107.252l678 +++| STD CN+4 03181 M01S00108.252l678 +++| LDD CM+4 SET *TO=E* OR *TO=C* 03182 M01S00109.252l678 +++| GTSB SHN 1-10 03183 M01S00110.252l678 +++|* SHN 1-7 SYSTEM ORIGIN 03184 M01S00111.252l678 +++| LPN 2 03185 M01S00112.252l678 +++| RAD CN+4 03186 M01S00113.252l678 +++| GTS3 LDD CN+4 SET DEFAULT TAPE OPTIONS 03187 M01S00114.252l678 +++| LMN 3 03188 M01S00115.252l678 +++| LPN 3 03189 M01S00116.252l678 +++| STD CN+4 03190 M01S00117.252l678 +++| LDN 0 03191 M01S00118.252l678 +++| STD T1 03192 M01S00119.252l678 +++| RJM GFE WRITE REPLY WORD 03193 M01S00120.252l678 +++| CWD CN RETURN TMS STATUS 03194 M01S00121.252l678 +++| LJM DPP DROP PP 03195 M01S00122.252l678 +++| 03196 M01S00123.252l678 +++| GTSC DATA 7L"TMFC" TAPE CATALOG FILE NAME
| Line S00071 Modification History | |
|---|---|
M01 (Added by) | ns2357 |
Seq # *Modification Id* Act ----------------------------+ 03197 M01S00071.ns2357 +++| SCD SPACE 4,10 03198 M01S00072.ns2357 +++|*** FUNCTION *SCDF* - SET *CPD* DROP FLAG. 03199 M01S00073.ns2357 +++|* 03200 M01S00074.ns2357 +++|* THIS FUNCTION WILL SET THE *CPD* DROP FLAG IN CMR. AS A 03201 M01S00075.ns2357 +++|* RESULT, THE COPY OF *CPD* THAT IS RUNNING WILL TERMINATE.
| Line S00107 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 03202 M01S00107.261l700 +++|* IT WILL ALSO ASSIGN THE ACTIVE *SAMPLE* FILE (IF ONE EXISTS) 03203 M01S00108.261l700 +++|* TO THE CALLING JOB AS A LOCAL FILE.
| Line S00076 Modification History | |
|---|---|
M01 (Added by) | ns2357 |
Seq # *Modification Id* Act ----------------------------+ 03204 M01S00076.ns2357 +++| 03205 M01S00077.ns2357 +++| 03206 M01S00078.ns2357 +++| SCD ENTRY ENTRY 03207 M01S00079.ns2357 +++| 03208 M01S00080.ns2357 +++|* CHECK IF *CPD* IS ACTIVE. 03209 M01S00081.ns2357 +++| 03210 M01S00082.ns2357 +++| LDN PPCP SET PP COMMUNICATION AREA ADDRESSES 03211 M01S00083.ns2357 +++| CRD CM 03212 M01S00084.ns2357 +++| LDD CM+4 03213 M01S00085.ns2357 +++| STD DA 03214 M01S00086.ns2357 +++| LDN PPUL 03215 M01S00087.ns2357 +++| CRD CM 03216 M01S00088.ns2357 +++| LDD CM+2 03217 M01S00089.ns2357 +++| SHN 3 03218 M01S00090.ns2357 +++| ADD DA 03219 M01S00091.ns2357 +++| STD T2 03220 M01S00092.ns2357 +++| SCD1 LDD DA CHECK PP PROGRAM NAME 03221 M01S00093.ns2357 +++| CRD CM 03222 M01S00094.ns2357 +++| LDD CM+1 03223 M01S00095.ns2357 +++| SCN 77 03224 M01S00096.ns2357 +++| SHN 6 03225 M01S00097.ns2357 +++| LMD CM 03226 M01S00098.ns2357 +++| LMC 3RDCP 03227 M01S00099.ns2357 +++| ZJN SCD2 IF *CPD* FOUND 03228 M01S00100.ns2357 +++| LDN 10 03229 M01S00101.ns2357 +++| RAD DA 03230 M01S00102.ns2357 +++| LMD T2 03231 M01S00103.ns2357 +++| NJN SCD1 IF MORE PP-S TO CHECK 03232 M01S00104.ns2357 +++| STD DA 03233 M01S00105.ns2357 +++| LJM SCD4 PROCESS SAMPLE FILE 03234 M01S00106.ns2357 +++| 03235 M01S00107.ns2357 +++| SCD2 LDN 1 SET *CPD* DROP FLAG 03236 M01S00108.ns2357 +++| STD CM+1 03237 M01S00109.ns2357 +++| STD CM+2 03238 M01S00110.ns2357 +++| LDD MA 03239 M01S00111.ns2357 +++| CWM SCDA,ON 03240 M01S00112.ns2357 +++| MONITOR UADM 03241 M01S00113.ns2357 +++| SCD3 DELAY WAIT AWHILE 03242 M01S00114.ns2357 +++| PAUSE 03243 M01S00115.ns2357 +++| LDD CM+1 03244 M01S00116.ns2357 +++| NJP SFMX IF ERROR FLAG SET 03245 M01S00117.ns2357 +++| LDD DA 03246 M01S00118.ns2357 +++| CRD CM 03247 M01S00119.ns2357 +++| LDD CM+1 CHECK PP ASSIGNED 03248 M01S00120.ns2357 +++| SCN 77 03249 M01S00121.ns2357 +++| SHN 6 03250 M01S00122.ns2357 +++| LMD CM 03251 M01S00123.ns2357 +++| LMC 3RDCP 03252 M01S00124.ns2357 +++| ZJN SCD3 IF *CPD* STILL ACTIVE 03253 M01S00125.ns2357 +++| 03254 M01S00126.ns2357 +++|* PROCESS SAMPLE FILE. 03255 M01S00127.ns2357 +++| 03256 M01S00128.ns2357 +++| SCD4 LDN 0 INITIALIZE SEARCH INDEX 03257 M01S00129.ns2357 +++| STD QA 03258 M01S00130.ns2357 +++| SCD5 AOD QA ADVANCE ORDINAL 03259 M01S00131.ns2357 +++| LMD TE 03260 M01S00132.ns2357 +++| NJN SCD6 IF NOT END OF FNT 03261 M01S00133.ns2357 +++| ERROR /ERR/FNF EC = 3, * SFM FILE NOT FOUND.* 03262 M01S00134.ns2357 +++| 03263 M01S00135.ns2357 +++| SCD6 SFA FNT,QA READ FNT ENTRY 03264 M01S00136.ns2357 +++| CRD FN 03265 M01S00137.ns2357 +++| LDD FN+4 03266 M01S00138.ns2357 +++| LMC PMFT*100 03267 M01S00139.ns2357 +++| NJN SCD5 IF INCORRECT TYPE 03268 M01S00140.ns2357 +++| 03269 M01S00141.ns2357 +++|* CREATE LOCAL FILE. 03270 M01S00142.ns2357 +++| 03271 M01S00143.ns2357 +++| RJM EFN ENTER FILE NAME 03272 M01S00144.ns2357 +++| LDN ZERL 03273 M01S00145.ns2357 +++| CRD CN 03274 M01S00146.ns2357 +++| LDD MA 03275 M01S00147.ns2357 +++| CWD FN 03276 M01S00148.ns2357 +++| CRD CM 03277 M01S00149.ns2357 +++| LDD CM+3 CLEAR MODE FLAGS 03278 M01S00150.ns2357 +++| SCN 77 03279 M01S00151.ns2357 +++| STD CM+3 03280 M01S00152.ns2357 +++| LDC SYFT*100 SET FILE TYPE 03281 M01S00153.ns2357 +++| STD CM+4 03282 M01S00154.ns2357 +++| SFA FNT,QA 03283 M01S00155.ns2357 +++| CRD FN 03284 M01S00156.ns2357 +++| CWD CM RESTORE SYSTEM FNT SLOT 03285 M01S00157.ns2357 +++| ADN FSTG 03286 M01S00158.ns2357 +++| CRD FS 03287 M01S00159.ns2357 +++| CWD CN 03288 M01S00160.ns2357 +++| NFA FA,R STORE FILE TYPE IN LOCAL FNT 03289 M01S00161.ns2357 +++| CWD FN 03290 M01S00162.ns2357 +++| SOD FS+4 SET FILE BUSY 03291 M01S00163.ns2357 +++| LDD DA 03292 M01S00164.ns2357 +++| NJP SFMX IF *CPD* FOUND 03293 M01S00165.ns2357 +++| ERROR /ERR/CNF EC=5, * CPD NOT ACTIVE.* 03294 M01S00166.ns2357 +++| 03295 M01S00167.ns2357 +++| 03296 M01S00168.ns2357 +++| SCDA CON LIOS INCREMENT LOW CORE FIELD BY ONE 03297 M01S00169.ns2357 +++| CON INWL WORD ADDRES 03298 M01S00170.ns2357 +++| CON 2*100+1 BIT ADDRESS/FIELD WIDTH 03299 M01S00171.ns2357 +++| CON 0 03300 M01S00172.ns2357 +++| CON 0 03301 M00S02665.sfm +++| CAC SPACE 4,10 03302 M00S02666.sfm +++|** CAC - CHECK ACTIVITY COUNTS. 03303 M00S02667.sfm +++|* 03304 M00S02668.sfm +++|* ENTRY (BFMS) = SYSTEM SECTOR. 03305 M00S02669.sfm +++|* (MI) = MACHINE INDEX. 03306 M00S02670.sfm +++|* 03307 M00S02671.sfm +++|* EXIT (A) = 0 IF LAST MACHINE TO DELETE FILE. 03308 M00S02672.sfm +++|* (T2) = *UCSS* OFFSET FOR THIS MACHINE. 03309 M00S02673.sfm +++|* 03310 M00S02674.sfm +++|* USES CM, T2. 03311 M00S02675.sfm +++| 03312 M00S02676.sfm +++| 03313 M00S02677.sfm +++| CAC SUBR ENTRY/EXIT 03314 M00S02678.sfm +++| LDD MI 03315 M00S02679.sfm +++| SHN 2 03316 M00S02680.sfm +++| ADD MI 03317 M00S02681.sfm +++| ADC UCSS 03318 M00S02682.sfm +++| STD T2 03319 M00S02683.sfm +++| LDI T2 CLEAR MACHINE ACTIVE FLAG 03320 M00S02684.sfm +++| SCN 4 03321 M00S02685.sfm +++| STI T2 03322 M00S02686.sfm +++| LDN 0 03323 M00S02687.sfm +++| STD CM 03324 M00S02688.sfm +++| CAC1 LDM UCSS+5,CM CHECK FOR OTHER MACHINES ACTIVE 03325 M00S02689.sfm +++| LPN 4 03326 M00S02690.sfm +++| NJN CACX IF MACHINE ACTIVE 03327 M00S02691.sfm +++| LDN 5 03328 M00S02692.sfm +++| RAD CM ADVANCE TO NEXT MACHINE 03329 M00S02693.sfm +++| ADC -MISD*5 03330 M00S02694.sfm +++| NJN CAC1 IF NOT ALL MACHINES CHECKED 03331 M00S02695.sfm +++| LDM CASS SET CURRENT ACCESS TO WRITE 03332 M00S02696.sfm +++| SCN 20 03333 M00S02697.sfm +++| LMN 20 03334 M00S02698.sfm +++| STM CASS 03335 M00S02699.sfm +++| LDN 0 03336 M00S02700.sfm +++| UJN CACX RETURN 03337 M00S02701.sfm +++| TITLE SUBROUTINES. 03338 M00S02702.sfm +++| CFE SPACE 4,10 03339 M00S02703.sfm +++|** CFE - CLEAR LOCAL FNT ENTRY. 03340 M00S02704.sfm +++|* 03341 M00S02705.sfm +++|* ENTRY (FA) = INDEX OF FNT ENTRY. 03342 M00S02706.sfm +++|* 03343 M00S02707.sfm +++|* EXIT (A) = (FA) = 0. 03344 M00S02708.sfm +++|* 03345 M00S02709.sfm +++|* USES CM - CM+4. 03346 M00S02710.sfm +++|* 03347 M00S02711.sfm +++|* MACROS MONITOR. 03348 M00S02712.sfm +++| 03349 M00S02713.sfm +++| 03350 M00S02714.sfm +++| CFE SUBR ENTRY/EXIT 03351 M00S02715.sfm +++| LDN ZERL 03352 M00S02716.sfm +++| CRD CM 03353 M00S02717.sfm +++| LDD FA 03354 M00S02718.sfm +++| ZJN CFEX IF NO LOCAL FILE 03355 M00S02719.sfm +++| STD CM+4 03356 M00S02720.sfm +++| LDN DLFS DELETE LOCAL FNT ENTRY 03357 M00S02721.sfm +++| STD CM+1 03358 M00S02722.sfm +++| MONITOR PLFM 03359 M00S02723.sfm +++|* LDN 0 CLEAR FNT INDEX 03360 M00S02724.sfm +++| STD FA 03361 M00S02725.sfm +++| UJN CFEX RETURN 03362 M00S02726.sfm +++| CFI SPACE 4,10 03363 M00S02727.sfm +++|** CFI - CLEAR FLAG REGISTER INTERLOCK. 03364 M00S02728.sfm +++|* 03365 M00S02729.sfm +++|* ENTRY (A) = INTERLOCK TO CLEAR. (*DATI* OR *FATI*) 03366 M00S02730.sfm +++|* 03367 M00S02731.sfm +++|* EXIT (A) = (ABTB). 03368 M00S02732.sfm +++|* INTERLOCK CLEARED. 03369 M00S02733.sfm +++|* 03370 M00S02734.sfm +++|* USES CM - CM+4. 03371 M00S02735.sfm +++| 03372 M00S02736.sfm +++| 03373 M00S02737.sfm +++| CFI SUBR ENTRY/EXIT 03374 M00S02738.sfm +++| SHN 6 03375 M00S02739.sfm +++| STD CM+1 03376 M00S02740.sfm +++| LDN CFRS CLEAR FLAG REGISTER BITS 03377 M00S02741.sfm +++| SHN 11 03378 M00S02742.sfm +++| STD CM+3 03379 M00S02743.sfm +++| MONITOR ECSM 03380 M00S02744.sfm +++| SOM ABTB CLEAR INTERLOCK HELD 03381 M00S02745.sfm +++| UJN CFIX RETURN 03382 M00S02746.sfm +++| CFM SPACE 4,10 03383 M00S02747.sfm +++|** CFM - COMPARE FAMILY NAMES. 03384 M00S02748.sfm +++|* 03385 M00S02749.sfm +++|* ENTRY (T3 - T7) = FAMILY NAME A. 03386 M00S02750.sfm +++|* (CM - CM+4) = FAMILY NAME B. 03387 M00S02751.sfm +++|* 03388 M00S02752.sfm +++|* EXIT (A) = 0, IF SAME FAMILY NAME. 03389 M00S02753.sfm +++| 03390 M00S02754.sfm +++| 03391 M00S02755.sfm +++| CFM SUBR ENTRY/EXIT 03392 M00S02756.sfm +++| LDD CM 03393 M00S02757.sfm +++| LMD T3 03394 M00S02758.sfm +++| NJN CFMX IF NOT SAME FAMILY 03395 M00S02759.sfm +++| LDD CM+1 03396 M00S02760.sfm +++| LMD T3+1 03397 M00S02761.sfm +++| NJN CFMX IF NOT SAME FAMILY 03398 M00S02762.sfm +++| LDD CM+2 03399 M00S02763.sfm +++| LMD T3+2 03400 M00S02764.sfm +++| NJN CFMX IF NOT SAME FAMILY 03401 M00S02765.sfm +++| LDD CM+3 03402 M00S02766.sfm +++| LMD T3+3 03403 M00S02767.sfm +++| SHN -6 03404 M00S02768.sfm +++| UJN CFMX RETURN 03405 M00S02769.sfm +++| ECS SPACE 4 03406 M00S02770.sfm +++|** EXTENDED MEMORY - READ/WRITE EXTENDED MEMORY. 03407 M00S02771.sfm +++|* 03408 M00S02772.sfm +++|* ENTRY (A) = NUMBER OF WORDS*100. 03409 M00S02773.sfm +++|* (CM+3 - CM+4) SET UP FOR *ECSM*. 03410 M00S02774.sfm +++|* 03411 M00S02775.sfm +++|* EXIT TO *ABT* IF UNRECOVERED ERROR. 03412 M00S02776.sfm +++|* 03413 M00S02777.sfm +++|* USES CM - CM+4. 03414 M00S02778.sfm +++|* MESSAGE BUFFER IS USED FOR CM BUFFER. 03415 M00S02779.sfm +++| 03416 M00S02780.sfm +++| 03417 M00S02781.sfm +++| ECS SUBR ENTRY/EXIT 03418 M00S02782.sfm +++| STD CM+1 SET WORDS TO READ/WRITE 03419 M00S02783.sfm +++| LDD MA SET BUFFER ADDRESS 03420 M00S02784.sfm +++| STD CM+2 03421 M00S02785.sfm +++| MONITOR ECSM READ/WRITE EXTENDED MEMORY 03422 M00S02786.sfm +++| LDD CM+1 03423 M00S02787.sfm +++| ZJN ECSX IF NO ERROR 03424 M00S02788.sfm +++| ABORT /MESS/ERLE * SFM UNRECOVERED LINK DEVICE ERROR.* 03425 M00S02789.sfm +++| EFI SPACE 4,20 03426 M00S02790.sfm +++|** EFI - ENTER *FAT* ITEM. 03427 M00S02791.sfm +++|* 03428 M00S02792.sfm +++|* ENTRY (FN - FN+3) = FAST ATTACH FILE NAME. 03429 M00S02793.sfm +++|* (FS - FS+4) = FILE FST ENTRY. 03430 M00S02794.sfm +++|* (ES - ES+4) = FILE EST ENTRY. 03431 M00S02795.sfm +++|* (FC) = *FAT* TABLE COUNT. 03432 M00S02796.sfm +++|* (FI) = *FAT* TABLE INDEX OF HOLE 03433 M00S02797.sfm +++|* (ID) = MACHINE ID 03434 M00S02798.sfm +++|* (MI) = MACHINE INDEX 03435 M00S02799.sfm +++|* 03436 M00S02800.sfm +++|* EXIT (A) .EQ. 0 IF HOLD USED FOR ENTRY. 03437 M00S02801.sfm +++|* (A) .NE. 0 IF NEW ENTRY CREATED AT END OF TABLE. 03438 M00S02802.sfm +++|* TO *ABT* IF *FAT* SPACE NOT AVAILABLE. 03439 M00S02803.sfm +++|* 03440 M00S02804.sfm +++|* USES CM - CM+4, T1, T6, T7. 03441 M00S02805.sfm +++|* MESSAGE BUFFER USED FOR CM/ECS BUFFER. 03442 M00S02806.sfm +++|* 03443 M00S02807.sfm +++|* CALLS CEA, ECS. 03444 M00S02808.sfm +++| 03445 M00S02809.sfm +++| 03446 M00S02810.sfm +++| EFI SUBR ENTRY/EXIT 03447 M00S02811.sfm +++| LDD FI 03448 M00S02812.sfm +++| NJN EFI1 IF HOLE AVAILABLE 03449 M00S02813.sfm +++| AOM EFIA SET NEW ENTRY CREATED
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 03450 M01S00016.253l688 +++| LDN 20 SET AVAILABLE ENTRY COUNT 03451 M01S00017.253l688 +++| EFIB SHN 0 03452 M01S00018.253l688 +++| SBK FAST 03453 M01S00019.253l688 +++| SHN 6-FATS 03454 M01S00020.253l688 +++| STD T1 03455 M00S02814.sfm +++| LDD FC 03456 M00S02815.sfm +++| STD FI
| Line S02816 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 03457 M01S02816.253l688 ---| SCN 77 03458 M01S02817.253l688 ---| ZJN EFI1 IF SPACE AVAILABLE
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 03459 M01S00021.253l688 +++| SBD T1 03460 M01S00022.253l688 +++| MJN EFI1 IF SPACE AVAILABLE 03461 M00S02818.sfm +++| ABORT /MESS/ERNH * SFM GLOBAL FAST ATTACH LIMIT.* 03462 M00S02819.sfm +++|
| Line S02820 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 03463 M01S02820.253l688 ---|* SET WORDS 1 - 6 OF *FAT* ENTRY IN MESSAGE BUFFER.
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 03464 M01S00023.253l688 +++|* SET *FAT* WORDS IN EXTENDED MEMORY. 03465 M00S02821.sfm +++| 03466 M00S02822.sfm +++| EFI1 LDN ZERL SET FIRST TRACK AND USER COUNTS 03467 M00S02823.sfm +++| CRD CM 03468 M00S02824.sfm +++| LDD FS+1 03469 M00S02825.sfm +++| STD CM+1
| Line S02826 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 03470 M01S02826.253l688 ---| LDD MA 03471 M01S02827.253l688 ---| STD T1 03472 M01S02828.253l688 ---| CWD CM 03473 M01S02829.253l688 ---| LDN 0 SET LOCAL AREAS 03474 M01S02830.253l688 ---| STD CM+1 03475 M01S02831.253l688 ---| AOD T1 LOCAL AREA 1 03476 M01S02832.253l688 ---| CWD CM 03477 M01S02833.253l688 ---| AOD T1 LOCAL AREA 2 03478 M01S02834.253l688 ---| CWD CM 03479 M01S02835.253l688 ---| AOD T1 LOCAL AREA 3 03480 M01S02836.253l688 ---| CWD CM
Proceed to Part 2
cdc/nos2.source/opl.opl871/deck/sfm.001.txt · Last modified: by 127.0.0.1