cdc:nos2.source:opl.opl871:deck:1mt.017
Deck 1MT Part 017
92 Modifications
Listing Sections
- Deck 1MT Start
- Deck 1MT Part 1 (Line 1462)
- Deck 1MT Part 2 (Line 2674)
- Deck 1MT Part 3 (Line 4017)
- Deck 1MT Part 4 (Line 5073)
- Deck 1MT Part 5 (Line 6369)
- Deck 1MT Part 6 (Line 7796)
- Deck 1MT Part 7 (Line 9269)
- Deck 1MT Part 8 (Line 10478)
- Deck 1MT Part 9 (Line 11579)
- Deck 1MT Part 10 (Line 12640)
- Deck 1MT Part 11 (Line 13801)
- Deck 1MT Part 12 (Line 15216)
- Deck 1MT Part 13 (Line 16607)
- Deck 1MT Part 14 (Line 18062)
- Deck 1MT Part 15 (Line 19541)
- Deck 1MT Part 16 (Line 20933)
- Deck 1MT Part 17 (Line 22793)
- Deck 1MT Part 18 (Line 24082)
- Deck 1MT Part 19 (Line 25232)
- Deck 1MT Part 20 (Line 26664)
- Deck 1MT Part 21 (Line 28010)
- Deck 1MT Part 22 (Line 28907)
- Deck 1MT Part 23 (Line 30276)
- Deck 1MT Part 24 (Line 31850)
- Deck 1MT Part 25 (Line 33112)
- Deck 1MT Part 26 (Line 34430)
- Deck 1MT Part 27 (Line 35774)
- Deck 1MT Part 28 (Line 37108)
Source
Seq # *Modification Id* Act ----------------------------+ 22793 M00S13624.1mt +++| ZJN CBD5 IF ALL SPACES 22794 M00S13625.1mt +++| LDI T1 22795 M00S13626.1mt +++| ZJN CBD3 IF ZERO 22796 M00S13627.1mt +++| LMC 2R 22797 M00S13628.1mt +++| NJN CBD4 IF NOT * * 22798 M00S13629.1mt +++| CBD3 LDC 2R00 22799 M00S13630.1mt +++| STI T1 22800 M00S13631.1mt +++| UJN CBD2 LOOP 22801 M00S13632.1mt +++| 22802 M00S13633.1mt +++| CBD4 SHN -6 22803 M00S13634.1mt +++| NJN CBD5 IF NOT * * 22804 M00S13635.1mt +++| LCN -1R0+1R 22805 M00S13636.1mt +++| SHN 6 22806 M00S13637.1mt +++| RAI T1 22807 M00S13638.1mt +++| CBD5 LDM CBDA,T5 SET TO ENTER STORE LOOP 22808 M00S13639.1mt +++| STD T1 22809 M00S13640.1mt +++| LJM 0,T1 STORE CHARACTERS 22810 M00S13641.1mt +++| 22811 M00S13642.1mt +++| CBD6 LDD CM+2 STORE SIXTH CHARACTER 22812 M00S13643.1mt +++| SHN -6 22813 M00S13644.1mt +++| RJM SCH 22814 M00S13645.1mt +++| CBD7 LDD CM+2 STORE FIFTH CHARACTER 22815 M00S13646.1mt +++| RJM SCH 22816 M00S13647.1mt +++| CBD8 LDD CM+3 STORE FOURTH CHARACTER 22817 M00S13648.1mt +++| SHN -6 22818 M00S13649.1mt +++| RJM SCH 22819 M00S13650.1mt +++| CBD9 LDD CM+3 STORE THIRD CHARACTER 22820 M00S13651.1mt +++| RJM SCH 22821 M00S13652.1mt +++| CBD10 LDD CM+4 STORE SECOND CHARACTER 22822 M00S13653.1mt +++| SHN -6 22823 M00S13654.1mt +++| RJM SCH 22824 M00S13655.1mt +++| CBD11 LDD CM+4 STORE FIRST CHARACTER 22825 M00S13656.1mt +++| RJM SCH 22826 M00S13657.1mt +++| LJM CBDX RETURN 22827 M00S13658.1mt +++| 22828 M00S13659.1mt +++| CBDA BSS 0 INDEXED BY NUMBER OF CHARACTERS TO STORE 22829 M00S13660.1mt +++| LOC 0 22830 M00S13661.1mt +++| CON CBDX 22831 M00S13662.1mt +++| CON CBD11 22832 M00S13663.1mt +++| CON CBD10 22833 M00S13664.1mt +++| CON CBD9 22834 M00S13665.1mt +++| CON CBD8 22835 M00S13666.1mt +++| CON CBD7 22836 M00S13667.1mt +++| CON CBD6 22837 M00S13668.1mt +++| LOC *O 22838 M00S13669.1mt +++| CCH SPACE 4,15 22839 M00S13670.1mt +++|** CCH - COPY INPUT BUFFER TO DESTINATION BUFFER. 22840 M00S13671.1mt +++|* 22841 M00S13672.1mt +++|* ENTRY (A) = NUMBER OF CHARACTERS TO MOVE. 22842 M00S13673.1mt +++|* (T6) = CHARACTER POSITION IN INPUT BUFFER. 22843 M00S13674.1mt +++|* (T7) = CHARACTER POSITION IN DESTINATION BUFFER. 22844 M00S13675.1mt +++|* 22845 M00S13676.1mt +++|* EXIT (T6), (T7) = INCREMENTED. 22846 M00S13677.1mt +++|* 22847 M00S13678.1mt +++|* USES T5. 22848 M00S13679.1mt +++|* 22849 M00S13680.1mt +++|* CALLS GCH, SCH. 22850 M00S13681.1mt +++| 22851 M00S13682.1mt +++| 22852 M00S13683.1mt +++| CCH SUBR ENTRY/EXIT 22853 M00S13684.1mt +++| STD T5 22854 M00S13685.1mt +++| CCH1 RJM GCH GET LABEL CHARACTER 22855 M00S13686.1mt +++| RJM SCH STORE CHARACTER IN USER BUFFER 22856 M00S13687.1mt +++| SOD T5 22857 M00S13688.1mt +++| NJN CCH1 IF MORE CHARACTERS TO MOVE 22858 M00S13689.1mt +++| UJN CCHX RETURN 22859 M00S13690.1mt +++| CCS SPACE 4,15 22860 M00S13691.1mt +++|** CCS - COPY CHARACTERS IF SPECIFIED. 22861 M00S13692.1mt +++|* CHECKS FIELD FOR ALL ZEROES. IF ALL ZEROES, FIELD IS SPACE 22862 M00S13693.1mt +++|* FILLED. OTHERWISE FIELD IS COPIED FROM INPUT BUFFER TO 22863 M00S13694.1mt +++|* DESTINATION BUFFER. 22864 M00S13695.1mt +++|* 22865 M00S13696.1mt +++|* ENTRY (A) = NUMBER OF CHARACTERS TO PROCESS. 22866 M00S13697.1mt +++|* (T6) = INPUT BUFFER POSITION. 22867 M00S13698.1mt +++|* (T7) = DESTINATION BUFFER POSITION. 22868 M00S13699.1mt +++|* 22869 M00S13700.1mt +++|* EXIT (T6), (T7) = INCREMENTED. 22870 M00S13701.1mt +++|* 22871 M00S13702.1mt +++|* USES T5. 22872 M00S13703.1mt +++|* 22873 M00S13704.1mt +++|* CALLS FCH, GCH, SCH. 22874 M00S13705.1mt +++| 22875 M00S13706.1mt +++| 22876 M00S13707.1mt +++| CCS2 LDD MA COPY FIELD 22877 M00S13708.1mt +++| CRD T3 22878 M00S13709.1mt +++| LDD T5 22879 M00S13710.1mt +++| CCS3 RJM GCH GET LABEL CHARACTER 22880 M00S13711.1mt +++| NJN CCS4 IF NOT 00 CHARACTER 22881 M00S13712.1mt +++| LDN 1R 22882 M00S13713.1mt +++| CCS4 RJM SCH STORE CHARACTER IN DESTINATION BUFFER 22883 M00S13714.1mt +++| SOD T5 22884 M00S13715.1mt +++| NJN CCS3 IF MORE CHARACTERS TO MOVE 22885 M00S13716.1mt +++| 22886 M00S13717.1mt +++| CCS SUBR ENTRY/EXIT 22887 M00S13718.1mt +++| STD T5 22888 M00S13719.1mt +++| LDD MA SAVE DIRECT CELLS 22889 M00S13720.1mt +++| CWD T3 22890 M00S13721.1mt +++| CCS1 RJM GCH GET CHARACTER 22891 M00S13722.1mt +++| NJN CCS2 IF FIELD SPECIFIED 22892 M00S13723.1mt +++| SOD T5 22893 M00S13724.1mt +++| NJN CCS1 IF MORE CHARACTERS TO CHECK 22894 M00S13725.1mt +++| LDD MA SET DEFAULTS 22895 M00S13726.1mt +++| CRD T3 22896 M00S13727.1mt +++| LDD T5 22897 M00S13728.1mt +++| RAD T6 22898 M00S13729.1mt +++| LDD T5 22899 M00S13730.1mt +++| ADC 1L 22900 M00S13731.1mt +++| RJM FCH 22901 M00S13732.1mt +++| UJN CCSX RETURN 22902 M00S13733.1mt +++| CDN SPACE 4,10 22903 M00S13734.1mt +++|** CDN - CONVERT DECIMAL FIELD (4 CHARACTERS). 22904 M00S13735.1mt +++|* IF FIELD IS NOT DEFINED, A DEFAULT OF 1 IS SET. 22905 M00S13736.1mt +++|* 22906 M00S13737.1mt +++|* ENTRY (T6) = CHARACTER POSITION IN INPUT BUFFER. 22907 M00S13738.1mt +++|* (T7) = CHARACTER POSITION IN DESTINATION BUFFER. 22908 M00S13739.1mt +++|* 22909 M00S13740.1mt +++|* CALLS DCV, GCH, SCH. 22910 M00S13741.1mt +++| 22911 M00S13742.1mt +++| 22912 M00S13743.1mt +++| CDN1 LDN 0 SET DEFAULT 22913 M00S13744.1mt +++| RJM SCH 22914 M00S13745.1mt +++| LDN 0 22915 M00S13746.1mt +++| RJM SCH 22916 M00S13747.1mt +++| LDN 1 22917 M00S13748.1mt +++| RJM SCH 22918 M00S13749.1mt +++| 22919 M00S13750.1mt +++| CDN SUBR ENTRY/EXIT 22920 M00S13751.1mt +++| RJM GCH GET CHARACTER 22921 M00S13752.1mt +++| ZJN CDN1 IF FIELD NOT DEFINED 22922 M00S13753.1mt +++| SOD T6 22923 M00S13754.1mt +++| LDC 30004 22924 M00S13755.1mt +++| RJM DCV 22925 M00S13756.1mt +++| UJN CDNX RETURN 22926 M00S13757.1mt +++| CPO SPACE 4,10 22927 M00S13758.1mt +++|** CPO - CHECK IF *POSMF 9999*.
| Line S13759 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 22928 M01S13759.274l797 ---|* MUST BE CALLED AFTER LABEL IS TRANSFERED TO BFMS.
| Line S05094 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 22929 M01S05094.274l797 +++|* MUST BE CALLED AFTER LABEL IS TRANSFERRED TO BFMS. 22930 M00S13760.1mt +++|* 22931 M00S13761.1mt +++|* EXIT (A) = 0 IF *POSMF 9999* 22932 M00S13762.1mt +++|* (DBUF) = BFMS. 22933 M00S13763.1mt +++|* (IBUF) = CPOA. 22934 M00S13764.1mt +++|* 22935 M00S13765.1mt +++|* CALLS CAN. 22936 M00S13766.1mt +++|* 22937 M00S13767.1mt +++|* USES T6, T7. 22938 M00S13768.1mt +++| 22939 M00S13769.1mt +++| 22940 M00S13770.1mt +++| CPO SUBR ENTRY/EXIT 22941 M00S13771.1mt +++| LDM OPFB 22942 M00S13772.1mt +++| NJN CPOX IF NOT *POSMF* 22943 M00S13773.1mt +++| LDC CPOA CHECK SEQUENCE NUMBER 22944 M00S13774.1mt +++| STM IBUF 22945 M00S13775.1mt +++| LDC BFMS 22946 M00S13776.1mt +++| STM DBUF 22947 M00S13777.1mt +++| LDN 1 22948 M00S13778.1mt +++| STD T6 22949 M00S13779.1mt +++| LDN 32D 22950 M00S13780.1mt +++| STD T7 22951 M00S13781.1mt +++| LDN 4 22952 M00S13782.1mt +++| RJM CAN COMPARE FIELDS 22953 M00S13783.1mt +++| UJN CPOX RETURN 22954 M00S13784.1mt +++| 22955 M00S13785.1mt +++| 22956 M00S13786.1mt +++| CPOA DATA H*9999* 22957 M00S13787.1mt +++| DCV SPACE 4,15 22958 M00S13788.1mt +++|** DCV - CONVERT DECIMAL FIELD TO BINARY. 22959 M00S13789.1mt +++|* 22960 M00S13790.1mt +++|* ENTRY (A, 13 - 12) = NUMBER OF CHARACTER POSITIONS IN RESULT. 22961 M00S13791.1mt +++|* (A, 11 - 0) = NUMBER OF CHARACTERS IN LABEL FIELD. 22962 M00S13792.1mt +++|* (T6) = CHARACTER POSITION IN INPUT BUFFER. 22963 M00S13793.1mt +++|* (T7) = CHARACTER POSITION IN DESTINATION BUFFER. 22964 M00S13794.1mt +++|* 22965 M00S13795.1mt +++|* EXIT (T6), (T7) = INCREMENTED. 22966 M00S13796.1mt +++|* 22967 M00S13797.1mt +++|* USES T1 - T5. 22968 M00S13798.1mt +++|* 22969 M00S13799.1mt +++|* CALLS GCH, SCH. 22970 M00S13800.1mt +++| 22971 M00S13801.1mt +++|
| Line S13802 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 22972 M01S13802.v23l617 ---| DCV7 LDN /MTX/IXL ILLEGAL LABEL FIELD
| Line S00363 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 22973 M01S00363.v23l617 +++| DCV7 LDN /MTX/IXL INCORRECT LABEL FIELD 22974 M00S13803.1mt +++| LJM RET3 RETURN ERROR CODE 22975 M00S13804.1mt +++| 22976 M00S13805.1mt +++| DCV SUBR ENTRY/EXIT 22977 M00S13806.1mt +++| STD T5 NUMBER OF CHARACTERS IN LABEL 22978 M00S13807.1mt +++| SHN -14 22979 M00S13808.1mt +++| STD T4 NUMBER OF CHARACTER POSITIONS IN UDT 22980 M00S13809.1mt +++| LDN 0 PRESET RESULT 22981 M00S13810.1mt +++| STD T2 22982 M00S13811.1mt +++| STD T3 22983 M00S13812.1mt +++| DCV1 RJM GCH GET CHARACTER 22984 M00S13813.1mt +++| STD T1 22985 M00S13814.1mt +++| SBN 1R0 22986 M00S13815.1mt +++| RAD T3 22987 M00S13816.1mt +++| SHN -14 22988 M00S13817.1mt +++| RAD T2 22989 M00S13818.1mt +++| DCVA UJN DCV2 DO NOT VALIDATE CHARACTER 22990 M00S13819.1mt +++|* PSN (OPEN WRITE OR POSMF 9999) 22991 M00S13820.1mt +++| 22992 M00S13821.1mt +++| LDD T1 22993 M00S13822.1mt +++| SBN 1R0 22994 M00S13823.1mt +++| MJN DCV7 IF NOT NUMERIC CHARACTER 22995 M00S13824.1mt +++| SBN 1R9-1R0+1 22996 M00S13825.1mt +++| PJN DCV7 IF NOT NUMERIC CHARACTER 22997 M00S13826.1mt +++| DCV2 SOD T5 DECREMENT NUMBER OF CHARACTERS TO PROCESS 22998 M00S13827.1mt +++| ZJN DCV3 IF ALL DIGITS PROCESSED 22999 M00S13828.1mt +++| LDD T2 10D * ACCUMALATED RESULT 23000 M00S13829.1mt +++| SHN 14 23001 M00S13830.1mt +++| ADD T3 23002 M00S13831.1mt +++| SHN 2+6 * 4 23003 M00S13832.1mt +++| ADD T2 * 5 23004 M00S13833.1mt +++| SHN 14 23005 M00S13834.1mt +++| ADD T3 23006 M00S13835.1mt +++| SHN 1 * 10D 23007 M00S13836.1mt +++| STD T3 23008 M00S13837.1mt +++| SHN -14 23009 M00S13838.1mt +++| STD T2 23010 M00S13839.1mt +++| UJN DCV1 LOOP 23011 M00S13840.1mt +++| 23012 M00S13841.1mt +++| DCV3 LDD T4 23013 M00S13842.1mt +++| LMN 3 23014 M00S13843.1mt +++| NJN DCV4 IF NOT 3 CHARACTER POSITIONS 23015 M00S13844.1mt +++| LDD T2 STORE VALUE 23016 M00S13845.1mt +++| RJM SCH STORE CHARACTER 23017 M00S13846.1mt +++| UJN DCV5 STORE REMAINING CHARACTERS 23018 M00S13847.1mt +++| DCV4 LMN 2&3 23019 M00S13848.1mt +++| NJN DCV6 IF NOT 2 CHARACTER POSIITONS 23020 M00S13849.1mt +++| DCV5 LDD T3 STORE VALUE 23021 M00S13850.1mt +++| SHN -6 23022 M00S13851.1mt +++| RJM SCH STORE CHARACTER 23023 M00S13852.1mt +++| DCV6 LDD T3 23024 M00S13853.1mt +++| LPN 77 23025 M00S13854.1mt +++| RJM SCH STORE CHARACTER 23026 M00S13855.1mt +++| LJM DCVX RETURN 23027 M00S13856.1mt +++| FCH SPACE 4,15 23028 M00S13857.1mt +++|** FCH - FILL DESTINATION BUFFER WITH CHARACTER(S). 23029 M00S13858.1mt +++|* 23030 M00S13859.1mt +++|* ENTRY (A, 17- 12) = CHARACTER TO FILL WITH. 23031 M00S13860.1mt +++|* (A, 11 - 0) = NUMBER OF CHARACTERS TO FILL. 23032 M00S13861.1mt +++|* (T7) = CHARACTER POINTER IN DESTINATION BUFFER. 23033 M00S13862.1mt +++|* 23034 M00S13863.1mt +++|* EXIT (T7) = INCREMENTED. 23035 M00S13864.1mt +++|* 23036 M00S13865.1mt +++|* USES T4. 23037 M00S13866.1mt +++|* 23038 M00S13867.1mt +++|* CALLS SCH. 23039 M00S13868.1mt +++| 23040 M00S13869.1mt +++| 23041 M00S13870.1mt +++| FCH SUBR ENTRY/EXIT 23042 M00S13871.1mt +++| STD T5 SAVE COUNT 23043 M00S13872.1mt +++| SHN -14 23044 M00S13873.1mt +++| STD T4 SAVE FILL VALUE 23045 M00S13874.1mt +++| FCH1 LDD T4 STORE CHARACTER 23046 M00S13875.1mt +++| RJM SCH 23047 M00S13876.1mt +++| SOD T5 23048 M00S13877.1mt +++| NJN FCH1 IF MORE TO FILL 23049 M00S13878.1mt +++| UJN FCHX RETURN 23050 M00S13879.1mt +++| GCD SPACE 4,10 23051 M00S13880.1mt +++|** GCD - GET CHARACTER FROM DESTINATION BUFFER. 23052 M00S13881.1mt +++|* 23053 M00S13882.1mt +++|* ENTRY (T7) = CHARACTER POSITION IN DESTINATION BUFFER. 23054 M00S13883.1mt +++|* 23055 M00S13884.1mt +++|* EXIT (A) = CHARACTER. 23056 M00S13885.1mt +++|* (T7) = INCREMENTED. 23057 M00S13886.1mt +++|* 23058 M00S13887.1mt +++|* USES T1. 23059 M00S13888.1mt +++| 23060 M00S13889.1mt +++| 23061 M00S13890.1mt +++| GCD1 LDM -1,T1 23062 M00S13891.1mt +++| LPN 77 23063 M00S13892.1mt +++| 23064 M00S13893.1mt +++| GCD SUBR ENTRY/EXIT 23065 M00S13894.1mt +++| AOD T7 23066 M00S13895.1mt +++| SBN 1 23067 M00S13896.1mt +++| SHN 21 23068 M00S13897.1mt +++| ADM DBUF 23069 M00S13898.1mt +++| STD T1 23070 M00S13899.1mt +++| SBM DBUF 23071 M00S13900.1mt +++| SHN -21 23072 M00S13901.1mt +++| ZJN GCD1 IF LOWER 6 BITS 23073 M00S13902.1mt +++| LDI T1 23074 M00S13903.1mt +++| SHN -6 23075 M00S13904.1mt +++| UJN GCDX RETURN 23076 M00S13905.1mt +++| GCH SPACE 4,10 23077 M00S13906.1mt +++|** GCH - GET CHARACTER FROM INPUT BUFFER. 23078 M00S13907.1mt +++|* 23079 M00S13908.1mt +++|* ENTRY (T6) = CHARACTER POSITION IN INPUT BUFFER. 23080 M00S13909.1mt +++|* 23081 M00S13910.1mt +++|* EXIT (A) = CHARACTER. 23082 M00S13911.1mt +++|* (T6) = INCREMENTED. 23083 M00S13912.1mt +++|* 23084 M00S13913.1mt +++|* USES T1. 23085 M00S13914.1mt +++| 23086 M00S13915.1mt +++| 23087 M00S13916.1mt +++| GCH1 LDM -1,T1 23088 M00S13917.1mt +++| LPN 77 23089 M00S13918.1mt +++| 23090 M00S13919.1mt +++| GCH SUBR ENTRY/EXIT 23091 M00S13920.1mt +++| AOD T6 23092 M00S13921.1mt +++| SBN 1 23093 M00S13922.1mt +++| SHN 21 23094 M00S13923.1mt +++| ADM IBUF 23095 M00S13924.1mt +++| STD T1 23096 M00S13925.1mt +++| SBM IBUF 23097 M00S13926.1mt +++| SHN -21 23098 M00S13927.1mt +++| ZJN GCH1 IF LOWER 6 BITS 23099 M00S13928.1mt +++| LDI T1 23100 M00S13929.1mt +++| SHN -6 23101 M00S13930.1mt +++| UJN GCHX RETURN
| Line S00057 Modification History | |
|---|---|
M01 (Added by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 23102 M01S00057.ns2786 +++| SCB SPACE 4,10 23103 M01S00058.ns2786 +++|** SCB - SET CENTURY BIAS. 23104 M01S00059.ns2786 +++|* ADJUSTS BINARY YEAR TO NEXT CENTURY IF REQUIRED. 23105 M01S00060.ns2786 +++|* 23106 M01S00061.ns2786 +++|* ENTRY (A) = ADDRESS OF CELL CONTAINING YEAR. 23107 M01S00062.ns2786 +++|* 23108 M01S00063.ns2786 +++|* EXIT ((A)) ADJUSTED UPWARD BY 100D IF ORIGINALLY .LT. 70D. 23109 M01S00064.ns2786 +++|* 23110 M01S00065.ns2786 +++|* USES T0. 23111 M01S00066.ns2786 +++| 23112 M01S00067.ns2786 +++| 23113 M01S00068.ns2786 +++| SCB SUBR ENTRY/EXIT 23114 M01S00069.ns2786 +++| STD T0 SAVE ADDRESS OF YEAR 23115 M01S00070.ns2786 +++| LDI T0 23116 M01S00071.ns2786 +++| SBK 70D 23117 M01S00072.ns2786 +++| PJN SCBX IF YEAR .LE. 1999 23118 M01S00073.ns2786 +++| LDC 100D ADJUST YEAR TO NEXT CENTURY 23119 M01S00074.ns2786 +++| RAI T0 23120 M01S00075.ns2786 +++| UJN SCBX RETURN 23121 M01S00076.ns2786 +++| SCF SPACE 4,10 23122 M01S00077.ns2786 +++|** SCF - SET CENTURY FILL CHARACTER. 23123 M01S00078.ns2786 +++|* GENERATES THE *ISO* STANDARD CENTURY CHARACTER, BASED ON THE 23124 M01S00079.ns2786 +++|* YEAR IN THE INPUT BUFFER, AND PLACES IT IN THE OUTPUT BUFFER. 23125 M01S00080.ns2786 +++|* 23126 M01S00081.ns2786 +++|* ENTRY (T6) = CHARACTER POSITION OF YEAR IN INPUT BUFFER. 23127 M01S00082.ns2786 +++|* (T7) = CHARACTER POSITION IN OUTPUT BUFFER. 23128 M01S00083.ns2786 +++|* 23129 M01S00084.ns2786 +++|* EXIT FILL CHARACTER PLACED IN OUTPUT BUFFER, 23130 M01S00085.ns2786 +++|* (* * FOR 19XX YEARS, *0* FOR 20XX YEARS). 23131 M01S00086.ns2786 +++|* (T6) = (A) = ORIGINAL (T6). 23132 M01S00087.ns2786 +++|* (T7) INCREMENTED. 23133 M01S00088.ns2786 +++|* 23134 M01S00089.ns2786 +++|* CALLS GCH, SCH. 23135 M01S00090.ns2786 +++|* 23136 M01S00091.ns2786 +++|* USES T6. 23137 M01S00092.ns2786 +++| 23138 M01S00093.ns2786 +++| 23139 M01S00094.ns2786 +++| SCF1 LDN 1R SPACE FILL 23140 M01S00095.ns2786 +++| SCF2 RJM SCH 23141 M01S00096.ns2786 +++| SOD T6 23142 M01S00097.ns2786 +++| 23143 M01S00098.ns2786 +++| SCF SUBR ENTRY/EXIT 23144 M01S00099.ns2786 +++| RJM GCH GET TENS DIGIT OF YEAR 23145 M01S00100.ns2786 +++| SBN 1R7 23146 M01S00101.ns2786 +++| PJN SCF1 IF YEAR .LE. 1999 23147 M01S00102.ns2786 +++| LDN 1R0 ZERO FILL FOR NEXT CENTURY 23148 M01S00103.ns2786 +++| UJN SCF2 STORE CHARACTER AND RETURN 23149 M00S13931.1mt +++| SCH SPACE 4,10 23150 M00S13932.1mt +++|** SCH - STORE CHARACTER IN DESTINATION BUFFER. 23151 M00S13933.1mt +++|* 23152 M00S13934.1mt +++|* ENTRY (A) = CHARACTER. 23153 M00S13935.1mt +++|* (T7) = CHARACTER POSITION IN DESTINATION BUFFER. 23154 M00S13936.1mt +++|* 23155 M00S13937.1mt +++|* EXIT (T7) = INCREMENTED. 23156 M00S13938.1mt +++|* 23157 M00S13939.1mt +++|* USES T1. 23158 M00S13940.1mt +++| 23159 M00S13941.1mt +++| 23160 M00S13942.1mt +++| SCH1 LDM -1,T1 23161 M00S13943.1mt +++| SCN 77 23162 M00S13944.1mt +++| LMD T0 23163 M00S13945.1mt +++| SCH2 STM -1,T1 23164 M00S13946.1mt +++| 23165 M00S13947.1mt +++| SCH SUBR ENTRY/EXIT 23166 M00S13948.1mt +++| LPN 77 23167 M00S13949.1mt +++| STD T0 SAVE CHARACTER 23168 M00S13950.1mt +++| AOD T7 INCREMENT POSITION 23169 M00S13951.1mt +++| SHN 21 SET BYTE ADDRESS 23170 M00S13952.1mt +++| ADM DBUF 23171 M00S13953.1mt +++| STD T1 23172 M00S13954.1mt +++| SBM DBUF 23173 M00S13955.1mt +++| SHN -21 23174 M00S13956.1mt +++| NJN SCH1 IF EVEN CHARACTER 23175 M00S13957.1mt +++| LDM -1,T1 23176 M00S13958.1mt +++| LPN 77 23177 M00S13959.1mt +++| SHN 14 23178 M00S13960.1mt +++| LMD T0 23179 M00S13961.1mt +++| SHN 6 23180 M00S13962.1mt +++| UJN SCH2 STORE CHARACTER 23181 M00S13963.1mt +++| UDA SPACE 4,10 23182 M00S13964.1mt +++|** UDA - UDT ADDRESS OF LABEL PARAMETERS (UUFN) 23183 M00S13965.1mt +++|* 23184 M00S13966.1mt +++|* EXIT (T1) = WORD COUNT TO WRITE. 23185 M00S13967.1mt +++|* 23186 M00S13968.1mt +++|* CALLS UAD. 23187 M00S13969.1mt +++| 23188 M00S13970.1mt +++| 23189 M00S13971.1mt +++| UDA SUBR ENTRY/EXIT 23190 M00S13972.1mt +++| LDN /MTX/UUDTL 23191 M00S13973.1mt +++| STD T1 23192 M00S13974.1mt +++| RJM UAD 23193 M00S13975.1mt +++| ADN /MTX/UUFN 23194 M00S13976.1mt +++| UJN UDAX RETURN 23195 M00S13977.1mt +++| WUD SPACE 4,10 23196 M00S13978.1mt +++|** WUD - WRITE UNIT DESCRIPTOR TABLE. 23197 M00S13979.1mt +++|* OPERATION ONLY PERFORMED IF AT MAGNET CP. 23198 M00S13980.1mt +++|* 23199 M00S13981.1mt +++|* CALLS CEC, UDA. 23200 M00S13982.1mt +++| 23201 M00S13983.1mt +++| 23202 M00S13984.1mt +++| WUD SUBR ENTRY/EXIT 23203 M00S13985.1mt +++| LDM CECB 23204 M00S13986.1mt +++| LPN 77 23205 M00S13987.1mt +++| ZJN WUD1 IF AT MAGNET CP 23206 M00S13988.1mt +++| LDN 0 CHNAGE TO MAGNET CP 23207 M00S13989.1mt +++| RJM CEC 23208 M00S13990.1mt +++| WUD1 RJM UDA GET UDT LABEL ADDRESS ADDRESS 23209 M00S13991.1mt +++| CWM UDTB,T1 23210 M00S13992.1mt +++| UJN WUDX RETURN 23211 M00S13993.1mt +++| SPACE 4,10 23212 M00S13994.1mt +++|** ADDRESS RELOCATION. 23213 M00S13995.1mt +++| 23214 M00S13996.1mt +++| 23215 M00S13997.1mt +++| TADD TSAD ADDRESS RELOCATION TABLE 23216 M00S13998.1mt +++| 23217 M00S13999.1mt +++| PRS SPACE 4,10 23218 M00S14000.1mt +++|** PRS - PRESET. 23219 M00S14001.1mt +++|* 23220 M00S14002.1mt +++|* CALLS MCH, UDA. 23221 M00S14003.1mt +++| 23222 M00S14004.1mt +++| 23223 M00S14005.1mt +++| PRS LDC PRSA MODIFY CHANNELS 23224 M00S14006.1mt +++| RJM MCH 23225 M00S14007.1mt +++| LDC /SRU/ITCL*100 SET SRU INCREMENT 23226 M00S14008.1mt +++| STM //CECA
| Line S14009 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23227 M01S14009.274l797 ---| LDN 40
| Line S05095 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23228 M01S05095.274l797 +++| LDN F0040 23229 M00S14010.1mt +++| STM //ITMA 23230 M00S14011.1mt +++| LDC TADD SET UP FOR ADDRESS RELOCATION 23231 M00S14012.1mt +++| STD CN 23232 M00S14013.1mt +++| RJM UDA 23233 M00S14014.1mt +++| CRM UDTB,T1 23234 M00S14015.1mt +++| SBN /MTX/UUFN+/MTX/UUDTL-/MTX/UCIA 23235 M00S14016.1mt +++| CRD T1 GET FET LENGTH - 5 23236 M00S14017.1mt +++| LDD T1+1 23237 M00S14018.1mt +++| SHN -6 23238 M00S14019.1mt +++| RAM OPFA 23239 M00S14020.1mt +++| LJM PRSX RETURN 23240 M00S14021.1mt +++| 23241 M00S14022.1mt +++| 23242 M00S14023.1mt +++| PRSA CHTB CHANNEL TABLE 23243 M00S14024.1mt +++| SPACE 4,10 23244 M00S14025.1mt +++| ERROVL 23245 M00S14026.1mt +++| SPACE 4,10 23246 M00S14027.1mt +++|** BUFFERS. 23247 M00S14028.1mt +++| 23248 M00S14029.1mt +++| 23249 M00S14030.1mt +++| UDTB EQU PRSA 23250 M00S14031.1mt +++| UDTBL EQU UDTB+/MTX/UUDTL*5 23251 M00S14032.1mt +++| BUF EQU UDTBL
| Line S14033 Modification History | |
|---|---|
M01 (Removed by) | 1mt41 |
Seq # *Modification Id* Act ----------------------------+ 23252 M01S14033.1mt41 ---| OVERLAY (TAPE POSITIONING OPERATIONS.),(/READ/OVLS+5)
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | 1mt41 |
Seq # *Modification Id* Act ----------------------------+ 23253 M01S00014.1mt41 +++| OVERLAY (TAPE POSITIONING OPERATIONS.),(/READ/OVLS+5),,SKP 23254 M00S14034.1mt +++| SKP SPACE 4,10 23255 M00S14035.1mt +++|** SKP - SKIP.
| Line S05096 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23256 M01S05096.274l797 +++|* THIS ROUTINE SKIPS BLOCKS IN A FORWARD DIRECTION. *SKP* IS 23257 M01S05097.274l797 +++|* OVERLAYED BY *SKR* FOR SKIP REVERSE. 23258 M00S14036.1mt +++|*
| Line S14037 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23259 M01S14037.274l797 ---|* CALLS DBF, UAD.
| Line S05098 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23260 M01S05098.274l797 +++|* EXIT TO *RET1* OF NORMAL COMPLETION. 23261 M01S05099.274l797 +++|* TO *RET2* IF DROP OUT BLOCK COUNT REACHED. 23262 M01S05100.274l797 +++|* TO *RET3* IF TAPE MARK. 23263 M01S05101.274l797 +++|* 23264 M01S05102.274l797 +++|* CALLS DBF, SLL, /READ/RDF, UAD. 23265 M00S14038.1mt +++| 23266 M00S14039.1mt +++|
| Line S14040 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23267 M01S14040.274l797 ---| ENTRY SKP
| Line S05103 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23268 M01S05103.274l797 +++| ENTRY SKP FROM *PRS* 23269 M00S14041.1mt +++| SKP BSS 0 23270 M00S14042.1mt +++| .OSKR EQU * 23271 M00S14043.1mt +++|
| Line S14044 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23272 M01S14044.274l797 ---| SKP1 LJM /READ/RDF READ TAPE
| Line S05104 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23273 M01S05104.274l797 +++| SKP1 LDN 0
| Line S05105 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 1mt48 |
Seq # *Modification Id* Act ----------------------------+ 23274 M02S05105.1mt48 ---| STM SLBC CLEAR CHUNK COUNT FOR LI FORMAT
| Line S00061 Modification History | |
|---|---|
M01 (Added by) | 1mt48 |
Seq # *Modification Id* Act ----------------------------+ 23275 M01S00061.1mt48 +++| STM IDFE CLEAR CHUNK COUNT FOR LI FORMAT
| Line S05106 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23276 M01S05106.274l797 +++| LJM /READ/RDF READ TAPE (RETURN AT *SKP2*) 23277 M00S14045.1mt +++|
| Line S14046 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23278 M01S14046.274l797 ---| SKP2 UJN SKP3 NOT SI FORMAT, 9 TRACK
| Line S05107 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23279 M01S05107.274l797 +++| SKP2 UJN SKP3 NOT SI FORMAT, 9/18 TRACK 23280 M00S14047.1mt +++| SKPA EQU *-1
| Line S14048 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23281 M01S14048.274l797 ---|* LDD ES (9 TRACK SI FORMAT)
| Line S05108 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23282 M01S05108.274l797 +++|* LDD ES (9/18 TRACK SI FORMAT) 23283 M00S14049.1mt +++| LPN 40 23284 M00S14050.1mt +++| ZJN SKP3 IF NO FILL STATUS 23285 M00S14051.1mt +++| SOD BY ADJUST BYTE COUNT 23286 M00S14052.1mt +++| SKP3 RJM DBF DETERMINE BLOCK TYPE FORWARD 23287 M00S14053.1mt +++| AOD BL+1 INCREMENT BLOCK COUNTER 23288 M00S14054.1mt +++| SHN -14 23289 M00S14055.1mt +++| RAD BL 23290 M00S14056.1mt +++| LDD T2 23291 M00S14057.1mt +++| LMN 14 23292 M00S14058.1mt +++| SKPB UJN SKP6 IF NOT TAPE MARK
| Line S14059 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23293 M01S14059.274l797 ---|* NJN SKP6 (LABELED OR I/SI FORMAT)
| Line S05109 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23294 M01S05109.274l797 +++|* NJN SKP6 (LABELED OR I/SI/LI FORMAT) 23295 M00S14060.1mt +++| SOD BL+1 ADJUST BLOCK COUNT 23296 M00S14061.1mt +++| PJN SKP4 IF NO UNDERFLOW 23297 M00S14062.1mt +++| SOD BL 23298 M00S14063.1mt +++| AOD BL+1
| Line S14064 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 23299 M01S14064.ns21000 ---| SKP4 UJN SKP5 SET TAPE MARK ENCOUNTERED 23300 M01S14065.ns21000 ---|* LDD PA (S,L FORMAT) 23301 M01S14066.ns21000 ---| SKPC EQU *-1 23302 M01S14067.ns21000 ---| SHN 14 23303 M01S14068.ns21000 ---| ADD PB 23304 M01S14069.ns21000 ---| ZJN SKP5 IF END OF SKIP 23305 M01S14070.ns21000 ---| SBN 1 DECREMENT SKIP COUNT 23306 M01S14071.ns21000 ---| STD PB 23307 M01S14072.ns21000 ---| SHN -14 23308 M01S14073.ns21000 ---| STD PA
| Line S00183 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 23309 M01S00183.ns21000 +++| SKP4 PSN 23310 M01S00184.ns21000 +++| PSN
| Line S00185 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23311 M02S00185.274l797 ---|* RJM SLL (S,L FORMAT LABELED TAPE)
| Line S05110 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23312 M01S05110.274l797 +++|* RJM SLL (S,L FORMAT LABELED TAPE) 23313 M00S14074.1mt +++| SKP5 LDN /MTX/BEI SET TAPE MARK ENCOUNTERED 23314 M00S14075.1mt +++| LJM RET3 RETURN ERROR CODE 23315 M00S14076.1mt +++| 23316 M00S14077.1mt +++| SKP6 AOD BT INCREMENT BLOCKS TRANSFERRED 23317 M00S14078.1mt +++| AOD CN+4 INCREMENT BLOCKS SKIPPED 23318 M00S14079.1mt +++| RJM UAD 23319 M00S14080.1mt +++| ADN /MTX/UBLC 23320 M00S14081.1mt +++| CWD CN 23321 M00S14082.1mt +++| LDD T7 23322 M00S14083.1mt +++| NJN SKP7 IF NOT TERMINATION CONDITION 23323 M00S14084.1mt +++| LDD PA 23324 M00S14085.1mt +++| SHN 14 23325 M00S14086.1mt +++| ADD PB 23326 M00S14087.1mt +++| ZJN SKP10 IF END OF SKIP 23327 M00S14088.1mt +++| SBN 1 23328 M00S14089.1mt +++| ZJN SKP10 IF END OF SKIP 23329 M00S14090.1mt +++| STD PB 23330 M00S14091.1mt +++| SHN -14 23331 M00S14092.1mt +++| STD PA 23332 M00S14093.1mt +++| SKP7 LDD CN+4 23333 M00S14094.1mt +++| ADC -SBLK 23334 M00S14095.1mt +++| MJN SKP8 IF NOT TIME TO CHECK ERROR FLAG 23335 M00S14096.1mt +++| LDD TH 23336 M00S14097.1mt +++| RAD PA 23337 M00S14098.1mt +++| UJN SKP11 RETURN STATUS TO *MAGNET* 23338 M00S14099.1mt +++| 23339 M00S14100.1mt +++| SKP8 LDD DF CHECK DROP OUT FLAG 23340 M00S14101.1mt +++| NJN SKP9 IF DROP OUT SET 23341 M00S14102.1mt +++| LJM SKP1 READ TAPE 23342 M00S14103.1mt +++| 23343 M00S14104.1mt +++| SKP9 LJM RET2 REQUEUE 23344 M00S14105.1mt +++| 23345 M00S14106.1mt +++| SKP10 LDM LNUM SET OPERATION COMPLETE 23346 M00S14107.1mt +++| SHN 2 23347 M00S14108.1mt +++| STD PA 23348 M00S14109.1mt +++| SKPD LDD T2 SET EOR/EOF STATUS 23349 M00S14110.1mt +++|* LDN 0 (PRU SKIP) 23350 M00S14111.1mt +++| LPN 10 23351 M00S14112.1mt +++| SKPE ADN 20 23352 M00S14113.1mt +++|* PSN (READSKP OR PRU SKIP) 23353 M00S14114.1mt +++| ADM CIOE MERGE IN CIO CODE 23354 M00S14115.1mt +++| LPC 774 23355 M00S14116.1mt +++| STD PB
| Line S14117 Modification History | |
|---|---|
M01 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 23356 M01S14117.282l826 ---| LDC 2000 SET EOR/EOF FLAG 23357 M01S14118.282l826 ---| RAD HP
| Line S01271 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 23358 M01S01271.282l826 +++| LDN 10 SET EOR/EOF FLAG 23359 M01S01272.282l826 +++| RAD UP 23360 M00S14119.1mt +++| SKP11 LJM RET1 RETURN 23361 M00S14120.1mt +++|
| Line S00186 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 23362 M02S00186.v23l617 ---| BSS 5
| Line S00364 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 23363 M02S00364.282l826 ---| BSS 5
| Line S01273 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 23364 M01S01273.282l826 +++| BSS 6 23365 M00S14121.1mt +++| .OSKRL EQU *
| Line S14122 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23366 M01S14122.274l797 ---| SPACE 4,10
| Line S05111 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23367 M01S05111.274l797 +++| DBF SPACE 4,10 23368 M00S14123.1mt +++|** DBF - DETERMINE BLOCK TYPE FORWARD. 23369 M00S14124.1mt +++|* 23370 M00S14125.1mt +++|* EXIT (A) = (T7) = 0, IF TERMINATION MET. 23371 M00S14126.1mt +++|* (T2) = TERMINATION STATUS. 23372 M00S14127.1mt +++|*
| Line S14128 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23373 M01S14128.274l797 ---|* CALLS IDF, *REM*, UBW, VDA.
| Line S05112 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 1mt48 |
Seq # *Modification Id* Act ----------------------------+ 23374 M02S05112.1mt48 ---|* USES T1.
| Line S00062 Modification History | |
|---|---|
M01 (Added by) | 1mt48 |
Seq # *Modification Id* Act ----------------------------+ 23375 M01S00062.1mt48 +++|* USES BL, BL+1, T1, T2, T7.
| Line S05113 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23376 M01S05113.274l797 +++|* 23377 M01S05114.274l797 +++|* CALLS *CRE*, IDF, *REM*, UBW, VDA. 23378 M00S14129.1mt +++|* 23379 M00S14130.1mt +++|* MACROS CALL. 23380 M00S14131.1mt +++| 23381 M00S14132.1mt +++| 23382 M00S14133.1mt +++| DBF SUBR ENTRY/EXIT 23383 M00S14134.1mt +++| LDM BUF-1,BY SAVE LEVEL NUMBER
| Line S14135 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23384 M01S14135.274l797 ---| STM IDFB 23385 M01S14136.274l797 ---| DBFA RJM VDA VALIDATE DATA I FORMAT
| Line S05115 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23386 M01S05115.274l797 +++| DBFA EQU *-2 23387 M01S05116.274l797 +++|* LDM BUFB+4 (LI FORMAT) 23388 M01S05117.274l797 +++| STM IDFC 23389 M01S05118.274l797 +++| DBFB RJM VDA VALIDATE DATA I FORMAT 23390 M00S14137.1mt +++|* PSN ALL OTHER FORMATS 23391 M00S14138.1mt +++|* PSN 23392 M00S14139.1mt +++| LDD EP 23393 M00S14140.1mt +++| LPN 77 23394 M00S14141.1mt +++| SHN 14 23395 M00S14142.1mt +++| LMD EC 23396 M00S14143.1mt +++| ZJN DBF5 IF NO ERROR 23397 M00S14144.1mt +++| LMN /MTX/BEI 23398 M00S14145.1mt +++| NJN DBF2 IF NOT TAPE MARK 23399 M00S14146.1mt +++| LDN 1 SET TAPE MARK INDICATION 23400 M00S14147.1mt +++| DBF1 STM UBWB
| Line S05119 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23401 M01S05119.274l797 +++| DBFC EQU *-2 23402 M01S05120.274l797 +++|* UJN DBF5 (CTS) 23403 M00S14148.1mt +++| RJM UBW UPDATE BID WINDOW 23404 M00S14149.1mt +++| UJN DBF5 SKIP ERROR PROCESSOR CALL 23405 M00S14150.1mt +++| 23406 M00S14151.1mt +++| DBF2 LMN /MTX/STE&/MTX/BEI 23407 M00S14152.1mt +++| NJN DBF3 IF NOT STATUS ERROR
| Line S14153 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 23408 M01S14153.241l630 ---| DBFB LDN 0 23409 M01S14154.241l630 ---|* LDN 1 (PO=N OR MTX/ATS SKIPEI OR POSMF) 23410 M01S14155.241l630 ---| ZJN DBF3 IF PROCESS ERRORS 23411 M01S14156.241l630 ---| LDN 4 SET UNUSEABLE BID 23412 M01S14157.241l630 ---| UJN DBF1 UPDATE BID WINDOW
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23413 M02S00001.274l797 ---| DBFB UJN DBF3 PROCESS ERRORS
| Line S05121 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23414 M01S05121.274l797 +++| DBFD UJN DBF3 PROCESS ERRORS
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 23415 M01S00002.241l630 +++|* LDN 4 (PO=N OR MTX/ATS SKIPEI OR POSMF) 23416 M01S00003.241l630 +++| UJN DBF1 SET UNUSABLE BID 23417 M00S14158.1mt +++| 23418 M00S14159.1mt +++| DBF3 UJN DBF4 LOAD READ ERROR PROCESSOR
| Line S14160 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23419 M01S14160.274l797 ---| DBFC EQU *-1
| Line S05122 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23420 M01S05122.274l797 +++| DBFE EQU *-1 23421 M00S14161.1mt +++|* AOD BL+1 INCREMENT BLOCK COUNT (SKIP BACK) 23422 M00S14162.1mt +++| SHN -14 23423 M00S14163.1mt +++| RAD BL
| Line S05123 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23424 M01S05123.274l797 +++| DBFF BSS 0 23425 M01S05124.274l797 +++|* CALL CRE LOAD ERROR PROCESSOR (CTS) 23426 M00S14164.1mt +++| DBF4 CALL REM LOAD READ ERROR PROCESSOR 23427 M00S14165.1mt +++| UJN DBF5 FORWARD SKIP 23428 M00S14166.1mt +++|* SOD BL+1 (REVERSE SKIP - DECREMENT BLOCK COUNT)
| Line S14167 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23429 M01S14167.274l797 ---| DBFD EQU *-1
| Line S05125 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23430 M01S05125.274l797 +++| DBFG EQU *-1 23431 M00S14168.1mt +++| PJN DBF5 IF NO UNDERFLOW 23432 M00S14169.1mt +++| AOD BL+1 23433 M00S14170.1mt +++| SOD BL 23434 M00S14171.1mt +++| DBF5 RJM IDF PROCESS INTERNAL DATA FORMAT 23435 M00S14172.1mt +++| STD T2 SAVE STATUS 23436 M00S14173.1mt +++| LDD MD
| Line S14174 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23437 M01S14174.274l797 ---| DBFE LPN 10 (S, L, F FORMAT) 23438 M01S14175.274l797 ---|* LPN 14 (I, SI FORMAT)
| Line S05126 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23439 M01S05126.274l797 +++| DBFH LPN 10 (S, L, F FORMAT) 23440 M01S05127.274l797 +++|* LPN 14 (I, SI, LI FORMAT) 23441 M00S14176.1mt +++| ZJN DBF6 IF PRU OPERATION 23442 M00S14177.1mt +++| STD T1 23443 M00S14178.1mt +++| LDD T2 DETERMINE IF TERMINATION MET 23444 M00S14179.1mt +++| SBD T1 23445 M00S14180.1mt +++| MJN DBF6 IF TERMINATION NOT MET 23446 M00S14181.1mt +++| LDD T1 23447 M00S14182.1mt +++| LMN 4 23448 M00S14183.1mt +++| NJN DBF6 IF NOT EOR 23449 M00S14184.1mt +++| LDM LNUM
| Line S14185 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23450 M01S14185.274l797 ---| DBFF SBN 0 LEVEL NUMBER
| Line S05128 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23451 M01S05128.274l797 +++| DBFI SBN 0 LEVEL NUMBER 23452 M00S14186.1mt +++| DBF6 SHN -21 SET TERMINATION FLAG 23453 M00S14187.1mt +++| STD T7 23454 M00S14188.1mt +++| LJM DBFX RETURN 23455 M00S14189.1mt +++| DBR SPACE 4,10
| Line S00365 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 23456 M01S00365.v23l617 +++|
| Line S00366 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23457 M02S00366.274l797 ---|* THE FOLLOWING CODE GETS OVERLAID IF GCR 23458 M02S00367.274l797 ---|* SKIP REVERSE ON ISMT CONTROLLER.
| Line S05129 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23459 M01S05129.274l797 +++|* THE FOLLOWING CODE GETS OVERLAID IF NOT USING READ REVERSE. 23460 M01S05130.274l797 +++|* ISMT GCR, CTS, AND LI FORMAT DO NOT USE READ REVERSE.
| Line S00368 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 23461 M01S00368.v23l617 +++| 23462 M01S00369.v23l617 +++| .DBRR EQU * 23463 M01S00370.v23l617 +++| 23464 M00S14190.1mt +++|** DBR - DETERMINE BLOCK TYPE REVERSE.
| Line S05131 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23465 M01S05131.274l797 +++|* 23466 M01S05132.274l797 +++|* USES CM - CM+4. 23467 M00S14191.1mt +++|* 23468 M00S14192.1mt +++|* CALLS DBF. 23469 M00S14193.1mt +++| 23470 M00S14194.1mt +++| 23471 M00S14195.1mt +++| DBR2 RJM DBF DETERMINE BLOCK TYPE FORWARD 23472 M00S14196.1mt +++| 23473 M00S14197.1mt +++| DBR SUBR ENTRY/EXIT
| Line S14198 Modification History | |
|---|---|
M01 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 23474 M01S14198.282l826 ---| DBRA UJN DBR2 DO NOT SET LEVEL NUMBER IF NOT I/SI 23475 M01S14199.282l826 ---|* LDD BY (I/SI FORMAT)
| Line S01274 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 23476 M01S01274.282l826 +++| DBRA UJN DBR2 DETERMINE BLOCK TYPE 23477 M01S01275.282l826 +++|* LDD BY (USING READ REVERSE) 23478 M00S14200.1mt +++| ZJN DBR2 IF NO DATA READ 23479 M00S14201.1mt +++| 23480 M00S14202.1mt +++|* THE FOLLOWING CODE GETS OVERLAID IF 9 TRACK SI 23481 M00S14203.1mt +++|* FORMAT SKIP REVERSE OPERATION OR IF MTS 9 TRACK, I 23482 M00S14204.1mt +++|* FORMAT SKIP REVERSE. 23483 M00S14205.1mt +++| 23484 M00S14206.1mt +++| .DBRO EQU * BEGINNING OF OVERLAID AREA 23485 M00S14207.1mt +++| 23486 M00S14208.1mt +++| LDC BUF 23487 M00S14209.1mt +++| STM DBRC 23488 M00S14210.1mt +++| LDD WC 23489 M00S14211.1mt +++| LPN 1 23490 M00S14212.1mt +++| DBRB UJN DBR1 DO NOT SKIP FIRST BYTE 23491 M00S14213.1mt +++|* ZJN DBR1 (9 TRACK I FORMAT - IF EVEN WORD COUNT) 23492 M00S14214.1mt +++| AOM DBRC SKIP FIRST BYTE (I FORMAT) 23493 M00S14215.1mt +++| DBR1 LDD MA SAVE FIRST FOUR BYTES 23494 M00S14216.1mt +++| CWM BUF,ON 23495 M00S14217.1mt +++| DBRC EQU *-1 23496 M00S14218.1mt +++| SBN 1 23497 M00S14219.1mt +++| CRD CM 23498 M00S14220.1mt +++| LDD CM STORE LAST FOUR BYTES 23499 M00S14221.1mt +++| STM BUF-1,BY 23500 M00S14222.1mt +++| LDD CM+1 23501 M00S14223.1mt +++| STM BUF-2,BY 23502 M00S14224.1mt +++| LDD CM+2 23503 M00S14225.1mt +++| STM BUF-3,BY 23504 M00S14226.1mt +++| LDD CM+3 23505 M00S14227.1mt +++| STM BUF-4,BY 23506 M00S14228.1mt +++| LJM DBR2 DETERMINE BLOCK TYPE FORWARD 23507 M00S14229.1mt +++| 23508 M00S14230.1mt +++| .DBROL EQU *-.DBRO LENGTH OF OVERLAID AREA
| Line S00371 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23509 M02S00371.274l797 ---| .DBRRL EQU *-.DBRR LENGTH OF OVERLAID AREA (GCR ISMT)
| Line S05133 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23510 M01S05133.274l797 +++| .DBRRL EQU *-.DBRR LENGTH OF OVERLAID AREA 23511 M00S14231.1mt +++| IDF SPACE 4,10 23512 M00S14232.1mt +++|** IDF - PROCESS INTERNAL DATA FORMAT. 23513 M00S14233.1mt +++|* 23514 M00S14234.1mt +++|* EXIT (A) = TERMINATION STATUS.
| Line S05134 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23515 M01S05134.274l797 +++|* 23516 M01S05135.274l797 +++|* CALLS CFP. 23517 M00S14235.1mt +++| 23518 M00S14236.1mt +++| 23519 M00S14237.1mt +++| IDF2 LDN 17 SET LEVEL 17 23520 M00S14238.1mt +++| STM LNUM 23521 M00S14239.1mt +++| LDN 14 RETURN EOI 23522 M00S14240.1mt +++| 23523 M00S14241.1mt +++| IDF SUBR ENTRY/EXIT 23524 M00S14242.1mt +++| LDD EC 23525 M00S14243.1mt +++| LMN /MTX/BEI 23526 M00S14244.1mt +++| ZJN IDF2 IF TAPE MARK 23527 M00S14245.1mt +++| LDD BY
| Line S00063 Modification History | |
|---|---|
M01 (Added by) | 1mt48 |
Seq # *Modification Id* Act ----------------------------+ 23528 M01S00063.1mt48 +++| ADC 0 23529 M01S00064.1mt48 +++| IDFE EQU *-1 (LI FORMAT CHUNK COUNT) 23530 M00S14246.1mt +++| ZJN IDF2 IF NO BYTES READ 23531 M00S14247.1mt +++| LMM /READ/MRDA
| Line S05136 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23532 M01S05136.274l797 +++| IDFA EQU *-1 23533 M01S05137.274l797 +++|* RJM CFP (LI FORMAT) 23534 M01S05138.274l797 +++|* LMM /READ/RCTA (CTS) 23535 M00S14248.1mt +++| LMN 1 23536 M00S14249.1mt +++| STM LNUM SET 0 LEVEL NUMBER
| Line S14250 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23537 M01S14250.274l797 ---| IDFA ZJN IDFX IF FULL PRU 23538 M01S14251.274l797 ---|* PSN (NOT I/SI FORMAT)
| Line S05139 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23539 M01S05139.274l797 +++| IDFB ZJN IDFX IF FULL PRU 23540 M01S05140.274l797 +++|* PSN (NOT I/SI/LI FORMAT) 23541 M00S14252.1mt +++| LDC * EXTRACT LEVEL NUMBER
| Line S14253 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23542 M01S14253.274l797 ---| IDFB EQU *-1
| Line S05141 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23543 M01S05141.274l797 +++| IDFC EQU *-1 23544 M00S14254.1mt +++| LPN 77
| Line S14255 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23545 M01S14255.274l797 ---| IDFC LDN 0 (NOT I/SI FORMAT) 23546 M01S14256.274l797 ---|* PSN (I/SI FORMAT)
| Line S05142 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23547 M01S05142.274l797 +++| IDFD LDN 0 (NOT I/SI/LI FORMAT) 23548 M01S05143.274l797 +++|* PSN (I/SI/LI FORMAT) 23549 M00S14257.1mt +++| STM LNUM 23550 M00S14258.1mt +++| LMN 17 23551 M00S14259.1mt +++| ZJN IDF1 IF EOF 23552 M00S14260.1mt +++| LCN 4 23553 M00S14261.1mt +++| IDF1 ADN 10 23554 M00S14262.1mt +++| UJN IDFX RETURN 23555 M00S14263.1mt +++| VDA SPACE 4,10 23556 M00S14264.1mt +++|** VDA - VALIDATE DATA.
| Line S14265 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23557 M01S14265.274l797 ---|* CHECKS I FORMAT TRAILER BYTES.
| Line S05144 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23558 M01S05144.274l797 +++|* CHECKS I FORMAT TRAILER BYTES OR LI FORMAT PREFIX BYTES. 23559 M01S05145.274l797 +++|* IF LI FORMAT, *VDA* IS OVERLAYED WITH *VLI*. 23560 M00S14266.1mt +++| 23561 M00S14267.1mt +++| 23562 M00S14268.1mt +++| VDA SUBR ENTRY/EXIT 23563 M00S14269.1mt +++| LDD BY 23564 M00S14270.1mt +++| ZJN VDAX IF NO DATA READ 23565 M00S14271.1mt +++| LDD EC 23566 M00S14272.1mt +++| ZJN VDA1 IF NO PREVIOUS ERRORS ENCOUNTERED 23567 M00S14273.1mt +++| LMN /MTX/STE 23568 M00S14274.1mt +++| NJN VDAX IF NOT STATUS ERROR CODE
| Line S05146 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23569 M01S05146.274l797 +++| VDAA EQU *-1 23570 M01S05147.274l797 +++|* UJN VDAX (CTS) 23571 M01S05148.274l797 +++| LDM MTDS 23572 M01S05149.274l797 +++| LPC 7777 23573 M01S05150.274l797 +++| VDAB EQU *-1
| Line S14275 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23574 M01S14275.274l797 ---| LDM MTDS 23575 M01S14276.274l797 ---| LPC 7777 23576 M01S14277.274l797 ---| VDAA EQU *-1 23577 M00S14278.1mt +++|* LPC 7077 (MTS UNIT) 23578 M00S14279.1mt +++| NJN VDAX IF ERRORS REPORTED FROM HARDWARE 23579 M00S14280.1mt +++| VDA1 LDD EP 23580 M00S14281.1mt +++| SHN 21-12 23581 M00S14282.1mt +++| MJN VDAX IF OPPOSITE PARITY BEING TRIED 23582 M00S14283.1mt +++| LDM BUF-4,BY SAVE BLOCK LENGTH 23583 M00S14284.1mt +++| STM //BNEI 23584 M00S14285.1mt +++| LDM BUF-3,BY 23585 M00S14286.1mt +++| STM //BNEI+1 23586 M00S14287.1mt +++| LMD BL 23587 M00S14288.1mt +++| SHN 14 23588 M00S14289.1mt +++| LMM BUF-2,BY 23589 M00S14290.1mt +++| STM //BNEI+2 23590 M00S14291.1mt +++| LMD BL+1
| Line S14292 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23591 M01S14292.274l797 ---| NJN VDA2 IF BLOCK NUMBER ERROR 23592 M01S14293.274l797 ---| LDM //BNEI 23593 M01S14294.274l797 ---| LMD BY 23594 M01S14295.274l797 ---| ZJN VDA3 IF CORRECT BLOCK LENGTH 23595 M01S14296.274l797 ---| VDA2 LDN /MTX/BNE
| Line S05151 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23596 M01S05151.274l797 +++| ZJN VDA2 IF BLOCK NUMBER CORRECT 23597 M01S05152.274l797 +++| LDN /MTX/BNE 23598 M00S14297.1mt +++| STD EC
| Line S14298 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23599 M01S14298.274l797 ---| VDA3 LJM VDAX RETURN
| Line S05153 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23600 M01S05153.274l797 +++| VDA2 LJM VDAX RETURN 23601 M00S14299.1mt +++| SPACE 4,10 23602 M00S14300.1mt +++| BUFFER
| Line S14301 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23603 M01S14301.274l797 ---| TITLE SKIP LONG BLOCKS.
| Line S05154 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 1mt48 |
Seq # *Modification Id* Act ----------------------------+ 23604 M02S05154.1mt48 ---| BSS 6 SO *VLI* DOES NOT OVERFLOW
| Line S00065 Modification History | |
|---|---|
M01 (Added by) | 1mt48 |
Seq # *Modification Id* Act ----------------------------+ 23605 M01S00065.1mt48 +++| BSS 7 SO *VLI* DOES NOT OVERFLOW
| Line S05155 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23606 M01S05155.274l797 +++| VDAL EQU *-VDAX LENGTH OF *VDA* 23607 M01S05156.274l797 +++| CFP SPACE 4,10 23608 M01S05157.274l797 +++|** CFP - CHECK FULL PRU FOR LI FORMAT. 23609 M01S05158.274l797 +++|*
| Line S05159 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 1mt48 |
Seq # *Modification Id* Act ----------------------------+ 23610 M02S05159.1mt48 ---|* ENTRY (SLBC) = NUMBER OF FULL 2400-BYTE CHUNKS READ.
| Line S00066 Modification History | |
|---|---|
M01 (Added by) | 1mt48 |
Seq # *Modification Id* Act ----------------------------+ 23611 M01S00066.1mt48 +++|* ENTRY (BUFB - BUFB+4) = LI FORMAT BLOCK PREFIX.
| Line S05160 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23612 M01S05160.274l797 +++|* 23613 M01S05161.274l797 +++|* EXIT (A) = 1 IF FULL PRU. 23614 M01S05162.274l797 +++| 23615 M01S05163.274l797 +++| 23616 M01S05164.274l797 +++| CFP SUBR ENTRY/EXIT
| Line S05165 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 1mt48 |
Seq # *Modification Id* Act ----------------------------+ 23617 M02S05165.1mt48 ---| LDM SLBC 23618 M02S05166.1mt48 ---| SBN 20 23619 M02S05167.1mt48 ---| NJN CFPX IF NOT FULL PRU 23620 M02S05168.1mt48 ---| LDD BY 23621 M02S05169.1mt48 ---| ADC -2376
| Line S00067 Modification History | |
|---|---|
M01 (Added by) | 1mt48 |
Seq # *Modification Id* Act ----------------------------+ 23622 M01S00067.1mt48 +++| LDM BUFB GET BYTE COUNT 23623 M01S00068.1mt48 +++| SHN 14 23624 M01S00069.1mt48 +++| ADM BUFB+1 23625 M01S00070.1mt48 +++| ADC -50005+1 CHECK FULL PRU
| Line S05170 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23626 M01S05170.274l797 +++| UJN CFPX RETURN 23627 M00S14302.1mt +++| SLB SPACE 4,10 23628 M00S14303.1mt +++|** SLB - SKIP LONG BLOCK.
| Line S05171 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23629 M01S05171.274l797 +++|* THIS CODE IS OVERLAYED WITH *SLI* FOR LI FORMAT. 23630 M01S05172.274l797 +++|* 23631 M01S05173.274l797 +++|* ENTRY AT *SLB* FROM *MRD* OR *RCT* WHEN *LBBY* BYTES HAVE 23632 M01S05174.274l797 +++|* BEEN READ. 23633 M01S05175.274l797 +++|* 23634 M01S05176.274l797 +++|* USES T2. 23635 M00S14304.1mt +++| 23636 M00S14305.1mt +++|
| Line S14306 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23637 M01S14306.274l797 ---| SLB LDN 2 INPUT 2 BYTES
| Line S05177 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23638 M01S05177.274l797 +++| SLB PSN MAKE ROUTINE AS LONG AS *SLI* 23639 M01S05178.274l797 +++| LDN 2 INPUT 2 BYTES 23640 M00S14307.1mt +++| IAM BUFB,CH 23641 M00S14308.1mt +++| LCN 0 23642 M00S14309.1mt +++| STD T2 23643 M00S14310.1mt +++| SLB1 LDC 400 INPUT DATA 23644 M00S14311.1mt +++| IAM BUFB,CH
| Line S14312 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23645 M01S14312.274l797 ---| NJN SLB2 IF END OF BLOCK
| Line S05179 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23646 M01S05179.274l797 +++| NJN SLB3 IF END OF BLOCK 23647 M00S14313.1mt +++| SOD T2 23648 M00S14314.1mt +++| NJN SLB1 IF NOT BLOCK TOO LONG
| Line S14315 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23649 M01S14315.274l797 ---| LDN /MTX/BTL BLOCK TOO LARGE 23650 M01S14316.274l797 ---| LJM /READ/MRD5 MASTER CLEAR CHANNEL
| Line S05180 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23651 M01S05180.274l797 +++| SLBL EQU *-SLB LENGTH OF CODE THAT CAN BE OVERLAYED 23652 M01S05181.274l797 +++| SLB2 LJM /READ/MRD4.1 SET BLOCK TOO LARGE 23653 M01S05182.274l797 +++| SLBA EQU *-1 23654 M01S05183.274l797 +++|* LJM /READ/RCT4 (CTS) 23655 M00S14317.1mt +++|
| Line S14318 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23656 M01S14318.274l797 ---| SLB2 STD T1 23657 M01S14319.274l797 ---| LJM /READ/MRD6 CALCULATE REMAINDER OF CM WORD COUNT
| Line S05184 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23658 M01S05184.274l797 +++| SLB3 LJM /READ/MRD4 CALCULATE REMAINDER OF CM WORD COUNT 23659 M01S05185.274l797 +++| SLBB EQU *-1 23660 M01S05186.274l797 +++|* LJM /READ/RCT5 (CTS)
| Line S05187 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 1mt48 |
Seq # *Modification Id* Act ----------------------------+ 23661 M02S05187.1mt48 ---| 23662 M02S05188.1mt48 ---| 23663 M02S05189.1mt48 ---| SLBC DATA 0 CHUNK COUNT FOR LI FORMAT 23664 M00S14320.1mt +++| SPACE 4,10 23665 M00S14321.1mt +++| BUFFER BUFB 23666 M00S14322.1mt +++| SKR SPACE 4,10 23667 M00S14323.1mt +++|** SKR - SKIP REVERSE.
| Line S05190 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23668 M01S05190.274l797 +++|* THE FOLLOWING CODE OVERLAYS *SKP* IF THE OPERATION IS 23669 M01S05191.274l797 +++|* SKIP REVERSE. 23670 M00S14324.1mt +++|*
| Line S14325 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23671 M01S14325.274l797 ---|* THE FOLLOWING CODE GETS MOVED TO .OSKR 23672 M01S14326.274l797 ---|* IF THE OPERATION IS SKIP REVERSE.
| Line S05192 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23673 M01S05192.274l797 +++|* EXIT TO *RET1* IF NORMAL COMPLETION. 23674 M01S05193.274l797 +++|* TO *RET2* TO REQUEUE. 23675 M00S14327.1mt +++|*
| Line S14328 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23676 M01S14328.274l797 ---|* CALLS DBR, UAD.
| Line S05194 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23677 M01S05194.274l797 +++|* CALLS BKS, DBF, DBR, /READ/RDF, UAD. 23678 M00S14329.1mt +++| 23679 M00S14330.1mt +++| 23680 M00S14331.1mt +++| .BSKR BSS 0 23681 M00S14332.1mt +++| LOC .OSKR
| Line S14333 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23682 M01S14333.274l797 ---|
| Line S14334 Modification History | |
|---|---|
M01 (Removed by) | ns2678 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23683 M02S14334.274l797 ---| SKR LDD BL 23684 M02S14335.274l797 ---| ADD BL+1 23685 M02S14336.274l797 ---| NJN SKR3 IF NOT BOI 23686 M02S14337.274l797 ---| LDD MD 23687 M02S14338.274l797 ---| SHN 21-11 23688 M02S14339.274l797 ---| PJN SKR1 IF FIRST PASS 23689 M02S14340.274l797 ---| LDD PA 23690 M02S14341.274l797 ---| SHN 14 23691 M02S14342.274l797 ---| ADD PB 23692 M02S14343.274l797 ---| LMN 1 23693 M02S14344.274l797 ---| ZJN SKR2 IF END OF SKIP 23694 M02S14345.274l797 ---| SKR1 LDN 50 23695 M02S14346.274l797 ---| SKR2 ADN 1 23696 M02S14347.274l797 ---| STD PB 23697 M02S14348.274l797 ---| LDN 0 23698 M02S14349.274l797 ---| STD PA 23699 M02S14350.274l797 ---| LJM RET1 RETURN 23700 M02S14351.274l797 ---|
| Line S14352 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
M02 (Removed by) | ns2678 |
M03 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23701 M03S14352.274l797 ---| SKR3 LJM /READ/RDF READ TAPE
| Line S00372 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | ns2678 |
M03 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23702 M03S00372.274l797 ---| SKR3 PSN 23703 M03S00373.274l797 ---| PSN 23704 M03S00374.274l797 ---|* RJM BKS (GCR ISMT) 23705 M03S00375.274l797 ---| LJM /READ/RDF READ TAPE 23706 M03S00376.274l797 ---|
| Line S14353 Modification History | |
|---|---|
M01 (Removed by) | ns2678 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23707 M02S14353.274l797 ---|
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2678 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23708 M02S00001.274l797 ---|* ENTER HERE FROM *RDF* CALL IN *SKR3*. 23709 M02S00002.274l797 ---|
| Line S14354 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23710 M01S14354.274l797 ---| SKR4 UJN SKR5 NOT SI FORMAT, 9 TRACK
| Line S05195 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23711 M01S05195.274l797 +++| SKR4 UJN SKR5 NOT SI FORMAT, 9/18 TRACK 23712 M00S14355.1mt +++| SKRA EQU *-1
| Line S14356 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23713 M01S14356.274l797 ---|* LDD ES (9 TRACK SI FORMAT)
| Line S05196 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23714 M01S05196.274l797 +++|* LDD ES (9/18 TRACK SI FORMAT) 23715 M00S14357.1mt +++| LPN 40 23716 M00S14358.1mt +++| ZJN SKR5 IF NO FILL STATUS 23717 M00S14359.1mt +++| SOD BY ADJUST BYTE COUNT 23718 M00S14360.1mt +++| SOD WC ADJUST WORD COUNT 23719 M00S14361.1mt +++| SKR5 SOD BL+1 DECREMENT BLOCK COUNT 23720 M00S14362.1mt +++| PJN SKR6 IF NO UNDERFLOW 23721 M00S14363.1mt +++| AOD BL+1 23722 M00S14364.1mt +++| SOD BL 23723 M00S14365.1mt +++| SKR6 RJM DBR DETERMINE BLOCK TYPE REVERSE
| Line S00377 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 23724 M01S00377.v23l617 +++| SKRB EQU *-1
| Line S00378 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23725 M02S00378.274l797 ---|* RJM DBF (GCR ISMT)
| Line S05197 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23726 M01S05197.274l797 +++|* RJM DBF (GCR ISMT OR CTS)
| Line S00379 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 23727 M01S00379.v23l617 +++| SKRC PSN 23728 M01S00380.v23l617 +++| PSN
| Line S00381 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23729 M02S00381.274l797 ---|* RJM BKS (GCR ISMT)
| Line S05198 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23730 M01S05198.274l797 +++|* RJM BKS (GCR ISMT OR CTS) 23731 M00S14366.1mt +++| LDD MD 23732 M00S14367.1mt +++| SHN 21-11 23733 M00S14368.1mt +++| MJN SKR7 IF NOT FIRST PASS 23734 M00S14369.1mt +++| LDD TH SET NOT FIRST PASS FLAG 23735 M00S14370.1mt +++| RAD MD 23736 M00S14371.1mt +++| UJN SKR8 CHECK FOR DROP OUT 23737 M00S14372.1mt +++| 23738 M00S14373.1mt +++| SKR7 AOD BT INCREMENT BLOCKS TRANSFERRED 23739 M00S14374.1mt +++| AOD CN+4 INCREMENT BLOCKS SKIPPED 23740 M00S14375.1mt +++| RJM UAD 23741 M00S14376.1mt +++| ADN /MTX/UBLC 23742 M00S14377.1mt +++| CWD CN 23743 M00S14378.1mt +++| LDD T7 23744 M00S14379.1mt +++| NJN SKR8 IF TERMINATION NOT MET 23745 M00S14380.1mt +++| LDD PA CHECK SKIP TERMINATION 23746 M00S14381.1mt +++| SHN 14 23747 M00S14382.1mt +++| ADD PB
| Line S14383 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 23748 M01S14383.v23l617 ---| ZJN SKR10 IF END OF SKIP 23749 M00S14384.1mt +++| SBN 1
| Line S14385 Modification History | |
|---|---|
M01 (Removed by) | ns2678 |
Seq # *Modification Id* Act ----------------------------+ 23750 M01S14385.ns2678 ---| ZJN SKR10 IF END OF SKIP
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2678 |
Seq # *Modification Id* Act ----------------------------+ 23751 M01S00003.ns2678 +++| ZJN SKR9 IF END OF SKIP 23752 M00S14386.1mt +++| STD PB UPDATE SKIP COUNT 23753 M00S14387.1mt +++| SHN -14 23754 M00S14388.1mt +++| STD PA 23755 M00S14389.1mt +++| SKR8 LDD CN+4 23756 M00S14390.1mt +++| ADC -SBLK
| Line S14391 Modification History | |
|---|---|
M01 (Removed by) | ns2678 |
Seq # *Modification Id* Act ----------------------------+ 23757 M01S14391.ns2678 ---| MJN SKR9 IF NOT TIME TO CHECK ERROR FLAG
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns2678 |
Seq # *Modification Id* Act ----------------------------+ 23758 M01S00004.ns2678 +++| MJN SKR11 IF NOT TIME TO CHECK ERROR FLAG 23759 M00S14392.1mt +++| LDD TH SET CHECK ERROR FLAG INDICATOR 23760 M00S14393.1mt +++| RAD PA
| Line S14394 Modification History | |
|---|---|
M01 (Removed by) | ns2678 |
Seq # *Modification Id* Act ----------------------------+ 23761 M01S14394.ns2678 ---| LJM RET1 RETURN STATUS TO *MAGNET*
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | ns2678 |
Seq # *Modification Id* Act ----------------------------+ 23762 M01S00005.ns2678 +++| LDD T7 23763 M01S00006.ns2678 +++| ZJN SKR2.1 IF TERMINATION MET 23764 M01S00007.ns2678 +++| AOD MD SET NOT END OF RECORD FLAG 23765 M01S00008.ns2678 +++| UJN SKR2.1 RETURN STATUS TO *MAGNET* 23766 M01S00009.ns2678 +++| 23767 M01S00010.ns2678 +++| SKR9 LDD MD CLEAR REVERSE AND RECORD FLAGS 23768 M01S00011.ns2678 +++| LPC 3763 23769 M01S00012.ns2678 +++| STD MD 23770 M01S00013.ns2678 +++|* LDN 1 SET TO SKIP FORWARD ONE BLOCK 23771 M01S00014.ns2678 +++|* STD PB 23772 M01S00015.ns2678 +++|* LDN 0 23773 M01S00016.ns2678 +++|* STD PA CLEAR PARAMETER 23774 M01S00017.ns2678 +++| SKR10 LJM RET2 REQUEUE 23775 M00S14395.1mt +++|
| Line S14396 Modification History | |
|---|---|
M01 (Removed by) | ns2678 |
Seq # *Modification Id* Act ----------------------------+ 23776 M01S14396.ns2678 ---| SKR9 LDD DF CHECK DROP OUT FLAG 23777 M01S14397.ns2678 ---| NJN SKR11 IF DROP OUT SET 23778 M01S14398.ns2678 ---| LJM SKR READ TAPE 23779 M01S14399.ns2678 ---|
| Line S14400 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
M02 (Removed by) | ns2678 |
Seq # *Modification Id* Act ----------------------------+ 23780 M02S14400.ns2678 ---| SKR10 STD PA CLEAR PARAMETER 23781 M02S14401.ns2678 ---| LDD MD CLEAR REVERSE AND RECORD FLAGS
| Line S00382 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | ns2678 |
Seq # *Modification Id* Act ----------------------------+ 23782 M02S00382.ns2678 ---| SKR10 LDD MD CLEAR REVERSE AND RECORD FLAGS
| Line S14402 Modification History | |
|---|---|
M01 (Removed by) | ns2678 |
Seq # *Modification Id* Act ----------------------------+ 23783 M01S14402.ns2678 ---| LPC 3763 23784 M01S14403.ns2678 ---| STD MD
| Line S14404 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
M02 (Removed by) | ns2678 |
Seq # *Modification Id* Act ----------------------------+ 23785 M02S14404.ns2678 ---| LDN 1 SET TO SKIP BACK OVER 1 BLOCK 23786 M02S14405.ns2678 ---| STD PB
| Line S00383 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | ns2678 |
Seq # *Modification Id* Act ----------------------------+ 23787 M02S00383.ns2678 ---|* LDN 1 SET TO SKIP BACK OVER 1 BLOCK 23788 M02S00384.ns2678 ---|* STD PB 23789 M02S00385.ns2678 ---|* LDN 0 23790 M02S00386.ns2678 ---|* STD PA CLEAR PARAMETER
| Line S14406 Modification History | |
|---|---|
M01 (Removed by) | ns2678 |
Seq # *Modification Id* Act ----------------------------+ 23791 M01S14406.ns2678 ---| SKR11 LJM RET2 REQUEUE
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | ns2678 |
Seq # *Modification Id* Act ----------------------------+ 23792 M01S00018.ns2678 +++| SKR11 LDD DF CHECK DROP OUT FLAG 23793 M01S00019.ns2678 +++| NJN SKR10 IF DROP OUT SET 23794 M01S00020.ns2678 +++|
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | ns2678 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23795 M02S00021.274l797 ---| SKR BSS 0 ENTRY/REENTRY FROM *SKR11*
| Line S05199 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23796 M01S05199.274l797 +++| SKR BSS 0 ENTRY
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | ns2678 |
Seq # *Modification Id* Act ----------------------------+ 23797 M01S00022.ns2678 +++| LDD BL 23798 M01S00023.ns2678 +++| ADD BL+1 23799 M01S00024.ns2678 +++| NJN SKR3 IF NOT BOI 23800 M01S00025.ns2678 +++| LDD MD 23801 M01S00026.ns2678 +++| SHN 21-11 23802 M01S00027.ns2678 +++| PJN SKR1 IF FIRST PASS 23803 M01S00028.ns2678 +++| LDD PA 23804 M01S00029.ns2678 +++| SHN 14 23805 M01S00030.ns2678 +++| ADD PB 23806 M01S00031.ns2678 +++| LMN 1 23807 M01S00032.ns2678 +++| ZJN SKR2 IF END OF SKIP 23808 M01S00033.ns2678 +++| SKR1 LDN 50 23809 M01S00034.ns2678 +++| SKR2 ADN 1 23810 M01S00035.ns2678 +++| STD PB 23811 M01S00036.ns2678 +++| LDN 0 23812 M01S00037.ns2678 +++| STD PA 23813 M01S00038.ns2678 +++| SKR2.1 LJM RET1 RETURN 23814 M01S00039.ns2678 +++| 23815 M01S00040.ns2678 +++| SKR3 PSN 23816 M01S00041.ns2678 +++| PSN
| Line S00042 Modification History | |
|---|---|
M01 (Added by) | ns2678 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23817 M02S00042.274l797 ---|* RJM BKS (GCR ISMT)
| Line S05200 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23818 M01S05200.274l797 +++|* RJM BKS (GCR ISMT OR CTS)
| Line S00043 Modification History | |
|---|---|
M01 (Added by) | ns2678 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23819 M02S00043.274l797 ---| LJM /READ/RDF READ TAPE
| Line S05201 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23820 M01S05201.274l797 +++| LDN 0
| Line S05202 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 1mt48 |
Seq # *Modification Id* Act ----------------------------+ 23821 M02S05202.1mt48 ---| STM SLBC CHUNKS TRANSFERRED FOR LI FORMAT
| Line S00071 Modification History | |
|---|---|
M01 (Added by) | 1mt48 |
Seq # *Modification Id* Act ----------------------------+ 23822 M01S00071.1mt48 +++| STM IDFE CHUNKS TRANSFERRED FOR LI FORMAT
| Line S05203 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23823 M01S05203.274l797 +++| LJM /READ/RDF READ TAPE (RETURN AT *SKR4) 23824 M00S14407.1mt +++| 23825 M00S14408.1mt +++| ERRNG .OSKRL-* OVERLAID CODE OVERFLOWED 23826 M00S14409.1mt +++| 23827 M00S14410.1mt +++| LOC *O 23828 M00S14411.1mt +++| .BSKRL EQU * 23829 M00S14412.1mt +++| PRS SPACE 4,10 23830 M00S14413.1mt +++|** PRS - PRESET.
| Line S14414 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23831 M01S14414.274l797 ---|*
| Line S05204 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23832 M01S05204.274l797 +++|* ISMT GCR AND CTS HARDWARE CAN NOT DO READ BACKWARDS. READ 23833 M01S05205.274l797 +++|* BACKWARDS MUST BE REPLACED BY BACKSPACE BLOCK, READ FORWARD, 23834 M01S05206.274l797 +++|* BACKSPACE BLOCK. 23835 M01S05207.274l797 +++|*
| Line S14415 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23836 M01S14415.274l797 ---|* CALLS MCH, UAD.
| Line S05208 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23837 M01S05208.274l797 +++|* EXIT (/READ/ISKR) = 0 IF USING READ REVERSE FOR SKIP 23838 M01S05209.274l797 +++|* REVERSE. 23839 M01S05210.274l797 +++|* TO *SKP* IF SKIP FORWARD. 23840 M01S05211.274l797 +++|* TO *SKR* IF SKIP REVERSE. 23841 M01S05212.274l797 +++|* 23842 M01S05213.274l797 +++|* USES T1, T2, CN - CN+4. 23843 M01S05214.274l797 +++|* 23844 M01S05215.274l797 +++|* CALLS DTS, MCH, UAD. 23845 M00S14416.1mt +++| 23846 M00S14417.1mt +++|
| Line S14418 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 23847 M01S14418.v23l617 ---| PRS LDD FM
| Line S00387 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23848 M02S00387.274l797 ---| PRS LDN 0 CLEAR ISMT GCR FLAG
| Line S05216 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23849 M01S05216.274l797 +++| PRS LDN 0 CLEAR READ BACKWARDS FLAG
| Line S00388 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 23850 M01S00388.v23l617 +++| STM /READ/ISKR
| Line S00389 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23851 M02S00389.274l797 ---| LDD FM
| Line S05217 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23852 M01S05217.274l797 +++| LDD HP 23853 M01S05218.274l797 +++| SHN 21-7 23854 M01S05219.274l797 +++| PJP PRS1 IF NOT CTS 23855 M01S05220.274l797 +++| LDC LDNI+CRE/10000 23856 M01S05221.274l797 +++| STM DBFF LOAD CTS ERROR PROCESSOR 23857 M01S05222.274l797 +++| LDC /READ/RCTA 23858 M01S05223.274l797 +++| STM PRSD ADDRESS OF BYTE COUNT TO INPUT 23859 M01S05224.274l797 +++| STM PRSE 23860 M01S05225.274l797 +++| STM IDFA 23861 M01S05226.274l797 +++| LDC /READ/RCTB 23862 M01S05227.274l797 +++| STM PRSF ADDRESS OF INPUT ADDRESS 23863 M01S05228.274l797 +++| LDC /READ/RCTC 23864 M01S05229.274l797 +++| STM PRSG 23865 M01S05230.274l797 +++| ISTORE DBFC,(UJN DBF5) SKIP UPDATING BLOCK ID WINDOW 23866 M01S05231.274l797 +++| LDC UJNI-NJNI 23867 M01S05232.274l797 +++| RAM VDAA SKIP CHECKING ATS STATUS 23868 M01S05233.274l797 +++| LDC /READ/RCT4 23869 M01S05234.274l797 +++| STM SLBA SET BLOCK TOO LARGE 23870 M01S05235.274l797 +++| LDC /READ/RCT5 23871 M01S05236.274l797 +++| STM SLBB CALCULATE REMAINDER OF CM WORD COUNT 23872 M01S05237.274l797 +++| LDC /READ/RCTG 23873 M01S05238.274l797 +++| STM PRSA
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | 1mt41 |
Seq # *Modification Id* Act ----------------------------+ 23874 M01S00015.1mt41 +++| LDD FM
| Line S01276 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 23875 M01S01276.282l826 +++| SHN -6
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | 1mt41 |
Seq # *Modification Id* Act ----------------------------+ 23876 M01S00016.1mt41 +++| LMN /MTX/TFLI 23877 M01S00017.1mt41 +++| NJN PRS1 IF NOT LI FORMAT 23878 M01S00018.1mt41 +++| LDC STMI 23879 M01S00019.1mt41 +++| STM /READ/RCTM CLEAR CHUNK COUNTER
| Line S05239 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23880 M01S05239.274l797 +++| PRS1 LDD FM
| Line S01277 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 23881 M01S01277.282l826 +++| SHN -6 23882 M00S14419.1mt +++| LMN /MTX/TFI
| Line S14420 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23883 M01S14420.274l797 ---| NJN PRS1 IF NOT I FORMAT
| Line S05240 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23884 M01S05240.274l797 +++| NJN PRS2 IF NOT I FORMAT 23885 M00S14421.1mt +++| LDC UJNI+2 DO NOT PROCESS DATA 23886 M00S14422.1mt +++| STM /READ/MRDH
| Line S05241 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23887 M01S05241.274l797 +++| PRSA EQU *-1 23888 M01S05242.274l797 +++|* STM /READ/RCTG (CTS) 23889 M00S14423.1mt +++| LDD HP 23890 M00S14424.1mt +++| LPN 40
| Line S14425 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23891 M01S14425.274l797 ---| ZJN PRS1 IF NOT MTS UNIT
| Line S05243 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23892 M01S05243.274l797 +++| ZJN PRS2 IF NOT MTS UNIT 23893 M00S14426.1mt +++| LDC 7077
| Line S14427 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23894 M01S14427.274l797 ---| STM VDAA 23895 M01S14428.274l797 ---| PRS1 LDC LJMI
| Line S05244 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23896 M01S05244.274l797 +++| STM VDAB 23897 M01S05245.274l797 +++| PRS2 LDC LJMI 23898 M00S14429.1mt +++| STM /READ/RDFC 23899 M00S14430.1mt +++| LDC SKP2 23900 M00S14431.1mt +++| STM /READ/RDFC+1 23901 M00S14432.1mt +++| LDD PA INSURE CHECK ERROR FLAG BIT IS CLEAR 23902 M00S14433.1mt +++| LPN 77 23903 M00S14434.1mt +++| STD PA 23904 M00S14435.1mt +++| LDD MD 23905 M00S14436.1mt +++| SHN 21-13
| Line S14437 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23906 M01S14437.274l797 ---| MJN PRS4 IF REVERSE MOTION
| Line S05246 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23907 M01S05246.274l797 +++| MJN PRS5 IF REVERSE MOTION 23908 M00S14438.1mt +++| LDD MD CHECK IF SKIP TO EOI 23909 M00S14439.1mt +++| LPN 14
| Line S14440 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23910 M01S14440.274l797 ---| NJN PRS2 IF NOT PRU SKIP
| Line S05247 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23911 M01S05247.274l797 +++| NJN PRS3 IF NOT PRU SKIP 23912 M00S14441.1mt +++| STM SKPE DO NOT SET EOR/EOF STATUS 23913 M00S14442.1mt +++| LDC LDNI 23914 M00S14443.1mt +++| STM SKPD
| Line S14444 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23915 M01S14444.274l797 ---| UJN PRS3 CONTINUE PRESET
| Line S05248 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23916 M01S05248.274l797 +++| UJN PRS4 CONTINUE PRESET 23917 M00S14445.1mt +++|
| Line S14446 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23918 M01S14446.274l797 ---| PRS2 LMN 14 23919 M01S14447.274l797 ---| NJN PRS3 IF NOT SKIPEI 23920 M01S14448.274l797 ---| AOM PRSC SET SKIPEI OR POSMF IN PROGRESS
| Line S14449 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23921 M02S14449.274l797 ---| AOM DBFB
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23922 M02S00004.274l797 ---| ISTORE DBFB,(LDN 4) SET UNUSABLE BID IF ERROR
| Line S14450 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23923 M01S14450.274l797 ---| PRS3 LJM PRS8 CONTINUE PRESET
| Line S05249 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23924 M01S05249.274l797 +++| PRS3 LMN 14 23925 M01S05250.274l797 +++| NJN PRS4 IF NOT SKIPEI 23926 M01S05251.274l797 +++| AOM PRSH SET SKIPEI OR POSMF IN PROGRESS 23927 M01S05252.274l797 +++| ISTORE DBFD,(LDN 4) SET UNUSABLE BID IF ERROR 23928 M01S05253.274l797 +++| PRS4 LJM PRS18 CONTINUE PRESET 23929 M00S14451.1mt +++|
| Line S14452 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23930 M01S14452.274l797 ---| PRS4 LDC .BSKRL-.BSKR-1
| Line S05254 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23931 M01S05254.274l797 +++| PRS5 LDC .BSKRL-.BSKR-1 23932 M00S14453.1mt +++| STD T1
| Line S14454 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 23933 M01S14454.v23l617 ---| PRS5 LDM .BSKR,T1
| Line S00390 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23934 M02S00390.274l797 ---| PRS5 LDM .BSKR,T1
| Line S05255 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23935 M01S05255.274l797 +++| PRS6 LDM .BSKR,T1 REVERSE MOTION CODE 23936 M00S14455.1mt +++| STM .OSKR,T1 23937 M00S14456.1mt +++| SOD T1
| Line S14457 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23938 M01S14457.274l797 ---| PJN PRS5 IF MORE CODE TO MOVE
| Line S05256 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23939 M01S05256.274l797 +++| PJN PRS6 IF MORE CODE TO MOVE
| Line S14458 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 23940 M01S14458.v23l617 ---| LDC 140 23941 M01S14459.v23l617 ---| STM ITMA 23942 M01S14460.v23l617 ---| LDD HP
| Line S00391 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 23943 M01S00391.v23l617 +++| LDC .BKSML-1 23944 M01S00392.v23l617 +++| STD T1 23945 M01S00393.v23l617 +++| LDD HP
| Line S00394 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23946 M02S00394.274l797 ---| SHN 21-10 23947 M02S00395.274l797 ---| MJN PRS5.0 IF 639 TAPE CONTROLLER 23948 M02S00396.274l797 ---| LJM PRS5.2 PROCESS OTHER CONTROLLER TYPES
| Line S05257 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23949 M01S05257.274l797 +++| SHN 21-7 23950 M01S05258.274l797 +++| PJN PRS7 IF NOT CTS 23951 M01S05259.274l797 +++| LDC /PRESET/GPS 23952 M01S05260.274l797 +++| STM BKSA-.DBRR+.BKSM 23953 M01S05261.274l797 +++| STM BKSD-.DBRR+.BKSM 23954 M01S05262.274l797 +++| LDC MJNI+77+BKS0-BKSB (MJN BKS0) 23955 M01S05263.274l797 +++| STM BKSB-.DBRR+.BKSM 23956 M01S05264.274l797 +++| LDC UJNI+2 23957 M01S05265.274l797 +++| STM BKSC-.DBRR+.BKSM 23958 M01S05266.274l797 +++| STM BKSF-.DBRR+.BKSM 23959 M01S05267.274l797 +++| LDC MJNI+77+BKS1-BKSE (MJN BKS1) 23960 M01S05268.274l797 +++| STM BKSE-.DBRR+.BKSM 23961 M01S05269.274l797 +++| UJN PRS9 INDICATE NOT USING SKIP REVERSE
| Line S00397 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 23962 M01S00397.v23l617 +++|
| Line S00398 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23963 M02S00398.274l797 ---| PRS5.0 LDM //RELA 23964 M02S00399.274l797 ---| ZJN PRS5.01 IF UNIT NOT CONNECTED, ASSUME GCR
| Line S05270 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23965 M01S05270.274l797 +++| PRS7 SHN 21-10-21+7+22 23966 M01S05271.274l797 +++| MJN PRS8 IF 639 TAPE CONTROLLER 23967 M01S05272.274l797 +++| LDD FM
| Line S01278 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 23968 M01S01278.282l826 +++| SHN -6
| Line S05273 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23969 M01S05273.274l797 +++| SBN /MTX/TFLI 23970 M01S05274.274l797 +++| NJP PRS11 IF NOT LI FORMAT 23971 M01S05275.274l797 +++| UJN PRS9 INDICATE NOT USING READ REVERSE 23972 M01S05276.274l797 +++| 23973 M01S05277.274l797 +++| PRS8 LDM //RELA 23974 M01S05278.274l797 +++| ZJN PRS9 IF UNIT NOT CONNECTED, ASSUME GCR
| Line S00400 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 23975 M01S00400.v23l617 +++| RJM DTS GET UNIT STATUS 23976 M01S00401.v23l617 +++| LDM ATUS CHECK DENSITY 23977 M01S00402.v23l617 +++| LPN 30 23978 M01S00403.v23l617 +++| LMN 30
| Line S00404 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23979 M02S00404.274l797 ---| NJN PRS5.2 IF NOT GCR 23980 M02S00405.274l797 ---| PRS5.01 AOM /READ/ISKR SET 639 GCR SKIP REVERSE
| Line S05279 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23981 M01S05279.274l797 +++| NJN PRS11 IF NOT GCR 23982 M01S05280.274l797 +++| PRS9 AOM /READ/ISKR INDICATE NOT USING READ REVERSE
| Line S00406 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 23983 M01S00406.v23l617 +++| LDC RJMI SET UP *RJM BKS* 23984 M01S00407.v23l617 +++| STM SKR3 23985 M01S00408.v23l617 +++| STM SKRC 23986 M01S00409.v23l617 +++| LDC BKS 23987 M01S00410.v23l617 +++| STM SKR3+1 23988 M01S00411.v23l617 +++| STM SKRC+1 23989 M01S00412.v23l617 +++| LDC DBF 23990 M01S00413.v23l617 +++| STM SKRB
| Line S00414 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23991 M02S00414.274l797 ---| PRS5.1 LDM .BKSM,T1
| Line S05281 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23992 M01S05281.274l797 +++| PRS10 LDM .BKSM,T1
| Line S00415 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 23993 M01S00415.v23l617 +++| STM .DBRR,T1 23994 M01S00416.v23l617 +++| SOD T1
| Line S00417 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23995 M02S00417.274l797 ---| PJN PRS5.1 IF MORE CODE TO MOVE 23996 M02S00418.274l797 ---| UJN PRS5.3 CHECK ATS CONTROLLER
| Line S05282 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 23997 M01S05282.274l797 +++| PJN PRS10 IF MORE CODE TO MOVE 23998 M01S05283.274l797 +++| UJN PRS12 CHECK CONTROLLER TYPE
| Line S00419 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 23999 M01S00419.v23l617 +++|
| Line S00420 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24000 M02S00420.274l797 ---| PRS5.2 LDC 140 READ REVERSE
| Line S05284 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24001 M01S05284.274l797 +++| PRS11 LDC F0140 READ REVERSE
| Line S00421 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 24002 M01S00421.v23l617 +++| STM ITMA
| Line S00422 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24003 M02S00422.274l797 ---| PRS5.3 LDD HP
| Line S14461 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24004 M01S14461.274l797 ---| LPN 21
| Line S05285 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24005 M01S05285.274l797 +++| PRS12 LDD HP 24006 M01S05286.274l797 +++| LPC 221 24007 M00S14462.1mt +++| LMN 1
| Line S14463 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 24008 M01S14463.v23l617 ---| NJN PRS7 IF ATS CONTROLLER OR 7 TRACK
| Line S00423 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | ns2466 |
Seq # *Modification Id* Act ----------------------------+ 24009 M02S00423.ns2466 ---| NJN PRS7 IF ATS/MTS/ISMT CONTROLLER OR 7 TRACK
| Line S00278 Modification History | |
|---|---|
M01 (Added by) | ns2466 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24010 M02S00278.274l797 ---| NJN PRS7 IF ATS-TYPE CONTROLLER OR 7 TRACK
| Line S05287 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24011 M01S05287.274l797 +++| NJN PRS14 IF CTS/ATS-TYPE CONTROLLER OR 7 TRACK 24012 M00S14464.1mt +++| LDD FM
| Line S01279 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 24013 M01S01279.282l826 +++| SHN -6 24014 M00S14465.1mt +++| LMN /MTX/TFI
| Line S14466 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24015 M01S14466.274l797 ---| NJN PRS7 IF NOT I FORMAT
| Line S05288 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24016 M01S05288.274l797 +++| NJN PRS14 IF NOT I FORMAT 24017 M00S14467.1mt +++| LDN .DBRSL-1 SET LENGTH OF LEVEL NUMBER ROUTINE 24018 M00S14468.1mt +++| STD T1
| Line S14469 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24019 M01S14469.274l797 ---| PRS6 LDM .DBRS,T1 MOVE CODE
| Line S05289 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24020 M01S05289.274l797 +++| PRS13 LDM .DBRS,T1 MOVE CODE 24021 M00S14470.1mt +++| STM .DBRO,T1 24022 M00S14471.1mt +++| SOD T1
| Line S14472 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24023 M01S14472.274l797 ---| PJN PRS6 IF MORE CODE TO MOVE 24024 M01S14473.274l797 ---| LDC UJNI+PRS10-PRSA DISABLE INSTRUCTION MODIFICATION 24025 M01S14474.274l797 ---| ERRNG PRSA-PRS10+37B 24026 M01S14475.274l797 ---| STM PRSA
| Line S05290 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24027 M01S05290.274l797 +++| PJN PRS13 IF MORE CODE TO MOVE 24028 M01S05291.274l797 +++| LDC UJNI+PRS22-PRSB DISABLE INSTRUCTION MODIFICATION 24029 M01S05292.274l797 +++| ERRNG PRSB-PRS22+37B 24030 M01S05293.274l797 +++| STM PRSB
| Line S14476 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24031 M01S14476.274l797 ---| LDN 0 DESELCT VALIDATE DATA FOR I FORMAT
| Line S05294 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24032 M01S05294.274l797 +++| LDN 0 DESELECT VALIDATE DATA FOR I FORMAT
| Line S14477 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24033 M01S14477.274l797 ---| STM DBFA 24034 M01S14478.274l797 ---| STM DBFA+1
| Line S05295 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24035 M01S05295.274l797 +++| STM DBFB 24036 M01S05296.274l797 +++| STM DBFB+1 24037 M00S14479.1mt +++| STM .DBRSB
| Line S14480 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24038 M01S14480.274l797 ---| PRS7 LDC 4425
| Line S05297 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24039 M01S05297.274l797 +++| PRS14 LDD HP 24040 M01S05298.274l797 +++| SHN 21-7 24041 M01S05299.274l797 +++| PJN PRS15 IF NOT CTS 24042 M01S05300.274l797 +++| LDC 6125 24043 M01S05301.274l797 +++| STM /PRESET/WFEA WAIT NOT BUSY MASK 24044 M01S05302.274l797 +++| UJN PRS16 CONTINUE PRESET 24045 M01S05303.274l797 +++| 24046 M01S05304.274l797 +++| PRS15 LDC 4425 24047 M00S14481.1mt +++| STM //WEOA
| Line S14482 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24048 M01S14482.274l797 ---| LDC SKR4
| Line S05305 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24049 M01S05305.274l797 +++| PRS16 LDC SKR4 24050 M00S14483.1mt +++| STM /READ/RDFC+1 24051 M00S14484.1mt +++| LDC SKRA SET TO MODIFY CORRECT INSTRUCTION
| Line S14485 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24052 M01S14485.274l797 ---| STM PRSB
| Line S05306 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24053 M01S05306.274l797 +++| STM PRSC 24054 M00S14486.1mt +++| LDC AODI+BL+1
| Line S14487 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24055 M01S14487.274l797 ---| STM DBFC
| Line S05307 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24056 M01S05307.274l797 +++| STM DBFE 24057 M00S14488.1mt +++| LDC SODI+BL+1
| Line S14489 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24058 M01S14489.274l797 ---| STM DBFD
| Line S05308 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24059 M01S05308.274l797 +++| STM DBFG 24060 M00S14490.1mt +++| LDD FM
| Line S01280 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 24061 M01S01280.282l826 +++| SHN -6 24062 M00S14491.1mt +++| SBN /MTX/TFSI+1
| Line S14492 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24063 M01S14492.274l797 ---| PJN PRS8 IF NOT I/SI FORMAT
| Line S00424 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24064 M02S00424.274l797 ---| LDM /READ/ISKR 24065 M02S00425.274l797 ---| NJN PRS8 IF ISMT GCR SKIP REVERSE
| Line S05309 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 24066 M02S05309.282l826 ---| MJN PRS17 IF I OR SI FORMAT 24067 M02S05310.282l826 ---| SBN /MTX/TFLI-/MTX/TFSI-1 24068 M02S05311.282l826 ---| NJN PRS18 IF NOT L FORMAT 24069 M02S05312.282l826 ---| PRS17 LDM /READ/ISKR
| Line S01281 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 24070 M01S01281.282l826 +++| PJN PRS18 IF NOT I OR SI FORMAT 24071 M01S01282.282l826 +++| LDM /READ/ISKR
| Line S05313 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24072 M01S05313.274l797 +++| NJN PRS18 IF NOT USING READ REVERSE 24073 M00S14493.1mt +++| LDC LDDI+BY SET TO SET LEVEL NUMBER 24074 M00S14494.1mt +++| STM DBRA
| Line S14495 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24075 M01S14495.274l797 ---| PRS8 LDM LNUM SET LEVEL NUMBER
| Line S05314 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24076 M01S05314.274l797 +++| PRS18 LDM LNUM SET LEVEL NUMBER 24077 M00S14496.1mt +++| SHN -10
| Line S14497 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24078 M01S14497.274l797 ---| RAM DBFF
| Line S05315 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 24079 M01S05315.274l797 +++| RAM DBFI 24080 M00S14498.1mt +++| LDM CIOE 24081 M00S14499.1mt +++| LPC 774
Proceed to Part 18
cdc/nos2.source/opl.opl871/deck/1mt.017.txt · Last modified: by 127.0.0.1