cdc:nos2.source:opl.opl871:deck:1mt.022
Deck 1MT Part 022
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 ----------------------------+
| Line S17357 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
M02 (Removed by) | 251l664 |
M03 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 28907 M03S17357.274l797 ---| PJN PRS47 IF NOT FSC ADAPTER
| Line S00239 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 251l664 |
M03 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 28908 M03S00239.274l797 ---| PJN PRS46.1 IF NOT FSC ADAPTER
| Line S17358 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 28909 M02S17358.274l797 ---| LDC LDCI+0 LDC COMMAND 28910 M02S17359.274l797 ---| STM PWRF MODIFY FOR FSC TAPE SUBSYSTEM
| Line S00240 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 251l664 |
M03 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 28911 M03S00240.274l797 ---| UJN PRS47 FSC ADAPTER 28912 M03S00241.274l797 ---| 28913 M03S00242.274l797 ---| PRS46.1 SHN 21-5-21+6+22
| Line S00119 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 28914 M02S00119.274l797 ---| SHN 21-5
| Line S00243 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 28915 M02S00243.274l797 ---| PJN PRS47 IF NOT MTS UNIT
| Line S06327 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 28916 M01S06327.274l797 +++| PRS56 LDD HP 28917 M01S06328.274l797 +++| SHN 21-7 28918 M01S06329.274l797 +++| PJN PRS59 IF NOT CTS 28919 M01S06330.274l797 +++| LDD MD 28920 M01S06331.274l797 +++| SHN 21-6 28921 M01S06332.274l797 +++| PJN PRS58 IF NOT CODED 28922 M01S06333.274l797 +++| LDD BY 28923 M01S06334.274l797 +++| LMN LABL 28924 M01S06335.274l797 +++| ZJN PRS57 IF CORRECT LENGTH FOR LABEL
| Line S06336 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | ns2757 |
Seq # *Modification Id* Act ----------------------------+ 28925 M02S06336.ns2757 ---| LDN /MTX/SCI ILLEGAL CODED FORMAT
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2757 |
Seq # *Modification Id* Act ----------------------------+ 28926 M01S00003.ns2757 +++| LDN /MTX/SCI CODED I/O NOT SUPPORTED
| Line S06337 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 28927 M01S06337.274l797 +++| LJM RET3 RETURN ERROR CODE 28928 M01S06338.274l797 +++| 28929 M01S06339.274l797 +++| PRS57 LDC F0250 28930 M01S06340.274l797 +++| STM ITMA SHORT WRITE 28931 M01S06341.274l797 +++| STM XBFE 28932 M01S06342.274l797 +++| LDC LDNI+CCW/10000 28933 M01S06343.274l797 +++| STM WCTA DO CODE CONVERSION 28934 M01S06344.274l797 +++| LDC LDNI+CLBL 28935 M01S06345.274l797 +++| STM WCTB LENGTH TO WRITE 28936 M01S06346.274l797 +++| PRS58 UJN PRS61 SET BLOCKS WRITTEN FLAG 28937 M01S06347.274l797 +++| 28938 M01S06348.274l797 +++| PRS59 SHN 21-5-21+7 28939 M01S06349.274l797 +++| PJN PRS60 IF NOT MTS UNIT
| Line S00244 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 28940 M01S00244.ns21000 +++| LDC UJNI-NJNI
| Line S00245 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 28941 M02S00245.251l664 ---| RAM WRTM
| Line S17360 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 28942 M01S17360.251l664 ---| PRS47 RJM SMA DETERMINE IF MOTION AHEAD ALLOWED 28943 M01S17361.251l664 ---| LDC 4000 SET BLOCKS WRITTEN FLAG
| Line S00120 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 28944 M01S00120.251l664 +++| RAM WRTF
| Line S00121 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 28945 M02S00121.274l797 ---| PRS47 LDM DLYA
| Line S06350 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 28946 M01S06350.274l797 +++| PRS60 LDM DLYA
| Line S00122 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 28947 M01S00122.251l664 +++| LPN 14
| Line S00123 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 28948 M02S00123.274l797 ---| ZJN PRS48 IF 1X PPU SPEED
| Line S06351 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 28949 M01S06351.274l797 +++| ZJN PRS61 IF 1X PPU SPEED
| Line S00124 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 28950 M01S00124.251l664 +++| LPN 4
| Line S00125 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 28951 M02S00125.274l797 ---| ZJN PRS48 IF 2X PPU SPEED
| Line S06352 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 28952 M01S06352.274l797 +++| ZJN PRS61 IF 2X PPU SPEED
| Line S00126 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 28953 M01S00126.251l664 +++| LDC ITM ENABLE MOTION AHEAD 28954 M01S00127.251l664 +++| STM WTFA+1 28955 M01S00128.251l664 +++| LDC RCB 28956 M01S00129.251l664 +++| STM WTFB
| Line S00130 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 28957 M02S00130.274l797 ---| PRS48 LDC 4000 SET BLOCKS WRITTEN FLAG
| Line S06353 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 28958 M01S06353.274l797 +++| PRS61 LDC 4000 SET BLOCKS WRITTEN FLAG 28959 M00S17362.1mt +++| STD BT 28960 M00S17363.1mt +++| LJM WTF INITIATE WRITE 28961 M00S17364.1mt +++|
| Line S17365 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 28962 M01S17365.274l797 ---| PRSA CHTB 28963 M01S17366.274l797 ---| PRSB TSAD 28964 M00S17367.1mt +++|
| Line S06354 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 28965 M01S06354.274l797 +++| PRSB CHTB 28966 M01S06355.274l797 +++| PRSC TSAD 28967 M01S06356.274l797 +++| WCT SPACE 4,15 28968 M01S06357.274l797 +++|** WCT - WRITE CARTRIDGE TAPE.
| Line S06358 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 1mt38 |
Seq # *Modification Id* Act ----------------------------+ 28969 M02S06358.1mt38 ---|* THIS ROUTINE OVERLAYS *WRT* FOR CTS.
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | 1mt38 |
Seq # *Modification Id* Act ----------------------------+ 28970 M01S00008.1mt38 +++|* 28971 M01S00009.1mt38 +++|* THIS ROUTINE OVERLAYS THE FIRST PART OF *WRT* FOR CTS. 28972 M01S00010.1mt38 +++|* THE LENGTH OF THIS ROUTINE MUST BE THE SAME AS THE LENGTH 28973 M01S00011.1mt38 +++|* OF THE FIRST PART OF *WRT*.
| Line S06359 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 28974 M01S06359.274l797 +++|* 28975 M01S06360.274l797 +++|* ENTRY (BY) = BYTES TO TRANSFER. 28976 M01S06361.274l797 +++|* 28977 M01S06362.274l797 +++|* EXIT (CN+3, CN+4) = OUT POINTER. 28978 M01S06363.274l797 +++|* TO */WLB/ODAB* IF COMMAND RETRY FOR LONG BLOCKS. 28979 M01S06364.274l797 +++|* 28980 M01S06365.274l797 +++|* USES CM - CM+4, CN - CN+2. 28981 M01S06366.274l797 +++|* 28982 M01S06367.274l797 +++|* CALLS CNW, *CWP*, IBF, ITM, LOV, RCB, /PRESET/WFE. 28983 M01S06368.274l797 +++|* 28984 M01S06369.274l797 +++|* MACROS CALL. 28985 M01S06370.274l797 +++| 28986 M01S06371.274l797 +++| 28987 M01S06372.274l797 +++| .WCT BSS 0 28988 M01S06373.274l797 +++| LOC WRTX 28989 M01S06374.274l797 +++| WCT SUBR ENTRY/EXIT 28990 M01S06375.274l797 +++| WCT1 UJN WCT2 WRITE DATA, NOT LONG BLOCKS 28991 M01S06376.274l797 +++| WCTA EQU *-1 28992 M01S06377.274l797 +++|* LDN CCW/10000 (CODE CONVERSION OVERLAY NUMBER) 28993 M01S06378.274l797 +++|* UJN WCT3 (LONG BLOCKS) 28994 M01S06379.274l797 +++| RJM LOV LOAD OVERLAY AND DO CODE CONVERSION 28995 M01S06380.274l797 +++| WCT2 RJM ITM 28996 M01S06381.274l797 +++| LDD BY 28997 M01S06382.274l797 +++| WCTB EQU *-1 28998 M01S06383.274l797 +++|* LDN CLBL (CTS LABEL LENGTH) 28999 M01S06384.274l797 +++| OAM BUF,CH OUTPUT BLOCK 29000 M01S06385.274l797 +++| FJM *,CH 29001 M01S06386.274l797 +++| 29002 M01S06387.274l797 +++|* DELAY 10 MICROSECONDS TO PREVENT A HARDWARE ERROR IN THE 29003 M01S06388.274l797 +++|* CCC. THE DISCONNECT WOULD SOMETIMES CAUSE THE LAST BYTE TO 29004 M01S06389.274l797 +++|* BE LOST. 29005 M01S06390.274l797 +++| 29006 M01S06391.274l797 +++| LDN 20 29007 M01S06392.274l797 +++| SBN 1 29008 M01S06393.274l797 +++| NJN *-1 29009 M01S06394.274l797 +++| DCN CH+40
| Line S06395 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 29010 M02S06395.282l826 ---| WCT3 LDD HP
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | 1mt38 |
M02 (Removed by) | 1mt41 |
M03 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 29011 M03S00012.282l826 ---| STD T8 SAVE HARDWARE OPTIONS
| Line S06396 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 29012 M02S06396.282l826 ---| LPC 5777 CLEAR EOR/EOF LAST BLOCK FLAG 29013 M02S06397.282l826 ---| STD HP
| Line S01409 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 29014 M01S01409.282l826 +++| WCT3 LDD UP 29015 M01S01410.282l826 +++| SCN 10 CLEAR EOR/EOF LAST BLOCK FLAG 29016 M01S01411.282l826 +++| STD UP
| Line S06398 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29017 M01S06398.274l797 +++| LDD MD
| Line S00013 Modification History | |
|---|---|
M01 (Added by) | 1mt38 |
M02 (Removed by) | 1mt41 |
Seq # *Modification Id* Act ----------------------------+ 29018 M02S00013.1mt41 ---| STD T9 SAVE MODE FUNCTION
| Line S06399 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29019 M01S06399.274l797 +++| LPC 7377 CLEAR EOR/EOF THIS OPERATION FLAG 29020 M01S06400.274l797 +++| STD MD 29021 M01S06401.274l797 +++| LDC * BLOCK LENGTH (I, SI FORMAT) 29022 M01S06402.274l797 +++| WCTC EQU *-2 29023 M01S06403.274l797 +++|* PSN (NOT I, SI FORMAT) 29024 M01S06404.274l797 +++|* LDD BY (NOT I, SI FORMAT) 29025 M01S06405.274l797 +++| LMC 5000 29026 M01S06406.274l797 +++| WCTD EQU *-2 29027 M01S06407.274l797 +++|* LMC 5004 (I FORMAT) 29028 M01S06408.274l797 +++|* LDN 0 (WRITE LABEL) 29029 M01S06409.274l797 +++|* LDN 0 (WRITE LABEL) 29030 M01S06410.274l797 +++| ZJN WCT4 IF NOT EOR/EOF WRITTEN
| Line S06411 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 29031 M02S06411.282l826 ---| LDC 2000 29032 M02S06412.282l826 ---| RAD HP SET EOR/EOF FLAGS
| Line S01412 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 29033 M01S01412.282l826 +++| LDN 10 29034 M01S01413.282l826 +++| RAD UP SET EOR/EOF FLAGS
| Line S06413 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29035 M01S06413.274l797 +++| LDC 400 29036 M01S06414.274l797 +++| RAD MD 29037 M01S06415.274l797 +++| WCT4 LDD MA 29038 M01S06416.274l797 +++| CWD CN SAVE OLD OUT POINTER 29039 M01S06417.274l797 +++| RJM CNW CHECK NEXT WRITE 29040 M01S06418.274l797 +++| WCTE EQU *-2 29041 M01S06419.274l797 +++|* UJN WCT5 (WRITE LABEL) 29042 M01S06420.274l797 +++| LDM WTFE 29043 M01S06421.274l797 +++| ADD DF 29044 M01S06422.274l797 +++| NJN WCT5 IF NO MORE DATA OR DROP OUT SET 29045 M01S06423.274l797 +++| WCTF EQU *-1 29046 M01S06424.274l797 +++|* UJN WCT5 (LONG BLOCKS) 29047 M01S06425.274l797 +++| RJM RCB READ NEXT BLOCK FROM CENTRAL BUFFER 29048 M01S06426.274l797 +++| WCT5 RJM /PRESET/WFE WAIT FOR END OF OPERATION
| Line S06427 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 1mt38 |
Seq # *Modification Id* Act ----------------------------+ 29049 M02S06427.1mt38 ---| PJN WCT8 IF NOT COMMAND RETRY
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | 1mt38 |
Seq # *Modification Id* Act ----------------------------+ 29050 M01S00014.1mt38 +++| PJP WCT8 IF NOT COMMAND RETRY
| Line S06428 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29051 M01S06428.274l797 +++| LDM OPTU RESET OUT POINTER 29052 M01S06429.274l797 +++| WCTG EQU *-2 29053 M01S06430.274l797 +++|* UJN WCT7 (WRITE LABELS) 29054 M01S06431.274l797 +++| STD CN+3 29055 M01S06432.274l797 +++| LDM OPTL 29056 M01S06433.274l797 +++| STD CN+4
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | 1mt38 |
M02 (Removed by) | 1mt41 |
Seq # *Modification Id* Act ----------------------------+ 29057 M02S00015.1mt41 ---| LDD T8 RESTORE HARDWARE OPTIONS 29058 M02S00016.1mt41 ---| STD HP 29059 M02S00017.1mt41 ---| LDD T9 RESTORE MODE FUNCTION
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | 1mt41 |
Seq # *Modification Id* Act ----------------------------+ 29060 M01S00022.1mt41 +++| LDD MD 29061 M01S00023.1mt41 +++| LPC 7377 CLEAR EOR/EOF THIS OPERATION FLAG
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | 1mt38 |
Seq # *Modification Id* Act ----------------------------+ 29062 M01S00018.1mt38 +++| STD MD
| Line S06434 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29063 M01S06434.274l797 +++| RJM CNW CHECK NEXT WRITE 29064 M01S06435.274l797 +++| LDM WCT 29065 M01S06436.274l797 +++| LMC EOFC 29066 M01S06437.274l797 +++| NJN WCT6 IF NOT CALLED FROM *EOF* 29067 M01S06438.274l797 +++| STD T6 29068 M01S06439.274l797 +++| STD BY SET TO WRITE EOF 29069 M01S06440.274l797 +++| RJM IBF 29070 M01S06441.274l797 +++| UJN WCT7 ISSUE THE CONTINUE FUNCTION 29071 M01S06442.274l797 +++| 29072 M01S06443.274l797 +++|* FOR LONG BLOCKS, THE FOLLOWING CODE IS OVERLAYED WITH 29073 M01S06444.274l797 +++|* */WLB/.WCT*. 29074 M01S06445.274l797 +++| 29075 M01S06446.274l797 +++|* LDN F0002 (LONG BLOCKS) 29076 M01S06447.274l797 +++|* STM ITMA (LONG BLOCKS) 29077 M01S06448.274l797 +++|* LJM /WLB/ODAB (LONG BLOCKS) 29078 M01S06449.274l797 +++| 29079 M01S06450.274l797 +++| WCT6 RJM RCB READ CENTRAL BUFFER 29080 M01S06451.274l797 +++| RJM IBF PROCESS I/SI FORMAT 29081 M01S06452.274l797 +++| WCTH EQU *-2 29082 M01S06453.274l797 +++|* UJN *+2 (NOT I/SI FORMAT) 29083 M01S06454.274l797 +++| WCT7 LDN F0002 29084 M01S06455.274l797 +++| STM ITMA CONTINUE IS THE NEXT FUNCTION 29085 M01S06456.274l797 +++| LJM WCT1 RETRY THE WRITE 29086 M01S06457.274l797 +++| WCTI EQU *-1 29087 M01S06458.274l797 +++|* LJM WCT2 (WRITE LABEL) 29088 M01S06459.274l797 +++| 29089 M01S06460.274l797 +++| WCT8 ZJN WCT9 IF NO ERROR 29090 M01S06461.274l797 +++| LDN /MTX/STE STATUS ERROR 29091 M01S06462.274l797 +++| WCT9 STD EC 29092 M01S06463.274l797 +++| ADD EI 29093 M01S06464.274l797 +++| ZJN WCT10 IF NO ERROR OR NO RECOVERED ERROR 29094 M01S06465.274l797 +++| LDD MA 29095 M01S06466.274l797 +++| CRD CN RESET TO OLD OUT POINTER 29096 M01S06467.274l797 +++| CALL CWP 29097 M01S06468.274l797 +++| 29098 M01S06469.274l797 +++|* RETURN HERE IF END OF TAPE OR RECOVERED ERROR. 29099 M01S06470.274l797 +++| 29100 M01S06471.274l797 +++| LDM WTFE 29101 M01S06472.274l797 +++| ADD DF 29102 M01S06473.274l797 +++| NJN WCT10 IF NO MORE DATA OR DROP OUT 29103 M01S06474.274l797 +++| WCTJ EQU *-1 29104 M01S06475.274l797 +++|* UJN WCT10 (LONG BLOCKS) 29105 M01S06476.274l797 +++|* UJN WRT7 (WRITE LABEL) 29106 M01S06477.274l797 +++| LDM WRTK 29107 M01S06478.274l797 +++| LMC WRTX 29108 M01S06479.274l797 +++| NJN WCT10 IF END OF TAPE 29109 M01S06480.274l797 +++| RJM RCB READ CENTRAL BUFFER 29110 M01S06481.274l797 +++| WCT10 LDD MA
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | 1mt38 |
Seq # *Modification Id* Act ----------------------------+ 29111 M01S00019.1mt38 +++| WCTM EQU *-1 29112 M01S00020.1mt38 +++|* UJN WRT7 (WRITE LABEL)
| Line S06482 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29113 M01S06482.274l797 +++| CRD CM 29114 M01S06483.274l797 +++| LDD CM+3 29115 M01S06484.274l797 +++| STM OPTU SAVE OUT POINTER FOR COMMAND RETRY 29116 M01S06485.274l797 +++| LDD CM+4 29117 M01S06486.274l797 +++| STM OPTL
| Line S06487 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 1mt38 |
Seq # *Modification Id* Act ----------------------------+ 29118 M02S06487.1mt38 ---| IFNE *,WRT5.1,1 29119 M02S06488.1mt38 ---| UJN WRT5.1 WRITE OUT POINTER TO FET 29120 M02S06489.1mt38 ---| BSSZ WRT5.1-* GENERATE ERROR IF OVERFLOW
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | 1mt38 |
Seq # *Modification Id* Act ----------------------------+ 29121 M01S00021.1mt38 +++|
| Line S00024 Modification History | |
|---|---|
M01 (Added by) | 1mt41 |
Seq # *Modification Id* Act ----------------------------+ 29122 M01S00024.1mt41 +++| WCTL EQU *-WCTX LENGTH OF *WCT*
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | 1mt38 |
Seq # *Modification Id* Act ----------------------------+ 29123 M01S00022.1mt38 +++| ERRNZ WRT5.1-* ADJUST *BSS* BEFORE *WRT5.1* 29124 M01S00023.1mt38 +++|
| Line S06490 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29125 M01S06490.274l797 +++| LOC *O
| Line S06491 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 1mt41 |
Seq # *Modification Id* Act ----------------------------+ 29126 M02S06491.1mt41 ---| WCTL EQU WRT5.1-WCTX LENGTH OF *WCT*
| Line S06492 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29127 M01S06492.274l797 +++| 29128 M01S06493.274l797 +++| WCTK CHTB CHANNEL TABLE 29129 M00S17368.1mt +++| SMA SPACE 4,10
| Line S17369 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 29130 M01S17369.251l664 ---|** SMA - SET MOTION AHEAD LENGTH FACTOR. 29131 M01S17370.251l664 ---|* 29132 M01S17371.251l664 ---|* EXIT (TB) = READ AHEAD LENGTH FACTOR, IF ANY. 29133 M01S17372.251l664 ---|* (PWRB) MODIFIED IF FULL MOTION AHEAD NOT ALLOWED. 29134 M01S17373.251l664 ---|* 29135 M01S17374.251l664 ---|* CALLS DTS. 29136 M01S17375.251l664 ---|* 29137 M01S17376.251l664 ---|* USES T1. 29138 M01S17377.251l664 ---| 29139 M01S17378.251l664 ---| 29140 M01S17379.251l664 ---| SMA7 LDD HP 29141 M01S17380.251l664 ---| LPN 3 29142 M01S17381.251l664 ---| ZJN SMA8 IF 7 TRACK 29143 M01S17382.251l664 ---| LPN 2 29144 M01S17383.251l664 ---| ZJN SMA9 IF NOT GCR UNIT 29145 M01S17384.251l664 ---| LDN SMAE-SMAD SET 6250/1600 CPI UNIT 29146 M01S17385.251l664 ---| SMA8 ADC SMAD SET 7 TRACK TABLE 29147 M01S17386.251l664 ---| STM SMAA 29148 M01S17387.251l664 ---| SMA9 LDD HP SET LENGTH FACTOR ACCORDING TO UNIT SPEED 29149 M01S17388.251l664 ---| SHN -1 29150 M01S17389.251l664 ---| LPN 6 29151 M01S17390.251l664 ---| RAD T1 29152 M01S17391.251l664 ---| LDM SMAB,T1 29153 M01S17392.251l664 ---|* LDM SMAC,T1 (ATS 6250 CPI) 29154 M01S17393.251l664 ---|* LDM SMAD,T1 (MTS/ATS 7 TRACK) 29155 M01S17394.251l664 ---|* LDM SMAE,T1 (GCR UNIT, 1600 CPI DENSITY) 29156 M01S17395.251l664 ---| SMAA EQU *-1 29157 M01S17396.251l664 ---| ZJN SMAX IF FULL MOTION AHEAD ALLOWED 29158 M01S17397.251l664 ---| STD TB SET LENGTH FACTOR 29159 M01S17398.251l664 ---| SMA10 LDC LDDI+T6 DISABLE FULL MOTION AHEAD 29160 M01S17399.251l664 ---| STM PWRB 29161 M01S17400.251l664 ---| 29162 M01S17401.251l664 ---| SMA SUBR ENTRY/EXIT
| Line S00523 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 29163 M02S00523.251l664 ---| LDD HP 29164 M02S00524.251l664 ---| SHN 21-10 29165 M02S00525.251l664 ---| MJN SMAX IF ISMT UNIT
| Line S17402 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 29166 M01S17402.251l664 ---| LDM DLYA SET PPU SPEED 29167 M01S17403.251l664 ---| LPN 14 29168 M01S17404.251l664 ---| ZJN SMA2 IF 1 TIMES PPU SPEED 29169 M01S17405.251l664 ---| LPN 4 MASK FOR 4 TIMES PPU SPEED 29170 M01S17406.251l664 ---| ZJN SMA1 IF NOT 4 TIMES PPU SPEED 29171 M01S17407.251l664 ---| LDD HP 29172 M01S17408.251l664 ---| SHN 21-6 29173 M01S17409.251l664 ---| PJN SMAX IF NOT *FSC* TAPE EQUIPMENT 29174 M01S17410.251l664 ---| LDC SBNI+2 29175 M01S17411.251l664 ---| STM PWRC 29176 M01S17412.251l664 ---| LDC STDI+TB 29177 M01S17413.251l664 ---| STM PWRD 29178 M01S17414.251l664 ---| LDC LDNI+2 29179 M01S17415.251l664 ---| STM PWRE 29180 M01S17416.251l664 ---| UJN SMA10 EXIT FOR PRE-READ *FSC* ON 4 X PPU SPEED 29181 M01S17417.251l664 ---| 29182 M01S17418.251l664 ---| SMA1 LDN 1 29183 M01S17419.251l664 ---| SMA2 STD T1 SET INDEX FOR READ AHEAD TABLE VALUE 29184 M01S17420.251l664 ---| LDD HP 29185 M01S17421.251l664 ---| SHN 21-5 29186 M01S17422.251l664 ---| PJN SMA3 IF NOT MTS DRIVE 29187 M01S17423.251l664 ---| LJM SMA7 PROCESS MTS PRE-READ 29188 M01S17424.251l664 ---| 29189 M01S17425.251l664 ---| SMA3 LDD DS 29190 M01S17426.251l664 ---| LPN 4 29191 M01S17427.251l664 ---| ZJN SMA4 IF NOT LOAD POINT 29192 M01S17428.251l664 ---| LDD DC CHECK USER SUPPLIED DENSITY 29193 M01S17429.251l664 ---| SHN -6 29194 M01S17430.251l664 ---| LMN /MTX/D62 29195 M01S17431.251l664 ---| UJN SMA5 CHECK FOR 6250 CPI 29196 M01S17432.251l664 ---| 29197 M01S17433.251l664 ---| SMA4 RJM DTS INSURE CORRECT DENSITY IN STATUS 29198 M01S17434.251l664 ---| LDM ATUS CHECK ACTUAL TAPE DENSITY 29199 M01S17435.251l664 ---| LPN 30 29200 M01S17436.251l664 ---| LMN 30 29201 M01S17437.251l664 ---| SMA5 ZJN SMA6 IF 6250 CPI 29202 M01S17438.251l664 ---| LJM SMA7 NOT 6250 CPI 29203 M01S17439.251l664 ---| 29204 M01S17440.251l664 ---| SMA6 LDC SMAC SET 6250 CPI 29205 M01S17441.251l664 ---| STM SMAA 29206 M01S17442.251l664 ---| LJM SMA9 SET BLOCK LENGTH FOR READ AHEAD 29207 M01S17443.251l664 ---| 29208 M01S17444.251l664 ---| 29209 M01S17445.251l664 ---|* IN THE FOLLOWING TABLES, THE FIRST NUMBER IS USED 29210 M01S17446.251l664 ---|* FOR 1X PPU SPEED AND THE SECOND NUMBER IS FOR 2X PPU 29211 M01S17447.251l664 ---|* SPEED. A ZERO TABLE ENTRY INDICATES THAT FULL MOTION 29212 M01S17448.251l664 ---|* AHEAD IS ALLOWED. THERE IS A SEPARATE TABLE FOR 1600 29213 M01S17449.251l664 ---|* CPI DENSITY ON GCR DRIVES BECAUSE OF A FASTER ACCESS 29214 M01S17450.251l664 ---|* TIME ON THE DRIVE. 29215 M01S17451.251l664 ---|* SEE ROUTINE *PWR* FOR DETAILS ON HOW READ AHEAD IS 29216 M01S17452.251l664 ---|* PERFORMED. 29217 M01S17453.251l664 ---| 29218 M01S17454.251l664 ---| 29219 M01S17455.251l664 ---| SMAB BSS 0 MTS/ATS NON GCR 9 TRACK 29220 M01S17456.251l664 ---| LOC 0 29221 M01S17457.251l664 ---| CON 0,0 100 IPS 29222 M01S17458.251l664 ---| CON 560,0 150 IPS 29223 M01S17459.251l664 ---| CON 420,0 200 IPS 29224 M01S17460.251l664 ---| LOC *O 29225 M01S17461.251l664 ---| 29226 M01S17462.251l664 ---| SMAC BSS 0 ATS 6250 CPI 29227 M01S17463.251l664 ---| LOC 0 29228 M01S17464.251l664 ---| CON 400,0 100 IPS 29229 M01S17465.251l664 ---| CON 260,400 150 IPS 29230 M01S17466.251l664 ---| CON 200,400 200 IPS 29231 M01S17467.251l664 ---| LOC *O 29232 M01S17468.251l664 ---| 29233 M01S17469.251l664 ---| SMAD BSS 0 MTS/ATS 7 TRACK 29234 M01S17470.251l664 ---| LOC 0 29235 M01S17471.251l664 ---| CON 0,0 100 IPS 29236 M01S17472.251l664 ---| CON 0,0 150 IPS 29237 M01S17473.251l664 ---| CON 630,0 200 IPS 29238 M01S17474.251l664 ---| LOC *O 29239 M01S17475.251l664 ---| 29240 M01S17476.251l664 ---| SMAE BSS 0 GCR DRIVE, 1600 CPI DENSITY 29241 M01S17477.251l664 ---| LOC 0 29242 M01S17478.251l664 ---| CON 0,0 100 IPS 29243 M01S17479.251l664 ---| CON 400,0 150 IPS 29244 M01S17480.251l664 ---| CON 250,600 200 IPS 29245 M01S17481.251l664 ---| LOC *O 29246 M00S17482.1mt +++| OVERLAY (WRITE LONG BLOCK PROCESSOR.),(BUFC+12),,WLB 29247 M00S17483.1mt +++| .IM SET 1 SET FOR ADDRESS MODIFICATION ON ERRORS 29248 M00S17484.1mt +++| 29249 M00S17485.1mt +++|* LOCAL TO OVERLAY DEFINITIONS. 29250 M00S17486.1mt +++| 29251 M00S17487.1mt +++| NC EQU PA NUMBER OF CHUNKS 29252 M00S17488.1mt +++| BC EQU PB BYTE COUNT LAST CHUNK 29253 M00S17489.1mt +++| ODA SPACE 4,10 29254 M00S17490.1mt +++|** ODA - OUTPUT DATA. 29255 M00S17491.1mt +++|*
| Line S17492 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 29256 M01S17492.251l664 ---|* CALLS ADP, CRA, ITM, OPA, OPD, OPI, OPL, RDA, SRQ, 29257 M01S17493.251l664 ---|* /WRITE/WRT.
| Line S00131 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 29258 M01S00131.251l664 +++|* CALLS ADP, CRA, ITM, OPA, OPD, OPI, OPL, RDA, SRQ. 29259 M00S17494.1mt +++|* 29260 M00S17495.1mt +++|* MACROS CHTE. 29261 M00S17496.1mt +++| 29262 M00S17497.1mt +++| 29263 M00S17498.1mt +++| ODA SUBR ENTRY/EXIT 29264 M00S17499.1mt +++| RJM //ITM INITIATE TAPE MOTION 29265 M00S17500.1mt +++|* UJN *+2 (ANY GCR UNIT AT 1X PPU SPEED 29266 M00S17501.1mt +++|* OR 200 IPS GCR UNIT AT 2X SPEED)
| Line S06494 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29267 M01S06494.274l797 +++|* UJN *+2 (CTS) 29268 M00S17502.1mt +++| ODAA EQU *-1 29269 M00S17503.1mt +++| ODAB LDN 0 ALLOW FOR CONTROL WORD 29270 M00S17504.1mt +++|* LDN 1 (204/264 WRITE) 29271 M00S17505.1mt +++| RJM ADP 29272 M00S17506.1mt +++| LDN 0 PRESET CHUNKS OUTPUT COUNT 29273 M00S17507.1mt +++| STD CM+7 29274 M00S17508.1mt +++| LDC LBBY 29275 M00S17509.1mt +++| STD BY 29276 M00S17510.1mt +++| LDM OPAB SET FIRST CHUNK FLAGS
| Line S17511 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 29277 M01S17511.ns21000 ---|* LDM OPIB (CYBER 170-8X5 IOU)
| Line S00246 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29278 M02S00246.1mt51 ---|* LDM OPIB (CYBER 170-815/825/835/855 IOU)
| Line S00165 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29279 M01S00165.1mt51 +++|* LDM OPIB (CYBER 180) 29280 M00S17512.1mt +++| ODAC EQU *-1 29281 M00S17513.1mt +++| STM OPAA
| Line S17514 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 29282 M01S17514.ns21000 ---|* STM OPIA (CYBER 170-8X5 IOU)
| Line S00247 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29283 M02S00247.1mt51 ---|* STM OPIA (CYBER 170-815/825/835/855 IOU)
| Line S00166 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29284 M01S00166.1mt51 +++|* STM OPIA (CYBER 180) 29285 M00S17515.1mt +++|* STM OPDA (MTS) 29286 M00S17516.1mt +++| ODAD EQU *-1
| Line S17517 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29287 M01S17517.1mt51 ---| CHTE * 29288 M01S17518.1mt51 ---| LDN CH 29289 M01S17519.1mt51 ---| ADC AJMI
| Line S17520 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29290 M02S17520.1mt51 ---|* ADC IJMI (CYBER 170-8X5 IOU)
| Line S00248 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29291 M02S00248.1mt51 ---|* ADC IJMI (CYBER 170-815/825/835/855 IOU)
| Line S17521 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29292 M01S17521.1mt51 ---| ODAE EQU *-1
| Line S00167 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29293 M01S00167.1mt51 +++| LDN PSNI ENABLE WAIT FOR *1LT* 29294 M00S17522.1mt +++| STM OPLA
| Line S17523 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 29295 M01S17523.ns21000 ---|* STM OPEA (CYBER 170-8X5 IOU)
| Line S00249 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29296 M02S00249.1mt51 ---|* STM OPEA (CYBER 170-815/825/835/855 IOU)
| Line S00168 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29297 M01S00168.1mt51 +++|* STM OPEA (CYBER 180) 29298 M01S00169.1mt51 +++|* STM ODAF (MTS) 29299 M00S17524.1mt +++| ODAF EQU *-1 29300 M00S17525.1mt +++| LDD NC 29301 M00S17526.1mt +++| ZJN ODA5 IF *1LT* NOT NEEDED 29302 M00S17527.1mt +++| SBN 2 29303 M00S17528.1mt +++| PJN ODA1 IF *1LT* NEEDED 29304 M00S17529.1mt +++| LDD BC 29305 M00S17530.1mt +++| ZJN ODA4 IF *1LT* NOT NEEDED 29306 M00S17531.1mt +++| ADC LBBY-LCKS SET BYTE COUNT FOR CHECKSUM 29307 M00S17532.1mt +++| MJN ODA2 IF .LT. L TAPE SIZE 29308 M00S17533.1mt +++| ODA1 LDN 0 29309 M00S17534.1mt +++| ODA2 ADC LCKS 29310 M00S17535.1mt +++| STM RDAB
| Line S17536 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29311 M01S17536.274l797 ---| AOM ODAL SET *1LT* CALLED FLAG
| Line S06495 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29312 M01S06495.274l797 +++| LDC LDNI+1 29313 M01S06496.274l797 +++| STM ODAL SET *1LT* CALLED FLAG 29314 M00S17537.1mt +++| LDN 0 SET UP POINTERS FOR *1LT* 29315 M00S17538.1mt +++| RJM ADP 29316 M00S17539.1mt +++| ODAG LDN 1 SEND REQUEST TO *1LT* 29317 M00S17540.1mt +++|* UJN ODA3 (ANY GCR UNIT AT 1X PPU SPEED 29318 M00S17541.1mt +++|* OR 200 IPS GCR UNIT AT 2X SPEED)
| Line S06497 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29319 M01S06497.274l797 +++|* UJN ODA3 (CTS) 29320 M00S17542.1mt +++| RJM SRQ 29321 M00S17543.1mt +++| ODA3 UJN ODA8 OUTPUT DATA 29322 M00S17544.1mt +++| 29323 M00S17545.1mt +++| ODA4 LDC LBBY 29324 M00S17546.1mt +++| STD BC 29325 M00S17547.1mt +++| LDC /MTX/LBWD 29326 M00S17548.1mt +++| STM .WC 29327 M00S17549.1mt +++| ODA5 LDM OPLB SET *1LT* NOT NEEDED FLAGS
| Line S17550 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 29328 M01S17550.ns21000 ---|* LDM OPEB (CYBER 170-8X5 IOU)
| Line S00250 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29329 M02S00250.1mt51 ---|* LDM OPEB (CYBER 170-815/825/835/855 IOU)
| Line S00170 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29330 M01S00170.1mt51 +++|* LDM OPEB (CYBER 180) 29331 M00S17551.1mt +++| ODAH EQU *-1 29332 M00S17552.1mt +++| STM OPLA
| Line S17553 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 29333 M01S17553.ns21000 ---|* STM OPEA (CYBER 170-8X5 IOU)
| Line S00251 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29334 M02S00251.1mt51 ---|* STM OPEA (CYBER 170-815/825/835/855 IOU)
| Line S00171 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29335 M01S00171.1mt51 +++|* STM OPEA (CYBER 180) 29336 M00S17554.1mt +++| ODAI EQU *-1 29337 M00S17555.1mt +++| LDD BC 29338 M00S17556.1mt +++| STM RDAB SET BYTE COUNT FOR CHECKSUM 29339 M00S17557.1mt +++| STD BY 29340 M00S17558.1mt +++| LJM ODA11 SET UP TO READ NEXT BLOCK 29341 M00S17559.1mt +++| 29342 M00S17560.1mt +++| ODA6 LDN 2 INCREMENT CHUNK COUNT 29343 M00S17561.1mt +++| RAD CM+7 29344 M00S17562.1mt +++| SBD NC 29345 M00S17563.1mt +++| PJN ODA9 IF NO MORE FULL CHUNKS 29346 M00S17564.1mt +++| ADN 1 29347 M00S17565.1mt +++| NJN ODA7 IF NOT 1 CHUNK LEFT 29348 M00S17566.1mt +++| LDD BC 29349 M00S17567.1mt +++| ZJN ODA9 IF ZERO REMAINDER 29350 M00S17568.1mt +++| ODA7 LDC /MTX/LBWD SKIP OVER DATA *1LT* OUTPUT 29351 M00S17569.1mt +++| RJM ADP 29352 M00S17570.1mt +++| ODA8 LDC /MTX/LBWD SET UP TO READ NEXT DATA CHUNK 29353 M00S17571.1mt +++| RJM RDA READ DATA 29354 M00S17572.1mt +++| RJM OPD OUTPUT DATA
| Line S17573 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29355 M01S17573.1mt51 ---|* RJM OPA (ATS CONTROLLER - OUTPUT DATA)
| Line S17574 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29356 M02S17574.1mt51 ---|* RJM OPI (CYBER 170-8X5 IOU)
| Line S00252 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29357 M02S00252.1mt51 ---|* RJM OPI (CYBER 170-815/825/835/855 IOU)
| Line S00172 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29358 M01S00172.1mt51 +++|* RJM OPA (ATS NON-CYBER 180) 29359 M01S00173.1mt51 +++|* RJM OPI (CYBER 180) 29360 M00S17575.1mt +++| ODAJ EQU *-1 29361 M00S17576.1mt +++| ZJN ODA6 IF FULL BLOCK OUTPUT
| Line S17577 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29362 M01S17577.274l797 ---| UJN ODA14 STORE BYTES NOT WRITTEN
| Line S06498 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29363 M01S06498.274l797 +++| UJP ODA14 STORE BYTES NOT WRITTEN 29364 M00S17578.1mt +++| 29365 M00S17579.1mt +++| ODA9 ZJN ODA10 IF TRANSFER NOT COMPLETE FOR *1MT* 29366 M00S17580.1mt +++| LDM .WC ADVANCE POINTER OVER *1LT,S* CHUNK 29367 M00S17581.1mt +++| RJM ADP 29368 M00S17582.1mt +++| UJN ODA15 CHECK IF *1LT* WAS CALLED 29369 M00S17583.1mt +++| 29370 M00S17584.1mt +++| ODA10 AOD CM+7 COUNT CHUNK 29371 M00S17585.1mt +++| LDC /MTX/LBWD SKIP OVER DATA *1LT* OUTPUT 29372 M00S17586.1mt +++| RJM ADP 29373 M00S17587.1mt +++| LDD BC 29374 M00S17588.1mt +++| ZJN ODA12 IF POSSIBLE OUTPUT COMPLETE 29375 M00S17589.1mt +++| STD BY 29376 M00S17590.1mt +++| ODA11 LDM .WC SET UP TO READ UP NEXT BLOCK 29377 M00S17591.1mt +++| UJN ODA13 READ DATA 29378 M00S17592.1mt +++| 29379 M00S17593.1mt +++| ODA12 LDD NC 29380 M00S17594.1mt +++| LPN 1 29381 M00S17595.1mt +++| ZJN ODA15 IF OUTPUT COMPLETE 29382 M00S17596.1mt +++| LDC /MTX/LBWD 29383 M00S17597.1mt +++| ODA13 RJM RDA READ DATA 29384 M00S17598.1mt +++| RJM OPD OUTPUT DATA
| Line S17599 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29385 M01S17599.1mt51 ---|* RJM OPL (ATS - OUTPUT LAST PARTIAL CHUNK)
| Line S17600 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29386 M02S17600.1mt51 ---|* RJM OPL (CYBER 170-8X5 IOU)
| Line S00253 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 274l797 |
M03 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29387 M03S00253.1mt51 ---|* RJM OPL (CYBER 170-815/825/835/855 IOU)
| Line S06499 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29388 M02S06499.1mt51 ---|* RJM OPE (CYBER 170-815/825/835/855 IOU)
| Line S00174 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29389 M01S00174.1mt51 +++|* RJM OPL (ATS NON-CYBER 180 - OUTPUT LAST CHUNK) 29390 M01S00175.1mt51 +++|* RJM OPE (CYBER 180 - OUTPUT LAST CHUNK) 29391 M00S17601.1mt +++| ODAK EQU *-1 29392 M00S17602.1mt +++| FJM *,CH 29393 M00S17603.1mt +++| NJN ODA14 IF INCOMPLETE TRANSFER
| Line S17604 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29394 M01S17604.274l797 ---| DCN CH+40
| Line S06500 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29395 M01S06500.274l797 +++| 29396 M01S06501.274l797 +++|* A 10 MICROSECOND DELAY MUST BE DONE TO PREVENT POSSIBLE LOSS 29397 M01S06502.274l797 +++|* OF THE LAST BYTE OF THE TRANSFER BY THE CCC FOR CTS. 29398 M01S06503.274l797 +++| 29399 M01S06504.274l797 +++| LDN 20 29400 M01S06505.274l797 +++| SBN 1 29401 M01S06506.274l797 +++| NJN *-1 29402 M01S06507.274l797 +++| DCN CH+40 29403 M00S17605.1mt +++| ODA14 STM /WRITE/BYRM 29404 M00S17606.1mt +++| ODA15 LDN 0 29405 M00S17607.1mt +++| ODAL EQU *-1 29406 M00S17608.1mt +++| ZJN ODA17 IF *1LT* NOT CALLED 29407 M00S17609.1mt +++| SOM ODAL CLEAR *1LT* CALLED FLAG 29408 M00S17610.1mt +++| ODA16 RJM CRA CHECK REQUEST ACCEPTANCE FROM *1LT* 29409 M00S17611.1mt +++| LMN 2 29410 M00S17612.1mt +++| NJN ODA16 IF NOT ACCEPT 29411 M00S17613.1mt +++| STD CM ACKNOWLEDGE *1LT* 29412 M00S17614.1mt +++| LDM CPDA 29413 M00S17615.1mt +++| ADN 2 29414 M00S17616.1mt +++| CWD CM 29415 M00S17617.1mt +++| ODA17 LDD CM+7 29416 M00S17618.1mt +++| ZJN ODA18 IF NO FULL CHUNKS OUTPUT 29417 M00S17619.1mt +++| LCN 0 SET TO NOT CONTROL BACKSPACE 29418 M00S17620.1mt +++| STM /WRITE/BYWR 29419 M00S17621.1mt +++| ODA18 LDN 0 SKIP TRAILER CONTROL WORD IF PRESENT 29420 M00S17622.1mt +++| ODAM EQU *-1 29421 M00S17623.1mt +++|* LDN 1 (204 WRITE) 29422 M00S17624.1mt +++| RJM ADP
| Line S17625 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 29423 M01S17625.251l664 ---| RJM /WRITE/WRT PROCESS WRITE COMPLETION 29424 M00S17626.1mt +++| LJM ODAX RETURN 29425 M00S17627.1mt +++| TITLE SUBROUTINES. 29426 M00S17628.1mt +++| ADP SPACE 4,15 29427 M00S17629.1mt +++|** ADP - ADVANCE POINTER. 29428 M00S17630.1mt +++|* 29429 M00S17631.1mt +++|* ENTRY (CN+3 - CN+4) = OUT POINTER.
| Line S17632 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29430 M01S17632.274l797 ---|* (A) = WORDS TO INCREMENT IN BY.
| Line S06508 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29431 M01S06508.274l797 +++|* (A) = WORDS TO INCREMENT OUT BY. 29432 M00S17633.1mt +++|* 29433 M00S17634.1mt +++|* EXIT (T4 - T5) = STARTING OUT POINTER. 29434 M00S17635.1mt +++|* (CN+3 - CN+4) = UPDATED OUT POINTER. 29435 M00S17636.1mt +++|* (T6) = FIRST PART WORD COUNT. 29436 M00S17637.1mt +++|* (T7) = SECOND PART WORD COUNT. 29437 M00S17638.1mt +++|* 29438 M00S17639.1mt +++|* MACROS SADT. 29439 M00S17640.1mt +++| 29440 M00S17641.1mt +++| 29441 M00S17642.1mt +++| ADP SUBR ENTRY/EXIT 29442 M00S17643.1mt +++| STD T6 29443 M00S17644.1mt +++| LDD CN+3 SAVE OUT 29444 M00S17645.1mt +++| STD T4 29445 M00S17646.1mt +++| LDD CN+4 29446 M00S17647.1mt +++| STD T5 29447 M00S17648.1mt +++| LDN 0 PRESET SECOND PART WORD COUNT 29448 M00S17649.1mt +++| STD T7
| Line S17650 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29449 M01S17650.274l797 ---| LDD T6 UPDATE IN
| Line S06509 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29450 M01S06509.274l797 +++| LDD T6 UPDATE OUT 29451 M00S17651.1mt +++| RAD CN+4 29452 M00S17652.1mt +++| SHN -14 29453 M00S17653.1mt +++| RAD CN+3 29454 M00S17654.1mt +++| SHN 14 29455 M00S17655.1mt +++| LMD CN+4 29456 M00S17656.1mt +++| SADT .LM,C 29457 M00S17657.1mt +++| ADC -* (-LIMIT) 29458 M00S17658.1mt +++| MJN ADPX IF NO WRAP AROUND 29459 M00S17659.1mt +++| STD T7 SET SECOND PART WORD COUNT 29460 M00S17660.1mt +++| SADT .FT 29461 M00S17661.1mt +++| ADC * (FIRST) 29462 M00S17662.1mt +++| STD CN+4 29463 M00S17663.1mt +++| SHN -14 29464 M00S17664.1mt +++| STD CN+3 29465 M00S17665.1mt +++| LDD T6 RESET FIRST PART WORD COUNT 29466 M00S17666.1mt +++| SBD T7 29467 M00S17667.1mt +++| STD T6 29468 M00S17668.1mt +++| UJN ADPX RETURN 29469 M00S17669.1mt +++| CNL SPACE 4,10 29470 M00S17670.1mt +++|** CNL - CHECK NEXT WRITE LONG BLOCKS. 29471 M00S17671.1mt +++|* 29472 M00S17672.1mt +++|* ENTRY (CN+3 - CN+4) = OUT POINTER. 29473 M00S17673.1mt +++|* 29474 M00S17674.1mt +++|* EXIT SEE /WRITE/CNW. 29475 M00S17675.1mt +++|* 29476 M00S17676.1mt +++|* CALLS /WRITE/COB, /WRITE/XBF. 29477 M00S17677.1mt +++|* 29478 M00S17678.1mt +++|* MACROS SADT. 29479 M00S17679.1mt +++| 29480 M00S17680.1mt +++| 29481 M00S17681.1mt +++| CNL17 LDN 2 SET NOT ENOUGH DATA 29482 M00S17682.1mt +++| CNL18 LJM /WRITE/CNW10 EXIT WITH NEXT WRITE STATUS 29483 M00S17683.1mt +++| 29484 M00S17684.1mt +++| CNL BSS 0 ENTRY 29485 M00S17685.1mt +++| LDN ZERL PRESET CONTROL WORD 29486 M00S17686.1mt +++| CRD CM 29487 M00S17687.1mt +++| RJM /WRITE/COB CHECK OUTPUT BUFFER 29488 M00S17688.1mt +++| ZJN CNL17 IF NO DATA 29489 M00S17689.1mt +++| CNLA UJN CNL1 PROCESS CONTROL WORD WRITE 29490 M00S17690.1mt +++|* STD CM+4 (NOT 204/264 WRITE) 29491 M00S17691.1mt +++| SHN -14 29492 M00S17692.1mt +++| STD CM+3 29493 M00S17693.1mt +++| CNLB LDN 0 SET UBC 29494 M00S17694.1mt +++| STD CM+2 29495 M00S17695.1mt +++| UJN CNL2 CALCULATE NUMBER OF CHUNKS 29496 M00S17696.1mt +++| 29497 M00S17697.1mt +++| CNL1 LDD CN+3 READ CONTROL WORD 29498 M00S17698.1mt +++| SHN 6 29499 M00S17699.1mt +++| ADD RA 29500 M00S17700.1mt +++| SHN 6 29501 M00S17701.1mt +++| ADD CN+4 29502 M00S17702.1mt +++| CRD CM 29503 M00S17703.1mt +++| CNL2 LDC /MTX/LBWD WORDS PER CHUNK 29504 M00S17704.1mt +++| CNLC EQU *-1 29505 M00S17705.1mt +++|* LDC LBBY BYTES PER CHUNK (204 WRITE) 29506 M00S17706.1mt +++| STD T1 29507 M00S17707.1mt +++| LDN 0 29508 M00S17708.1mt +++| STD NC 29509 M00S17709.1mt +++| 29510 M00S17710.1mt +++|* DETERMINE NUMBER OF CHUNKS AND REMAINDER. 29511 M00S17711.1mt +++| 29512 M00S17712.1mt +++| CNL3 LDD CM+4 29513 M00S17713.1mt +++| SBD T1 29514 M00S17714.1mt +++| STD CM+4 29515 M00S17715.1mt +++| PJN CNL4 IF NO UNDERFLOW 29516 M00S17716.1mt +++| AOD CM+4 29517 M00S17717.1mt +++| SOD CM+3 29518 M00S17718.1mt +++| MJN CNL5 IF UNDERFLOW 29519 M00S17719.1mt +++| CNL4 AOD NC COUNT CHUNK 29520 M00S17720.1mt +++| UJN CNL3 LOOP 29521 M00S17721.1mt +++| 29522 M00S17722.1mt +++| CNL5 LDD T1 29523 M00S17723.1mt +++| RAD CM+4 29524 M00S17724.1mt +++| STD BY PRESET BYTES AND WORDS IN LAST BLOCK 29525 M00S17725.1mt +++| STD BC 29526 M00S17726.1mt +++| STM .WC 29527 M00S17727.1mt +++| CNLD UJN CNL6 (204 WRITE) 29528 M00S17728.1mt +++|* LDD CM+4 BYTES = 5 * CM WORDS (NOT 204 WRITE) 29529 M00S17729.1mt +++| SHN 2 29530 M00S17730.1mt +++| RAD BY 29531 M00S17731.1mt +++| UJN CNL7 CHECK FOR LEGAL BLOCK SIZE 29532 M00S17732.1mt +++| 29533 M00S17733.1mt +++| CNL6 LDD CM+4 ROUND UP BYTES 29534 M00S17734.1mt +++| ADN 4 29535 M00S17735.1mt +++| STD T2 29536 M00S17736.1mt +++| SHN 1 13*BYTES 29537 M00S17737.1mt +++| ADD T2 29538 M00S17738.1mt +++| SHN 2 29539 M00S17739.1mt +++| ADD T2 29540 M00S17740.1mt +++| SHN 14 (-6) (13*BYTES)/64 29541 M00S17741.1mt +++| STD T0 29542 M00S17742.1mt +++| SHN 6+2 4*13*BYTES (52*BYTES) 29543 M00S17743.1mt +++| SBD T2 51*BYTES 29544 M00S17744.1mt +++| ADD T0 (51*BYTES)+((13*BYTES)/64) 29545 M00S17745.1mt +++| SHN -8D WORDS = ((51*BYTES)+((13*BYTES)/64))/256 29546 M00S17746.1mt +++| STM .WC 29547 M00S17747.1mt +++| 29548 M00S17748.1mt +++|* CHECK IF LEGAL BLOCK SIZE. 29549 M00S17749.1mt +++| 29550 M00S17750.1mt +++| CNL7 LDD NC 29551 M00S17751.1mt +++| STD T1 29552 M00S17752.1mt +++| LDM .WC 29553 M00S17753.1mt +++| STD T7 29554 M00S17754.1mt +++| LDN 0 29555 M00S17755.1mt +++| STD T6 29556 M00S17756.1mt +++| CNL8 SOD T1 29557 M00S17757.1mt +++| MJN CNL9 IF END OF CHUNKS 29558 M00S17758.1mt +++| LDC /MTX/LBWD 29559 M00S17759.1mt +++| RAD T7 29560 M00S17760.1mt +++| SHN -14 29561 M00S17761.1mt +++| RAD T6 29562 M00S17762.1mt +++| UJN CNL8 LOOP 29563 M00S17763.1mt +++| 29564 M00S17764.1mt +++| CNL9 LDD T6 29565 M00S17765.1mt +++| SHN 14 29566 M00S17766.1mt +++| LMD T7 29567 M00S17767.1mt +++| SADT .BS,C,1 29568 M00S17768.1mt +++| ADC -* 29569 M00S17769.1mt +++| PJN CNL11 IF BLOCK TOO LARGE 29570 M00S17770.1mt +++| LDD FM
| Line S01414 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 29571 M01S01414.282l826 +++| SHN -6 29572 M00S17771.1mt +++| LMN /MTX/TFF 29573 M00S17772.1mt +++| NJN CNL12 IF NOT F FORMAT 29574 M00S17773.1mt +++| LDD MD 29575 M00S17774.1mt +++| LMD CM 29576 M00S17775.1mt +++| SHN -4 29577 M00S17776.1mt +++| LPN 4 29578 M00S17777.1mt +++| ZJN CNL12 IF NO MODE CHANGE 29579 M00S17778.1mt +++| CNL10 LJM CNL18 EXIT WITH NEXT WRITE STATUS 29580 M00S17779.1mt +++| 29581 M00S17780.1mt +++| CNL11 LDN 10 SET BUFFER CONTROL WORD ERROR 29582 M00S17781.1mt +++| UJN CNL10 EXIT WITH NEXT WRITE STATUS 29583 M00S17782.1mt +++| 29584 M00S17783.1mt +++| CNL12 LDD MD CHECK IF ENOUGH DATA 29585 M00S17784.1mt +++| LPN 60 29586 M00S17785.1mt +++| SHN -4 29587 M00S17786.1mt +++| RAD T7 29588 M00S17787.1mt +++| SHN -14 29589 M00S17788.1mt +++| RAD T6 29590 M00S17789.1mt +++| RJM /WRITE/COB CHECK OUTPUT BUFFER 29591 M00S17790.1mt +++| SHN 6 29592 M00S17791.1mt +++| SBD T6 29593 M00S17792.1mt +++| SHN 14 29594 M00S17793.1mt +++| SBD T7 29595 M00S17794.1mt +++| PJN CNL13 IF ENOUGH DATA IN OUTPUT BUFFER 29596 M00S17795.1mt +++| LJM CNL17 SET NOT ENOUGH DATA 29597 M00S17796.1mt +++| 29598 M00S17797.1mt +++| CNL13 LDM /WRITE/CNWJ 29599 M00S17798.1mt +++| LPN 77 29600 M00S17799.1mt +++| LMC -0 29601 M00S17800.1mt +++| ADD CM+2
| Line S17801 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 29602 M01S17801.v23l617 ---| PJN CNL11 IF ILLEGAL UBC
| Line S00526 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29603 M02S00526.274l797 ---| PJN CNL11 IF INCORRECT UBC
| Line S06510 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29604 M01S06510.274l797 +++| PJP CNL11 IF INCORRECT UBC 29605 M00S17802.1mt +++| LDN 2 PRESET FOR POSSIBLE 204 EOF WRITE 29606 M00S17803.1mt +++| STD T6 29607 M00S17804.1mt +++| LDD NC 29608 M00S17805.1mt +++| ZJN CNL14 IF ONLY PARTIAL CHUNK 29609 M00S17806.1mt +++| LDD HN SET TO PREVENT NOISE BLOCK ERROR 29610 M00S17807.1mt +++| RAD BY 29611 M00S17808.1mt +++| CNL14 RJM /WRITE/XBF 29612 M00S17809.1mt +++| STD CM+4 29613 M00S17810.1mt +++| LDD NC 29614 M00S17811.1mt +++| ZJN CNL15 IF ONLY PARTIAL CHUNK 29615 M00S17812.1mt +++| LDC -100 29616 M00S17813.1mt +++| CNL15 ADD BY 29617 M00S17814.1mt +++| STD BC 29618 M00S17815.1mt +++| PJN CNL16 IF NO UNDERFLOW IN BYTE COUNT 29619 M00S17816.1mt +++| ADC LBBY RESET BYTE COUNT 29620 M00S17817.1mt +++| STD BC 29621 M00S17818.1mt +++| LDC /MTX/LBWD SET WORD COUNT IN LAST CHUNK 29622 M00S17819.1mt +++| STM .WC 29623 M00S17820.1mt +++| SOD NC DECREMENT CHUNK COUNT 29624 M00S17821.1mt +++| CNL16 LDD CM+4 29625 M00S17822.1mt +++| LJM CNL18 EXIT WITH NEXT WRITE STATUS 29626 M00S17823.1mt +++| CPD SPACE 4,10 29627 M00S17824.1mt +++|** CPD - CHECK PP (1LT) DROP OUT. 29628 M00S17825.1mt +++|* 29629 M00S17826.1mt +++|* ENTRY (CPDA) = PP INPUT REGISTER ADDRESS. 29630 M00S17827.1mt +++|* 29631 M00S17828.1mt +++|* EXIT (A) = 0, IF *1LT* STILL AROUND. 29632 M00S17829.1mt +++|*
| Line S00176 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29633 M01S00176.1mt51 +++|* USES CM - CM+4. 29634 M01S00177.1mt51 +++|* 29635 M00S17830.1mt +++|* MACROS CHTE. 29636 M00S17831.1mt +++| 29637 M00S17832.1mt +++| 29638 M00S17833.1mt +++| CPD SUBR ENTRY/EXIT
| Line S17834 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29639 M01S17834.1mt51 ---| LDC *
| Line S00178 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29640 M01S00178.1mt51 +++| LDC * (ADDRESS OF *1LT* INPUT REGISTER) 29641 M00S17835.1mt +++| CPDA EQU *-1 29642 M00S17836.1mt +++| CRD CM 29643 M00S17837.1mt +++| LDD CM+1 29644 M00S17838.1mt +++| SCN 77 29645 M00S17839.1mt +++| SHN 6 29646 M00S17840.1mt +++| LMD CM 29647 M00S17841.1mt +++| LMC 3RT1L 29648 M00S17842.1mt +++| ZJN CPD1 IF *1LT* 29649 M00S17843.1mt +++| SHN 14 29650 M00S17844.1mt +++| LMN 1R1 29651 M00S17845.1mt +++| NJN CPDX IF NOT *1LT* LOADING
| Line S17846 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29652 M01S17846.1mt51 ---| CPD1 LDD CM+3
| Line S00179 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29653 M01S00179.1mt51 +++| CPD1 LDD CM+3 CHECK FOR CORRECT CHANNEL 29654 M00S17847.1mt +++| CHTE * 29655 M00S17848.1mt +++| LMN CH 29656 M00S17849.1mt +++| LPN 77 29657 M00S17850.1mt +++| UJN CPDX RETURN 29658 M00S17851.1mt +++| CRA SPACE 4,10 29659 M00S17852.1mt +++|** CRA - CHECK REQUEST ACCEPTANCE FROM *1LT*. 29660 M00S17853.1mt +++|* 29661 M00S17854.1mt +++|* EXIT (A) = REQUEST BYTE. 29662 M00S17855.1mt +++|* (CM - CM+4) = REQUEST/RETURN WORD. 29663 M00S17856.1mt +++| 29664 M00S17857.1mt +++| 29665 M00S17858.1mt +++| CRA SUBR ENTRY/EXIT 29666 M00S17859.1mt +++| LDM CPDA 29667 M00S17860.1mt +++| ADN 2 29668 M00S17861.1mt +++| CRD CM 29669 M00S17862.1mt +++| LDD CM 29670 M00S17863.1mt +++| UJN CRAX RETURN
| Line S17864 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29671 M01S17864.1mt51 ---| OPA SPACE 4,10
| Line S00180 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29672 M01S00180.1mt51 +++| ITS SPACE 4,10 29673 M01S00181.1mt51 +++|** ITS - INDICATE *1MT* TRANSFER STARTED. 29674 M01S00182.1mt51 +++|* 29675 M01S00183.1mt51 +++|* ENTRY (A) = BYTE COUNT. 29676 M01S00184.1mt51 +++|* 29677 M01S00185.1mt51 +++|* EXIT (A) = BYTE COUNT. 29678 M01S00186.1mt51 +++| 29679 M01S00187.1mt51 +++| 29680 M01S00188.1mt51 +++| ITS SUBR ENTRY/EXIT 29681 M01S00189.1mt51 +++| STD T0 SAVE BYTE COUNT 29682 M01S00190.1mt51 +++| LDM CPDA INDICATE *1MT* TRANSFER STARTED 29683 M01S00191.1mt51 +++| ADN 3 29684 M01S00192.1mt51 +++| CWD ON 29685 M01S00193.1mt51 +++| LDD T0 RESTORE (A) 29686 M01S00194.1mt51 +++| UJN ITSX RETURN 29687 M01S00195.1mt51 +++| SPACE 4,10 29688 M00S17865.1mt +++| .OPAA BSS 0 START OF WRITE ROUTINE OVERLAYS
| Line S00196 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29689 M01S00196.1mt51 +++| OPE SPACE 4,10 29690 M01S00197.1mt51 +++|** OPE - OUTPUT ENDING DATA FROM CYBER 180 IOU. 29691 M01S00198.1mt51 +++|* 29692 M01S00199.1mt51 +++|* ENTRY (A) = NUMBER OF BYTES TO OUTPUT. 29693 M01S00200.1mt51 +++|* 29694 M01S00201.1mt51 +++|* EXIT (A) = BYTES LEFT. 29695 M01S00202.1mt51 +++|* 29696 M01S00203.1mt51 +++|* CALLS WTS. 29697 M00S17866.1mt +++| 29698 M00S17867.1mt +++|
| Line S17868 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29699 M01S17868.1mt51 ---|** OPA - OUTPUT DATA TO ATS UNIT.
| Line S00204 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29700 M01S00204.1mt51 +++| OPE SUBR ENTRY/EXIT 29701 M01S00205.1mt51 +++| OPEA UJN OPE2 OUTPUT DATA 29702 M01S00206.1mt51 +++|* PSN (*1LT* USED) 29703 M01S00207.1mt51 +++| RJM WTS WAIT FOR *1LT* TRANSFER TO START 29704 M01S00208.1mt51 +++| OPE1 IJM OPEX,CH IF *1LT* WROTE PARTIAL BLOCK 29705 M01S00209.1mt51 +++| SCF OPE1,CH WAIT FOR *1LT* TO CLEAR CHANNEL FLAG 29706 M01S00210.1mt51 +++| OPE2 OAM BUFB,CH OUTPUT CHUNK 29707 M01S00211.1mt51 +++| UJN OPEX RETURN 29708 M01S00212.1mt51 +++| 29709 M01S00213.1mt51 +++| 29710 M01S00214.1mt51 +++| OPEB BSS 0 29711 M01S00215.1mt51 +++| LOC OPEA 29712 M01S00216.1mt51 +++| UJN OPE2 OUTPUT DATA 29713 M01S00217.1mt51 +++| LOC *O 29714 M01S00218.1mt51 +++| OPI SPACE 4,10 29715 M01S00219.1mt51 +++|** OPI - OUTPUT DATA FROM CYBER 180 IOU. 29716 M00S17869.1mt +++|*
| Line S00220 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29717 M01S00220.1mt51 +++|* IF THERE ARE MULTIPLE CHUNKS IN THE BLOCK, THIS ROUTINE 29718 M01S00221.1mt51 +++|* IS USED FOR ALL BUT THE LAST CHUNK. *OPE* IS USED FOR THE 29719 M01S00222.1mt51 +++|* LAST CHUNK. 29720 M01S00223.1mt51 +++|* 29721 M00S17870.1mt +++|* ENTRY (A) = NUMBER OF BYTES TO OUTPUT.
| Line S17871 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29722 M01S17871.1mt51 ---|* (OPAA) = 0 IF NOT FIRST CHUNK. 29723 M00S17872.1mt +++|* 29724 M00S17873.1mt +++|* EXIT (A) = BYTES REMAINING IF INCOMPLETE TRANSFER.
| Line S00224 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29725 M01S00224.1mt51 +++|* 29726 M01S00225.1mt51 +++|* CALLS ITS, WTS. 29727 M00S17874.1mt +++| 29728 M00S17875.1mt +++|
| Line S17876 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29729 M01S17876.1mt51 ---| OPA SUBR ENTRY/EXIT 29730 M01S17877.1mt51 ---| OPAA UJN OPA1 FIRST CHUNK
| Line S00226 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29731 M01S00226.1mt51 +++| OPI SUBR ENTRY/EXIT 29732 M01S00227.1mt51 +++| OPIA UJN OPI2 FIRST CHUNK 29733 M00S17878.1mt +++|* PSN (NOT FIRST CHUNK)
| Line S17879 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29734 M01S17879.1mt51 ---| AJM *,CH WAIT FOR *1LT* TO OUTPUT CHUNK 29735 M01S17880.1mt51 ---| PSN DELAY TO ALLOW *1LT* TO REACTIVATE CHANNEL 29736 M01S17881.1mt51 ---| PSN 29737 M01S17882.1mt51 ---| OPA1 OAM BUFB,CH OUTPUT DATA 29738 M01S17883.1mt51 ---| FJM *,CH 29739 M01S17884.1mt51 ---| DCN CH+40 INDICATE TO *1LT* TO RESUME OUTPUT 29740 M01S17885.1mt51 ---| NJN OPAX IF INCOMPLETE TRANSFER 29741 M01S17886.1mt51 ---| ACN CH 29742 M01S17887.1mt51 ---| STM OPAA CLEAR FIRST CHUNK FLAG 29743 M01S17888.1mt51 ---| UJN OPAX RETURN
| Line S00228 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29744 M01S00228.1mt51 +++| RJM WTS WAIT FOR *1LT* TRANSFER TO START 29745 M01S00229.1mt51 +++| OPI1 IJM OPIX,CH IF *1LT* WROTE ONLY PARTIAL CHUNK 29746 M01S00230.1mt51 +++| SCF OPI1,CH WAIT FOR *1LT* TO CLEAR CHANNEL FLAG 29747 M01S00231.1mt51 +++| RJM ITS INDICATE *1MT* TRANSFER STARTED 29748 M01S00232.1mt51 +++| OPI2 OAM BUFB,CH OUTPUT DATA 29749 M01S00233.1mt51 +++| NJN OPIX IF INCOMPLETE TRANSFER 29750 M01S00234.1mt51 +++| CCF *,CH SIGNAL *1LT* TO START OUTPUT 29751 M01S00235.1mt51 +++| STM OPIA SET UP FOR SUBSEQUENT CHUNKS 29752 M01S00236.1mt51 +++| UJN OPIX RETURN 29753 M00S17889.1mt +++| 29754 M00S17890.1mt +++|
| Line S17891 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29755 M01S17891.1mt51 ---| OPAB BSS 0 29756 M01S17892.1mt51 ---| LOC OPAA 29757 M01S17893.1mt51 ---| UJN OPA1 OUTPUT DATA 29758 M01S17894.1mt51 ---| LOC *O 29759 M01S17895.1mt51 ---| OPL SPACE 4,10 29760 M01S17896.1mt51 ---|** OPL - OUTPUT LAST PARTIAL CHUNK TO ATS UNIT. 29761 M01S17897.1mt51 ---|* 29762 M01S17898.1mt51 ---|* ENTRY (A) = NUMBER OF BYTES TO TRANSFER. 29763 M01S17899.1mt51 ---|* 29764 M01S17900.1mt51 ---|* EXIT (A) = BYTES REMAINING IF INCOMPLETE TRANSFER. 29765 M01S17901.1mt51 ---|* CHANNEL FULL STATUS NOT CHECKED. 29766 M01S17902.1mt51 ---| 29767 M01S17903.1mt51 ---| 29768 M01S17904.1mt51 ---| OPL SUBR ENTRY/EXIT 29769 M01S17905.1mt51 ---| OPLA AJM *,CH WAIT FOR *1LT* TO OUTPUT CHUNK 29770 M01S17906.1mt51 ---|* UJN OPL1 (*1LT* NOT NEEDED) 29771 M01S17907.1mt51 ---| PSN DELAY TO ALLOW *1LT* TO REACTIVATE CHANNEL 29772 M01S17908.1mt51 ---| PSN 29773 M01S17909.1mt51 ---| OPL1 OAM BUFB,CH OUTPUT PARTIAL CHUNK 29774 M01S17910.1mt51 ---| UJN OPLX RETURN 29775 M01S17911.1mt51 ---| 29776 M01S17912.1mt51 ---| 29777 M01S17913.1mt51 ---| OPLB BSS 0 29778 M01S17914.1mt51 ---| LOC OPLA 29779 M01S17915.1mt51 ---| UJN OPL1 OUTPUT DATA
| Line S00237 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29780 M01S00237.1mt51 +++| OPIB BSS 0 29781 M01S00238.1mt51 +++| LOC OPIA 29782 M01S00239.1mt51 +++| UJN OPI2 OUTPUT NEXT BLOCK 29783 M00S17916.1mt +++| LOC *O 29784 M00S17917.1mt +++| 29785 M00S17918.1mt +++| 29786 M00S17919.1mt +++| .OPALC EQU *-.OPAA END OF OVERLAID AREA 29787 M00S17920.1mt +++| RDA SPACE 4,15 29788 M00S17921.1mt +++|** RDA - READ DATA FROM CENTRAL. 29789 M00S17922.1mt +++|* 29790 M00S17923.1mt +++|* ENTRY (A) = WORDS TO READ.
| Line S17924 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29791 M01S17924.274l797 ---|* (T4 - T5) = IN POINTDR.
| Line S06511 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29792 M01S06511.274l797 +++|* (T4 - T5) = OUT POINTER. 29793 M00S17925.1mt +++|* (T6) = FIRST PART WORD COUNT. 29794 M00S17926.1mt +++|* (T7) = SECOND PART WORD COUNT. 29795 M00S17927.1mt +++|* 29796 M00S17928.1mt +++|* EXIT (/WRITE/BYWR) = BY. 29797 M00S17929.1mt +++|* 29798 M00S17930.1mt +++|* CALLS ADP, /WRITE/CKS, ITM, SRQ. 29799 M00S17931.1mt +++|* 29800 M00S17932.1mt +++|* MACROS SADT. 29801 M00S17933.1mt +++| 29802 M00S17934.1mt +++| 29803 M00S17935.1mt +++| RDA SUBR ENTRY/EXIT 29804 M00S17936.1mt +++| RJM ADP ADVANCE POINTERS 29805 M00S17937.1mt +++| LDD T6 29806 M00S17938.1mt +++| ZJN RDAX IF NO FIRST PART 29807 M00S17939.1mt +++| SHN 2 29808 M00S17940.1mt +++| ADD T6 29809 M00S17941.1mt +++| ADC BUFB 29810 M00S17942.1mt +++| STM RDAA 29811 M00S17943.1mt +++| LDD T4 READ FIRST PART 29812 M00S17944.1mt +++| SHN 6 29813 M00S17945.1mt +++| ADD RA 29814 M00S17946.1mt +++| SHN 6 29815 M00S17947.1mt +++| ADD T5 29816 M00S17948.1mt +++| CRM BUFB,T6 29817 M00S17949.1mt +++| LDD T7 29818 M00S17950.1mt +++| ZJN RDA1 IF NO SECOND PART 29819 M00S17951.1mt +++| SADT .FT,,,A 29820 M00S17952.1mt +++| LDC * READ SECOND PART 29821 M00S17953.1mt +++| CRM *,T7 29822 M00S17954.1mt +++| RDAA EQU *-1
| Line S17955 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29823 M01S17955.274l797 ---| RDA1 LDD BY SAVE BYTE COUNT 29824 M01S17956.274l797 ---| STM RDAE 29825 M01S17957.274l797 ---| LDC 0 SET BYTE COUNT FOR CHECKSUM
| Line S06512 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29826 M01S06512.274l797 +++| RDA1 LDC 0 SET BYTE COUNT FOR CHECKSUM 29827 M00S17958.1mt +++| RDAB EQU *-1
| Line S17959 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29828 M01S17959.274l797 ---| STD BY 29829 M00S17960.1mt +++| ZJN RDA3 IF NOT FIRST CHUNK 29830 M00S17961.1mt +++| RDAC UJN RDA2 CHECKSUM DATA 29831 M00S17962.1mt +++|* RJM ITM (ATS GCR UNIT, 1X PPU SPEED OR 200 IPS)
| Line S06513 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29832 M01S06513.274l797 +++|* RJM ITM (CTS) 29833 M00S17963.1mt +++| CON ITM 29834 M00S17964.1mt +++| LDM ODAL 29835 M00S17965.1mt +++| LPN 77 29836 M00S17966.1mt +++| ZJN RDA2 IF *1LT* NOT NEEDED 29837 M00S17967.1mt +++| LDN 1 SEND REQUEST TO *1LT* 29838 M00S17968.1mt +++| RJM SRQ
| Line S17969 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 29839 M01S17969.ns21000 ---| RDA2 RJM /WRITE/CKS CHECKSUM DATA 29840 M01S17970.ns21000 ---|* UJN *+2 (BID POSITIONING AVAILABLE) 29841 M01S17971.ns21000 ---| RDAD EQU *-2 29842 M01S17972.ns21000 ---| LDN 0 CLEAR FIRST CHUNK FLAG
| Line S00254 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 29843 M01S00254.ns21000 +++| RDA2 LDM UBWB USE HARDWARE CHECKSUM 29844 M01S00255.ns21000 +++| STD LG+1 29845 M01S00256.ns21000 +++| NJN RDA2.1 IF NON ZERO CHECKSUM 29846 M01S00257.ns21000 +++| AOD LG+1 29847 M01S00258.ns21000 +++| RDA2.1 LDN 0 CLEAR FIRST CHUNK FLAG 29848 M00S17973.1mt +++| STM RDAB
| Line S17974 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29849 M01S17974.274l797 ---| RDA3 LDC 0 RESTORE BYTE COUNT 29850 M01S17975.274l797 ---| RDAE EQU *-1 29851 M01S17976.274l797 ---| STD BY
| Line S06514 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29852 M01S06514.274l797 +++| RDA3 LDD BY 29853 M00S17977.1mt +++| STM /WRITE/BYWR SET BYTES TO WRITE 29854 M00S17978.1mt +++| LJM RDAX RETURN 29855 M00S17979.1mt +++| SRQ SPACE 4,10 29856 M00S17980.1mt +++|** SRQ - SEND REQUEST TO *1LT* TO START BLOCK. 29857 M00S17981.1mt +++|* 29858 M00S17982.1mt +++|* ENTRY (A) = REQUEST CODE. 29859 M00S17983.1mt +++|* (T4 - T5) = POINTER. 29860 M00S17984.1mt +++|* (BC) = BYTE COUNT OF LAST CHUNK. 29861 M00S17985.1mt +++|* (NC) = NUMBER OF CHUNKS. 29862 M00S17986.1mt +++|* 29863 M00S17987.1mt +++|* USES T1, T2, T3, CM - CM+4. 29864 M00S17988.1mt +++|* 29865 M00S17989.1mt +++|* CALLS CPD, CRA, HNG. 29866 M00S17990.1mt +++| 29867 M00S17991.1mt +++| 29868 M00S17992.1mt +++| SRQ SUBR ENTRY/EXIT 29869 M00S17993.1mt +++| STD T1 29870 M00S17994.1mt +++| SRQA UJN SRQ1 NO CHANNEL FLAG
| Line S17995 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 29871 M01S17995.ns21000 ---|* PSN (CYBER 170-8X5 IOU)
| Line S00259 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29872 M02S00259.1mt51 ---|* PSN (CYBER 170-815/825/835/855 IOU)
| Line S00240 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29873 M01S00240.1mt51 +++|* PSN (CYBER 180 IOU)
| Line S17996 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29874 M01S17996.274l797 ---| CCF *,CH CLEAR CHANNEL FLAG 29875 M01S17997.274l797 ---| SCF *,CH SET CHANNEL FLAG
| Line S06515 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29876 M01S06515.274l797 +++| SCF *+2,CH SET CHANNEL FLAG
| Line S00241 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29877 M01S00241.1mt51 +++| LDM CPDA INDICATE *1MT* TRANSFER STARTED 29878 M01S00242.1mt51 +++| ADN 3 29879 M01S00243.1mt51 +++| CWD ON 29880 M00S17998.1mt +++| SRQ1 RJM CRA CHECK *1LT* ACCEPT 29881 M00S17999.1mt +++| NJN SRQ2 IF *1LT* OUT OF SYNC 29882 M00S18000.1mt +++| LDM CPDA CHECK *1LT* FUNCTION 29883 M00S18001.1mt +++| ADN 1 29884 M00S18002.1mt +++| CRD CM 29885 M00S18003.1mt +++| LDD CM 29886 M00S18004.1mt +++| LMN PRLM 29887 M00S18005.1mt +++| ZJN SRQ3 IF *1LT* PAUSING 29888 M00S18006.1mt +++| LDD BC SET BYTE COUNT 29889 M00S18007.1mt +++| STD T2
| Line S18008 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29890 M01S18008.1mt51 ---| LDD NC
| Line S00244 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29891 M01S00244.1mt51 +++| LDD NC SET NUMBER OF CHUNKS 29892 M00S18009.1mt +++| STD T3 29893 M00S18010.1mt +++| LDM CPDA ENTER REQUEST 29894 M00S18011.1mt +++| ADN 2 29895 M00S18012.1mt +++| CWD T1
| Line S18013 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29896 M01S18013.1mt51 ---| RJM CPD 29897 M01S18014.1mt51 ---| ZJN SRQX IF *1LT* STILL AROUND
| Line S00245 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29898 M01S00245.1mt51 +++| RJM CPD CHECK IF PP DROPPED OUT 29899 M01S00246.1mt51 +++| NJN SRQ2 IF *1LT* MISSING 29900 M01S00247.1mt51 +++| LJM SRQX RETURN 29901 M01S00248.1mt51 +++| 29902 M00S18015.1mt +++| SRQ2 RJM HNG HANG PP 29903 M00S18016.1mt +++| 29904 M00S18017.1mt +++| SRQ3 LJM RET2 REQUEUE REQUEST
| Line S00249 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29905 M01S00249.1mt51 +++| WTS SPACE 4,10 29906 M01S00250.1mt51 +++|** WTS - WAIT FOR *1LT* TRANSFER TO START. 29907 M01S00251.1mt51 +++|* 29908 M01S00252.1mt51 +++|* ENTRY (A) = BYTE COUNT. 29909 M01S00253.1mt51 +++|* 29910 M01S00254.1mt51 +++|* EXIT (A) = BYTE COUNT. 29911 M01S00255.1mt51 +++|* 29912 M01S00256.1mt51 +++|* USES CM - CM+4. 29913 M00S18018.1mt +++|
| Line S00257 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29914 M01S00257.1mt51 +++| 29915 M01S00258.1mt51 +++| WTS3 LDD T0 RESTORE (A) 29916 M01S00259.1mt51 +++| 29917 M01S00260.1mt51 +++| WTS SUBR ENTRY/EXIT 29918 M01S00261.1mt51 +++| STD T0 SAVE BYTE COUNT 29919 M01S00262.1mt51 +++| WTS1 LDM CPDA CHECK *1MT*/*1LT* INTERLOCK 29920 M01S00263.1mt51 +++| ADN 3 29921 M01S00264.1mt51 +++| CRD CM 29922 M01S00265.1mt51 +++| LDD CM 29923 M01S00266.1mt51 +++| ZJN WTS3 IF *1LT* TRANSFER STARTED 29924 M01S00267.1mt51 +++| LDN 24 DELAY 10 MICROSECONDS 29925 M01S00268.1mt51 +++| WTS2 SBN 1 29926 M01S00269.1mt51 +++| NJN WTS2 IF NOT DONE 29927 M01S00270.1mt51 +++| UJN WTS1 CHECK INTERLOCK 29928 M01S00271.1mt51 +++| SPACE 4,10 29929 M00S18019.1mt +++| .WC CON 0 WORD COUNT OF LAST CHUNK 29930 M00S18020.1mt +++| SPACE 4,10 29931 M00S18021.1mt +++| BUFFER BUFB 29932 M00S18022.1mt +++| CALL SPACE 4,10 29933 M00S18023.1mt +++| .IM SET 0 DISABLE ADDRESS MODIFICATION ON ERRORS 29934 M00S18024.1mt +++| 29935 M00S18025.1mt +++|** *1LT* CALL BLOCK. 29936 M00S18026.1mt +++|*
| Line S18027 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29937 M01S18027.274l797 ---|*T 18/ 1LT,6/ CP,12/ 0,1/ CF,11/ CHANNEL,12/ PPIA
Figure
| Line S06516 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29938 M01S06516.274l797 +++|*T 18/ 1LT,6/ CP,6/ HP,6/ 1,1/ CF,11/ CHANNEL,12/ PPIA
Figure
29939 M00S18028.1mt +++|*T, 12/ -0,24/ FIRST,24/ LIMIT
Figure
29940 M00S18029.1mt +++| 29941 M00S18030.1mt +++| 29942 M00S18031.1mt +++| CALL VFD 18/3R1LT,6/0 29943 M00S18032.1mt +++| CON 1 WRITE 29944 M00S18033.1mt +++| CHTE * 29945 M00S18034.1mt +++| CON CH CHANNEL 29946 M00S18035.1mt +++| CON 0 *1MT* INPUT REGISTER ADDRESS 29947 M00S18036.1mt +++| CON -0 29948 M00S18037.1mt +++| SADT .FT,,,,SE 29949 M00S18038.1mt +++| CON 0,0 29950 M00S18039.1mt +++| SADT .LM,,,,SE 29951 M00S18040.1mt +++| CON 0,0
| Line S00272 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29952 M01S00272.1mt51 +++| TITLE PRESET. 29953 M00S18041.1mt +++| PRS SPACE 4,10 29954 M00S18042.1mt +++|** PRS - PRESET. 29955 M00S18043.1mt +++|*
| Line S18044 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29956 M01S18044.274l797 ---|* CALLS CEC, /WRITE/CNW, CPD, MCH, SRC.
| Line S06517 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 29957 M01S06517.274l797 +++|* EXIT TO */WRITE/WTF1* TO WRITE BLOCK. 29958 M01S06518.274l797 +++|* TO */WRITE/WTF4* IF ERROR FROM *CNW*. 29959 M01S06519.274l797 +++|* TO *RET2* TO REQUEUE IF *1LT* NOT ASSIGNED. 29960 M01S06520.274l797 +++|* 29961 M01S06521.274l797 +++|* CALLS CEC, *CPP*, /WRITE/CNW, CPD, MCH, SRC. 29962 M00S18045.1mt +++|* 29963 M00S18046.1mt +++|* MACROS MONITOR, PAUSE. 29964 M00S18047.1mt +++| 29965 M00S18048.1mt +++| 29966 M00S18049.1mt +++| PRS LDC PRSB MODIFY CHANNELS IN RESIDENT 29967 M00S18050.1mt +++| RJM MCH 29968 M00S18051.1mt +++| LDN 0 29969 M00S18052.1mt +++| STD T3 CLEAR TAPE OUTPUT TYPE
| Line S18053 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 29970 M01S18053.ns21000 ---| LDN CPUL 29971 M01S18054.ns21000 ---| CRD CM 29972 M01S18055.ns21000 ---| LDD CM+3 29973 M01S18056.ns21000 ---| SHN 21-10 29974 M01S18057.ns21000 ---| MJN PRS1 IF CYBER 170-8X5 IOU
| Line S00260 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 29975 M01S00260.ns21000 +++| LDK MABL CHECK MAINFRAME TYPE 29976 M01S00261.ns21000 +++| CRD CM 29977 M01S00262.ns21000 +++| LDD CM+1 29978 M01S00263.ns21000 +++| SHN -6 29979 M01S00264.ns21000 +++| LPN 41 29980 M01S00265.ns21000 +++| LMN 1
| Line S00266 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29981 M02S00266.1mt51 ---| ZJN PRS1 IF CYBER 170-815/825/835/855 IOU
| Line S00273 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 29982 M01S00273.1mt51 +++| ZJN PRS1 IF CYBER 180 29983 M00S18058.1mt +++| AOD T3 29984 M00S18059.1mt +++| LDD HP 29985 M00S18060.1mt +++| LPN 60 29986 M00S18061.1mt +++| SHN 6 29987 M00S18062.1mt +++| RAM CALL+3
| Line S00031 Modification History | |
|---|---|
M01 (Added by) | ncccts |
Seq # *Modification Id* Act ----------------------------+ 29988 M01S00031.ncccts +++| LDD HP 29989 M01S00032.ncccts +++| SHN 21-7 29990 M01S00033.ncccts +++| MJN PRS0 IF CTS 29991 M01S00034.ncccts +++| LDD HP 29992 M00S18063.1mt +++| SHN 21-12 29993 M00S18064.1mt +++| PJN PRS1 IF MTS CONTROLLER
| Line S18065 Modification History | |
|---|---|
M01 (Removed by) | ncccts |
Seq # *Modification Id* Act ----------------------------+ 29994 M01S18065.ncccts ---| AOD T3
| Line S00035 Modification History | |
|---|---|
M01 (Added by) | ncccts |
Seq # *Modification Id* Act ----------------------------+ 29995 M01S00035.ncccts +++| PRS0 AOD T3 29996 M00S18066.1mt +++| PRS1 RJM SRC SET RESIDENT CONTROLLER ROUTINE
| Line S18067 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 29997 M01S18067.ns21000 ---| LDC BUFB SET BUFFER FOR CHECKSUM 29998 M01S18068.ns21000 ---| STM /WRITE/CKSC 29999 M00S18069.1mt +++| LDC LJMI SET CALL FOR CHECK NEXT WRITE 30000 M00S18070.1mt +++| STM /WRITE/CNWA 30001 M00S18071.1mt +++| LDC CNL 30002 M00S18072.1mt +++| STM /WRITE/CNWA+1
| Line S18073 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 30003 M01S18073.274l797 ---| LDM PRSC
| Line S06522 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 30004 M01S06522.274l797 +++| LDD HP 30005 M01S06523.274l797 +++| SHN 21-7 30006 M01S06524.274l797 +++| PJN PRS1.2 IF NOT CTS 30007 M01S06525.274l797 +++| LDN .WCTL-1 30008 M01S06526.274l797 +++| STD T1 LENGTH OF CODE TO MOVE 30009 M01S06527.274l797 +++| PRS1.1 LDM .WCT,T1 30010 M01S06528.274l797 +++| STM /WRITE/WCT6,T1 MOVE COMMAND RETRY CODE 30011 M01S06529.274l797 +++| SOD T1 30012 M01S06530.274l797 +++| PJN PRS1.1 IF MORE CODE TO MOVE 30013 M01S06531.274l797 +++| ISTORE /WRITE/WCTA,(UJN /WRITE/WCT3) 30014 M01S06532.274l797 +++| ISTORE /WRITE/WCTF,(UJN /WRITE/WCT5) 30015 M01S06533.274l797 +++| ISTORE /WRITE/WCTJ,(UJN /WRITE/WCT10) SKIP READ CM BUFFER 30016 M01S06534.274l797 +++| UJN PRS1.3 CONTINUE PRESET 30017 M01S06535.274l797 +++| 30018 M01S06536.274l797 +++| PRS1.2 LDM PRSC 30019 M00S18074.1mt +++| STM /WRITE/WRTA
| Line S18075 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 30020 M01S18075.251l664 ---| LDM PRSD SET *ODA* CALL 30021 M01S18076.251l664 ---| STM /WRITE/PWRB
| Line S00132 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 30022 M01S00132.251l664 +++| LDM PRSD 30023 M01S00133.251l664 +++| STM /WRITE/WRTE 30024 M01S00134.251l664 +++| LDM PRSE 30025 M01S00135.251l664 +++| STM /WRITE/WRTG
| Line S00136 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 30026 M02S00136.274l797 ---| LDM PRSF
| Line S06537 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 30027 M01S06537.274l797 +++| PRS1.3 LDM PRSF
| Line S00137 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 30028 M01S00137.251l664 +++| STM /WRITE/WTFA
| Line S00138 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 30029 M02S00138.274l797 ---| LDC /WRITE/WRT
| Line S06538 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 30030 M01S06538.274l797 +++| LDC UJNI+2
| Line S00139 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 30031 M01S00139.251l664 +++| STM /WRITE/WTFD 30032 M00S18077.1mt +++| LDC ODA
| Line S18078 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 30033 M01S18078.251l664 ---| STM /WRITE/PWRI
| Line S00140 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 30034 M01S00140.251l664 +++| STM /WRITE/WTFC
| Line S18079 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 30035 M01S18079.ns21000 ---| LDM /WRITE/WRTD DISABLE CHECKSUM CALL IF BID POSITIONING 30036 M01S18080.ns21000 ---| STM RDAD 30037 M00S18081.1mt +++| LDM /WRITE/CNWB SET UBC 30038 M00S18082.1mt +++| LPN 77 30039 M00S18083.1mt +++| RAM CNLB 30040 M00S18084.1mt +++| LDD MD 30041 M00S18085.1mt +++| LPN 60 30042 M00S18086.1mt +++| ZJN PRS2 IF NOT CONTROL WORD OPERATION 30043 M00S18087.1mt +++| AOM ODAB 30044 M00S18088.1mt +++| LDD MD 30045 M00S18089.1mt +++| LPN 40 30046 M00S18090.1mt +++| ZJN PRS3 IF NOT 204 WRITE 30047 M00S18091.1mt +++| LDC LBBY SET BLOCK LENGTH 30048 M00S18092.1mt +++| STM CNLC 30049 M00S18093.1mt +++| AOM ODAM 30050 M00S18094.1mt +++| UJN PRS4 CONTINUE PRESET 30051 M00S18095.1mt +++| 30052 M00S18096.1mt +++| PRS2 LDC STDI+CM+4 MODIFY INSTRUCTIONS FOR NON-CONTROL WORD 30053 M00S18097.1mt +++| STM CNLA 30054 M00S18098.1mt +++| PRS3 LDC LDDI+CM+4 30055 M00S18099.1mt +++| STM CNLD 30056 M00S18100.1mt +++| PRS4 LDC PRSA SET FOR INSTRUCTION MODIFICATION 30057 M00S18101.1mt +++| STD CN 30058 M00S18102.1mt +++| LDC PRS5 SET TO RETURN CONTROL HERE AFTER LOAD 30059 M00S18103.1mt +++| STD BT 30060 M00S18104.1mt +++| LJM PRSX RETURN 30061 M00S18105.1mt +++| 30062 M00S18106.1mt +++|* RETURN HERE AFTER ALL ROUTINES LOADED. 30063 M00S18107.1mt +++|* BUILD CALL TO *1LT*. 30064 M00S18108.1mt +++|
| Line S18109 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 30065 M01S18109.274l797 ---| PRS5 RJM /WRITE/CNW CHECK FIRST WRITE
| Line S06539 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 30066 M01S06539.274l797 +++| PRS5 LDD HP 30067 M01S06540.274l797 +++| SHN 21-7 30068 M01S06541.274l797 +++| PJN PRS5.1 IF NOT CTS 30069 M01S06542.274l797 +++| ISTORE /WRITE/WTFF,(ZJN /WRITE/WTF1) 30070 M01S06543.274l797 +++| LDD CN+3 30071 M01S06544.274l797 +++| STM /WRITE/OPTU SAVE OUT POINTER FOR COMMAND RETRY 30072 M01S06545.274l797 +++| LDD CN+4 30073 M01S06546.274l797 +++| STM /WRITE/OPTL 30074 M01S06547.274l797 +++| PRS5.1 RJM /WRITE/CNW CHECK FIRST WRITE 30075 M00S18110.1mt +++| ZJN PRS6 IF WRITE OK
| Line S18111 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 30076 M01S18111.251l664 ---| LJM /WRITE/WTF2 PROCESS ERROR CONDITION
| Line S00141 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 30077 M01S00141.251l664 +++| LJM /WRITE/WTF4 PROCESS ERROR CONDITION 30078 M00S18112.1mt +++| 30079 M00S18113.1mt +++| PRS6 LDD CP MERGE CP NUMBER 30080 M00S18114.1mt +++| SHN -7 30081 M00S18115.1mt +++| RAM CALL+1
| Line S06548 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 30082 M01S06548.274l797 +++| LDD HP 30083 M01S06549.274l797 +++| LPC 7700 ALLOW *1LT* TO TEST FOR CTS 30084 M01S06550.274l797 +++| RAM CALL+2 30085 M00S18116.1mt +++| LDD IA SET INPUT REGISTER ADDRESS IN CALL 30086 M00S18117.1mt +++| STM CALL+4 30087 M00S18118.1mt +++| LDN CMCL CHECK MOVE FLAG 30088 M00S18119.1mt +++| CRD CM 30089 M00S18120.1mt +++| LDD CM
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 30090 M01S00004.271l716 +++| SHN 7 30091 M00S18121.1mt +++| LMD CP 30092 M00S18122.1mt +++| ZJN PRS7 IF MOVE FLAG
| Line S18123 Modification History | |
|---|---|
M01 (Removed by) | ns2027 |
Seq # *Modification Id* Act ----------------------------+ 30093 M01S18123.ns2027 ---| LDN PPAL CHECK IF PP AVAILABLE 30094 M01S18124.ns2027 ---| CRD CM 30095 M01S18125.ns2027 ---| LDD CM+4 30096 M01S18126.ns2027 ---| ZJN PRS7 IF NO PP AVAILABLE 30097 M00S18127.1mt +++| LDD MA WRITE REQUEST BLOCK 30098 M00S18128.1mt +++| CWM CALL,TR 30099 M00S18129.1mt +++| LDN 1 SET TO NOT QUEUE REQUEST 30100 M00S18130.1mt +++| STD CM+1 30101 M00S18131.1mt +++| MONITOR RPPM REQUEST PP 30102 M00S18132.1mt +++| LDD CM+1 30103 M00S18133.1mt +++| NJN PRS8 IF PP ASSIGNED 30104 M00S18134.1mt +++| PRS7 LJM RET2 REQUEUE 30105 M00S18135.1mt +++| 30106 M00S18136.1mt +++| PRS8 STM CPDA SAVE PP INPUT REGISTER ADDRESS 30107 M00S18137.1mt +++| PRS9 LDN 77 DELAY 30108 M00S18138.1mt +++| SBN 1 30109 M00S18139.1mt +++| NJN *-1 30110 M00S18140.1mt +++| LDD MA CHECK FOR *1LT* ACKNOWLEDGE 30111 M00S18141.1mt +++| ADN 1 30112 M00S18142.1mt +++| CRD CM 30113 M00S18143.1mt +++| LDD CM 30114 M00S18144.1mt +++| ZJN PRS11 IF *1LT* READY 30115 M00S18145.1mt +++| RJM CPD CHECK FOR *1LT* DROP 30116 M00S18146.1mt +++| NJN PRS7 IF *1LT* GONE 30117 M00S18147.1mt +++| LDN CMCL CHECK MOVE FLAG 30118 M00S18148.1mt +++| CRD CM 30119 M00S18149.1mt +++| LDD CM
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 30120 M01S00005.271l716 +++| SHN 7 30121 M00S18150.1mt +++| LMD CP 30122 M00S18151.1mt +++| NJN PRS9 IF NO MOVE FLAG FOR THIS CP 30123 M00S18152.1mt +++| RJM CEC CHANGE BACK TO MAGNET CP 30124 M00S18153.1mt +++| PRS10 RJM CPD CHECK PP DROP 30125 M00S18154.1mt +++| NJN PRS7 IF *1LT* GONE 30126 M00S18155.1mt +++| PAUSE NE 30127 M00S18156.1mt +++| UJN PRS10 LOOP 30128 M00S18157.1mt +++| 30129 M00S18158.1mt +++| PRS11 LDC /SRU/ITWL*100 SET SRU INCREMENT 30130 M00S18159.1mt +++| STM //CECA 30131 M00S18160.1mt +++| LDC 4000 SET BLOCKS WRITTEN FLAG 30132 M00S18161.1mt +++| STD BT 30133 M00S18162.1mt +++| LDD HP
| Line S18163 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 30134 M01S18163.274l797 ---| SHN 21-4
| Line S06551 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 30135 M01S06551.274l797 +++| SHN 21-7 30136 M01S06552.274l797 +++| MJN PRS12 IF CTS 30137 M01S06553.274l797 +++| SHN 21-4-21+7 30138 M00S18164.1mt +++| PJN PRS13 IF NOT ATS UNIT 30139 M00S18165.1mt +++| 30140 M00S18166.1mt +++|* CHECK IF MOTION AHEAD ALLOWED. MOTION AHEAD IS NOT ALLOWED 30141 M00S18167.1mt +++|* ON ANY GCR UNIT AT 1X PPU SPEED OR ON A 200 IPS GCR UNIT. 30142 M00S18168.1mt +++| 30143 M00S18169.1mt +++| SHN 21-1-21+4 30144 M00S18170.1mt +++| PJN PRS13 IF UNIT NOT CAPABLE OF 6250 BPI 30145 M00S18171.1mt +++| LDM DLYA 30146 M00S18172.1mt +++| LPN 14 30147 M00S18173.1mt +++| ZJN PRS12 IF 1X PPU SPEED 30148 M00S18174.1mt +++| LDD HP 30149 M00S18175.1mt +++| LPN 10 30150 M00S18176.1mt +++| LMN 10 30151 M00S18177.1mt +++| NJN PRS13 IF NOT 200 IPS UNIT 30152 M00S18178.1mt +++| PRS12 LDC UJNI+2 DISABLE MOTION AHEAD 30153 M00S18179.1mt +++| STM ODAA-1 30154 M00S18180.1mt +++| LDC RJMI 30155 M00S18181.1mt +++| STM RDAC 30156 M00S18182.1mt +++| LDC UJNI+ODA3-ODAG 30157 M00S18183.1mt +++| STM ODAG
| Line S18184 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 30158 M01S18184.251l664 ---| PRS13 LJM /WRITE/WTF ENTER WRITE CODE
| Line S00142 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 30159 M01S00142.251l664 +++| PRS13 LJM /WRITE/WTF1 ENTER WRITE CODE 30160 M00S18185.1mt +++| 30161 M00S18186.1mt +++| PRSA TSAD SLBP 30162 M00S18187.1mt +++| PRSB CHTB 30163 M00S18188.1mt +++| PRSC BSS 0 30164 M00S18189.1mt +++| LOC /WRITE/WRTA 30165 M00S18190.1mt +++| UJN /WRITE/WRT2 SET UP FOR LONG BLOCK WRITE 30166 M00S18191.1mt +++| LOC *O 30167 M00S18192.1mt +++| 30168 M00S18193.1mt +++| PRSD BSS 0
| Line S18194 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 30169 M01S18194.251l664 ---| LOC /WRITE/PWRB 30170 M01S18195.251l664 ---| UJN /WRITE/PWR3 PROCESS LONG BLOCK WRITE
| Line S00143 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 30171 M01S00143.251l664 +++| LOC /WRITE/WRTE 30172 M01S00144.251l664 +++| UJN /WRITE/WRT3.1 LONG BLOCKS 30173 M00S18196.1mt +++| LOC *O
| Line S00145 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 30174 M01S00145.251l664 +++| 30175 M01S00146.251l664 +++| PRSE BSS 0 30176 M01S00147.251l664 +++| LOC /WRITE/WRTG 30177 M01S00148.251l664 +++| UJN /WRITE/WRT5 LONG BLOCKS 30178 M01S00149.251l664 +++| LOC *O 30179 M01S00150.251l664 +++| 30180 M01S00151.251l664 +++| PRSF BSS 0 30181 M01S00152.251l664 +++| LOC /WRITE/WTFA 30182 M01S00153.251l664 +++| UJN /WRITE/WTF1 LONG BLOCKS 30183 M01S00154.251l664 +++| LOC *O
| Line S00274 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 30184 M01S00274.1mt51 +++| TITLE PRESET SUBROUTINES. 30185 M00S18197.1mt +++| SRC SPACE 4,15 30186 M00S18198.1mt +++|** SRC - SET RESIDENT CONTROLLER ROUTINE. 30187 M00S18199.1mt +++|* 30188 M00S18200.1mt +++|* ENTRY (T3) = CONTROLLER/PP TYPE.
| Line S18201 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 30189 M01S18201.ns21000 ---|* 0 = CYBER 170-8X5 IOU.
| Line S00267 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 30190 M02S00267.1mt51 ---|* 0 = CYBER 170-815/825/835/855 IOU.
| Line S18202 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 30191 M01S18202.1mt51 ---|* 1 = MTS CONTROLLER. 30192 M01S18203.1mt51 ---|* 2 = ATS CONTROLLER.
| Line S00275 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 30193 M01S00275.1mt51 +++|* 0 = CYBER 180 IOU. 30194 M01S00276.1mt51 +++|* 1 = MTS CONTROLLER (NON-CYBER 180). 30195 M01S00277.1mt51 +++|* 2 = ATS CONTROLLER (NON-CYBER 180). 30196 M00S18204.1mt +++|* 30197 M00S18205.1mt +++|* EXIT TAPE OUTPUT ROUTINE PRESET. 30198 M00S18206.1mt +++|* 30199 M00S18207.1mt +++|* USES T1, T2. 30200 M00S18208.1mt +++|* 30201 M00S18209.1mt +++|* CALLS MCH. 30202 M00S18210.1mt +++| 30203 M00S18211.1mt +++| 30204 M00S18212.1mt +++| SRC SUBR ENTRY/EXIT 30205 M00S18213.1mt +++| LDM SRCB,T3 ADDRESS OF OUTPUT ROUTINE 30206 M00S18214.1mt +++| ZJN SRC2 IF RESIDENT ROUTINE USED 30207 M00S18215.1mt +++| STM SRCA 30208 M00S18216.1mt +++| LDN .OPALC-1 BYTES TO COPY 30209 M00S18217.1mt +++| STD T1 30210 M00S18218.1mt +++| SRC1 LDM **,T1 30211 M00S18219.1mt +++| SRCA EQU *-1 30212 M00S18220.1mt +++| STM .OPAA,T1 COPY OVER RESIDENT TAPE IO ROUTINE 30213 M00S18221.1mt +++| SOD T1 30214 M00S18222.1mt +++| PJN SRC1 IF COPY NOT COMPLETE 30215 M00S18223.1mt +++| LDM SRCC,T3 ADDRESS OF CHANNEL TABLE 30216 M00S18224.1mt +++| RJM MCH UPDATE CHANNELS 30217 M00S18225.1mt +++| SRC2 LDM SRCD,T3 ADDRESS OF ADDRESSES TO MODIFY 30218 M00S18226.1mt +++| STD T2 30219 M00S18227.1mt +++| SRC3 LDI T2 ADDRESS TO CHANGE 30220 M00S18228.1mt +++| STD T1 30221 M00S18229.1mt +++| ZJN SRCX IF END OF TABLE ENCOUNTERED 30222 M00S18230.1mt +++| AOD T2 30223 M00S18231.1mt +++| LDI T2 30224 M00S18232.1mt +++| STI T1 CHANGE CONTENTS OF ADDRESS 30225 M00S18233.1mt +++| AOD T2 30226 M00S18234.1mt +++| UJN SRC3 CONTINUE MODIFYING ADDRESSES 30227 M00S18235.1mt +++| 30228 M00S18236.1mt +++|* ADDRESS OF OUTPUT ROUTINES. 30229 M00S18237.1mt +++|
| Line S18238 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 30230 M01S18238.ns21000 ---| SRCB CON .OPA CYBER 170-8X5 IOU
| Line S00268 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 30231 M02S00268.1mt51 ---| SRCB CON .OPA CYBER 170-815/825/835/855 IOU
| Line S18239 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 30232 M01S18239.1mt51 ---| CON .OPD MTS 30233 M01S18240.1mt51 ---| CON 0 ATS
| Line S00278 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 30234 M01S00278.1mt51 +++| SRCB CON 0 CYBER 180 IOU 30235 M01S00279.1mt51 +++| CON .OPD MTS (NON-CYBER 180) 30236 M01S00280.1mt51 +++| CON .OPA ATS (NON-CYBER 180) 30237 M00S18241.1mt +++| 30238 M00S18242.1mt +++|* ADDRESSES OF CHANNEL TABLES. 30239 M00S18243.1mt +++|
| Line S18244 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 30240 M01S18244.ns21000 ---| SRCC CON .OPAC CYBER 170-8X5 IOU
| Line S00269 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 30241 M02S00269.1mt51 ---| SRCC CON .OPAC CYBER 170-815/825/835/855 IOU
| Line S18245 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 30242 M01S18245.1mt51 ---| CON .OPDA MTS 30243 M01S18246.1mt51 ---| CON 0 ATS
| Line S00281 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 30244 M01S00281.1mt51 +++| SRCC CON 0 CYBER 180 IOU 30245 M01S00282.1mt51 +++| CON .OPDA MTS (NON-CYBER 180) 30246 M01S00283.1mt51 +++| CON .OPAC ATS (NON-CYBER 180) 30247 M00S18247.1mt +++| 30248 M00S18248.1mt +++|* ADDRESSES OF ADDRESS MODIFICATION TABLES. 30249 M00S18249.1mt +++|
| Line S18250 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 30250 M01S18250.ns21000 ---| SRCD CON SRCE CYBER 170-8X5 IOU
| Line S00270 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 30251 M02S00270.1mt51 ---| SRCD CON SRCE CYBER 170-815/825/835/855 IOU
| Line S18251 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 30252 M01S18251.1mt51 ---| CON SRCG MTS 30253 M01S18252.1mt51 ---| CON SRCF ATS
| Line S00284 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 30254 M01S00284.1mt51 +++| SRCD CON SRCE CYBER 180 IOU 30255 M01S00285.1mt51 +++| CON SRCG MTS (NON-CYBER 180) 30256 M01S00286.1mt51 +++| CON SRCF ATS (NON-CYBER 180) 30257 M00S18253.1mt +++| 30258 M00S18254.1mt +++| 30259 M00S18255.1mt +++|** ADDRESS MODIFICATION TABLES. 30260 M00S18256.1mt +++|
| Line S18257 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 30261 M01S18257.ns21000 ---| SRCE CON ODAJ,OPI CYBER 170-8X5 IOU
| Line S00271 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 30262 M02S00271.1mt51 ---| SRCE CON ODAJ,OPI CYBER 170-815/825/835/855 IOU
| Line S00287 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 30263 M01S00287.1mt51 +++| SRCE CON ODAJ,OPI CYBER 180 IOU 30264 M00S18258.1mt +++| CON ODAK,OPE 30265 M00S18259.1mt +++| CON SRQA,PSNI 30266 M00S18260.1mt +++| CON ODAD,OPIA 30267 M00S18261.1mt +++| CON ODAC,OPIB 30268 M00S18262.1mt +++| CON ODAH,OPEB 30269 M00S18263.1mt +++| CON ODAI,OPEA
| Line S18264 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 30270 M01S18264.1mt51 ---| CON ODAE,IJMI 30271 M00S18265.1mt +++| CON ODAF,OPEA 30272 M00S18266.1mt +++| CON 0 30273 M00S18267.1mt +++|
| Line S18268 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 30274 M01S18268.1mt51 ---| SRCF CON ODAJ,OPA ATS
| Line S00288 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 30275 M01S00288.1mt51 +++| SRCF CON ODAJ,OPA ATS (NON-CYBER 180)
Proceed to Part 23
cdc/nos2.source/opl.opl871/deck/1mt.022.txt · Last modified: by 127.0.0.1