Seq # *Modification Id* Act
----------------------------+
03675 M01S00047.282l826 +++| LDD CP CHECK PP ASSIGNMENT
03676 M00S03443.tfm +++| ADN JCIW
03677 M00S03444.tfm +++| CRD CM
03678 M00S03445.tfm +++| LDD CM+2
03679 M00S03446.tfm +++| LMC MTSI
03680 M00S03447.tfm +++| ZJP IME6 IF *MAGNET* CONTROL POINT
03681 M00S03448.tfm +++| IEM2 LDI HB CHECK FOR CP DAYFILE MESSAGE
03682 M00S03449.tfm +++| SHN 21-0
03683 M00S03450.tfm +++| PJN IEM3 IF NOT FOR CONTROL POINT DAYFILE
03684 M00S03451.tfm +++| LDN CPON/10000
03685 M00S03452.tfm +++| RJM IDM ISSUE DAYFILE MESSAGE
03686 M00S03453.tfm +++| IEM3 LDI HB CHECK FOR SYSTEM DAYFILE MESSAGE
03687 M00S03454.tfm +++| SHN 21-1
03688 M00S03455.tfm +++| PJN IEM4 IF NOT FOR SYSTEM DAYFILE
03689 M00S03456.tfm +++| LDN 0
03690 M00S03457.tfm +++| RJM IDM ISSUE DAYFILE MESSAGE
03691 M00S03458.tfm +++| IEM4 LDI HB CHECK FOR ERROR LOG MESSAGE
03692 M00S03459.tfm +++| SHN 21-2
03693 M00S03460.tfm +++| PJN IEM5 IF NOT FOR ERROR LOG
03694 M00S03461.tfm +++| LDN ERLN/10000
03695 M00S03462.tfm +++| RJM IDM ISSUE DAYFILE MESSAGE
03696 M00S03463.tfm +++| IEM5 LDI HB CHECK FOR ACCOUNT DAYFILE MESSAGE
03697 M00S03464.tfm +++| SHN 21-3
03698 M00S03465.tfm +++| PJN IME6 IF NOT FOR ACCOUNT DAYFILE
03699 M00S03466.tfm +++| LDN ACFN/10000
03700 M00S03467.tfm +++| RJM IDM ISSUE DAYFILE MESSAGE
03701 M00S03468.tfm +++| IME6 LDI HB CHECK FOR CATALOG BUFFER MESSAGE
03702 M00S03469.tfm +++| SHN 21-5
03703 M00S03470.tfm +++| PJP IEMX IF NOT FOR CATALOG BUFFER
03704 M00S03471.tfm +++| LDD FO
03705 M00S03472.tfm +++| RJM AFA GET ABSOLUTE FST ADDRESS
03706 M00S03473.tfm +++| CRD T5
03707 M00S03474.tfm +++| SBN 1
03708 M00S03475.tfm +++| CRD FN
03709 M00S03476.tfm +++| LDD T5 SET ABSOLUTE TRACK/SECTOR
03710 M00S03477.tfm +++| LPC 777
03711 M00S03478.tfm +++| STD T5
03712 M00S03479.tfm +++| LDN 1
03713 M00S03480.tfm +++| STD T7
03714 M00S03481.tfm +++| LDC BUF0 SET BUFFER ADDRESS/POINTER
03715 M00S03482.tfm +++| STD BA
03716 M00S03483.tfm +++| ADN 2
03717 M00S03484.tfm +++| STD BP
Line S03485 Modification History
M01 (Removed by) t5472
Seq # *Modification Id* Act
----------------------------+
03718 M01S03485.t5472 ---| SETMS WRITE
Line S00004 Modification History
M01 (Added by) t5472
M02 (Removed by) t5679
Seq # *Modification Id* Act
----------------------------+
03719 M02S00004.t5679 ---| SETMS IO
Line S00002 Modification History
M01 (Added by) t5679
Seq # *Modification Id* Act
----------------------------+
03720 M01S00002.t5679 +++| SETMS IO,RW
03721 M00S03486.tfm +++| LDD BA
03722 M00S03487.tfm +++| RJM RDS READ SECTOR
Line S00005 Modification History
M01 (Added by) t5472
Seq # *Modification Id* Act
----------------------------+
03723 M01S00005.t5472 +++| MJN IME8 IF MASS STORAGE ERROR OCCURRED
03724 M00S03488.tfm +++| LDM CWFE,BA
03725 M00S03489.tfm +++| RJM MBP MOVE BUFFER POINTER
03726 M00S03490.tfm +++| LDM SBST+1,BP SET ERROR, SUSPEND ACTIVITY FLAGS
03727 M00S03491.tfm +++| SCN FETS
03728 M00S03492.tfm +++| LMN FETS
03729 M00S03493.tfm +++| STM SBST+1,BP
03730 M00S03494.tfm +++| LDN TMMB
03731 M00S03495.tfm +++| RJM MBP MOVE BUFFER POINTER
03732 M00S03496.tfm +++| MMOVE MBUF,,,BP,MBML*10D
03733 M00S03497.tfm +++| LDD BA
03734 M00S03498.tfm +++| RJM WDS WRITE SECTOR
Line S00006 Modification History
M01 (Added by) t5472
Seq # *Modification Id* Act
----------------------------+
03735 M01S00006.t5472 +++| MJN IME8 IF MASS STORAGE ERROR OCCURRED
Line S03499 Modification History
M01 (Removed by) t5472
Seq # *Modification Id* Act
----------------------------+
03736 M01S03499.t5472 ---| ENDMS
Line S00007 Modification History
M01 (Added by) t5472
Seq # *Modification Id* Act
----------------------------+
03737 M01S00007.t5472 +++| IME7 ENDMS RELEASE CHANNEL
03738 M00S03500.tfm +++| LJM IEMX RETURN
03739 M00S03501.tfm +++|
Line S00008 Modification History
M01 (Added by) t5472
Seq # *Modification Id* Act
----------------------------+
03740 M01S00008.t5472 +++| IME8 RJM ISM ISSUE SYSTEM CONTROL POINT MESSAGE
03741 M01S00009.t5472 +++| UJN IME7 EXIT
Line S00010 Modification History
M01 (Added by) t5472
M02 (Removed by) 282l826
Seq # *Modification Id* Act
----------------------------+
03742 M02S00010.282l826 ---|
Line S03502 Modification History
M01 (Removed by) nos252
M02 (Removed by) 282l826
Seq # *Modification Id* Act
----------------------------+
03743 M02S03502.282l826 ---| IEMA DATA 10H$ CHECK
Line S00039 Modification History
M01 (Added by) nos252
M02 (Removed by) 282l826
Seq # *Modification Id* Act
----------------------------+
03744 M02S00039.282l826 ---| IEMA DATA C+$CHECK *TMSDIS,PRE.*+
03745 M02S00040.282l826 ---| ERRNG 3*5-*+IEMA MESSAGE TOO LONG
03746 M00S03503.tfm +++| IOE SPACE 4,20
03747 M00S03504.tfm +++|** IOE - INFORM OPERATOR OF ERROR.
03748 M00S03505.tfm +++|*
Line S03506 Modification History
M01 (Removed by) nos252
Seq # *Modification Id* Act
----------------------------+
03749 M01S03506.nos252 ---|* ENTRY (EC) = ERROR CODE.
03750 M01S03507.nos252 ---|*
03751 M01S03508.nos252 ---|* EXIT (A) = 0 IF MESSAGE SENT TO *A,OPERATOR* DISPLAY.
03752 M01S03509.nos252 ---|* .NE. 0 IF DISPLAY IS INTERLOCKED.
03753 M01S03510.nos252 ---|* THE MESSAGE ISSUED FOR NO SCRATCH TAPES IS -
03754 M01S03511.nos252 ---|*
03755 M01S03512.nos252 ---|* ENTER *LDISTAP,FAM.* NO SCRATCH TAPES
03756 M01S03513.nos252 ---|*
03757 M01S03514.nos252 ---|* OTHERWISE THE MESSAGE IS -
03758 M01S03515.nos252 ---|*
03759 M01S03516.nos252 ---|* ENTER *LDISTAP,FAM.* TMS CATALOG ERROR
03760 M01S03517.nos252 ---|*
03761 M01S03518.nos252 ---|* USES T1, CM - CM+4.
Line S00041 Modification History
M01 (Added by) nos252
Seq # *Modification Id* Act
----------------------------+
03762 M01S00041.nos252 +++|* EXIT (A) = 0 IF TAPE CATALOG ERROR EVENT ISSUED.
03763 M01S00042.nos252 +++|* .NE. 0 IF UNABLE TO ISSUE EVENT.
03764 M01S00043.nos252 +++|* *CHECK TMSDIS,FAM* MESSAGE IN A,OPERATOR IF
03765 M01S00044.nos252 +++|* EVENT IS ISSUED.
03766 M01S00045.nos252 +++|*
03767 M01S00046.nos252 +++|* USES CM - CM+4.
03768 M00S03519.tfm +++|*
03769 M00S03520.tfm +++|* MACROS MONITOR.
03770 M00S03521.tfm +++|
03771 M00S03522.tfm +++|
03772 M00S03523.tfm +++| IOE SUBR ENTRY/EXIT
Line S03524 Modification History
M01 (Removed by) nos252
Seq # *Modification Id* Act
----------------------------+
03773 M01S03524.nos252 ---| LDC LDSP GET OPERATOR DISPLAY BUFFER ADDRESS
03774 M01S03525.nos252 ---| CRD CM
03775 M01S03526.nos252 ---| LDD CM+2
03776 M01S03527.nos252 ---| SHN 14
03777 M01S03528.nos252 ---| LMD CM+3
03778 M01S03529.nos252 ---| SBN LODS
03779 M01S03530.nos252 ---| STD CM+4
03780 M01S03531.nos252 ---| STM IOEA+1
03781 M01S03532.nos252 ---| SHN -14
03782 M01S03533.nos252 ---| STD CM+3
03783 M01S03534.nos252 ---| LMC LDCI
03784 M01S03535.nos252 ---| STM IOEA
03785 M01S03536.nos252 ---| LDN 0 FLAG SET INTERLOCK
03786 M01S03537.nos252 ---| STD CM+1
03787 M01S03538.nos252 ---| STD CM+2
03788 M01S03539.nos252 ---| MONITOR UTEM UPDATE TABLE
03789 M01S03540.nos252 ---| LDD CM+1
03790 M01S03541.nos252 ---| NJP IOEX IF INTERLOCK NOT ACCEPTED
03791 M01S03542.nos252 ---| LDD EC CHECK ERROR TYPE
03792 M01S03543.nos252 ---| SBN /EMSG/WSA
03793 M01S03544.nos252 ---| ZJN IOE1 IF NO SCRATCH
03794 M01S03545.nos252 ---| LDN IOEE-IOED
03795 M01S03546.nos252 ---| IOE1 ADC IOED
03796 M01S03547.nos252 ---| STM IOEB
03797 M01S03548.nos252 ---| LDN 2
03798 M01S03549.nos252 ---| STD T1
03799 M01S03550.nos252 ---| IOEA LDC ** SET JSN AND START OF MESSAGE IN BUFFER
03800 M01S03551.nos252 ---| CWM IOEC,TR
03801 M01S03552.nos252 ---| CWM IOED,T1 SET NO SCRATCH MESSAGE IN BUFFER
03802 M01S03553.nos252 ---|* CWM IOEE,T1 (SET CATALOG ERROR MESSAGE IN BUFFER)
03803 M01S03554.nos252 ---| IOEB EQU *-1
03804 M01S03555.nos252 ---| LDC OPRL SET OPERATOR DISPLAY FLAG
03805 M01S03556.nos252 ---| STD CM+4
03806 M01S03557.nos252 ---| LDN 1
03807 M01S03558.nos252 ---| STD CM+1
03808 M01S03559.nos252 ---| LDN 0
03809 M01S03560.nos252 ---| STD CM+2
03810 M01S03561.nos252 ---| STD CM+3
03811 M01S03562.nos252 ---| LDD MA
03812 M01S03563.nos252 ---| CWM IOEF,ON
03813 M01S03564.nos252 ---| MONITOR UTEM UPDATE TABLE
03814 M01S03565.nos252 ---| LDN 0
03815 M01S03566.nos252 ---| LJM IOEX RETURN
03816 M01S03567.nos252 ---|
03817 M01S03568.nos252 ---| IOEC BSS 0
03818 M01S03569.nos252 ---| VFD 24/4HSYS ,35/0,1/1 DUMMY JOB SEQUENCE NUMBER
03819 M01S03570.nos252 ---| DATA 20HENTER *LDISTAP,FAM.* FIRST PART OF MESSAGE
03820 M01S03571.nos252 ---| IOED DATA 18L NO SCRATCH TAPES MESSAGE FOR NO SCRATCH
03821 M01S03572.nos252 ---| CON 0
03822 M01S03573.nos252 ---| IOEE DATA 18L TMS CATALOG ERROR MESSAGE FOR CATALOG ERROR
03823 M01S03574.nos252 ---| CON 0
03824 M01S03575.nos252 ---| IOEF VFD 1/0,5/0,6/1,6/59D,42/1 SET OPERATOR DISPLAY
Line S00047 Modification History
M01 (Added by) nos252
Seq # *Modification Id* Act
----------------------------+
03825 M01S00047.nos252 +++| LDN ZERL BUILD EVENT
03826 M01S00048.nos252 +++| CRD CM
03827 M01S00049.nos252 +++| LDN /EVT/TCSE
03828 M01S00050.nos252 +++| STD CM+4
03829 M01S00051.nos252 +++| MONITOR EATM ISSUE EVENT
03830 M01S00052.nos252 +++| LDD CM+0
03831 M01S00053.nos252 +++| UJN IOEX RETURN
Line S00011 Modification History
M01 (Added by) t5472
Seq # *Modification Id* Act
----------------------------+
03832 M01S00011.t5472 +++| ISM SPACE 4,10
03833 M01S00012.t5472 +++|** ISM - ISSUE MESSAGE TO SYSTEM CONTROL POINT.
03834 M01S00013.t5472 +++|*
03835 M01S00014.t5472 +++|* ENTRY (EC) = ERROR CODE.
03836 M01S00015.t5472 +++|*
03837 M01S00016.t5472 +++|* EXIT MESSAGE POSTED ON LINE 2 OF B DISPLAY FOR
03838 M01S00017.t5472 +++|* SYSTEM CONTROL POINT. *GO,SYS.* REQUIRED TO CLEAR IT.
03839 M01S00018.t5472 +++|*
03840 M01S00019.t5472 +++|* USES CM - CM+4.
03841 M01S00020.t5472 +++|
03842 M01S00021.t5472 +++|
03843 M01S00022.t5472 +++| ISM SUBR ENTRY/EXIT
03844 M01S00023.t5472 +++| LDD EC
03845 M01S00024.t5472 +++| RJM C2D
03846 M01S00025.t5472 +++| STM ISMA+4
03847 M01S00026.t5472 +++| LDK ISMA+7
03848 M01S00027.t5472 +++| STD AP
03849 M01S00028.t5472 +++| LDN 0
03850 M01S00029.t5472 +++| STD HB
03851 M01S00030.t5472 +++| RJM FMM INSERT FAMILY NAME IN MSG
03852 M01S00031.t5472 +++| LDD HB RE-DIRECT MESSAGE POINTER
03853 M01S00032.t5472 +++| SBN 1
03854 M01S00033.t5472 +++| RAD AP
03855 M01S00034.t5472 +++| LDD HB TERMINATE MESSAGE WITH *.*
03856 M01S00035.t5472 +++| ZJN ISM1 IF SPACE IN LOWER 6 BITS
03857 M01S00036.t5472 +++| LDC 1R.*100-1R *100-1R.+1R
03858 M01S00037.t5472 +++| ISM1 ADN 1R.-1R
03859 M01S00038.t5472 +++| RAI AP
03860 M01S00039.t5472 +++| LDK NCPL
03861 M01S00040.t5472 +++| CRD CM
03862 M01S00041.t5472 +++| LDD CM+1
03863 M01S00042.t5472 +++| ADN 1
03864 M01S00043.t5472 +++| SHN 7
03865 M01S00044.t5472 +++| ADK MS2W MESSAGE 2 AREA FOR SYSTEM CONTROL POINT
03866 M01S00045.t5472 +++| CWM ISMA,TR
03867 M01S00046.t5472 +++| UJN ISMX RETURN
03868 M01S00047.t5472 +++|
03869 M01S00048.t5472 +++| ISMA DATA C* TMS ERRXX ON FAM.*
03870 M01S00049.t5472 +++| BSSZ 3 SPACE FOR 7 CHARACTER FAMILY NAMES
03871 M00S03576.tfm +++| LFM SPACE 4,10
03872 M00S03577.tfm +++|** LFM - BUILD LOCAL FILE NAME MESSAGE.
03873 M00S03578.tfm +++|*
03874 M00S03579.tfm +++|* SETS THE LOCAL FILE NAME IN THE MESSAGE.
03875 M00S03580.tfm +++|*
03876 M00S03581.tfm +++|* ENTRY (FN - FN+3) = LOCAL FILE NAME.
03877 M00S03582.tfm +++|*
03878 M00S03583.tfm +++|* CALLS MVM.
03879 M00S03584.tfm +++|
03880 M00S03585.tfm +++|
03881 M00S03586.tfm +++| LFM SUBR ENTRY/EXIT
03882 M00S03587.tfm +++| LDD FN+3 INSURE END OF LFN
03883 M00S03588.tfm +++| SCN 77
03884 M00S03589.tfm +++| STD FN+3
03885 M00S03590.tfm +++| LDN FN
03886 M00S03591.tfm +++| RJM MVM MOVE VARIABLE MESSAGE
03887 M00S03592.tfm +++| UJN LFMX RETURN
03888 M00S03593.tfm +++| MMC SPACE 4,10
03889 M00S03594.tfm +++|* MMC - MOVE TO MAGNET CONTROL POINT.
03890 M00S03595.tfm +++|*
03891 M00S03596.tfm +++|* ENTRY (FC) = FUNCTION CODE.
03892 M00S03597.tfm +++|* (UTMS) = REQUEST SUBFUNCTION.
03893 M00S03598.tfm +++|*
03894 M00S03599.tfm +++|* EXIT CONTROL POINT ASSIGNMENT CHANGE TO MAGNET IF THIS IS
03895 M00S03600.tfm +++|* A *VMFS* MAGNET REQUEST.
03896 M00S03601.tfm +++|*
Line S03602 Modification History
M01 (Removed by) 282l826
Seq # *Modification Id* Act
----------------------------+
03897 M01S03602.282l826 ---|* USES CP, T1, CM - CM+4.
Line S00048 Modification History
M01 (Added by) 282l826
Seq # *Modification Id* Act
----------------------------+
03898 M01S00048.282l826 +++|* USES CM+1.
03899 M00S03603.tfm +++|*
Line S03604 Modification History
M01 (Removed by) 282l826
Seq # *Modification Id* Act
----------------------------+
03900 M01S03604.282l826 ---|* MACROS MONITOR, PAUSE.
Line S00049 Modification History
M01 (Added by) 282l826
Seq # *Modification Id* Act
----------------------------+
03901 M01S00049.282l826 +++|* MACROS MONITOR.
03902 M00S03605.tfm +++|
03903 M00S03606.tfm +++|
03904 M00S03607.tfm +++| MMC SUBR ENTRY/EXIT
03905 M00S03608.tfm +++| LDD FC
03906 M00S03609.tfm +++| LMN MAGF
03907 M00S03610.tfm +++| NJN MMCX IF NOT MAGNET REQUEST
03908 M00S03611.tfm +++| LDM UTMS
03909 M00S03612.tfm +++| LMN VMFS
03910 M00S03613.tfm +++| NJN MMCX IF NOT *VMFS*
Line S03614 Modification History
M01 (Removed by) 282l826
Seq # *Modification Id* Act
----------------------------+
03911 M01S03614.282l826 ---| LDD MC MAGNET CONTROL POINTER NUMBER
03912 M01S03615.282l826 ---| ZJN MMCX IF MAGNET NOT ACTIVE
Line S00050 Modification History
M01 (Added by) 282l826
Seq # *Modification Id* Act
----------------------------+
03913 M01S00050.282l826 +++| LDK /COMSCPS/ALCS SET RETURN TO CALLING CP
03914 M00S03616.tfm +++| STD CM+1
Line S03617 Modification History
M01 (Removed by) 282l826
Seq # *Modification Id* Act
----------------------------+
03915 M01S03617.282l826 ---| SHN 7 CALCULATE CONTROL POINT ADDRESS
03916 M01S03618.282l826 ---| SCN 1
03917 M01S03619.282l826 ---| STD T1
03918 M01S03620.282l826 ---| MONITOR CCAM
03919 M01S03621.282l826 ---| LDD T1 SET CONTROL POINT ADDRESS
03920 M01S03622.282l826 ---| STD CP
03921 M01S03623.282l826 ---| PAUSE -STSW RESET RA AND FL
Line S00051 Modification History
M01 (Added by) 282l826
Seq # *Modification Id* Act
----------------------------+
03922 M01S00051.282l826 +++| MONITOR CCAM RETURN TO MAGNET CP
03923 M00S03624.tfm +++| UJN MMCX RETURN
03924 M00S03625.tfm +++| MVM SPACE 4,10
03925 M00S03626.tfm +++|** MVM - MERGE VARIABLE MESSAGE.
03926 M00S03627.tfm +++|*
03927 M00S03628.tfm +++|* *MVM* WILL MERGE VARIABLE LENGTH MESSAGES
03928 M00S03629.tfm +++|* TO A ASSEMBLY BUFFER INSURING THAT THERE
03929 M00S03630.tfm +++|* WILL BE A SPACE (BLANK) BETWEEN EACH
03930 M00S03631.tfm +++|* MERGED MESSAGE. THIS ROUTINE IS USED TO
03931 M00S03632.tfm +++|* COMBINE SEVERAL DISJOINTED MESSAGES INTO
03932 M00S03633.tfm +++|* ONE COHERENT MESSAGE WHICH IS THEN ISSUED
03933 M00S03634.tfm +++|* ACCORDING THE DISPOSITION CODE.
03934 M00S03635.tfm +++|*
03935 M00S03636.tfm +++|* ENTRY (A) = ADDRESS OF CHARACTER STRING.
03936 M00S03637.tfm +++|* (AP) = ASSEMBLY POINTER.
03937 M00S03638.tfm +++|* (HB) = HALF BYTE FLAG.
03938 M00S03639.tfm +++|*
03939 M00S03640.tfm +++|* USES T1.
03940 M00S03641.tfm +++|*
03941 M00S03642.tfm +++|
03942 M00S03643.tfm +++|
03943 M00S03644.tfm +++| MVM SUBR ENTRY/EXIT
03944 M00S03645.tfm +++| STD T1
03945 M00S03646.tfm +++| LDD HB
03946 M00S03647.tfm +++| NJN MVM2 IF NOT FULL WORD
03947 M00S03648.tfm +++| MVM1 LDI T1 MOVE FULL BYTE
03948 M00S03649.tfm +++| ZJN MVM4 IF END OF MESSAGE
03949 M00S03650.tfm +++| STI AP
03950 M00S03651.tfm +++| LPN 77
03951 M00S03652.tfm +++| ZJN MVM3 IF END OF MESSAGE
03952 M00S03653.tfm +++| AOD T1 ADVANCE TO NEXT BYTE
03953 M00S03654.tfm +++| AOD AP ADVANCE ASSEMBLY POINTER
03954 M00S03655.tfm +++| UJN MVM1 MOVE NEXT BYTE
03955 M00S03656.tfm +++|
03956 M00S03657.tfm +++| MVM2 LDI T1 MOVE LOWER CHARACTER
03957 M00S03658.tfm +++| SHN -6
03958 M00S03659.tfm +++| ZJN MVM3 IF END OF MESSAGE
03959 M00S03660.tfm +++| RAI AP
03960 M00S03661.tfm +++| AOD AP ADVANCE ASSEMBLY POINTER
03961 M00S03662.tfm +++| LDI T1 MOVE UPPER CHARACTER
03962 M00S03663.tfm +++| LPN 77
03963 M00S03664.tfm +++| ZJN MVM4 IF END OF MESSAGE
03964 M00S03665.tfm +++| SHN 6
03965 M00S03666.tfm +++| STI AP
03966 M00S03667.tfm +++| AOD T1
03967 M00S03668.tfm +++| UJN MVM2 MOVE NEXT BYTE
03968 M00S03669.tfm +++|
03969 M00S03670.tfm +++| MVM3 LDN 1R INSERT SPACE IN LOWER BYTE
03970 M00S03671.tfm +++| RAI AP
03971 M00S03672.tfm +++| AOD AP
03972 M00S03673.tfm +++| LDN 0
03973 M00S03674.tfm +++| UJN MVM5 TOGGLE HALF BYTE
03974 M00S03675.tfm +++|
03975 M00S03676.tfm +++| MVM4 LDC 1R *100 INSERT SPACE IN UPPER BYTE
03976 M00S03677.tfm +++| STI AP
03977 M00S03678.tfm +++| LDN 1
03978 M00S03679.tfm +++| MVM5 STD HB TOGGLE HALF BYTE
03979 M00S03680.tfm +++| LJM MVMX RETURN
03980 M00S03681.tfm +++| RAM SPACE 4,10
03981 M00S03682.tfm +++|** RAM - BUILD RANDOM ADDRESS MESSAGE.
03982 M00S03683.tfm +++|*
03983 M00S03684.tfm +++|* CONVERTS THE RANDOM ADDRESS TO DISPLAY CODE
03984 M00S03685.tfm +++|* AND MOVES IT TO THE ASSEMBLY BUFFER.
03985 M00S03686.tfm +++|*
03986 M00S03687.tfm +++|* ENTRY (CTSA - CTSA+1) = RANDOM ADDRESS.
03987 M00S03688.tfm +++|*
03988 M00S03689.tfm +++|* CALLS C2D, MVM.
03989 M00S03690.tfm +++|
03990 M00S03691.tfm +++|
03991 M00S03692.tfm +++| RAM SUBR ENTRY/EXIT
03992 M00S03693.tfm +++| LDM CTSA
03993 M00S03694.tfm +++| SHN -6
03994 M00S03695.tfm +++| RJM C2D CONVERT TWO DIGITS
03995 M00S03696.tfm +++| STM RAMA
03996 M00S03697.tfm +++| LDM CTSA
03997 M00S03698.tfm +++| LPN 77
03998 M00S03699.tfm +++| RJM C2D CONVERT TWO DIGITS
03999 M00S03700.tfm +++| STM RAMA+1
04000 M00S03701.tfm +++| LDM CTSA+1
04001 M00S03702.tfm +++| SHN -6
04002 M00S03703.tfm +++| RJM C2D CONVERT TWO DIGITS
04003 M00S03704.tfm +++| STM RAMA+2
04004 M00S03705.tfm +++| LDM CTSA+1
04005 M00S03706.tfm +++| LPN 77
04006 M00S03707.tfm +++| RJM C2D CONVERT TWO DIGITS
04007 M00S03708.tfm +++| STM RAMA+3
04008 M00S03709.tfm +++| LDC RAMA
04009 M00S03710.tfm +++| RJM MVM MOVE VARIABLE MESSAGE
04010 M00S03711.tfm +++| LJM RAMX RETURN
04011 M00S03712.tfm +++|
04012 M00S03713.tfm +++| RAMA DATA C*00000000*
04013 M00S03714.tfm +++| SSE SPACE 4,10
04014 M00S03715.tfm +++|** SSE - SET SYSTEM EVENT.
04015 M00S03716.tfm +++|*
04016 M00S03717.tfm +++|* ENTRY (EC) = ERROR CODE.
04017 M00S03718.tfm +++|*
04018 M00S03719.tfm +++|* EXIT CONTROL POINT EVENT WORD UPDATED.
04019 M00S03720.tfm +++|*
04020 M00S03721.tfm +++|* USES CN - CN+4.
04021 M00S03722.tfm +++|
04022 M00S03723.tfm +++|
04023 M00S03724.tfm +++| SSE SUBR ENTRY/EXIT
04024 M00S03725.tfm +++| LDD CP
04025 M00S03726.tfm +++| ADN TERW
04026 M00S03727.tfm +++| CRD CN
04027 M00S03728.tfm +++| LDD EC
04028 M00S03729.tfm +++| LMN /EMSG/TUA
04029 M00S03730.tfm +++| ZJN SSE1 IF TMS UTILITY ACTIVE
04030 M00S03731.tfm +++| LMN /EMSG/CNF&/EMSG/TUA
04031 M00S03732.tfm +++| NJN SSE2 IF NOT CATALOG NOT FOUND ERROR
04032 M00S03733.tfm +++| SSE1 LDN ESUA
04033 M00S03734.tfm +++| UJN SSE3 SET EVENT IN CONTROL POINT
04034 M00S03735.tfm +++|
04035 M00S03736.tfm +++| SSE2 LDN ESVB VSN BUSY OR WAIT SCRATCH
04036 M00S03737.tfm +++| SSE3 STD CN+4 SET EVENT IN CONTROL POINT
04037 M00S03738.tfm +++| SHN -14
04038 M00S03739.tfm +++| ADC FBRT*1000
04039 M00S03740.tfm +++| STD CN+3
04040 M00S03741.tfm +++| LDD CN+2
04041 M00S03742.tfm +++| SCN 77
04042 M00S03743.tfm +++| ADN FBRT/10 SET ROLLOUT TIME
04043 M00S03744.tfm +++| STD CN+2
04044 M00S03745.tfm +++| LDD CP
04045 M00S03746.tfm +++| ADN TERW
04046 M00S03747.tfm +++| CWD CN
04047 M00S03748.tfm +++| LJM SSEX RETURN
04048 M00S03749.tfm +++| UEP SPACE 4,10
04049 M00S03750.tfm +++|** UEP - USER ERROR PROCESSING.
04050 M00S03751.tfm +++|*
04051 M00S03752.tfm +++|* IF THE USER IS PROCESSING ERRORS, THE ERROR
04052 M00S03753.tfm +++|* CODE IS SET IN THE FET. IF THE ERROR IS ONE
04053 M00S03754.tfm +++|* THAT THE USER HAS A ROLLOUT OPTION ON, THE
04054 M00S03755.tfm +++|* ROLLOUT FLAG IS SET IN FET+0 BIT 17 AND
04055 M00S03756.tfm +++|* THE EVENT IS BUILT A ND SET IN *TERW*. IF
04056 M00S03757.tfm +++|* THE USER HAS SPECIFIED A ERROR MESSAGE
04057 M00S03758.tfm +++|* RETURN BUFFER, THE DETAILED MESSAGE IS
04058 M00S03759.tfm +++|* WRITTEN TO THAT BUFFER.
04059 M00S03760.tfm +++|*
04060 M00S03761.tfm +++|* ENTRY (EC) = ERROR CODE.
04061 M00S03762.tfm +++|* (MBUF) = ASSEMBLED ERROR MESSAGE.
04062 M00S03763.tfm +++|*
04063 M00S03764.tfm +++|* USES CM - CM+4, CN - CN+4, T1 - T3.
04064 M00S03765.tfm +++|
04065 M00S03766.tfm +++|
04066 M00S03767.tfm +++| UEP SUBR ENTRY/EXIT
04067 M00S03768.tfm +++| LDA IR+3,REL SET ERROR CODE IN FET
04068 M00S03769.tfm +++| CRD CM
04069 M00S03770.tfm +++| LDD CM+3
04070 M00S03771.tfm +++| SCN 77
04071 M00S03772.tfm +++| STD CM+3
04072 M00S03773.tfm +++| LDD CM+4
04073 M00S03774.tfm +++| LPC 777
04074 M00S03775.tfm +++| STD CM+4
04075 M00S03776.tfm +++| LDD EC
04076 M00S03777.tfm +++| SHN 21-2
04077 M00S03778.tfm +++| RAD CM+3
04078 M00S03779.tfm +++| SHN -6
04079 M00S03780.tfm +++| LPC 7000
04080 M00S03781.tfm +++| RAD CM+4
04081 M00S03782.tfm +++| LDI EA CHECK IF ROLLABLE ERROR
04082 M00S03783.tfm +++| SHN 21-3
04083 M00S03784.tfm +++| PJN UEP1 IF NON-ROLLABLE ERROR
04084 M00S03785.tfm +++| RJM SSE SET SYSTEM EVENT
04085 M00S03786.tfm +++| LDD CM+3 SET ROLLOUT EVENT FLAG
04086 M00S03787.tfm +++| LMN 40
04087 M00S03788.tfm +++| STD CM+3
04088 M00S03789.tfm +++| UEP1 LDA IR+3,REL REWRITE FET+0
04089 M00S03790.tfm +++| CWD CM
04090 M00S03791.tfm +++| ADN TFEA
04091 M00S03792.tfm +++| CRD CM
04092 M00S03793.tfm +++| LDA CM+3,ABS
04093 M00S03794.tfm +++| ZJP UEPX IF NO USER MESSAGE BUFFER
04094 M00S03795.tfm +++| LDC MBUF COPY ERROR MESSAGE
04095 M00S03796.tfm +++| STD T1
04096 M00S03797.tfm +++| LDN 5 SET BYTES PER WORD
04097 M00S03798.tfm +++| STD T2
04098 M00S03799.tfm +++| LDN 1
04099 M00S03800.tfm +++| STD T3 INITIALIZE CM WORD COUNT
04100 M00S03801.tfm +++| UEP2 LDI T1 SEARCH FOR END OF MESSAGE
04101 M00S03802.tfm +++| ZJN UEP3 IF ZERO BYTE FOUND
04102 M00S03803.tfm +++| AOD T1
04103 M00S03804.tfm +++| SOD T2
04104 M00S03805.tfm +++| NJN UEP2 IF NOT FULL CM WORD
04105 M00S03806.tfm +++| AOD T3
04106 M00S03807.tfm +++| LDN 5
04107 M00S03808.tfm +++| STD T2 RESET BYTES PER WORD
04108 M00S03809.tfm +++| UJN UEP2 CONTINUE TO END OF MESSAGE
04109 M00S03810.tfm +++|
04110 M00S03811.tfm +++| UEP3 AOD T1 CLEAR REMAINDER OF MESSAGE TO FULL WORD
04111 M00S03812.tfm +++| SOD T2
04112 M00S03813.tfm +++| ZJN UEP4 IF FULL CM WORD
04113 M00S03814.tfm +++| LDN 0
04114 M00S03815.tfm +++| STI T1 CLEAR MESSAGE TAIL
04115 M00S03816.tfm +++| UJN UEP3 LOOP FOR FULL CM WORD
04116 M00S03817.tfm +++|
04117 M00S03818.tfm +++| UEP4 LDA IR+3,REL WRITE TO USERS MESSAGE BUFFER
04118 M00S03819.tfm +++| ADN TFEA
04119 M00S03820.tfm +++| CRD CM
04120 M00S03821.tfm +++| LDA CM+3,REL
04121 M00S03822.tfm +++| CWM MBUF,T3 SEND MESSAGE TO CENTRAL
04122 M00S03823.tfm +++| LJM UEPX RETURN
04123 M00S03824.tfm +++| UNM SPACE 4,10
04124 M00S03825.tfm +++|** UNM - BUILD USERNAME MESSAGE.
04125 M00S03826.tfm +++|*
04126 M00S03827.tfm +++|* SETS THE USERNAME IN THE MESSAGE.
04127 M00S03828.tfm +++|*
04128 M00S03829.tfm +++|* ENTRY PBUN - PBUN+3) = USERNAME.
04129 M00S03830.tfm +++|*
04130 M00S03831.tfm +++|* CALLS MVM.
04131 M00S03832.tfm +++|
04132 M00S03833.tfm +++|
04133 M00S03834.tfm +++| UNM SUBR ENTRY/EXIT
04134 M00S03835.tfm +++| LDM PBUN+3 INSURE END OF USERNAME
04135 M00S03836.tfm +++| SCN 77
04136 M00S03837.tfm +++| STM PBUN+3
04137 M00S03838.tfm +++| LDC PBUN
04138 M00S03839.tfm +++| RJM MVM MOVE VARIABLE MESSAGE
04139 M00S03840.tfm +++| UJN UNMX RETURN
04140 M00S03841.tfm +++| VSM SPACE 4,10
04141 M00S03842.tfm +++|** VSM - BUILD VSN MESSAGE.
04142 M00S03843.tfm +++|*
04143 M00S03844.tfm +++|* SETS THE VSN IN THE MESSAGE.
04144 M00S03845.tfm +++|*
04145 M00S03846.tfm +++|* ENTRY (PESN - PESN+2) = EXTERNAL VSN.
04146 M00S03847.tfm +++|*
04147 M00S03848.tfm +++|* CALLS MVM.
04148 M00S03849.tfm +++|
04149 M00S03850.tfm +++|
04150 M00S03851.tfm +++| VSM SUBR ENTRY/EXIT
04151 M00S03852.tfm +++| MMOVE PESN,,VSMA+2,,VSKL
04152 M00S03853.tfm +++| LDC VSMA
04153 M00S03854.tfm +++| RJM MVM MOVE VARIABLE MESSAGE
04154 M00S03855.tfm +++| UJN VSMX RETURN
04155 M00S03856.tfm +++|
04156 M00S03857.tfm +++| VSMA DATA C*VSN XXXXXX*
04157 M00S03858.tfm +++| SPACE 4,10
04158 M00S03859.tfm +++|** COMMON DECKS.
04159 M00S03860.tfm +++|
04160 M00S03861.tfm +++|
04161 M00S03862.tfm +++| MVM$ EQU 1 DEFINE MVM - MOVE VARIABLE MESSAGE
04162 M00S03863.tfm +++| RCL$ EQU 1 DEFINE RCL - PP RECALL
04163 M00S03864.tfm +++|*CALL COMPTFM
04164 M00S03865.tfm +++|*CALL COMPC2D
Line S00024 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
04165 M01S00024.274l797 +++| TITLE ERROR MESSAGES.
04166 M00S03866.tfm +++| EMSG SPACE 4,15
04167 M00S03867.tfm +++|** ERROR MESSAGES.
04168 M00S03868.tfm +++|*
04169 M00S03869.tfm +++|* FORMAT (BYTE 0), ERROR DISPOSITION FLAGS.
04170 M00S03870.tfm +++|* (BYTE 1), MESSAGE TYPE AND DESTINATION FLAGS.
04171 M00S03871.tfm +++|* (BYTE 2), FIRST WORD ADDRESS OF MESSAGE.
04172 M00S03872.tfm +++|*
04173 M00S03873.tfm +++|* MESSAGE DISPOSITION FLAGS.
04174 M00S03874.tfm +++|* 0001 = HANG PPU.
04175 M00S03875.tfm +++|* 0002 = CALL TFSP TO A CONTROL POINT.
04176 M00S03876.tfm +++|* 0004 = UNCONDITIONAL ABORT OF USER CONTROL POINT.
04177 M00S03877.tfm +++|* 0010 = ROLLOUT USER CONTROL POINT.
04178 M00S03878.tfm +++|* 0020 = RESERVED.
04179 M00S03879.tfm +++|* 0040 = RANDOM ADDRESS MESSAGE.
04180 M00S03880.tfm +++|* 0100 = USERNAME MESSAGE.
04181 M00S03881.tfm +++|* 0200 = VSN MESSAGE.
04182 M00S03882.tfm +++|* 0400 = LOCAL FILE NAME MESSAGE.
04183 M00S03883.tfm +++|* 1000 = FILE NAME MESSAGE.
04184 M00S03884.tfm +++|* 2000 = FAMILY NAME MESSAGE.
04185 M00S03885.tfm +++|* 4000 = EQUIPMENT MESSAGE.
04186 M00S03886.tfm +++|*
04187 M00S03887.tfm +++|* MESSAGE DESTINATION CODES.
04188 M00S03888.tfm +++|* 0001 = SEND TO CONTROL POINT DAYFILE.
04189 M00S03889.tfm +++|* 0002 = SEND TO SYSTEM DAYFILE.
04190 M00S03890.tfm +++|* 0004 = SEND TO SYSTEM ERROR LOG.
04191 M00S03891.tfm +++|* 0010 = SEND TO ACCOUNT DAYFILE.
04192 M00S03892.tfm +++|* 0020 = SEND TO E,P DISPLAY IF UNIT ASSIGNED.
04193 M00S03893.tfm +++|* 0040 = SEND TO CATALOG MESSAGE BUFFER.
04194 M00S03894.tfm +++|* 0100 = RESERVED.
04195 M00S03895.tfm +++|* 0200 = RESERVED.
04196 M00S03896.tfm +++|* 0400 = RESERVED.
04197 M00S03897.tfm +++|* 1000 = RESERVED.
04198 M00S03898.tfm +++|* 2000 = RESERVED.
04199 M00S03899.tfm +++|* 4000 = RESERVED.
04200 M00S03900.tfm +++|
04201 M00S03901.tfm +++|
04202 M00S03902.tfm +++| EMSG EMSG BEGIN
04203 M00S03903.tfm +++|
04204 M00S03904.tfm +++| VBS EMSG 0210,0001,(BUSY.)
04205 M00S03905.tfm +++| LNF EMSG 0400,0001,(NOT FOUND.)
04206 M00S03906.tfm +++| FNF EMSG 1000,0001,(NOT FOUND.)
04207 M00S03907.tfm +++| VNF EMSG 0200,0001,(NOT FOUND.)
04208 M00S03908.tfm +++| UNF EMSG 0100,0001,(NOT FOUND.)
04209 M00S03909.tfm +++| NMT EMSG 0400,0001,(NOT ON MAGNETIC TAPE.)
04210 M00S03910.tfm +++| VSR EMSG 0200,0001,(RESERVED.)
04211 M00S03911.tfm +++| VSD EMSG 0200,0000,(DUPLICATE.)
04212 M00S03912.tfm +++| FAR EMSG 1000,0001,(ALREADY RESERVED.)
04213 M00S03913.tfm +++| VAR EMSG 0200,0001,(ALREADY RESERVED.)
04214 M00S03914.tfm +++| DLK EMSG 0200,0006,(DEADLOCK.)
Line S03915 Modification History
M01 (Removed by) nos252
Seq # *Modification Id* Act
----------------------------+
04215 M01S03915.nos252 ---| ILR EMSG 0000,0001,(TFM INVALID REQUEST.)
Line S00054 Modification History
M01 (Added by) nos252
Seq # *Modification Id* Act
----------------------------+
04216 M01S00054.nos252 +++| ILR EMSG 0000,0001,(TFM INCORRECT REQUEST.)
04217 M00S03916.tfm +++| TMD EMSG 0000,0001,(TMS DISABLED.)
04218 M00S03917.tfm +++| MNA EMSG 0000,0001,(MAGNET NOT ACTIVE.)
04219 M00S03918.tfm +++| EBP EMSG 2006,0047,(ERRONEOUS BUFFER POINTER.)
04220 M00S03919.tfm +++| TUA EMSG 0010,0001,(TMS UTILITY ACTIVE.)
04221 M00S03920.tfm +++| BAE EMSG 0000,0001,(BUFFER ARGUMENT ERROR.)
04222 M00S03921.tfm +++| EID EMSG 0000,0001,(ERROR IN INDEX DATA.)
04223 M00S03922.tfm +++| ECD EMSG 0000,0001,(ERROR IN CATALOG DATA.)
04224 M00S03923.tfm +++| EAD EMSG 0000,0001,(ERROR IN ADMIT DATA.)
04225 M00S03924.tfm +++| RAE EMSG 0046,0041,(RANDOM ADDRESS ERROR.)
04226 M00S03925.tfm +++| TKL EMSG 4000,0006,(TRACK LIMIT.)
04227 M00S03926.tfm +++| MSE EMSG 4004,0046,(MASS STORAGE ERROR.)
04228 M00S03927.tfm +++| CNF EMSG 2010,0007,(TAPE CATALOG NOT FOUND.)
04229 M00S03928.tfm +++| ECF EMSG 0000,0001,(EMPTY CATALOG.)
04230 M00S03929.tfm +++| CLE EMSG 2006,0047,(CATALOG LINKAGE ERROR.)
04231 M00S03930.tfm +++| IOS EMSG 0004,0001,(I/O SEQUENCE ERROR ON CATALOG.)
04232 M00S03931.tfm +++| EOI EMSG 0001,0007,(EOI NOT ON TRACK CHAIN.)
04233 M00S03932.tfm +++| NAE EMSG 0000,0001,(NO ADMITS.)
04234 M00S03933.tfm +++| TPI EMSG 0000,0001,(TMS PROCESSING INHIBITED.)
04235 M00S03934.tfm +++| SFA EMSG 2010,0001,(ACTIVITY SUSPENDED.)
04236 M00S03935.tfm +++| FCE EMSG 2004,0001,(TAPE CATALOG ERROR.)
04237 M00S03936.tfm +++| WSA EMSG 0012,0001,(WAIT SCRATCH ASSIGNMENT.)
04238 M00S03937.tfm +++| NEU EMSG 0004,0001,(NO EXTEND ON USER OWNED FILE.)
04239 M00S03938.tfm +++| WRF EMSG 0000,0001,(WRITE REQUEST ON READ-ONLY FILE.)
04240 M00S03939.tfm +++| MPE EMSG 0000,0001,(MULTI-FILE PROCESSING ERROR.)
04241 M00S03940.tfm +++| FCI EMSG 0000,0001,(FILE CREATION NOT ALLOWED.)
04242 M00S03941.tfm +++| EFD EMSG 0000,0001,(ERROR IN FILE DATA.)
04243 M00S03942.tfm +++| CNA EMSG 0000,2010,(LINKED CATALOG NOT ACCESSIBLE.)
04244 M00S03943.tfm +++|
04245 M00S03944.tfm +++| EMSG EMSG END
04246 M00S03945.tfm +++|
04247 M00S03946.tfm +++|
04248 M00S03947.tfm +++| CBUF SPACE 4,10
04249 M00S03948.tfm +++|*** BUFFERS.
04250 M00S03949.tfm +++|
04251 M00S03950.tfm +++|
04252 M00S03951.tfm +++| MBUF BSS 40
04253 M00S03952.tfm +++| SPACE 4,10
04254 M00S03953.tfm +++| USE // FORCE LITERALS
04255 M00S03954.tfm +++|
04256 M00S03955.tfm +++|
04257 M00S03956.tfm +++| ERRNG BUF0-* BYTES LEFT BEFORE BUFFER OVERFLOW
Line S03957 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
04258 M01S03957.274l797 ---| OVERLAY (SUBFUNCTION ISFS.),OVL1
Line S00025 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
04259 M01S00025.274l797 +++| OVERLAY (INITIALIZE FAMILY TAPE CATALOG.),OVL1
04260 M00S03958.tfm +++| SPACE 4
04261 M00S03959.tfm +++|*** LOCAL DIRECT CELL LOCATIONS.
04262 M00S03960.tfm +++|
04263 M00S03961.tfm +++|
Line S03962 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
04264 M01S03962.274l797 ---| IL EQU S1 CLEAR INTERLOCK FLAG
Line S00026 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
04265 M01S00026.274l797 +++| TT EQU S1 TAPE TYPE (0=MT/NT, 1=CT, 3=AT)
04266 M00S03963.tfm +++| NV EQU S1+1 - S1+3 NEXT VOLUME
04267 M00S03964.tfm +++| IC EQU S1+1 INITIAL CATALOG FLAG
04268 M00S03965.tfm +++| RC EQU S1+2 REEL COUNT
Line S00010 Modification History
M01 (Added by) ns2763
Seq # *Modification Id* Act
----------------------------+
04269 M01S00010.ns2763 +++| SV EQU S1+4 SYSTEM VSN FLAG
04270 M00S03966.tfm +++| CV EQU S2 CURRENT VSN POINTER
04271 M00S03967.tfm +++| PV EQU S3 PREVIOUS SCRATCH VSN POINTER
Line S03968 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
04272 M01S03968.274l797 ---| ISFS SPACE 4,10
Line S00027 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
04273 M01S00027.274l797 +++| SPACE 4,10
04274 M01S00028.274l797 +++|*** BUFFER ALLOCATION.
04275 M01S00029.274l797 +++|*
04276 M01S00030.274l797 +++|* THE FOLLOWING BUFFER IS CREATED BY THIS OVERLAY, AND IS
04277 M01S00031.274l797 +++|* USED BY THE *ISFS* POSTPROCESSOR OVERLAY.
04278 M01S00032.274l797 +++|
04279 M01S00033.274l797 +++|
04280 M01S00034.274l797 +++| TSPW BSS 0 TABLE OF SCRATCH POOL WORDS
04281 M01S00035.274l797 +++|* (INDEXED BY TAPE TYPE)
04282 M01S00036.274l797 +++| VFD 36/-0,24/0
04283 M01S00037.274l797 +++| VFD 36/-0,24/0
04284 M01S00038.274l797 +++| VFD 36/-0,24/0
04285 M01S00039.274l797 +++| VFD 36/-0,24/0
04286 M01S00040.274l797 +++|
04287 M01S00041.274l797 +++| OVL2 EQU *+2 LOAD ADDRESS FOR *ISFS* POSTPROCESSOR
04288 M01S00042.274l797 +++| ISFS SPACE 4,30
04289 M00S03969.tfm +++|*** ISFS - INITIALIZE FAMILY TAPE CATALOG.
04290 M00S03970.tfm +++|*
04291 M00S03971.tfm +++|* ENTRY (IR - IR+3) = FET ADDRESS -
04292 M00S03972.tfm +++|*
04293 M00S03973.tfm +++|*T FET+0 42/ FILE NAME,1/ R,8/ AT,6/ CODE,3/ ST
Figure
FET+0
0 2 3 8 9 16 17 18 29 ST CODE AT R FILE NAME 30 59 FILE NAME
04294 M00S03974.tfm +++|*T, +1 15/ 0,1/ EP, 27/ 0,18/ 0
Figure
+1
0 17 18 29 0 0 30 44 45 46 59 0 EP 0
04295 M00S03975.tfm +++|*T, +2 60/ 0
04296 M00S03976.tfm +++|*T, +3 60/ 0
04297 M00S03977.tfm +++|*T, +4 12/ FNT,30/ 0,18/ 0
Figure
+4
0 17 18 29 0 0 30 47 48 59 0 FNT
04298 M00S03978.tfm +++|*T, +5 42/ 0,18/ EADD
04299 M00S03979.tfm +++|*T, +6 60/ 0
04300 M00S03980.tfm +++|*T, +7 46/ 0,2/ OP,12/ 0
04301 M00S03981.tfm +++|*
04302 M00S03982.tfm +++|* OP = PROCESSING OPTION.
04303 M00S03983.tfm +++|* 0 = REORDER SCRATCH ONLY (*TFSP* *ISV* DIRECTIVE).
04304 M00S03984.tfm +++|* 1 = REORDER SCRATCH AND CLEAR ALL INTERLOCKS (FIRST
04305 M00S03985.tfm +++|* *ISF* ON DEVICE).
04306 M00S03986.tfm +++|* 2 = REORDER SCRATCH AND CLEAR CURRENT AND INACTIVE
04307 M00S03987.tfm +++|* MACHINE INTERLOCKS (*ISF* LINK TO SHARED DEVICE).
04308 M00S03988.tfm +++|* 3 = REORDER SCRATCH AND CLEAR INACTIVE MACHINE
04309 M00S03989.tfm +++|* INTERLOCKS (*TFSPR* COMMAND).
04310 M00S03990.tfm +++|*
Line S03991 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
04311 M01S03991.274l797 ---|* USES CM - CM+4.
Line S00043 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
04312 M01S00043.274l797 +++|* USES TT, T2, CV - CV+4, PV - PV+4.
04313 M00S03992.tfm +++|*
Line S03993 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
04314 M01S03993.274l797 ---|* CALLS CFB, GNB, GNL, MBP, PRS, RRP, SEI, TBA, WRP.
Line S00044 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
04315 M01S00044.274l797 +++|* CALLS CFB, GNB, GNL, MBP, PRS, RVB, TBA, WRP.
04316 M00S03994.tfm +++|*
Line S03995 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
04317 M01S03995.274l797 ---|* MACROS CLEAR, MMOVE, MONITOR, RESTP.
Line S00045 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
04318 M01S00045.274l797 +++|* MACROS EXOVL, MMOVE.
04319 M00S03996.tfm +++|
04320 M00S03997.tfm +++|
04321 M00S03998.tfm +++| ISF ENTRY ENTRY/EXIT
04322 M00S03999.tfm +++| RJM PRS PRESET
Line S04000 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
04323 M01S04000.274l797 ---| LDI BP
Line S00046 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
04324 M01S00046.274l797 +++| ISF0 LDI BP
04325 M00S04001.tfm +++| ZJN ISF2 IF NO ENTRIES IN FIRST VSN BLOCK
04326 M00S04002.tfm +++| ISF1 RJM CFB CHECK FILE BUSY
04327 M00S04003.tfm +++| LDM CWEL,BA POSITION TO NEXT INDEX
04328 M00S04004.tfm +++| RJM MBP MOVE BUFFER POINTER
04329 M00S04005.tfm +++| MJN ISF2 IF MOVE OUTSIDE BUFFER
04330 M00S04006.tfm +++| LDI BP
04331 M00S04007.tfm +++| NJN ISF1 IF NOT END OF INDEX
04332 M00S04008.tfm +++| ISF2 LDC 0 NO BUFFER REWRITE
04333 M00S04009.tfm +++|* LDC 1 (IF BUFFER REWRITE)
04334 M00S04010.tfm +++| ISFA EQU *-1
04335 M00S04011.tfm +++| ZJN ISF3 IF NO BUFFER REWRITE
04336 M00S04012.tfm +++| RJM WRP WRITE RANDOM PRU
04337 M00S04013.tfm +++| LDN 0 CLEAR BUFFER REWRITE NEEDED
04338 M00S04014.tfm +++| STM ISFA
04339 M00S04015.tfm +++| ISF3 RJM GNL GET NEXT LINK
04340 M00S04016.tfm +++| ZJN ISF5 IF BLOCK NOT LINKED
04341 M00S04017.tfm +++| LDC 0 NO BUFFER SWITCH
04342 M00S04018.tfm +++|* LDC 1 (BUFFER SWITCH)
04343 M00S04019.tfm +++| ISFB EQU *-1
04344 M00S04020.tfm +++| ZJN ISF4 IF NO BUFFER SWITCH
04345 M00S04021.tfm +++| LDN 0 CLEAR BUFFER SWITCH NEEDED
04346 M00S04022.tfm +++| STM ISFB
04347 M00S04023.tfm +++| RJM TBA TOGGLE BUFFER ASSIGNMENT
04348 M00S04024.tfm +++| ISF4 RJM GNB GET NEXT BLOCK
04349 M00S04025.tfm +++| LDM CWFE,BA SKIP BLOCK CONTROL WORDS
04350 M00S04026.tfm +++| RJM MBP MOVE BUFFER POINTER
04351 M00S04027.tfm +++| LJM ISF1 SEARCH INDEX BUFFER
04352 M00S04028.tfm +++|
Line S04029 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
04353 M01S04029.274l797 ---| ISF5 RESTP CPSB REREAD SYSTEM BLOCK
Line S00047 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
04354 M01S00047.274l797 +++| ISF5 LDD TT
04355 M01S00048.274l797 +++| SHN 21-13
04356 M01S00049.274l797 +++| MJP ISF7 IF NO VSN ENTRIES OF ANY TYPE FOUND
04357 M01S00050.274l797 +++| LDD TT SAVE SCRATCH POOL WORD FOR THIS TAPE TYPE
04358 M01S00051.274l797 +++| SHN 2
04359 M01S00052.274l797 +++| ADD TT
04360 M01S00053.274l797 +++| ADC TSPW
04361 M01S00054.274l797 +++| STD T2
04362 M01S00055.274l797 +++| MMOVE PESN,,,,10D
04363 M01S00056.274l797 +++| LCN 0 CLEAR *VSN ENTRY FOUND* FLAG FOR TAPE TYPE
04364 M01S00057.274l797 +++| STM ISFC,TT
04365 M01S00058.274l797 +++| LDN 4 CHECK FOR OTHER TAPE TYPES TO PROCESS
04366 M01S00059.274l797 +++| STD TT
04367 M01S00060.274l797 +++| ISF6 SOD TT CHECK NEXT TAPE TYPE
04368 M01S00061.274l797 +++| MJP ISF7 IF NO MORE TAPE TYPES
04369 M01S00062.274l797 +++| LDM ISFC,TT
04370 M01S00063.274l797 +++| ZJN ISF6 IF NO VSN ENTRIES FOUND FOR THIS TAPE TYPE
04371 M01S00064.274l797 +++| SHN 21-13
Line S04030 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
04372 M01S04030.274l797 ---| RJM RRP READ RANDOM PRU
04373 M01S04031.274l797 ---| RJM SEI SET EOI SECTOR LOCATION
04374 M01S04032.274l797 ---| STM SBTC,BP SET TRACK COUNT
04375 M01S04033.274l797 ---| LDA T2,ABS SET SECTOR COUNT
04376 M01S04034.274l797 ---| STM SBPC+1,BP
04377 M01S04035.274l797 ---| SHN -14
04378 M01S04036.274l797 ---| STM SBPC,BP
04379 M01S04037.274l797 ---| MMOVE PESN,,SBSV,BP,10D SET SCRATCH VSN POINTER
04380 M01S04038.274l797 ---| LDD IL
04381 M01S04039.274l797 ---| ZJN ISF6 IF NOT CLEARING INTERLOCKS
04382 M01S04040.274l797 ---| CLEAR CWUN,BA,10D CLEAR *TFSP* USER NAME INTERLOCK
04383 M01S04041.274l797 ---| LDM SBST+1,BP CLEAR UTILITY ACIVE AND SUSPEND FLAGS
04384 M01S04042.274l797 ---| SCN UITS+SATS
04385 M01S04043.274l797 ---| STM SBST+1,BP
04386 M01S04044.274l797 ---| LDM SBST,BP
04387 M01S04045.274l797 ---| SCN FFTS/10000
04388 M01S04046.274l797 ---| STM SBST,BP
04389 M01S04047.274l797 ---| LDM SBID,BP CHECK MACHINE ID
04390 M01S04048.274l797 ---| LMM MFID
04391 M01S04049.274l797 ---| ZJN ISF6 IF HOME MAINFRAME
04392 M01S04050.274l797 ---| LDM SBST,BP
04393 M01S04051.274l797 ---| SCN GFTS/10000 CLEAR GLOBAL SCRATCH STATUS
04394 M01S04052.274l797 ---| LMN FFTS/10000 SET FOREIGN MAINFRAME
04395 M01S04053.274l797 ---| STM SBST,BP
04396 M01S04054.274l797 ---| ISF6 RJM WRP WRITE SYSTEM BLOCK
04397 M01S04055.274l797 ---| LDN ZERL POST UTILITY ACTIVE EVENT
04398 M01S04056.274l797 ---| CRD CM
04399 M01S04057.274l797 ---| LDN ESUA
04400 M01S04058.274l797 ---| STD CM+4
04401 M01S04059.274l797 ---| MONITOR EATM ENTER EVENT
04402 M01S04060.274l797 ---| LDA PESN+3 CHECK FOR AVAILABLE SCRATCH
04403 M01S04061.274l797 ---| ZJN ISF7 IF NO SCRATCH
04404 M01S04062.274l797 ---| LDN ZERL
04405 M01S04063.274l797 ---| CRD CM
04406 M01S04064.274l797 ---| LDN ESVB
04407 M01S04065.274l797 ---| STD CM+4
04408 M01S04066.274l797 ---| MONITOR EATM ENTER EVENT
04409 M01S04067.274l797 ---| ISF7 LJM ISFX RETURN
04410 M01S04068.274l797 ---| TITLE ".Y." SUBROUTINES.
04411 M01S04069.274l797 ---| CFB SPACE 4,10
04412 M01S04070.274l797 ---|** CFB - CHECK FILE BUSY
Line S00065 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
04413 M01S00065.274l797 +++| MJN ISF6 IF TAPE TYPE ALREADY PROCESSED
04414 M01S00066.274l797 +++| LDD MA RESTORE POINTERS FOR FIRST VSN BLOCK
04415 M01S00067.274l797 +++| CWM ISFD,ON
04416 M01S00068.274l797 +++| SBN 1
04417 M01S00069.274l797 +++| CRD CV
04418 M01S00070.274l797 +++| CWM ISFE,ON PRESET PREVIOUS VSN
04419 M01S00071.274l797 +++| SBN 1
04420 M01S00072.274l797 +++| CRM PESN,ON
04421 M01S00073.274l797 +++| LDN ZERL CLEAR PREVIOUS VSN BUFFER POINTERS
04422 M01S00074.274l797 +++| CRD PV
04423 M01S00075.274l797 +++| RJM RVB RESTORE VSN BUFFERS
04424 M01S00076.274l797 +++| LJM ISF0 SCAN FOR NEXT VSN TYPE
04425 M01S00077.274l797 +++|
04426 M01S00078.274l797 +++| ISF7 EXOVL ISP EXECUTE *ISFS* POSTPROCESSOR
04427 M01S00079.274l797 +++|
04428 M01S00080.274l797 +++|
04429 M01S00081.274l797 +++| ISFC BSSZ 4 TABLE OF *VSN ENTRY FOUND* FLAGS
04430 M01S00082.274l797 +++|* (INDEXED BY TAPE TYPE)
04431 M01S00083.274l797 +++|
04432 M01S00084.274l797 +++| ISFD BSS 5 POINTERS TO FIRST LEVEL-2 VSN BLOCK
04433 M01S00085.274l797 +++|
04434 M01S00086.274l797 +++| ISFE VFD 36/-0,24/0 DEFAULT VALUE FOR SCRATCH POOL WORD
04435 M01S00087.274l797 +++| TITLE SUBROUTINES.
04436 M01S00088.274l797 +++| CFB SPACE 4,20
04437 M01S00089.274l797 +++|** CFB - CHECK FILE BUSY.
04438 M00S04071.tfm +++|*
Line S04072 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
04439 M01S04072.274l797 ---|* ENTRY (BA) = BUFFER ADDRESS (VSN INDEX)
04440 M01S04073.274l797 ---|* (BP) = BUFFER POINTER (VSN INDEX)
04441 M01S04074.274l797 ---|* (IL) = CLEAR INTERLOCK STATUS.
Line S00090 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
04442 M01S00090.274l797 +++|* ENTRY (BA) = BUFFER ADDRESS (VSN INDEX).
04443 M01S00091.274l797 +++|* (BP) = BUFFER POINTER (VSN INDEX).
04444 M01S00092.274l797 +++|* (TT) = TAPE TYPE (0=MT/NT, 1=CT, 3=AT).
04445 M01S00093.274l797 +++|* (TT) = 4000, IF NO VSN ENTRY OF ANY TYPE FOUND YET.
04446 M00S04075.tfm +++|*
04447 M00S04076.tfm +++|* EXIT (BA) = UNCHANGED.
04448 M00S04077.tfm +++|* (BP) = UNCHANGED.
Line S00094 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
04449 M01S00094.274l797 +++|* (TT) = TAPE TYPE, IF THIS VSN IS THE FIRST VSN ENTRY
04450 M01S00095.274l797 +++|* OF ANY TYPE FOUND.
04451 M01S00096.274l797 +++|* (ISFC) WORD FOR THE VSN-S TAPE TYPE SET NONZERO, IF
04452 M01S00097.274l797 +++|* THE VSN IS NOT THE CORRECT TAPE TYPE.
04453 M00S04078.tfm +++|*
Line S00098 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
04454 M01S00098.274l797 +++|* USES TT, T1.
04455 M01S00099.274l797 +++|*
04456 M00S04079.tfm +++|* CALLS CSV, RLV, RSV, SCP.
04457 M00S04080.tfm +++|
04458 M00S04081.tfm +++|
Line S04082 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
04459 M01S04082.274l797 ---| CFB5 RJM CSV CHECK FOR SCRATCH VOLUME
Line S00100 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
04460 M01S00100.274l797 +++| CFB8 RJM CSV CHECK FOR SCRATCH VOLUME
04461 M00S04083.tfm +++|
04462 M00S04084.tfm +++| CFB SUBR ENTRY/EXIT
Line S04085 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
04463 M01S04085.274l797 ---| LDD IL
04464 M01S04086.274l797 ---| ZJN CFB5 IF NOT CLEARING INTERLOCKS
04465 M01S04087.274l797 ---| LDM VBST+1,BP
Line S00101 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
04466 M01S00101.274l797 +++| LDM VBST+1,BP DETERMINE TAPE TYPE
04467 M01S00102.274l797 +++| SHN -5
04468 M01S00103.274l797 +++| LPN ACVS/40+CTVS/40
04469 M01S00104.274l797 +++| STD T1
04470 M01S00105.274l797 +++| LMD TT
04471 M01S00106.274l797 +++| ZJN CFB3 IF SAME TYPE AS CURRENT SCAN TYPE
04472 M01S00107.274l797 +++| SHN 21-13
04473 M01S00108.274l797 +++| PJN CFB1 IF NOT FIRST TAPE VSN FOUND OF ANY TYPE
04474 M01S00109.274l797 +++| LDD T1
04475 M01S00110.274l797 +++| STD TT SET TAPE TYPE FOR THIS SCAN
04476 M01S00111.274l797 +++| UJN CFB3 PROCESS VSN ENTRY
04477 M01S00112.274l797 +++|
04478 M01S00113.274l797 +++| CFB1 LDM ISFC,T1
04479 M01S00114.274l797 +++| NJN CFB2 IF NOT FIRST VSN OF THIS TAPE TYPE
04480 M01S00115.274l797 +++| AOM ISFC,T1 INDICATE THAT VSN OF THIS TYPE FOUND
04481 M01S00116.274l797 +++| CFB2 UJN CFBX RETURN
04482 M01S00117.274l797 +++|
04483 M01S00118.274l797 +++| CFB3 LDM VBST+1,BP
04484 M01S00119.274l797 +++|* UJN CFB8 (IF NOT CLEARING INTERLOCKS)
04485 M01S00120.274l797 +++| CFBA EQU *-2
04486 M00S04088.tfm +++| LPN VIVS
Line S04089 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
04487 M01S04089.274l797 ---| NJN CFB1 IF VOLUME BUSY
Line S00121 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
04488 M01S00121.274l797 +++| NJN CFB4 IF VOLUME BUSY
04489 M00S04090.tfm +++| LDM VBJS,BP
Line S04091 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
04490 M01S04091.274l797 ---| ZJN CFB5 IF VOLUME NOT ASSIGNED
04491 M01S04092.274l797 ---| CFB1 LDM VBMX,BP SET MACHINE INDEX HOLDING VSN BUSY
Line S00122 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
04492 M01S00122.274l797 +++| ZJN CFB8 IF VOLUME NOT ASSIGNED
04493 M01S00123.274l797 +++| CFB4 LDM VBMX,BP SET MACHINE INDEX HOLDING VSN BUSY
04494 M00S04093.tfm +++| LPN 17
04495 M00S04094.tfm +++| STD T1
04496 M00S04095.tfm +++| LDM TACM,T1
Line S04096 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
04497 M01S04096.274l797 ---| NJN CFBX IF NOT PROCESSING THIS MACHINE
Line S00124 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
04498 M01S00124.274l797 +++| NJP CFBX IF NOT PROCESSING THIS MACHINE
04499 M00S04097.tfm +++| LDM VBRC,BP CHECK REEL NUMBER
04500 M00S04098.tfm +++| SHN -6
04501 M00S04099.tfm +++| SBN 2
Line S04100 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
04502 M01S04100.274l797 ---| PJN CFB5 IF NOT FIRST REEL
Line S00125 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
04503 M01S00125.274l797 +++| PJP CFB8 IF NOT FIRST REEL
04504 M00S04101.tfm +++| RJM SCP SET CATALOG BUFFER POINTERS
04505 M00S04102.tfm +++| LDD BA CHECK FOR CATALOG ENTRY
Line S04103 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
04506 M01S04103.274l797 ---| ZJN CFB2 IF NO CATALOG ENTRY
Line S00126 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
04507 M01S00126.274l797 +++| ZJN CFB5 IF NO CATALOG ENTRY
04508 M00S04104.tfm +++| LDM CBST,BP CHECK FOR INITIAL ASSIGNMENT
04509 M00S04105.tfm +++| SHN 21-11
Line S04106 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
04510 M01S04106.274l797 ---| PJN CFB4 IF NOT INITIAL ASSIGNMENT
04511 M01S04107.274l797 ---| CFB2 RJM RLV RELEASE CATALOG ENTRIES AND VSNS
04512 M01S04108.274l797 ---| CFB3 LJM CFBX RETURN
Line S00127 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
04513 M01S00127.274l797 +++| PJN CFB7 IF NOT INITIAL ASSIGNMENT
04514 M01S00128.274l797 +++| CFB5 RJM RLV RELEASE CATALOG ENTRIES AND VSNS
04515 M01S00129.274l797 +++| CFB6 LJM CFBX RETURN
04516 M00S04109.tfm +++|
Line S04110 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
04517 M01S04110.274l797 ---| CFB4 RJM RSV RESERVE CATALOG ENTRIES AND VSNS
04518 M01S04111.274l797 ---| UJN CFB3 RETURN
04519 M01S04112.274l797 ---|
04520 M01S04113.274l797 ---| CSV SPACE 4,10
Line S00130 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
04521 M01S00130.274l797 +++| CFB7 RJM RSV RESERVE CATALOG ENTRIES AND VSNS
04522 M01S00131.274l797 +++| UJN CFB6 RETURN
04523 M01S00132.274l797 +++| CSV SPACE 4,20
04524 M00S04114.tfm +++|** CSV - CHECK SCRATCH VOLUME.
04525 M00S04115.tfm +++|*
04526 M00S04116.tfm +++|* ENTRY (BA) = BUFFER ADDRESS (VSN INDEX).
04527 M00S04117.tfm +++|* (BP) = BUFFER POINTER (VSN INDEX).
04528 M00S04118.tfm +++|* (PV - PV+4) = PREVIOUS SCRATCH VSN POINTERS.
04529 M00S04119.tfm +++|*
04530 M00S04120.tfm +++|* EXIT (BA) = UNCHANGED.
04531 M00S04121.tfm +++|* (BP) = UNCHANGED.
Line S04122 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
04532 M01S04122.274l797 ---|* VSN ADDED TO THE SCRATCH STRING IF THE VSN
04533 M01S04123.274l797 ---|* STATUS IS SCRATCH.
Line S00133 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
04534 M01S00133.274l797 +++|* VSN ADDED TO THE SCRATCH STRING, IF THE VSN STATUS
04535 M01S00134.274l797 +++|* IS SCRATCH.
04536 M00S04124.tfm +++|*
Line S04125 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
04537 M01S04125.274l797 ---|* USES CV - CV+4, PV - PV+4.
Line S00135 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
04538 M01S00135.274l797 +++|* USES CV - CV+4, PV - PV+4.
04539 M00S04126.tfm +++|*
04540 M00S04127.tfm +++|* CALLS CRD, RLV, SCP, WRP.
04541 M00S04128.tfm +++|*
04542 M00S04129.tfm +++|* MACROS CLEAR, LDA, MMOVE, RESTP, SAVEP.
Line S04130 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
04543 M01S04130.274l797 ---|*
04544 M00S04131.tfm +++|
04545 M00S04132.tfm +++|
Line S04133 Modification History
M01 (Removed by) t5160
Seq # *Modification Id* Act
----------------------------+
04546 M01S04133.t5160 ---| CSV4 MJN CSVX IF NOT RESERVED
Line S00001 Modification History
M01 (Added by) t5160
Seq # *Modification Id* Act
----------------------------+
04547 M01S00001.t5160 +++| CSV4 PJN CSVX IF NOT RESERVED
04548 M00S04134.tfm +++| ERRNZ RTVS-400000 *CODE MUST BE CHANGED*
04549 M00S04135.tfm +++| LDM VBRC,BP CHECK REEL NUMBER
04550 M00S04136.tfm +++| SHN -6
04551 M00S04137.tfm +++| SBN 2
04552 M00S04138.tfm +++| PJN CSVX IF NOT FIRST REEL
04553 M00S04139.tfm +++| RJM CRD CHECK RELEASE DATE
04554 M00S04140.tfm +++| ZJN CSVX IF NOT TO BE RELEASED
04555 M00S04141.tfm +++| RJM SCP SET CATALOG BUFFER POINTERS
04556 M00S04142.tfm +++| RJM RLV RELEASE CATALOG ENTRIES AND VSNS
04557 M00S04143.tfm +++| UJN CSVX RETURN
04558 M00S04144.tfm +++|
Line S04145 Modification History
M01 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
04559 M01S04145.ns2763 ---| CSV9 LDM VBST,BP CLEAR TEMPORARY SCRATCH
04560 M01S04146.ns2763 ---| SCN TSVS/1S12
Line S00011 Modification History
M01 (Added by) ns2763
Seq # *Modification Id* Act
----------------------------+
04561 M01S00011.ns2763 +++| CSV9 LMM VBST,BP CLEAR TEMPORARY SCRATCH
04562 M00S04147.tfm +++| STM VBST,BP
04563 M00S04148.tfm +++| AOM ISFA REWRITE BUFFER
04564 M00S04149.tfm +++|
04565 M00S04150.tfm +++| CSV SUBR ENTRY/EXIT
04566 M00S04151.tfm +++| LDM VBJS,BP
04567 M00S04152.tfm +++| NJN CSVX IF VOLUME ASSIGNED
04568 M00S04153.tfm +++| LDM VBST,BP CHECK FOR TEMPORARY SCRATCH
04569 M00S04154.tfm +++| LPN TSVS/1S12
04570 M00S04155.tfm +++| NJN CSV9 IF TEMPORARY SCRATCH
04571 M00S04156.tfm +++| LDA VBST,BP
Line S04157 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
04572 M01S04157.274l797 ---| LPC RTVS&HMVS&UOVS&TVVS&MVVS&ERVS
Line S00136 Modification History
M01 (Added by) 274l797
M02 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
04573 M02S00136.ns2763 ---| LPC RTVS+HMVS+UOVS+TVVS+MVVS+ERVS
Line S00012 Modification History
M01 (Added by) ns2763
Seq # *Modification Id* Act
----------------------------+
04574 M01S00012.ns2763 +++| LPC RTVS+HMVS+UOVS+SVVS+TVVS+MVVS+ERVS
04575 M00S04158.tfm +++| ZJN CSV1 IF AVAILABLE SCRATCH
04576 M00S04159.tfm +++| LJM CSV4 CHECK CONDITIONAL RELEASE
04577 M00S04160.tfm +++|
Line S04161 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
04578 M01S04161.274l797 ---| CSV1 BSS 0 SET AVAILABLE SCRATCH
04579 M01S04162.274l797 ---|* LDN 0
Line S00137 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
04580 M01S00137.274l797 +++| CSV1 LDM VBST+1,BP SET AVAILABLE SCRATCH
04581 M01S00138.274l797 +++| LPC CTVS+ACVS
04582 M00S04163.tfm +++| STM VBST+1,BP
04583 M00S04164.tfm +++| LDN ASVS/1S12
04584 M00S04165.tfm +++| STM VBST,BP
04585 M00S04166.tfm +++| AOM PESN+4 INCREMENT SCRATCH COUNT
04586 M00S04167.tfm +++| SHN -14
04587 M00S04168.tfm +++| RAM PESN+3
04588 M00S04169.tfm +++| LDD PV
04589 M00S04170.tfm +++| NJN CSV2 IF PREVIOUS SCRATCH FOUND
04590 M00S04171.tfm +++| MMOVE VBES,BP,PESN,,VSKL
04591 M00S04172.tfm +++| UJN CSV3 SAVE SCRATCH POINTERS
04592 M00S04173.tfm +++|
04593 M00S04174.tfm +++| CSV2 MMOVE VBES,BP,VBNV,PV+1,VSKL
04594 M00S04175.tfm +++| LDD PV
04595 M00S04176.tfm +++| LMD BA
04596 M00S04177.tfm +++| ZJN CSV3 IF SAME BUFFER
04597 M00S04178.tfm +++| SAVEP CV
04598 M00S04179.tfm +++| RESTP PV
04599 M00S04180.tfm +++| RJM WRP WRITE RANDOM PRU
04600 M00S04181.tfm +++| RESTP CV
04601 M00S04182.tfm +++| CSV3 AOM ISFA
04602 M00S04183.tfm +++| AOM ISFB
04603 M00S04184.tfm +++| SAVEP PV
04604 M00S04185.tfm +++| CLEAR VBFV,BP,2*10D
04605 M00S04186.tfm +++| STM VBCI,BP
04606 M00S04187.tfm +++| STM VBCI+1,BP
04607 M00S04188.tfm +++| LCN 0 SET END OF SCRATCH DELIMITER
04608 M00S04189.tfm +++| STM VBNV,BP
04609 M00S04190.tfm +++| STM VBNV+1,BP
04610 M00S04191.tfm +++| STM VBNV+2,BP
04611 M00S04192.tfm +++| LJM CSVX RETURN
Line S04193 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
04612 M01S04193.274l797 ---| RLV SPACE 4,10
Line S00139 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
04613 M01S00139.274l797 +++| RLV SPACE 4,20
04614 M00S04194.tfm +++|** RLV - RELEASE CATALOG ENTRIES AND VSNS.
04615 M00S04195.tfm +++|*
04616 M00S04196.tfm +++|* ENTRY (CV - CV+4) = CURRENT VSN POINTERS.
04617 M00S04197.tfm +++|* (PV - PV+4) = PREVIOUS SCRATCH POINTERS.
04618 M00S04198.tfm +++|* (CPCB - CPCB+4) = CATALOG BUFFER POINTERS.
04619 M00S04199.tfm +++|*
04620 M00S04200.tfm +++|* EXIT CATALOGS RELEASED.
04621 M00S04201.tfm +++|* VSNS RELEASED.
Line S04202 Modification History
M01 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
04622 M01S04202.ns2763 ---|* (BA) = UNCHANGED.
04623 M01S04203.ns2763 ---|* (BP) = UNCHANGED.
04624 M00S04204.tfm +++|* (PV - PV+4) = LAST SCRATCH VSN POINTERS
04625 M00S04205.tfm +++|*
Line S04206 Modification History
M01 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
04626 M01S04206.ns2763 ---|* USES BP, KA, CV - CV+4, NV - NV+2, PV - PV+4.
Line S00013 Modification History
M01 (Added by) ns2763
Seq # *Modification Id* Act
----------------------------+
04627 M01S00013.ns2763 +++|* USES KA, SV, CM - CM+4, CV - CV+4, NV - NV+2, PV - PV+4.
04628 M00S04207.tfm +++|*
Line S04208 Modification History
M01 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
04629 M01S04208.ns2763 ---|* CALLS CSN, IAM, PCE, RRP, RVB, VIS, WRP.
Line S00014 Modification History
M01 (Added by) ns2763
Seq # *Modification Id* Act
----------------------------+
04630 M01S00014.ns2763 +++|* CALLS CSN, IAM, PCE, RVB, VIS, WRP.
04631 M00S04209.tfm +++|*
Line S04210 Modification History
M01 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
04632 M01S04210.ns2763 ---|* MACROS CLEAR, COMPARE, ERROR, LDA, MMOVE, RESTP, SAVEP.
Line S00015 Modification History
M01 (Added by) ns2763
Seq # *Modification Id* Act
----------------------------+
04633 M01S00015.ns2763 +++|* MACROS CLEAR, COMPARE, ERROR, MMOVE, RESTP, SAVEP.
04634 M00S04211.tfm +++|
04635 M00S04212.tfm +++|
04636 M00S04213.tfm +++| RLV SUBR ENTRY/EXIT
04637 M00S04214.tfm +++| RESTP CV RESTORE CURRENT POINTERS
Line S04215 Modification History
M01 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
04638 M01S04215.ns2763 ---| MMOVE VBES,BP,RLVA,,VSKL SAVE FIRST VSN
Line S00016 Modification History
M01 (Added by) ns2763
Seq # *Modification Id* Act
----------------------------+
04639 M01S00016.ns2763 +++| CRM RLVB,ON SAVE (CV)
04640 M01S00017.ns2763 +++| SBN 1 SAVE FIRST SCRATCH VSN AND COUNT
04641 M01S00018.ns2763 +++| CWM PESN,ON
04642 M01S00019.ns2763 +++| SBN 1
04643 M01S00020.ns2763 +++| CRM RLVA,ON
04644 M01S00021.ns2763 +++| MMOVE VBES,BP,PESN,,VSKL SAVE FIRST VSN FOR MESSAGE/COMPARE
04645 M01S00022.ns2763 +++| LDN 0
04646 M01S00023.ns2763 +++| RLV0 STD NV SET/CLEAR PRECEDING SYSTEM VSN FLAG
04647 M01S00024.ns2763 +++| LDM VBST+1,BP CHECK SYSTEM VSN FLAG
04648 M01S00025.ns2763 +++| LPC SVVS
04649 M01S00026.ns2763 +++| STD SV SET PROCESSING SYSTEM VSN FLAG
04650 M01S00027.ns2763 +++| NJN RLV0.1 IF PROCESSING SYSTEM VSN
04651 M00S04216.tfm +++| LDD PV
04652 M00S04217.tfm +++| NJN RLV1 IF PREVIOUS SCRATCH FOUND
Line S04218 Modification History
M01 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
04653 M01S04218.ns2763 ---| MMOVE VBES,BP,PESN,,VSKL SET FIRST SCRATCH VSN
04654 M01S04219.ns2763 ---| UJN RLV2 SKIP TO LAST VSN
Line S00028 Modification History
M01 (Added by) ns2763
Seq # *Modification Id* Act
----------------------------+
04655 M01S00028.ns2763 +++| MMOVE VBES,BP,RLVA,,VSKL SET FIRST SCRATCH VSN
04656 M01S00029.ns2763 +++| RLV0.1 UJP RLV2 SKIP TO LAST VSN
04657 M00S04220.tfm +++|
Line S04221 Modification History
M01 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
04658 M01S04221.ns2763 ---| RLV1 MMOVE VBES,BP,VBNV,PV+1,VSKL SET NEXT IN CHAIN TO FIRST VSN
Line S00030 Modification History
M01 (Added by) ns2763
Seq # *Modification Id* Act
----------------------------+
04659 M01S00030.ns2763 +++| RLV1 LDD NV
04660 M01S00031.ns2763 +++| ZJN RLV1.1 IF NO PRECEDING SYSTEM VSN
04661 M01S00032.ns2763 +++| SAVEP CV MAKE THIS VSN CURRENT TEMPORARILY
04662 M01S00033.ns2763 +++| RJM RVB RESTORE VSN BUFFERS
04663 M01S00034.ns2763 +++| RLV1.1 MMOVE VBES,BP,VBNV,PV+1,VSKL SET NEXT IN CHAIN TO FIRST VSN
04664 M00S04222.tfm +++| LDD PV
04665 M00S04223.tfm +++| LMD BA
Line S04224 Modification History
M01 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
04666 M01S04224.ns2763 ---| ZJN RLV2 IF SAME BUFFER
Line S00035 Modification History
M01 (Added by) ns2763
Seq # *Modification Id* Act
----------------------------+
04667 M01S00035.ns2763 +++| ZJN RLV1.2 IF SAME BUFFER
04668 M00S04225.tfm +++| RESTP PV RESTORE PREVIOUS SCRATCH VSN POINTERS
04669 M00S04226.tfm +++| RJM WRP WRITE RANDOM PRU
04670 M00S04227.tfm +++| RESTP CV RESTORE CURRENT SCRATCH VSN POINTERS
Line S04228 Modification History
M01 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
04671 M01S04228.ns2763 ---| RLV2 AOM PESN+4 INCREMENT SCRATCH COUNT
Line S00036 Modification History
M01 (Added by) ns2763
Seq # *Modification Id* Act
----------------------------+
04672 M01S00036.ns2763 +++| RLV1.2 LDD MA RESTORE ORIGINAL (CV)
04673 M01S00037.ns2763 +++| CWM RLVB,ON
04674 M01S00038.ns2763 +++| SBN 1
04675 M01S00039.ns2763 +++| CRD CV
04676 M01S00040.ns2763 +++| RLV2 LDN NV SET NEXT VOLUME
04677 M01S00041.ns2763 +++| STD KA
04678 M01S00042.ns2763 +++| MMOVE VBNV,BP,NV,,VSKL SAVE NEXT VSN
04679 M01S00043.ns2763 +++| CLEAR VBFV,BP,2*10D CLEAR VSN BLOCK
04680 M01S00044.ns2763 +++| STM VBCI,BP CLEAR CATALOG POINTERS
04681 M01S00045.ns2763 +++| STM VBCI+1,BP
04682 M01S00046.ns2763 +++| LDM VBST+1,BP CLEAR EXTRANEOUS STATUS FLAGS
04683 M01S00047.ns2763 +++| LPK SVVS+TVVS+MVVS+ERVS+CTVS+ACVS
04684 M01S00048.ns2763 +++| STM VBST+1,BP
Line S04229 Modification History
M01 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
04685 M01S04229.ns2763 ---| SHN -14
Line S00049 Modification History
M01 (Added by) ns2763
Seq # *Modification Id* Act
----------------------------+
04686 M01S00049.ns2763 +++| LDM VBST,BP
04687 M01S00050.ns2763 +++| LPK HMVS/1S12+UOVS/1S12
Line S04230 Modification History
M01 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
04688 M01S04230.ns2763 ---| RAM PESN+3
04689 M01S04231.ns2763 ---| LDA VBST,BP SET/CLEAR STATUS FLAGS
Line S04232 Modification History
M01 (Removed by) 274l797
M02 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
04690 M02S04232.ns2763 ---| LPC HMVS&UOVS&TVVS&MVVS&ERVS
Line S00140 Modification History
M01 (Added by) 274l797
M02 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
04691 M02S00140.ns2763 ---| LPC HMVS+UOVS+TVVS+MVVS+ERVS+CTVS+ACVS
Line S04233 Modification History
M01 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
04692 M01S04233.ns2763 ---| STM VBST+1,BP
Line S00051 Modification History
M01 (Added by) ns2763
Seq # *Modification Id* Act
----------------------------+
04693 M01S00051.ns2763 +++| STM VBST,BP
04694 M01S00052.ns2763 +++| LDD SV
04695 M01S00053.ns2763 +++| NJN RLV3 IF SYSTEM VSN
04696 M01S00054.ns2763 +++| MMOVE NV,,VBNV,BP,VSKL RESTORE NEXT VSN
04697 M01S00055.ns2763 +++| AOM RLVA+4 INCREMENT SCRATCH COUNT
04698 M00S04234.tfm +++| SHN -14
Line S04235 Modification History
M01 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
04699 M01S04235.ns2763 ---| LMN ASVS/1S12
04700 M01S04236.ns2763 ---| STM VBST,BP
04701 M01S04237.ns2763 ---| COMPARE RLVA,,VBES,BP,VSKL
Line S00056 Modification History
M01 (Added by) ns2763
Seq # *Modification Id* Act
----------------------------+
04702 M01S00056.ns2763 +++| RAM RLVA+3
04703 M01S00057.ns2763 +++| LDN ASVS/1S12 SET AVAILABLE SCRATCH
04704 M01S00058.ns2763 +++| RAM VBST,BP
04705 M01S00059.ns2763 +++| COMPARE PESN,,VBES,BP,VSKL
04706 M00S04238.tfm +++| PJN RLV3 IF VSN IN BUFFER ALREADY PROCESSED
04707 M00S04239.tfm +++| LDN TSVS/1S12 FLAG TEMPORARY SCRATCH
04708 M00S04240.tfm +++| RAM VBST,BP
Line S04241 Modification History
M01 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
04709 M01S04241.ns2763 ---| RLV3 LDN NV SET NEXT VOLUME
04710 M01S04242.ns2763 ---| STD KA
04711 M01S04243.ns2763 ---| MMOVE VBNV,BP,NV,,VSKL SAVE NEXT VSN
04712 M01S04244.ns2763 ---| CLEAR VBFV,BP,2*10D CLEAR VSN BLOCK
04713 M01S04245.ns2763 ---| STM VBCI,BP CLEAR CATALOG POINTERS
04714 M01S04246.ns2763 ---| STM VBCI+1,BP
04715 M01S04247.ns2763 ---| MMOVE NV,,VBNV,BP,VSKL RESTORE NEXT VSN
04716 M01S04248.ns2763 ---| LDD NV
Line S00060 Modification History
M01 (Added by) ns2763
Seq # *Modification Id* Act
----------------------------+
04717 M01S00060.ns2763 +++| RLV3 LDD NV
04718 M00S04249.tfm +++| ZJN RLV4 IF LAST VOLUME
04719 M00S04250.tfm +++| RJM WRP WRITE RANDOM PRU
04720 M00S04251.tfm +++| RJM VIS VSN INDEXED SEARCH
Line S04252 Modification History
M01 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
04721 M01S04252.ns2763 ---| ZJP RLV2 IF VSN FOUND
Line S00061 Modification History
M01 (Added by) ns2763
Seq # *Modification Id* Act
----------------------------+
04722 M01S00061.ns2763 +++| ZJN RLV3.1 IF VSN FOUND
04723 M00S04253.tfm +++| ERROR EID *ERROR IN INDEX DATA.*
04724 M00S04254.tfm +++|
Line S04255 Modification History
M01 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
04725 M01S04255.ns2763 ---| RLV4 LCN 0 SET END OF SCRATCH VOLUMES
Line S00062 Modification History
M01 (Added by) ns2763
Seq # *Modification Id* Act
----------------------------+
04726 M01S00062.ns2763 +++| RLV3.1 LDD SV
04727 M01S00063.ns2763 +++| ZJP RLV2 IF NOT PRECEDED BY SYSTEM VSN
04728 M01S00064.ns2763 +++| LJM RLV0 SET FLAG AND CHECK NEXT SCRATCH VSN
04729 M01S00065.ns2763 +++|
04730 M01S00066.ns2763 +++| RLV4 STM ISFA CLEAR BUFFER REWRITE FLAG
04731 M01S00067.ns2763 +++| STM ISFB CLEAR BUFFER TOGGLE FLAG
04732 M01S00068.ns2763 +++| LDD SV
04733 M01S00069.ns2763 +++| NJN RLV4.1 IF ONLY SYSTEM VSN(S) PROCESSED
04734 M01S00070.ns2763 +++| LCN 0 SET END OF SCRATCH VOLUMES
04735 M00S04256.tfm +++| STM VBNV,BP
04736 M00S04257.tfm +++| STM VBNV+1,BP
04737 M00S04258.tfm +++| STM VBNV+2,BP
Line S04259 Modification History
M01 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
04738 M01S04259.ns2763 ---| LDN 0
04739 M01S04260.ns2763 ---| STM ISFA CLEAR BUFFER REWRITE FLAG
04740 M01S04261.ns2763 ---| STM ISFB CLEAR BUFFER TOGGLE FLAG
04741 M00S04262.tfm +++| SAVEP PV SAVE LAST SCRATCH POINTERS
Line S04263 Modification History
M01 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
04742 M01S04263.ns2763 ---| RJM WRP WRITE LAST SCRATCH
Line S00071 Modification History
M01 (Added by) ns2763
Seq # *Modification Id* Act
----------------------------+
04743 M01S00071.ns2763 +++| RLV4.1 RJM WRP WRITE LAST SCRATCH
04744 M00S04264.tfm +++| LDM CPCB
Line S04265 Modification History
M01 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
04745 M01S04265.ns2763 ---| ZJP RLV6 IF NO CATALOG ENTRY
Line S00072 Modification History
M01 (Added by) ns2763
Seq # *Modification Id* Act
----------------------------+
04746 M01S00072.ns2763 +++| ZJN RLV6 IF NO CATALOG ENTRY
04747 M00S04266.tfm +++| MMOVE CWUN,CPCB,PBUN,,UNKL SET USERNAME TO TAPE FILE
04748 M00S04267.tfm +++| LDM CPCB+1 GET FILE STATUS
04749 M00S04268.tfm +++| STD CM
04750 M00S04269.tfm +++| LDM CBST,CM
04751 M00S04270.tfm +++| SHN 21-11
Line S04271 Modification History
M01 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
04752 M01S04271.ns2763 ---| MJP RLV5 IF INITIAL CATALOG
Line S00073 Modification History
M01 (Added by) ns2763
Seq # *Modification Id* Act
----------------------------+
04753 M01S00073.ns2763 +++| MJN RLV5 IF INITIAL CATALOG
04754 M00S04272.tfm +++| LDN 1
04755 M00S04273.tfm +++| RJM CSN CONVERT SEQUENCE NUMBER TO DISPLAY CODE
Line S04274 Modification History
M01 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
04756 M01S04274.ns2763 ---| MMOVE PESN,,RLVB,,VSKL SAVE FIRST SCRATCH
04757 M01S04275.ns2763 ---| MMOVE RLVA,,PESN,,VSKL SET FIRST VSN FOR MESSAGE
04758 M00S04276.tfm +++| LDN ZERL SET UNCONDITIONAL RELEASE
04759 M00S04277.tfm +++| CRD CM
04760 M00S04278.tfm +++| LDN 1 FLAG RELEASE
04761 M00S04279.tfm +++| RJM IAM ISSUE ACCOUNT FILE MESSAGE
Line S04280 Modification History
M01 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
04762 M01S04280.ns2763 ---| MMOVE RLVB,,PESN,,VSKL
04763 M00S04281.tfm +++| RLV5 RJM PCE PURGE CATALOG ENTRIES
04764 M00S04282.tfm +++| RLV6 RJM RVB RESTORE VSN BUFFERS
Line S00074 Modification History
M01 (Added by) ns2763
Seq # *Modification Id* Act
----------------------------+
04765 M01S00074.ns2763 +++| LDD MA SET/RESTORE FIRST SCRATCH VSN AND COUNTS
04766 M01S00075.ns2763 +++| CWM RLVA,ON
04767 M01S00076.ns2763 +++| SBN 1
04768 M01S00077.ns2763 +++| CRM PESN,ON
04769 M00S04283.tfm +++| LJM RLVX RETURN
04770 M00S04284.tfm +++|
Line S00078 Modification History
M01 (Added by) ns2763
Seq # *Modification Id* Act
----------------------------+
04771 M01S00078.ns2763 +++|
Line S04285 Modification History
M01 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
04772 M01S04285.ns2763 ---| RLVA BSS VSKL/2
04773 M01S04286.ns2763 ---| RLVB BSS VSKL/2
Line S00079 Modification History
M01 (Added by) ns2763
Seq # *Modification Id* Act
----------------------------+
04774 M01S00079.ns2763 +++| RLVA BSS 5 FIRST SCRATCH VSN
04775 M01S00080.ns2763 +++| RLVB BSS 5 CURRENT VSN POINTERS
04776 M00S04287.tfm +++| RSV SPACE 4,10
04777 M00S04288.tfm +++|** RSV - RESERVE CATALOG ENTRIES AND VSNS.
04778 M00S04289.tfm +++|*
04779 M00S04290.tfm +++|* ENTRY (CV - CV+4) = CURRENT VSN POINTERS.
04780 M00S04291.tfm +++|* (PV - PV+4) = PREVIOUS SCRATCH POINTERS.
04781 M00S04292.tfm +++|* (CPCB - CPCB+4) = CATALOG BUFFER POINTERS.
04782 M00S04293.tfm +++|*
04783 M00S04294.tfm +++|* EXIT CATALOG ENTRIES AND VSNS RESERVED.
04784 M00S04295.tfm +++|* (BA) = UNCHANGED
04785 M00S04296.tfm +++|* (BP) = UNCHANGED
04786 M00S04297.tfm +++|*
04787 M00S04298.tfm +++|* USES CM, IC, KA, RC.
04788 M00S04299.tfm +++|*
04789 M00S04300.tfm +++|* CALLS CSN, IAM, IRM, RRP, RVB, VIS, VSP, WRP.
04790 M00S04301.tfm +++|*
04791 M00S04302.tfm +++|* MACROS ERROR, LDA, MMOVE, RESTP, SAVEP.
04792 M00S04303.tfm +++|
04793 M00S04304.tfm +++|
04794 M00S04305.tfm +++| RSV SUBR ENTRY/EXIT
04795 M00S04306.tfm +++| LDD MA SAVE SCRATCH POINTERS AND COUNT
04796 M00S04307.tfm +++| CWM PESN,ON
04797 M00S04308.tfm +++| SBN 1
04798 M00S04309.tfm +++| CRM RLVA,ON
Line S04310 Modification History
M01 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
04799 M01S04310.ns2763 ---| ERRNG VSKL-5 *CODE NEEDS TO BE CHANGED*
04800 M00S04311.tfm +++| RESTP CV RESTORE CURRENT VSN POINTERS
04801 M00S04312.tfm +++| MMOVE VBES,BP,PESN,,VSKL SET FIRST VSN AND CURRENT VSN
04802 M00S04313.tfm +++| LDC PVSN
04803 M00S04314.tfm +++| STD KA
04804 M00S04315.tfm +++| MMOVE PESN,,,KA,VSKL
04805 M00S04316.tfm +++| SAVEP CPSI SAVE SECONDARY VSN POINTERS
04806 M00S04317.tfm +++| RESTP CPCB
04807 M00S04318.tfm +++| MMOVE CWUN,BA,PBUN,,UNKL
04808 M00S04319.tfm +++| RSV1 LDA CBQN,BP SET SEQUENCE NUMBER
04809 M00S04320.tfm +++| RJM CSN
04810 M00S04321.tfm +++| LDM CBST,BP GET INITIAL CATALOG STATUS
04811 M00S04322.tfm +++| STD T0
04812 M00S04323.tfm +++| LPC 1000
04813 M00S04324.tfm +++| STD IC
04814 M00S04325.tfm +++| LMD T0 CLEAR INITIAL CATALOG STATUS
04815 M00S04326.tfm +++| SCN 1 CLEAR BUSY
04816 M00S04327.tfm +++| STM CBST,BP
04817 M00S04328.tfm +++| LDM CBRC,BP
04818 M00S04329.tfm +++| STD RC
04819 M00S04330.tfm +++| RESTP CPSI RESTORE SECONDARY VSN POINTERS
04820 M00S04331.tfm +++| RSV2 LDD IC
04821 M00S04332.tfm +++| NJN RSV3 IF INITIAL CATALOG
04822 M00S04333.tfm +++| LDM VBST,BP CHECK RESERVED STATUS
04823 M00S04334.tfm +++| LPN RTVS/1S12
04824 M00S04335.tfm +++| NJN RSV4 IF RESERVED
04825 M00S04336.tfm +++| RSV3 LDN 0 SET RESERVE MESSAGE
Line S04337 Modification History
M01 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
04826 M01S04337.ns2763 ---| RJM IAM ISSUE ACCOUTING MESSAGE
Line S00081 Modification History
M01 (Added by) ns2763
Seq # *Modification Id* Act
----------------------------+
04827 M01S00081.ns2763 +++| RJM IAM ISSUE ACCOUNTING MESSAGE
04828 M00S04338.tfm +++| RSV4 LDM VBST,BP CLEAR EOI AND SCRATCH STATUS
04829 M00S04339.tfm +++| SCN EOIV/1S12+RTVS/1S12+ASVS/1S12
04830 M00S04340.tfm +++| LMN RTVS/1S12 SET RESERVED STATUS
04831 M00S04341.tfm +++| STM VBST,BP
04832 M00S04342.tfm +++| LDM VBST+1,BP CLEAR VSN BUSY STATUS
04833 M00S04343.tfm +++| SCN VIVS
04834 M00S04344.tfm +++| STM VBST+1,BP
04835 M00S04345.tfm +++| LDN 0
04836 M00S04346.tfm +++| STM VBJS,BP
Line S04347 Modification History
M01 (Removed by) m1629
Seq # *Modification Id* Act
----------------------------+
04837 M01S04347.m1629 ---| STM VBJS+1,BP
04838 M00S04348.tfm +++| SOD RC
04839 M00S04349.tfm +++| ZJN RSV7 IF NO MORE REELS
04840 M00S04350.tfm +++| RJM WRP WRITE RANDOM PRU
04841 M00S04351.tfm +++| MMOVE VBNV,BP,,KA,VSKL
04842 M00S04352.tfm +++| LDI KA
04843 M00S04353.tfm +++| NJN RSV6 IF NEXT REEL EXISTS
04844 M00S04354.tfm +++| RSV5 ERROR EID *ERROR IN INDEXED DATA.*
04845 M00S04355.tfm +++|
04846 M00S04356.tfm +++| RSV6 RJM VIS VSN INDEXED SEARCH
04847 M00S04357.tfm +++| NJN RSV5 IF NOT FOUND
04848 M00S04358.tfm +++| LJM RSV2 UPDATE NEXT VSN
04849 M00S04359.tfm +++|
04850 M00S04360.tfm +++| RSV7 RESTP CPCB RESTORE CATALOG BUFFER POINTERS
04851 M00S04361.tfm +++| LDM CBST,BP
04852 M00S04362.tfm +++| SHN 21-10
04853 M00S04363.tfm +++| PJN RSV8 IF NO RECOVERY MESSAGES TO ISSUE
04854 M00S04364.tfm +++| RJM IRM ISSUE *TMS* RECOVERY MESSAGES
04855 M00S04365.tfm +++| RSV8 LDM CBNC,BP
04856 M00S04366.tfm +++| SHN 14
04857 M00S04367.tfm +++| STD CI
04858 M00S04368.tfm +++| SHN -14
04859 M00S04369.tfm +++| LMD RI
04860 M00S04370.tfm +++| NJN RSV9 IF DIFFERENT CATALOG BLOCK
04861 M00S04371.tfm +++| LDM CBNC+1,BP
04862 M00S04372.tfm +++| LMD RI+1
04863 M00S04373.tfm +++| ZJN RSV10 IF DIFFERENT CATALOG BLOCK
04864 M00S04374.tfm +++| RSV9 RJM WRP WRITE RANDOM PRU
04865 M00S04375.tfm +++| LDM CBNC,BP CHECK FOR NEXT CATALOG
04866 M00S04376.tfm +++| LPN 77
04867 M00S04377.tfm +++| STD RI
04868 M00S04378.tfm +++| LDM CBNC+1,BP
04869 M00S04379.tfm +++| STD RI+1
04870 M00S04380.tfm +++| ADD RI
04871 M00S04381.tfm +++| ZJN RSV12 IF LAST CATALOG
04872 M00S04382.tfm +++| RJM RRP READ RANDOM PRU
04873 M00S04383.tfm +++| RSV10 RJM VSP VERIFY/SET CATALOG POINTERS
04874 M00S04384.tfm +++| PJN RSV11 IF POINTER VALID
04875 M00S04385.tfm +++| ERROR ECD *ERROR IN CATALOG DATA.*
04876 M00S04386.tfm +++|
04877 M00S04387.tfm +++| RSV11 SAVEP CPCB SAVE CATALOG BUFFERS
04878 M00S04388.tfm +++| LJM RSV1 PROCESS NEXT CATALOG
04879 M00S04389.tfm +++|
04880 M00S04390.tfm +++| RSV12 LDM CPSI+1 CHECK FOR EXCESS VOLUMES
04881 M00S04391.tfm +++| STD CM
04882 M00S04392.tfm +++| LDM VBNV,CM
04883 M00S04393.tfm +++| ZJN RSV13 IF NO EXCESS VOLUMES
04884 M00S04394.tfm +++| AOD RC FAKE REEL COUNT
04885 M00S04395.tfm +++| RESTP CPCB RESTORE CATALOG BUFFERS
04886 M00S04396.tfm +++| LJM RSV2 SET VSN STATUS, ISSUE ACCOUNT FILE MESSAGE
04887 M00S04397.tfm +++|
04888 M00S04398.tfm +++| RSV13 RESTP CPSI RESTORE VSN POINTERS
04889 M00S04399.tfm +++| RJM WRP WRITE RANDOM PRU
04890 M00S04400.tfm +++| RJM RVB RESTORE VSN BUFFERS
04891 M00S04401.tfm +++| LDD MA RESTORE SCRATCH POINTERS
04892 M00S04402.tfm +++| CWM RLVA,ON
Line S04403 Modification History
M01 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
04893 M01S04403.ns2763 ---| ERRNG VSKL-5 *CODE NEEDS TO BE CHANGED*
04894 M00S04404.tfm +++| SBN 1
04895 M00S04405.tfm +++| CRM PESN,ON
04896 M00S04406.tfm +++| LJM RSVX RETURN
04897 M00S04407.tfm +++| RVB SPACE 4,15
04898 M00S04408.tfm +++|** RVB - RESTORE VSN BUFFERS.
04899 M00S04409.tfm +++|*
04900 M00S04410.tfm +++|* ENTRY (CV - CV+4) = CURRENT SCRATCH BUFFER POINTERS.
04901 M00S04411.tfm +++|* (PV - PV+4) = PREVIOUS SCRATCH BUFFER POINTERS.
04902 M00S04412.tfm +++|*
04903 M00S04413.tfm +++|* EXIT (BA - RI+1) = CURRENT SCRATCH BUFFER POINTERS.
04904 M00S04414.tfm +++|* BUFFERS RELOADED.
04905 M00S04415.tfm +++|*
Line S04416 Modification History
M01 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
04906 M01S04416.ns2763 ---|* CALLS RRP.
Line S00082 Modification History
M01 (Added by) ns2763
Seq # *Modification Id* Act
----------------------------+
04907 M01S00082.ns2763 +++|* CALLS RRP, TBA.
04908 M00S04417.tfm +++|*
04909 M00S04418.tfm +++|* MACROS RESTP.
04910 M00S04419.tfm +++|
04911 M00S04420.tfm +++|
04912 M00S04421.tfm +++| RVB SUBR ENTRY/EXIT
04913 M00S04422.tfm +++| LDN 0
04914 M00S04423.tfm +++| STM ISFA NO WRITE NECESSARY
04915 M00S04424.tfm +++| STM ISFB NO BUFFER TOGGLE NECESSARY
04916 M00S04425.tfm +++| RESTP PV READ LAST SCRATCH BUFFER
04917 M00S04426.tfm +++| LDD BA
04918 M00S04427.tfm +++| ZJN RVB1 IF NO PREVIOUS SCRATCH
04919 M00S04428.tfm +++| RJM TBA TOGGLE BUFFER ALLOCATION
04920 M00S04429.tfm +++| RJM RRP READ RANDOM PRU
04921 M00S04430.tfm +++| LDD PV+1 RESET PREVIOUS SCRATCH BUFFER POINTER
04922 M00S04431.tfm +++| SBD PV
04923 M00S04432.tfm +++| ADD BA
04924 M00S04433.tfm +++| STD PV+1
04925 M00S04434.tfm +++| STD BP
04926 M00S04435.tfm +++| LDD BA RESET PREVIOUS SCRATCH BUFFER ADDRESS
04927 M00S04436.tfm +++| STD PV
04928 M00S04437.tfm +++| LDD RI COMPARE RANDOM INDICES
04929 M00S04438.tfm +++| LMD CV+3
04930 M00S04439.tfm +++| NJN RVB1 IF DIFFERENT
04931 M00S04440.tfm +++| LDD RI+1
04932 M00S04441.tfm +++| LMD CV+4
04933 M00S04442.tfm +++| NJN RVB1 IF DIFFERENT
04934 M00S04443.tfm +++| AOM ISFB BUFFER TOGGLE REQUIRED FOR NEXT VSN BLOCK
04935 M00S04444.tfm +++| UJN RVB2 SET CURRENT VSN POINTERS
04936 M00S04445.tfm +++|
04937 M00S04446.tfm +++| RVB1 RESTP CV RESTORE CURRENT VSN POINTERS
04938 M00S04447.tfm +++| RJM TBA TOGGLE BUFFER ALLOCATION
04939 M00S04448.tfm +++| RJM RRP READ RANDOM PRU
04940 M00S04449.tfm +++| RVB2 LDD CV+1 RESET CURRENT VSN BUFFER POINTER
04941 M00S04450.tfm +++| SBD CV
04942 M00S04451.tfm +++| ADD BA
04943 M00S04452.tfm +++| STD CV+1
04944 M00S04453.tfm +++| STD BP
04945 M00S04454.tfm +++| LDD BA RESET CURRENT VSN BUFFER ADDRESS
04946 M00S04455.tfm +++| STD CV
04947 M00S04456.tfm +++| LDD RI RESET CURRENT POSITION RANDOM INDEX
04948 M00S04457.tfm +++| STM CPRI
04949 M00S04458.tfm +++| LDD RI+1
04950 M00S04459.tfm +++| STM CPRI+1
04951 M00S04460.tfm +++| LJM RVBX RETURN
04952 M00S04461.tfm +++| SCP SPACE 4,15
04953 M00S04462.tfm +++|** SCP - SET CATALOG BUFFER POINTERS
04954 M00S04463.tfm +++|*
04955 M00S04464.tfm +++|* ENTRY (BA - RI+1) = SECONDARY VSN BUFFER POINTERS.
04956 M00S04465.tfm +++|*
04957 M00S04466.tfm +++|* EXIT (CV - CV+4) = SECONDARY VSN BUFFER POINTERS.
04958 M00S04467.tfm +++|* (CPCB - CPCB+4) = CATALOG ENTRY BUFFER POINTERS.
04959 M00S04468.tfm +++|* (BA - RI+1) = CATALOG ENTRY BUFFER POINTERS.
04960 M00S04469.tfm +++|*
04961 M00S04470.tfm +++|* USES BA, BP, CI, CV - CV+4, RI - RI+1.
04962 M00S04471.tfm +++|*
04963 M00S04472.tfm +++|* CALLS RRP, VSP.
04964 M00S04473.tfm +++|*
04965 M00S04474.tfm +++|* MACROS SAVEP.
04966 M00S04475.tfm +++|
04967 M00S04476.tfm +++|
04968 M00S04477.tfm +++| SCP2 LDI BP
04969 M00S04478.tfm +++| ZJN SCP1 IF HOLE FOUND
04970 M00S04479.tfm +++| SCP3 SAVEP CPCB SAVE CATALOG POINTERS
04971 M00S04480.tfm +++|
04972 M00S04481.tfm +++| SCP SUBR ENTRY/EXIT
04973 M00S04482.tfm +++| SAVEP CV SAVE CURRENT POINTERS
04974 M00S04483.tfm +++| LDM VBCI,BP
04975 M00S04484.tfm +++| SHN 14
04976 M00S04485.tfm +++| STD CI
04977 M00S04486.tfm +++| SCN 77
04978 M00S04487.tfm +++| LMM VBCI+1,BP
04979 M00S04488.tfm +++| ZJN SCP1 IF NO CATALOG INDEX
04980 M00S04489.tfm +++| STD RI+1
04981 M00S04490.tfm +++| SHN -14
04982 M00S04491.tfm +++| STD RI
04983 M00S04492.tfm +++| LDC BUF2 DEFINE CATALOG BUFFER
04984 M00S04493.tfm +++| SCP1 STD BA
04985 M00S04494.tfm +++| ZJN SCP3 IF NO CATALOG INDEX
04986 M00S04495.tfm +++| RJM RRP READ RANDOM PRU (CATALOG)
04987 M00S04496.tfm +++| RJM VSP VERIFY/SET CATALOG POINTERS
04988 M00S04497.tfm +++| PJN SCP2 IF VALID CATALOG
04989 M00S04498.tfm +++| LDN 0
04990 M00S04499.tfm +++| UJN SCP1 SET NO CATALOG
04991 M00S04500.tfm +++| CRD SPACE 4,10
04992 M00S04501.tfm +++|** CRD - CHECK RELEASE DATE.
04993 M00S04502.tfm +++|*
04994 M00S04503.tfm +++|* ENTRY (BA) = BUFFER ADDRESS (VSN INDEX).
04995 M00S04504.tfm +++|* (BP) = BUFFER POINTER (VSN INDEX).
04996 M00S04505.tfm +++|* (PV - PV+4) = PREVIOUS SCRATCH VSN POINTERS.
04997 M00S04506.tfm +++|*
Line S04507 Modification History
M01 (Removed by) t2807
Seq # *Modification Id* Act
----------------------------+
04998 M01S04507.t2807 ---|* EXIT (A) = 0 IF NOT CONDITIONAL RELEASE OR CONDITIONAL
04999 M01S04508.t2807 ---|* RELEASE WITHIN THE RELEASE PERIOD.
05000 M01S04509.t2807 ---|* (A) = 1 IF CONDITIONAL RELEASE AND EXCEED RELEASE
05001 M01S04510.t2807 ---|* PERIOD.
Line S00013 Modification History
M01 (Added by) t2807
Seq # *Modification Id* Act
----------------------------+
05002 M01S00013.t2807 +++|* EXIT (A) = 0 IF RELEASE DATE OLD FORMAT, NO RELEASE DATE,
05003 M01S00014.t2807 +++|* OR IF RELEASE DATE NOT YET REACHED.
05004 M01S00015.t2807 +++|* (A) .NE. 0 IF RELEASE DATE NEW FORMAT AND EXPIRED.
Line S00001 Modification History
M01 (Added by) t5236
Seq # *Modification Id* Act
----------------------------+
05005 M01S00001.t5236 +++|*
Line S00002 Modification History
M01 (Added by) t5236
M02 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
05006 M02S00002.ns2763 ---|* MACROS MONITOR
Line S00083 Modification History
M01 (Added by) ns2763
Seq # *Modification Id* Act
----------------------------+
05007 M01S00083.ns2763 +++|* USES CM - CM+4.
Line S00003 Modification History
M01 (Added by) t5236
Seq # *Modification Id* Act
----------------------------+
05008 M01S00003.t5236 +++|*
Line S00084 Modification History
M01 (Added by) ns2763
Seq # *Modification Id* Act
----------------------------+
05009 M01S00084.ns2763 +++|* MACROS MONITOR.
05010 M00S04511.tfm +++|
05011 M00S04512.tfm +++|
05012 M00S04513.tfm +++| CRD SUBR ENTRY/EXIT
Line S00016 Modification History
M01 (Added by) t2807
Seq # *Modification Id* Act
----------------------------+
05013 M01S00016.t2807 +++| LDM VBST+1,BP VSN STATUS
Line S00017 Modification History
M01 (Added by) t2807
M02 (Removed by) ns2763
Seq # *Modification Id* Act
----------------------------+
05014 M02S00017.ns2763 ---| LPN 20B
Line S00085 Modification History
M01 (Added by) ns2763
Seq # *Modification Id* Act
----------------------------+
05015 M01S00085.ns2763 +++| LPN RDVS
Line S00018 Modification History
M01 (Added by) t2807
Seq # *Modification Id* Act
----------------------------+
05016 M01S00018.t2807 +++| ZJN CRDX IF RELEASE DATE OLD FORMAT
Line S00004 Modification History
M01 (Added by) t5236
Seq # *Modification Id* Act
----------------------------+
05017 M01S00004.t5236 +++| LDM VBRD+1,BP RELEASE DATE
05018 M01S00005.t5236 +++| ZJN CRDX IF NO RELEASE DATE
05019 M01S00006.t5236 +++| STD CM+4
05020 M01S00007.t5236 +++| LDM VBRD,BP RELEASE DATE YEAR
05021 M01S00008.t5236 +++| LPN 77
05022 M01S00009.t5236 +++| STD CM+3
Line S00010 Modification History
M01 (Added by) t5236
M02 (Removed by) t2807
Seq # *Modification Id* Act
----------------------------+
05023 M02S00010.t2807 ---| LDN VEDS CHECK RELEASE DATE REACHED
Line S00019 Modification History
M01 (Added by) t2807
Seq # *Modification Id* Act
----------------------------+
05024 M01S00019.t2807 +++| LDN /COMSCPS/VEDS CHECK RELEASE DATE REACHED
Line S00011 Modification History
M01 (Added by) t5236
Seq # *Modification Id* Act
----------------------------+
05025 M01S00011.t5236 +++| STD CM+1
05026 M01S00012.t5236 +++| MONITOR VSAM VALIDATE SECURITY ACCESS FUNCTIONS
05027 M01S00013.t5236 +++| LDD CM+1
Line S00014 Modification History
M01 (Added by) t5236
M02 (Removed by) t2807
Seq # *Modification Id* Act
----------------------------+
05028 M02S00014.t2807 ---| ZJN CRDX IF DATE BEYOND CURRENT DATE
Line S04514 Modification History
M01 (Removed by) t2807
Seq # *Modification Id* Act
----------------------------+
05029 M01S04514.t2807 ---| LDN PDTL READ CURRENT PACKED DATE
05030 M01S04515.t2807 ---| CRD CM
05031 M01S04516.t2807 ---| LDM VBRD+1,BP RELEASE DATE
Line S04517 Modification History
M01 (Removed by) t5236
M02 (Removed by) t2807
Seq # *Modification Id* Act
----------------------------+
05032 M02S04517.t2807 ---| ZJN CRDX IF NO RELEASE DATE
Line S04518 Modification History
M01 (Removed by) t2807
Seq # *Modification Id* Act
----------------------------+
05033 M01S04518.t2807 ---| STD CM+4
05034 M01S04519.t2807 ---| SHN -6
05035 M01S04520.t2807 ---| STD CM MONTH
05036 M01S04521.t2807 ---| LDD CM+4 CONVERT RELEASE DATE
05037 M01S04522.t2807 ---| LPN 77
05038 M01S04523.t2807 ---| ADM CRDA-1,CM
05039 M01S04524.t2807 ---| STD CM+1 MONTH+DAY
05040 M01S04525.t2807 ---| LDD CM+2 CONVERT CURRENT DATE
05041 M01S04526.t2807 ---| LPN 77
05042 M01S04527.t2807 ---| STD CM+2 MONTH
05043 M01S04528.t2807 ---| LDD CM+3
05044 M01S04529.t2807 ---| SHN -6
05045 M01S04530.t2807 ---| ADM CRDA-1,CM+2 MONTH+DAY
05046 M01S04531.t2807 ---| SBD CM+1 SUBTRACT RELEASE DATE
05047 M01S04532.t2807 ---| PJN CRD1 IF NO UNDERFLOW
05048 M01S04533.t2807 ---| ADC 365D ADD 1 YEAR
05049 M01S04534.t2807 ---| CRD1 SBK CRDP IF CONDITIONAL RELEASE PERIOD
05050 M01S04535.t2807 ---| MJN CRD2 IF CONDITIONAL RELEASE
05051 M01S04536.t2807 ---| LDM VBRD,BP CLEAR RELEASE DATE
05052 M01S04537.t2807 ---| SCN 77
05053 M01S04538.t2807 ---| STM VBRD,BP
05054 M01S04539.t2807 ---| LDN 0
05055 M01S04540.t2807 ---| STM VBRD+1,BP
05056 M01S04541.t2807 ---| LDN 1 ACCESSED RELEASE PERIOD
05057 M01S04542.t2807 ---| UJN CRD3 RETURN
05058 M01S04543.t2807 ---|
05059 M01S04544.t2807 ---| CRD2 LDN 0 WITHIN RELEASE PERIOD
05060 M01S04545.t2807 ---| CRD3 LJM CRDX RETURN
05061 M01S04546.t2807 ---|
05062 M01S04547.t2807 ---| BASE D
05063 M01S04548.t2807 ---| CRDA BSS 0 MONTH/DAY TABEL
05064 M01S04549.t2807 ---| CON 0 JAN
05065 M01S04550.t2807 ---| CON 31 FEB
05066 M01S04551.t2807 ---| CON 59 MAR
05067 M01S04552.t2807 ---| CON 90 APR
05068 M01S04553.t2807 ---| CON 120 MAY
05069 M01S04554.t2807 ---| CON 151 JUN
05070 M01S04555.t2807 ---| CON 181 JUL
05071 M01S04556.t2807 ---| CON 212 AUG
05072 M01S04557.t2807 ---| CON 243 SEP
05073 M01S04558.t2807 ---| CON 273 OCT
05074 M01S04559.t2807 ---| CON 304 NOV
05075 M01S04560.t2807 ---| CON 334 DEC
05076 M01S04561.t2807 ---| BASE *
Line S00020 Modification History
M01 (Added by) t2807
Seq # *Modification Id* Act
----------------------------+
05077 M01S00020.t2807 +++| UJN CRDX RETURN
05078 M00S04562.tfm +++| TACM SPACE 4,10
05079 M00S04563.tfm +++|* TACM - TABLE OF ACTIVE MACHINES.
05080 M00S04564.tfm +++|*
05081 M00S04565.tfm +++|* INDEXED BY MACHINE INDEX-1. NONZERO ENTRY FLAGS MACHINE
05082 M00S04566.tfm +++|* ACTIVE.
05083 M00S04567.tfm +++|
05084 M00S04568.tfm +++|
05085 M00S04569.tfm +++| TACM EQU OVL1-20
05086 M00S04570.tfm +++| SPACE 4
05087 M00S04571.tfm +++|** LOCAL COMMON DECKS.
05088 M00S04572.tfm +++|
05089 M00S04573.tfm +++|*CALL COMPC2D
05090 M00S04574.tfm +++|
05091 M00S04575.tfm +++|
05092 M00S04576.tfm +++| BSE$ EQU 1 DEFINE BSE - BACKSPACE ONE ENTRY
05093 M00S04577.tfm +++| DDE$ EQU 1 DEFINE DDE - DELETE DATA BLOCK
05094 M00S04578.tfm +++| DLB$ EQU 1 DEFINE DLB - DELINK BLOCK
05095 M00S04579.tfm +++| GNB$ EQU 1 DEFINE GNB - GET NEXT BLOCK
05096 M00S04580.tfm +++| GNL$ EQU 1 DEFINE GNL - GET NEXT LINK
05097 M00S04581.tfm +++| GPL$ EQU 1 DEFINE GPL - GET PREVIOUS LINK
05098 M00S04582.tfm +++| IAM$ EQU 1 DEFINE IAM - ISSUE ACCOUNT FILE MESSAGE
05099 M00S04583.tfm +++| IRM$ EQU 1 DEFINE IRM - ISSUE RECOVERY MESSAGES.
05100 M00S04584.tfm +++| ISK$ EQU 1 DEFINE ISK - INDEXED SEARCH BY KEY
05101 M00S04585.tfm +++| PCE$ EQU 1 DEFINE PCE - PURGE CATALOG ENTRIES
05102 M00S04586.tfm +++| PLI$ EQU 1 DEFINE PLI - POSITION TO LAST INDEX
05103 M00S04587.tfm +++| SIB$ EQU 1 DEFINE SIB - SEARCH INDEX BUFFER
05104 M00S04588.tfm +++| TBA$ EQU 1 DEFINE TBA - TOGGLE BUFFER ASSIGNMENT
05105 M00S04589.tfm +++| VIS$ EQU 1 DEFINE VIS - VSN INDEXED SEARCH
05106 M00S04590.tfm +++| VSP$ EQU 1 DEFINE VSP - VERIFY/SET CATALOG POINTERS
05107 M00S04591.tfm +++|*CALL COMPTFM
05108 M00S04592.tfm +++| SPACE 4
05109 M00S04593.tfm +++| ERRNG BUF2-* BYTES LEFT BEFORE BUFFER OVERFLOW
Line S00141 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
05110 M01S00141.274l797 +++| TITLE PRESET.
05111 M00S04594.tfm +++| PRS SPACE 4,15
05112 M00S04595.tfm +++|** PRS - PRESET FOR *ISF*.
05113 M00S04596.tfm +++|*
05114 M00S04597.tfm +++|* ENTRY (CPSB - CPSB+4) = SYSTEM BUFFER POINTERS.
05115 M00S04598.tfm +++|*
Line S04599 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
05116 M01S04599.274l797 ---|* EXIT (IL) = INTERLOCK FLAG.
Line S00142 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
05117 M01S00142.274l797 +++|* EXIT (TT) = 7777.
05118 M00S04600.tfm +++|* (BA - RI+1) = FIRST VSN TO CHECK FOR SCRATCH.
Line S00143 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
05119 M01S00143.274l797 +++|* (ISFD - ISFD+4) = (BA - RI+1).
05120 M00S04601.tfm +++|*
Line S04602 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
05121 M01S04602.274l797 ---|* USES BA, BP, CI, CM - CM+4, PV - PV+4, RI - RI+1.
Line S00144 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
05122 M01S00144.274l797 +++|* USES TT, T1, PV - PV+4, RI - RI+1.
05123 M00S04603.tfm +++|*
Line S04604 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
05124 M01S04604.274l797 ---|* CALLS GIB, MBP, RRP, TBA.
Line S00145 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
05125 M01S00145.274l797 +++|* CALLS GIB, MBP, RRP, SAM, TBA.
05126 M00S04605.tfm +++|*
Line S04606 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
05127 M01S04606.274l797 ---|* MACROS COMPARE, ERROR, RESTP.
Line S00146 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
05128 M01S00146.274l797 +++|* MACROS COMPARE, ERROR, ISTORE, RESTP, SAVEP.
05129 M00S04607.tfm +++|
05130 M00S04608.tfm +++|
05131 M00S04609.tfm +++| PRS SUBR ENTRY/EXIT
05132 M00S04610.tfm +++| LDM PFLG
05133 M00S04611.tfm +++| LPN 3
Line S04612 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
05134 M01S04612.274l797 ---| STD IL
05135 M01S04613.274l797 ---| SBN 2
Line S00147 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
05136 M01S00147.274l797 +++| NJN PRS0 IF CLEARING INTERLOCKS
05137 M01S00148.274l797 +++| ISTORE CFBA,(UJN CFB8) BYPASS INTERLOCK CLEARING
05138 M01S00149.274l797 +++| LDN 0
05139 M01S00150.274l797 +++| PRS0 SBN 2
05140 M00S04614.tfm +++| MJN PRS1 IF CLEARING NO OR ALL INTERLOCKS
05141 M00S04615.tfm +++| RJM SAM SEARCH FOR ACTIVE MACHINES
05142 M00S04616.tfm +++| PRS1 LDN ZERL
05143 M00S04617.tfm +++| CRD PV CLEAR PREVIOUS SCRATCH POINTERS
05144 M00S04618.tfm +++| CRM PESN,ON CLEAR SCRATCH COUNT
05145 M00S04619.tfm +++| LCN 0 SET END OF SCRATCH
05146 M00S04620.tfm +++| STM PESN
05147 M00S04621.tfm +++| STM PESN+1
05148 M00S04622.tfm +++| STM PESN+2
05149 M00S04623.tfm +++| RESTP CPSB RESTORE BUFFER POINTERS
05150 M00S04624.tfm +++| RJM RRP READ RANDOM PRU (TMST)
05151 M00S04625.tfm +++| LDM CWRT,BA
05152 M00S04626.tfm +++| LMC RTSB*100B
05153 M00S04627.tfm +++| NJN PRS2 IF NOT TMST
05154 M00S04628.tfm +++| COMPARE PFAM,,,BP,PFKL
05155 M00S04629.tfm +++| ZJN PRS3 IF FAMILY CATALOG
05156 M00S04630.tfm +++| PRS2 ERROR CNF *(FAMILY) CATALOG NOT FOUND.*