cdc:nos2.source:opl.opl871:deck:1ds.002
Deck 1DS Part 002
41 Modifications
Listing Sections
- Deck 1DS Start
- Deck 1DS Part 1 (Line 1845)
- Deck 1DS Part 2 (Line 2762)
- Deck 1DS Part 3 (Line 4367)
- Deck 1DS Part 4 (Line 5629)
- Deck 1DS Part 5 (Line 6676)
Source
Seq # *Modification Id* Act ----------------------------+ 02762 M01S02299.1ds +++| ADN 1 02763 M01S02300.1ds +++| CWD CM 02764 M01S02301.1ds +++| CKP5 LDD CP INDICATE CPU STATUS AT ROLLOUT 02765 M01S02302.1ds +++| ADN STSW 02766 M01S02303.1ds +++| CRD CM 02767 M01S02304.1ds +++| LDN 2 02768 M01S02305.1ds +++| RAD CM+2 02769 M01S02306.1ds +++| LDD CP 02770 M01S02307.1ds +++| ADN STSW 02771 M01S02308.1ds +++| CWD CM 02772 M01S02309.1ds +++| CKP6 LJM CKPX RETURN 02773 M01S00113.271l716 +++| CLR SPACE 4,10 02774 M01S00114.271l716 +++|*** FUNCTION CLRF - SET/CLEAR PAUSE BIT. 02775 M01S00115.271l716 +++|* 02776 M01S00116.271l716 +++|* ENTRY (IR+3) = 0 IF CLEARING PAUSE BIT. 02777 M01S00117.271l716 +++|* = 1 IF SETTING PAUSE BIT. 02778 M01S00118.271l716 +++|* (IR+4) = 6/ KEYBOARD BUFFER OFFSET, 6/. 02779 M01S00119.271l716 +++|* 02780 M01S00120.271l716 +++|* EXIT TO *ISC* IF JOB NOT AT CP. 02781 M01S00121.271l716 +++| 02782 M01S00122.271l716 +++| 02783 M01S00123.271l716 +++| CLR4 LDM CLR SET RETURN ADDRESS 02784 M01S00124.271l716 +++| STM ISC 02785 M01S00125.271l716 +++| LJM ISC+1 INITIATE JOB CALL AND EXIT 02786 M01S00126.271l716 +++| 02787 M01S00127.271l716 +++| CLR ENTRY ENTRY/EXIT 02788 M01S00128.271l716 +++| LDC /1DS/DSDL+/1DS/KBCML FETCH PARAMETER WORD 02789 M01S00129.271l716 +++| CRD FN 02790 M01S00130.271l716 +++| LDN ERLN/10000 SET DEFAULT DAYFILE 02791 M01S00131.271l716 +++| STD T4 02792 M01S00132.271l716 +++| LDD FN+1 02793 M01S00133.271l716 +++| LPN 77 02794 M01S00134.271l716 +++| NJN CLR1 IF NOT JSN FOR SUBSYSTEM 02795 M01S00135.271l716 +++| LDN 1R 02796 M01S00136.271l716 +++| RAD FN+1 02797 M01S00137.271l716 +++| CLR1 LDD FN+2 02798 M01S00138.271l716 +++| NJN CLRX IF INCORRECT JSN 02799 M01S00139.271l716 +++| RJM SSJ SEARCH FOR SPECIFIED JOB 02800 M01S00140.271l716 +++| NJN CLR4 IF JOB NOT FOUND 02801 M01S00141.271l716 +++| CLR2 LDD CP 02802 M01S00142.271l716 +++| ADN SNSW 02803 M01S00143.271l716 +++| CRD CM 02804 M01S00144.271l716 +++| ADN MS2W-SNSW 02805 M01S00145.271l716 +++| CRD CN 02806 M01S00146.271l716 +++| LDN 0 CLEAR MESSAGE 02807 M01S00147.271l716 +++| STD CN 02808 M01S00148.271l716 +++| LDD CM+3 SET/CLEAR PAUSE BIT IN CPA 02809 M01S00149.271l716 +++| SCN 3 02810 M01S00150.271l716 +++| LMD IR+3 02811 M01S00151.271l716 +++| STD CM+3 02812 M01S00152.271l716 +++| LDD CP 02813 M01S00153.271l716 +++| ADN SNSW 02814 M01S00154.271l716 +++| CWD CM 02815 M01S00155.271l716 +++| ADN MS2W-SNSW 02816 M01S00156.271l716 +++| CWD CN 02817 M01S00157.271l716 +++| LDD FL 02818 M01S00158.271l716 +++| ZJN CLR3 IF NO FIELD LENGTH 02819 M01S00159.271l716 +++| LDD RA 02820 M01S00160.271l716 +++| SHN 6 02821 M01S00161.271l716 +++| CRD FS 02822 M01S00162.271l716 +++| LDD FS+3 SET/CLEAR PAUSE FLAGS IN (RA) 02823 M01S00163.271l716 +++| SCN 3 02824 M01S00164.271l716 +++| LMD IR+3 02825 M01S00165.271l716 +++| STD FS+3 02826 M01S00166.271l716 +++| LDD RA STORE (RA) 02827 M01S00167.271l716 +++| SHN 6 02828 M01S00168.271l716 +++| CWD FS 02829 M01S00169.271l716 +++| CLR3 LDD T4 ISSUE DAYFILE MESSAGE 02830 M01S00170.271l716 +++| SHN 14 02831 M01S00171.271l716 +++| ADM CLRA,IR+3 02832 M01S00172.271l716 +++| RJM DFM 02833 M01S00173.271l716 +++| LJM CLRX RETURN 02834 M01S00174.271l716 +++| 02835 M01S00175.271l716 +++| 02836 M01S00176.271l716 +++| CLRA CON MSGA 02837 M01S00177.271l716 +++| CON MSGB 02838 M01S00178.271l716 +++| TITLE OVERLAYABLE SUBROUTINES. 02839 M01S02310.1ds +++| CCP SPACE 4,15 02840 M01S02311.1ds +++|** CCP - CHANGE CONTROL POINT. 02841 M01S02312.1ds +++|* 02842 M01S02313.1ds +++|* ENTRY (T6) = CONTROL POINT NUMBER. 02843 M01S02314.1ds +++|* (T7) = SYSTEM CONTROL POINT NUMBER. 02844 M01S02315.1ds +++|* 02845 M01S02316.1ds +++|* EXIT (A) = 0 IF CHANGE MADE. 02846 M01S02317.1ds +++|*
| Line S02318 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02847 M02S02318.273l780 ---|* USES T5. 02848 M01S00001.273l780 +++|* USES CM+1, T5. 02849 M01S02319.1ds +++|* 02850 M01S02320.1ds +++|* CALLS CSJ. 02851 M01S02321.1ds +++|*
| Line S02322 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02852 M02S02322.273l780 ---|* MACROS DELAY, MONITOR, PAUSE. 02853 M01S00002.273l780 +++|* MACROS DELAY, MONITOR. 02854 M01S02323.1ds +++| 02855 M01S02324.1ds +++|
| Line S02325 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02856 M02S02325.273l780 ---| CCP2 LDD T7 RESET SYSTEM CP ADDRESS
| Line S02326 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02857 M02S02326.273l780 ---| SHN 7
| Line S02327 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02858 M02S02327.273l780 ---| STD CP
| Line S02328 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02859 M02S02328.273l780 ---| PAUSE NE RESET RA AND FL
| Line S02329 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02860 M02S02329.273l780 ---| DELAY 02861 M01S00003.273l780 +++| CCP2 DELAY 02862 M01S02330.1ds +++| SOD T5 02863 M01S02331.1ds +++| PJN CCP1 IF RETRY COUNT NOT EXHAUSTED 02864 M01S02332.1ds +++| 02865 M01S02333.1ds +++| CCP SUBR ENTRY/EXIT 02866 M01S02334.1ds +++| LDN 10-1 SET RETRY COUNT 02867 M01S02335.1ds +++| STD T5 02868 M01S02336.1ds +++| CCP1 LDD T6 CHANGE TO REQUESTED CP 02869 M01S00007.ns2765 +++| ADD TH SET REJECT ON STORAGE MOVE 02870 M01S00008.ns2765 +++| ERRNZ RCMS-1000 02871 M01S02337.1ds +++| STD CM+1
| Line S02338 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02872 M02S02338.273l780 ---| SHN 7 SET CP ADDRESS
| Line S02339 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02873 M02S02339.273l780 ---| STD CP 02874 M01S02340.1ds +++| MONITOR CCAM 02875 M01S02341.1ds +++| LDD CM+1 02876 M01S02342.1ds +++| NJN CCP2 IF CHANGE REJECTED 02877 M01S02343.1ds +++| RJM CSJ RECHECK JSN 02878 M01S02344.1ds +++| ZJN CCPX IF JOB STILL AT CP 02879 M01S02345.1ds +++| LDD T7 02880 M01S02346.1ds +++| STD CM+1
| Line S02347 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02881 M02S02347.273l780 ---| SHN 7
| Line S02348 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02882 M02S02348.273l780 ---| STD CP 02883 M01S02349.1ds +++| MONITOR CCAM MOVE BACK TO SYSTEM CP 02884 M01S02350.1ds +++| LDN 1 02885 M01S02351.1ds +++| UJN CCPX RETURN 02886 M01S02352.1ds +++| CSJ SPACE 4,10 02887 M01S02353.1ds +++|** CSJ - CHECK CP FOR SPECIFIED JOB. 02888 M01S02354.1ds +++|* 02889 M01S02355.1ds +++|* ENTRY (T6) = CP NUMBER. 02890 M01S02356.1ds +++|* (FN - FN+1) = JSN OF SPECIFIED JOB. 02891 M01S02357.1ds +++|* 02892 M01S02358.1ds +++|* EXIT (A) = 0 IF JOB EXECUTING AT CP. 02893 M01S02359.1ds +++|* 02894 M01S02360.1ds +++|* USES AB - AB+4, CM - CM+4. 02895 M01S02361.1ds +++|* 02896 M01S02362.1ds +++|* MACROS SFA. 02897 M01S02363.1ds +++| 02898 M01S02364.1ds +++| 02899 M01S02365.1ds +++| CSJ SUBR ENTRY/EXIT 02900 M01S02366.1ds +++| LDD T6 FETCH EJT ORDINAL 02901 M01S02367.1ds +++| SHN 7 02902 M01S02368.1ds +++| ADN TFSW 02903 M01S02369.1ds +++| CRD CM 02904 M01S02370.1ds +++| LDD CM 02905 M01S02371.1ds +++| ZJN CSJ1 IF CP INACTIVE 02906 M01S02372.1ds +++| SFA EJT 02907 M01S02373.1ds +++| ADK JSNE READ EJT ENTRY 02908 M01S02374.1ds +++| CRD AB 02909 M01S02375.1ds +++| LDD AB+1 COMPARE JSN 02910 M01S02376.1ds +++| LMD FN+1 02911 M01S02377.1ds +++| NJN CSJX IF NO MATCH 02912 M01S02378.1ds +++| LDD AB 02913 M01S02379.1ds +++| CSJ1 LMD FN 02914 M01S02380.1ds +++| NJN CSJX IF NO MATCH 02915 M01S02381.1ds +++| LDD AB+4 02916 M01S02382.1ds +++| LPN 76 02917 M01S02383.1ds +++| LMN EXJS*2 02918 M01S02384.1ds +++| UJN CSJX RETURN 02919 M01S02385.1ds +++| SSJ SPACE 4,10 02920 M01S02386.1ds +++|** SEJ - SEARCH CP-S FOR SPECIFIED JOB. 02921 M01S02387.1ds +++|* 02922 M01S02388.1ds +++|* ENTRY (FN - FN+1) = JSN OF SPECIFIED JOB. 02923 M01S02389.1ds +++|* 02924 M01S02390.1ds +++|* EXIT (A) = 0 IF SPECIFIED JOB ACTIVE AT CP. 02925 M01S02391.1ds +++|* (T4) = MESSAGE OFFSET + DAYFILE OPTION. 02926 M01S02392.1ds +++|* 02927 M01S02393.1ds +++|* USES T6, T7. 02928 M01S02394.1ds +++|* 02929 M01S02395.1ds +++|* CALLS CCP, CSJ. 02930 M01S02396.1ds +++| 02931 M01S02397.1ds +++| 02932 M01S02398.1ds +++| SSJ2 LDD FN 02933 M01S02399.1ds +++| LMC 2RSY 02934 M01S02400.1ds +++| NJN SSJX IF NOT SYSTEM JSN 02935 M01S02401.1ds +++| LDD FN+1 02936 M01S02402.1ds +++| LMC 2RS 02937 M01S02403.1ds +++| 02938 M01S02404.1ds +++| SSJ SUBR ENTRY/EXIT 02939 M01S02405.1ds +++| LDN 0 02940 M01S02406.1ds +++| STD T6 02941 M01S02407.1ds +++| LDD CP SET SYSTEM CP NUMBER 02942 M01S02408.1ds +++| SHN -7 02943 M01S02409.1ds +++| STD T7 02944 M01S02410.1ds +++| SSJ1 AOD T6 ADVANCE CP 02945 M01S02411.1ds +++| LMD T7 02946 M01S02412.1ds +++| ZJN SSJ2 IF ALL CP-S CHECKED 02947 M01S02413.1ds +++| RJM CSJ CHECK FOR SPECIFIED JOB 02948 M01S02414.1ds +++| NJN SSJ1 IF JOB NOT ACTIVE AT THIS CP 02949 M01S02415.1ds +++| LDC 2S6 CHANGE DAYFILE/MESSAGE OFFSET 02950 M01S02416.1ds +++| STD T4 02951 M01S02417.1ds +++| RJM CCP CHANGE TO CP 02952 M01S02418.1ds +++| UJN SSJX RETURN 02953 M01S02419.1ds +++| SPACE 4,10 02954 M01S02420.1ds +++|** OVERLAID MESSAGES. 02955 M01S02421.1ds +++| 02956 M01S02422.1ds +++| 02957 M01S02423.1ds +++| MSGA DATA C*DS, GO.* 02958 M01S02424.1ds +++| MSGB DATA C*DS, PAUSE.* 02959 M01S02425.1ds +++| TITLE PRESET. 02960 M01S00076.1ds21 +++| QUAL PRESET 02961 M01S02426.1ds +++| PRS SPACE 4,10 02962 M01S02427.1ds +++|** PRS - PRESET. 02963 M01S02428.1ds +++|* 02964 M01S02429.1ds +++|* EXIT (IDSA) = FUNCTION PROCESSOR ADDRESS. 02965 M01S02430.1ds +++|* (IDSC) = ORIGINAL (IR+2). 02966 M01S02431.1ds +++|* (BA) = BUFFER ADDRESS. 02967 M01S02432.1ds +++|* (CA) = COMMAND ADDRESS. 02968 M01S02433.1ds +++|* (FG) = CPU FLAGS. 02969 M01S02434.1ds +++|* (JF) = DEFAULT FIELD LENGTH. 02970 M01S02435.1ds +++|* (CP) = CONTROL POINT ADDRESS. 02971 M01S00001.1ds25 +++|* (QA) = 0. 02972 M01S02436.1ds +++|* (IR+2) = REQ. 02973 M01S02437.1ds +++|* 02974 M01S02438.1ds +++|* CALLS IFP. 02975 M01S02439.1ds +++|*
| Line S02440 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02976 M02S02440.273l780 ---|* MACROS MONITOR, PAUSE, SFA. 02977 M01S00004.273l780 +++|* MACROS DELAY, MONITOR, SFA. 02978 M01S02441.1ds +++| 02979 M01S02442.1ds +++| 02980 M01S02443.1ds +++| PRS SUBR ENTRY/EXIT 02981 M01S00002.1ds25 +++| LDN 0 PRESET DIRECT CELLS 02982 M01S00003.1ds25 +++| STD QA
| Line S02444 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 1ds21 |
Seq # *Modification Id* Act ----------------------------+ 02983 M02S02444.1ds21 ---| LDC BUF SET SECTOR BUFFER ADDRESS 02984 M01S00077.1ds21 +++| LDC /OVERLAY/BUF SET SECTOR BUFFER ADDRESS 02985 M01S02445.1ds +++| STD BA 02986 M01S02446.1ds +++| ADN 2 SET COMMAND ADDRESS 02987 M01S02447.1ds +++| STD CA 02988 M01S02448.1ds +++| LDN CPMR SET RETRY COUNT 02989 M01S02449.1ds +++| STD S1 02990 M01S02450.1ds +++| LDC DFFL/100 SET DEFAULT FIELD LENGTH 02991 M01S02451.1ds +++| STD JF 02992 M01S02452.1ds +++| LDN 5 SET CONSTANT FIVE 02993 M01S02453.1ds +++| STD FV
| Line S02454 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02994 M02S02454.271l716 ---| LDD IR+2
| Line S02455 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02995 M02S02455.271l716 ---| STM IDSC SAVE PARAMETER 02996 M01S00179.271l716 +++| LDN NCPL GET NUMBER OF CP-S 02997 M01S00180.271l716 +++| CRD CM 02998 M01S00181.271l716 +++| ADK MABL-NCPL FETCH HARDWARE OPTIONS 02999 M01S00182.271l716 +++| CRD CN 03000 M01S00183.271l716 +++| ADK PCPP-MABL GET FWA OF PCP AREA 03001 M01S00184.271l716 +++| CRD FS 03002 M01S00185.271l716 +++| AOD CM+1 SET SYSTEM CP NUMBER 03003 M01S00186.271l716 +++| STD NC 03004 M01S00187.271l716 +++| LDD FS+3 03005 M01S00188.271l716 +++| RAM SCPA-1 03006 M01S00189.271l716 +++| LDD FS+4 SET PCP AREA BASE ADDRESS 03007 M01S00190.271l716 +++| STM SCPA 03008 M01S00191.271l716 +++| LDD IR+2 SAVE PARAMETERS 03009 M01S00192.271l716 +++| STM IDSC 03010 M01S02456.1ds +++| LPN 77 GET FUNCTION CODE 03011 M01S02457.1ds +++| STD IR+2 03012 M01S02458.1ds +++| SBN /1DS/MAXF 03013 M01S02459.1ds +++| PJN PRS3 IF INCORRECT FUNCTION 03014 M01S02460.1ds +++| RJM IFP INITIALIZE *SFA* MACRO
| Line S02461 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03015 M02S02461.271l716 ---| LDK MABL GET MAINFRAME TYPE
| Line S02462 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03016 M02S02462.271l716 ---| CRD CN 03017 M01S02463.1ds +++| LDD CN+1 03018 M01S02464.1ds +++| STD FG 03019 M01S02465.1ds +++| SHN -11 03020 M01S02466.1ds +++| LMN 7 03021 M01S02467.1ds +++| NJN PRS1 IF NOT A CYBER 176
| Line S02468 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 1ds21 |
Seq # *Modification Id* Act ----------------------------+ 03022 M02S02468.1ds21 ---| AOM ICJF+2 03023 M01S00078.1ds21 +++| AOM /OVERLAY/ICJF+2 03024 M01S02469.1ds +++| PRS1 LDM IDSC 03025 M01S02470.1ds +++| SHN 21-12
| Line S02471 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | ns2765 |
Seq # *Modification Id* Act ----------------------------+ 03026 M02S02471.ns2765 ---| MJN PRS2 IF CP HAS MOVED 03027 M01S00009.ns2765 +++| MJN PRS2 IF CP CHANGE REQUIRED 03028 M01S02472.1ds +++| LJM PRS7 PROCESS FUNCTION 03029 M01S02473.1ds +++| 03030 M01S02474.1ds +++| PRS2 LDD IR+4 SET CP NUMBER 03031 M01S02475.1ds +++| LPN 37 03032 M01S02476.1ds +++| STD TN 03033 M01S02477.1ds +++| NJN PRS4 IF ASSIGNED 03034 M01S02478.1ds +++| PRS3 LJM IDS2 DROP PP 03035 M01S02479.1ds +++|
| Line S02480 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | ns2765 |
Seq # *Modification Id* Act ----------------------------+ 03036 M02S02480.ns2765 ---| PRS4 STD CM+1 03037 M01S00010.ns2765 +++| PRS4 ADD TH SET REJECT ON STORAGE MOVE 03038 M01S00011.ns2765 +++| ERRNZ RCMS-1000 03039 M01S00012.ns2765 +++| STD CM+1 03040 M01S00013.ns2765 +++| LPN 77 03041 M01S02481.1ds +++| SHN 7
| Line S02482 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 03042 M02S02482.273l780 ---| STD CP 03043 M01S02483.1ds +++| ADN TFSW READ EJTO AND JSN 03044 M01S02484.1ds +++| CRD CN 03045 M01S02485.1ds +++| LDD CN 03046 M01S02486.1ds +++| ZJN PRS3 IF NO EJTO 03047 M01S02487.1ds +++| SFA EJT READ EJT ENTRY 03048 M01S02488.1ds +++| CRD CN 03049 M01S02489.1ds +++| LDD CN+4 CHECK JOB STATUS 03050 M01S02490.1ds +++| LPN 76 03051 M01S02491.1ds +++| LMN EXJS*2 03052 M01S02492.1ds +++| NJN PRS5 IF JOB NOT AT CONTROL POINT 03053 M01S02493.1ds +++| MONITOR CCAM MOVE TO USER-S CP 03054 M01S02494.1ds +++| LDD CM+1 03055 M01S02495.1ds +++| ZJN PRS6 IF MOVE SUCCESSFUL 03056 M01S02496.1ds +++| DELAY 4*10 DELAY FOR 4 MILLISECONDS 03057 M01S02497.1ds +++| SOD S1 03058 M01S02498.1ds +++| ZJN PRS5 IF RETRY COMPLETE 03059 M01S02499.1ds +++| LDD TN RESET CONTROL POINT NUMBER 03060 M01S02500.1ds +++| UJN PRS4 RETRY CONTROL POINT MOVE 03061 M01S02501.1ds +++| 03062 M01S02502.1ds +++| PRS5 LJM IDS2 DROP PP 03063 M01S02503.1ds +++|
| Line S02504 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 03064 M02S02504.273l780 ---| PRS6 PAUSE NE RESTORE RA AND FL
| Line S02505 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 03065 M02S02505.273l780 ---| LDD IR+1 03066 M01S00005.273l780 +++| PRS6 LDD IR+1 03067 M01S02506.1ds +++| SCN 77 03068 M01S02507.1ds +++| LMD TN 03069 M01S02508.1ds +++| STD IR+1 03070 M01S02509.1ds +++| LDD CP READ JSN FROM EJT ENTRY 03071 M01S02510.1ds +++| ADN TFSW 03072 M01S02511.1ds +++| CRD CM 03073 M01S02512.1ds +++| SFA EJT,CM 03074 M01S02513.1ds +++| CRD CM 03075 M01S02514.1ds +++| LDD CN CHECK FOR SAME JOB 03076 M01S02515.1ds +++| LMD CM 03077 M01S02516.1ds +++| NJN PRS5 IF DIFFERENT JOB 03078 M01S02517.1ds +++| LDD CN+1 03079 M01S02518.1ds +++| LMD CM+1 03080 M01S02519.1ds +++| NJN PRS5 IF DIFFERENT JOB 03081 M01S02520.1ds +++| PRS7 LDD IR+2 GET FUNCTION CODE 03082 M01S02521.1ds +++| SHN 1 03083 M01S02522.1ds +++| STD CM 03084 M01S02523.1ds +++| LDM TRQP,CM SET/GET PROCESSOR ADDRESS 03085 M01S02524.1ds +++| ZJN PRS5 IF FUNCTION NOT DEFINED 03086 M01S02525.1ds +++| STM IDSA 03087 M01S02526.1ds +++| LJM PRSX EXIT 03088 M01S02527.1ds +++| TRQP SPACE 4,10 03089 M01S02528.1ds +++|** TRQP - TABLE OF REQUEST PROCESSORS. 03090 M01S02529.1ds +++|* ENTRY = 2 WORDS. 03091 M01S02530.1ds +++|* INDEXED BY REQUEST NUMBER * 2. 03092 M01S02531.1ds +++|* 03093 M01S02532.1ds +++|*T, 12/ ADDR, 12/ OVLN
Figure
03094 M01S02533.1ds +++|* ADDR ADDRESS OF REQUEST PROCESSOR. 03095 M01S02534.1ds +++|* OVLN OVERLAY NUMBER. 03096 M01S02535.1ds +++| 03097 M01S02536.1ds +++| 03098 M01S02537.1ds +++| TRQP INDEX 03099 M01S02538.1ds +++| 03100 M01S02539.1ds +++|* FUNCTION *FASF* MUST REMAIN FIRST. 03101 M01S02540.1ds +++| 03102 M01S02541.1ds +++| FCN /1DS/FASF,0 03103 M01S02542.1ds +++| 03104 M01S02543.1ds +++| 03105 M01S02544.1ds +++| FCN /1DS/AEJF,AEJ 03106 M01S02545.1ds +++| FCN /1DS/CLRF,CLR 03107 M01S02546.1ds +++| FCN /1DS/CKPF,CKP 03108 M01S02547.1ds +++| FCN /1DS/DCMF,DCM 03109 M01S02548.1ds +++| FCN /1DS/DIAF,DIA 03110 M01S02549.1ds +++| FCN /1DS/DISF,DIS 03111 M01S02550.1ds +++| FCN /1DS/DSPF,DSP 03112 M01S02551.1ds +++| FCN /1DS/DSSF,DSS 03113 M01S02552.1ds +++| FCN /1DS/DWNF,DWN 03114 M01S00001.ns2767 +++| FCN /1DS/UPCF,DWN 03115 M01S02553.1ds +++| FCN /1DS/EBRF,EBR 03116 M01S02554.1ds +++| FCN /1DS/ECBF,ECB 03117 M01S00002.ns2767 +++| FCN /1DS/ECPF,ECP 03118 M01S02555.1ds +++| FCN /1DS/EUFF,EUF 03119 M01S02556.1ds +++| FCN /1DS/IASF,IAS 03120 M01S02557.1ds +++| FCN /1DS/ICJF,ICJ 03121 M01S00003.ns2767 +++| FCN /1DS/IDLF,IDD 03122 M01S02558.1ds +++| FCN /1DS/IJCF,IJC 03123 M01S00004.ns2767 +++| FCN /1DS/ILJF,ILJ 03124 M01S00005.ns2767 +++| FCN /1DS/ISCF,ISC 03125 M01S02559.1ds +++| FCN /1DS/ISSF,ISS 03126 M01S02560.1ds +++| FCN /1DS/ITJF,ITJ 03127 M01S00001.ns2587 +++| FCN /1DS/KIJF,KIJ 03128 M01S02561.1ds +++| FCN /1DS/LODF,LOD 03129 M01S02562.1ds +++| FCN /1DS/MSGF,MSG 03130 M01S02563.1ds +++| FCN /1DS/OCMF,OCM 03131 M01S00006.ns2767 +++| FCN /1DS/RSTF,RST
| Line S02564 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03132 M02S02564.271l716 ---| FCN /1DS/ROLF,ROL 03133 M01S02565.1ds +++| FCN /1DS/SAMF,SAM 03134 M01S02566.1ds +++| FCN /1DS/SCAF,SCA 03135 M01S02567.1ds +++| FCN /1DS/SCDF,SCD 03136 M01S02568.1ds +++| FCN /1DS/SCHF,IAS 03137 M01S02569.1ds +++| FCN /1DS/SPNF,SPD 03138 M01S02570.1ds +++| FCN /1DS/SERF,SER 03139 M01S02571.1ds +++| FCN /1DS/TPSF,TPS
| Line S02572 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | ns2767 |
Seq # *Modification Id* Act ----------------------------+ 03140 M02S02572.ns2767 ---| FCN /1DS/UPCF,DWN 03141 M01S02573.1ds +++| FCN /1DS/VMSF,VMS 03142 M01S02574.1ds +++| FCN /1DS/VSAF,VSA 03143 M01S02575.1ds +++| FCN /1DS/WARF,WAR
| Line S02576 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | ns2767 |
Seq # *Modification Id* Act ----------------------------+ 03144 M02S02576.ns2767 ---| FCN /1DS/ISCF,ISC
| Line S02577 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | ns2767 |
Seq # *Modification Id* Act ----------------------------+ 03145 M02S02577.ns2767 ---| FCN /1DS/ILJF,ILJ
| Line S02578 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | ns2767 |
Seq # *Modification Id* Act ----------------------------+ 03146 M02S02578.ns2767 ---| FCN /1DS/IDLF,IDD
| Line S00193 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | ns2767 |
Seq # *Modification Id* Act ----------------------------+ 03147 M02S00193.ns2767 ---| FCN /1DS/ECPF,ECP 03148 M01S00007.ns2767 +++| 03149 M01S02579.1ds +++| INDEX /1DS/MAXF*2 03150 M01S02580.1ds +++| SPACE 4,10 03151 M01S02581.1ds +++| IFP HERE REMOTE CODE FOR *SFA* MACRO 03152 M01S02582.1ds +++| SPACE 4,10 03153 M01S02583.1ds +++|
| Line S02584 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 1ds30 |
Seq # *Modification Id* Act ----------------------------+ 03154 M02S02584.1ds30 ---| OVERFLOW 03155 M01S00001.1ds30 +++| OVERFLOW PPFW,EPFW 03156 M01S02585.1ds +++| EJECT 03157 M01S02586.1ds +++| OVERLAY (MASS STORAGE FUNCTIONS.) 03158 M01S00001.ns2552 +++| 2DA SPACE 4,10 03159 M01S00002.ns2552 +++|** COMMON DECK EQUIVALENCES. 03160 M01S00003.ns2552 +++| 03161 M01S00004.ns2552 +++| 03162 M01S00005.ns2552 +++| CKSS EQU /LSD/CKSS 03163 M01S00006.ns2552 +++| DISS EQU /LSD/DISS 03164 M01S00007.ns2552 +++| DKSS EQU /LSD/DKSS 03165 M01S00008.ns2552 +++| MNEC EQU /LSD/MNEC 03166 M01S00009.ns2552 +++| N4SS EQU /LSD/N4SS 03167 M01S00010.ns2552 +++| STVE EQU /LSD/STVE 03168 M01S00011.ns2552 +++| 03169 M01S00012.ns2552 +++| MISD EQU /MMF/MISD 03170 M01S00013.ns2552 +++| MXMF EQU /MMF/MXMF 03171 M01S02587.1ds +++| CIO SPACE 4,10 03172 M01S02588.1ds +++|** CIO - CHECK INITIALIZE OPTIONS. 03173 M01S02589.1ds +++|* 03174 M01S02590.1ds +++|* ENTRY (MS) = MST POINTER. 03175 M01S02591.1ds +++|* 03176 M01S02592.1ds +++|* EXIT (IR+3) = INITIALIZE FLAG BIT NUMBER. 03177 M01S02593.1ds +++|* 03178 M01S02594.1ds +++|* USES CM - CM+4. 03179 M01S02595.1ds +++| 03180 M01S02596.1ds +++| 03181 M01S02597.1ds +++| CIO SUBR ENTRY/EXIT 03182 M01S02598.1ds +++| LDN LIAL 03183 M01S02599.1ds +++| CIOA LMN 0 03184 M01S02600.1ds +++| NJN CIOX IF NOT *AL* OPTION 03185 M01S02601.1ds +++| LDD MS 03186 M01S02602.1ds +++| SHN 3 03187 M01S02603.1ds +++| ADN MDGL FETCH CURRENT RECORDING MODE FROM MST 03188 M01S02604.1ds +++| CRD CM 03189 M01S02605.1ds +++| LDD CM+1 03190 M01S02606.1ds +++| SHN -13 FORM *HT* OR *FT* OPTION 03191 M01S02607.1ds +++| ADN LIFD 03192 M01S02608.1ds +++| ERRNZ LIFD+1-LIHD CODE DEPENDS ON VALUE 03193 M01S02609.1ds +++| STD IR+3 03194 M01S02610.1ds +++| UJN CIOX RETURN 03195 M01S02611.1ds +++| CSD SPACE 4,15 03196 M01S02612.1ds +++|** CSD - CHECK SHARED DEVICE. 03197 M01S02613.1ds +++|* 03198 M01S02614.1ds +++|* ENTRY (MS-4 - MS) = EST ENTRY OF DEVICE. 03199 M01S02615.1ds +++|* 03200 M01S02616.1ds +++|* EXIT (A) = 0 IF NOT SHARED DEVICE, OR IF INITIALIZE NOT 03201 M01S02617.1ds +++|* SET ON SHARED DEVICE FOR ANY MAINFRAME. 03202 M01S02618.1ds +++|* (A) .NE. 0 OTHERWISE, OR IF *EXTENDED MEMORY* ERROR. 03203 M01S02619.1ds +++|* 03204 M01S02620.1ds +++|* USES T3, CM - CM+4, CN - CN+4. 03205 M01S02621.1ds +++|* 03206 M01S02622.1ds +++|* CALLS DFM. 03207 M01S02623.1ds +++|* 03208 M01S02624.1ds +++|* MACROS MONITOR. 03209 M01S02625.1ds +++| 03210 M01S02626.1ds +++| 03211 M01S02627.1ds +++| CSD6 LDN 0 03212 M01S02628.1ds +++| 03213 M01S02629.1ds +++| CSD SUBR ENTRY/EXIT 03214 M01S02630.1ds +++| LDD MS-4 03215 M01S02631.1ds +++| SHN 21-11 03216 M01S02632.1ds +++| PJN CSD6 IF NOT SHARED 03217 M01S02633.1ds +++| SHN 21-4-21+11 03218 M01S02634.1ds +++| MJN CSD6 IF INDEPENDENT SHARED DEVICE 03219 M01S02635.1ds +++| LDK MMFL SET MACHINE ID OF THIS MACHINE 03220 M01S02636.1ds +++| CRD CM 03221 M01S02637.1ds +++| LDD CM 03222 M01S02638.1ds +++| STM CSDA 03223 M01S02639.1ds +++| LDD MS READ MST 03224 M01S02640.1ds +++| SHN 3 03225 M01S02641.1ds +++| ADN SDGL 03226 M01S02642.1ds +++| CRD CN
| Line S02643 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | ns2552 |
Seq # *Modification Id* Act ----------------------------+ 03227 M02S02643.ns2552 ---| LDN /MMF/MXMF 03228 M01S00014.ns2552 +++| LDN MXMF 03229 M01S02644.1ds +++| STD T3 03230 M01S02645.1ds +++| CSD1 LDD CN+1 SET EXTENDED MEMORY ADDRESS 03231 M01S02646.1ds +++| ADN STLL 03232 M01S02647.1ds +++| STD CM+4 03233 M01S02648.1ds +++| SHN -14 03234 M01S02649.1ds +++| ADD CN 03235 M01S02650.1ds +++| LMC RECS*1000 SET UP MONITOR REQUEST 03236 M01S02651.1ds +++| STD CM+3 03237 M01S02652.1ds +++| LDD MA SET CM ADDRESS FOR READ 03238 M01S02653.1ds +++| STD CM+2 03239 M01S02654.1ds +++| LDN 1-1 SET WORD COUNT 03240 M01S02655.1ds +++|* SHN 6 03241 M01S02656.1ds +++| STD CM+1 03242 M01S02657.1ds +++| MONITOR ECSM 03243 M01S02658.1ds +++| LDD CM+1 CHECK RETURN STATUS 03244 M01S02659.1ds +++| SHN 21-13 03245 M01S02660.1ds +++| PJN CSD4 IF NO ERROR 03246 M01S02661.1ds +++| LDD CM+3 03247 M01S02662.1ds +++| SHN 14 03248 M01S02663.1ds +++| LMD CM+4 03249 M01S02664.1ds +++| ZJN CSD4 IF NO RETRY ERROR 03250 M01S02665.1ds +++| LDC =C*EXTENDED MEMORY ERROR.* 03251 M01S02666.1ds +++| CSD2 RJM DFM 03252 M01S02667.1ds +++| LDN 77 03253 M01S02668.1ds +++| CSD3 LJM CSDX EXIT 03254 M01S02669.1ds +++| 03255 M01S02670.1ds +++| CSD4 LDD MA 03256 M01S02671.1ds +++| CRD CM 03257 M01S02672.1ds +++| LDD CM+2 CHECK MACHINE ID 03258 M01S02673.1ds +++| LMC * 03259 M01S02674.1ds +++| CSDA EQU *-1 03260 M01S02675.1ds +++| ZJN CSD5 IF THIS MACHINE 03261 M01S02676.1ds +++| LDD CM CHECK INITIALIZE BITS 03262 M01S02677.1ds +++| SCN 77 03263 M01S02678.1ds +++|* LPC MLFPR+MLIAL+MLIHD+MLIFD+MLIPF+MLIQF 03264 M01S02679.1ds +++| ERRNZ MLFPR+MLIAL+MLIHD+MLIFD+MLIPF+MLIQF-7700 03265 M01S02680.1ds +++| ZJN CSD5 IF NO INITIALIZE BIT SET 03266 M01S02681.1ds +++| LDC =C*INITIALIZE PENDING ON THIS DEVICE.* 03267 M01S02682.1ds +++| UJN CSD2 SEND ERROR MESSAGE TO DAYFILE 03268 M01S02683.1ds +++| 03269 M01S02684.1ds +++| CSD5 LDN LLLL ADVANCE TO NEXT MAINFRAME 03270 M01S02685.1ds +++| RAD CN+1 03271 M01S02686.1ds +++| SHN -14 03272 M01S02687.1ds +++| RAD CN 03273 M01S02688.1ds +++| SOD T3 03274 M01S02689.1ds +++| ZJN CSD3 IF ALL MAINFRAMES 03275 M01S02690.1ds +++| LJM CSD1 PROCESS NEXT MAINFRAME 03276 M01S02691.1ds +++| CSM SPACE 4,15 03277 M01S02692.1ds +++|** CSM - CHECK SHARED RMS. 03278 M01S02693.1ds +++|* 03279 M01S02694.1ds +++|* ENTRY (T5) = EST ORDINAL. 03280 M01S02695.1ds +++|* (MS) = MST POINTER. 03281 M01S02696.1ds +++|* (IR+4) BIT 2**12 = PRESET FOR SHARED RMS, IF SET. 03282 M01S02697.1ds +++|* 03283 M01S02698.1ds +++|* EXIT (A) = 0, IF NOT INDEPENDENT SHARED DEVICE. 03284 M01S02699.1ds +++|* (A) .GT. 0, IF INDEPENDENT SHARED DEVICE. 03285 M01S02700.1ds +++|* (A) = NEGATIVE, IF INCORRECT CALL. 03286 M01S02701.1ds +++|* 03287 M01S02702.1ds +++|* USES T6, T7, CM - CM+4. 03288 M01S02703.1ds +++|*
| Line S02704 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | ns2552 |
Seq # *Modification Id* Act ----------------------------+ 03289 M02S02704.ns2552 ---|* CALLS RDS, SMI, WDS. 03290 M01S00015.ns2552 +++|* CALLS CDC, RDS, SMI, WDS. 03291 M01S02705.1ds +++|* 03292 M01S02706.1ds +++|* MACROS ENDMS, SETMS, SFA, SMSTF. 03293 M01S02707.1ds +++| 03294 M01S02708.1ds +++| 03295 M01S02709.1ds +++| CSM7 LDD IR+4 03296 M01S02710.1ds +++| SHN 21-12 03297 M01S02711.1ds +++| MJN CSMX IF INCORRECT PRESET 03298 M01S02712.1ds +++| LDN 0 03299 M01S02713.1ds +++| 03300 M01S02714.1ds +++| CSM SUBR ENTRY/EXIT 03301 M01S02715.1ds +++| SFA EST,T5 03302 M01S02716.1ds +++| ADK EQDE 03303 M01S02717.1ds +++| CRD CM 03304 M01S02718.1ds +++| LDD CM 03305 M01S02719.1ds +++| SHN 21-4 03306 M01S02720.1ds +++| PJN CSM7 IF NOT ISD 03307 M01S02721.1ds +++| SHN 5+21-10 03308 M01S02722.1ds +++| PJN CSM4 IF NON-REMOVABLE DEVICE 03309 M01S02723.1ds +++| CSM1 LDD IR+4 03310 M01S02724.1ds +++| SHN 21-12 03311 M01S02725.1ds +++| PJN CSM2 IF MOUNT ON ISD WITHOUT PRESET 03312 M01S02726.1ds +++| SMSTF GPRS SET ISD PRESET BIT FOR DEVICE 03313 M01S02727.1ds +++| CSM2 LDN 1 03314 M01S02728.1ds +++| CSM3 UJN CSMX RETURN 03315 M01S02729.1ds +++| 03316 M01S02730.1ds +++| CSM4 SHN 10-3 03317 M01S02731.1ds +++| PJN CSM1 IF DEVICE NOT PREVIOUSLY RECOVERED 03318 M01S02732.1ds +++| SETMS IO,(DE,NR) 03319 M01S02733.1ds +++| LDD MS FETCH LABEL TRACK FROM MST 03320 M01S02734.1ds +++| SHN 3 03321 M01S02735.1ds +++| ADN ALGL 03322 M01S02736.1ds +++| CRD CM 03323 M01S02737.1ds +++| LDD CM+1 03324 M01S02738.1ds +++| ZJN CSM1 IF LABEL TRACK UNDEFINED 03325 M01S02739.1ds +++| STD T6 03326 M01S02740.1ds +++| LDN 0 03327 M01S02741.1ds +++| STD T7 03328 M01S02742.1ds +++| LDC BFMS READ LABEL SECTOR 03329 M01S02743.1ds +++| RJM RDS 03330 M01S02744.1ds +++| PJN CSM6 IF NO READ ERROR 03331 M01S02745.1ds +++| ENDMS 03332 M01S02746.1ds +++| LCN 1 03333 M01S02747.1ds +++| CSM5 UJN CSM3 RETURN 03334 M01S02748.1ds +++| 03335 M01S02749.1ds +++| CSM6 RJM SMI SET MACHINE INDEX 03336 M01S02750.1ds +++| STD CM 03337 M01S02751.1ds +++| SHN 2 03338 M01S02752.1ds +++| RAD CM
| Line S02753 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | ns2552 |
Seq # *Modification Id* Act ----------------------------+ 03339 M02S02753.ns2552 ---| LDM /LSD/DISS-5+3,CM
| Line S02754 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | ns2552 |
Seq # *Modification Id* Act ----------------------------+ 03340 M02S02754.ns2552 ---| SCN 2 CLEAR UNLOAD STATUS
| Line S02755 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | ns2552 |
Seq # *Modification Id* Act ----------------------------+ 03341 M02S02755.ns2552 ---| STM /LSD/DISS-5+3,CM 03342 M01S00016.ns2552 +++| LDM DISS-5+3,CM 03343 M01S00017.ns2552 +++| SCN 2 CLEAR UNLOAD STATUS 03344 M01S00018.ns2552 +++| STM DISS-5+3,CM 03345 M01S00019.ns2552 +++| RJM CDC COMPUTE LABEL CHECKSUM 03346 M01S00020.ns2552 +++| STM CKSS 03347 M01S02756.1ds +++| LDC BFMS+WLSF REWRITE LABEL SECTOR 03348 M01S02757.1ds +++| RJM WDS 03349 M01S02758.1ds +++| ENDMS 03350 M01S02759.1ds +++| LDN GLGL-ALGL 03351 M01S02760.1ds +++| STD T7 03352 M01S02761.1ds +++| LDD MS UPDATE GLOBAL MST 03353 M01S02762.1ds +++| SHN 3 03354 M01S02763.1ds +++| ADN ALGL
| Line S02764 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | ns2552 |
Seq # *Modification Id* Act ----------------------------+ 03355 M02S02764.ns2552 ---| CWM /LSD/N4SS+5*ALGL,T7 03356 M01S00021.ns2552 +++| CWM N4SS+5*ALGL,T7 03357 M01S02765.1ds +++| UJN CSM5 RETURN 03358 M01S02766.1ds +++| C0S SPACE 4,10 03359 M01S02767.1ds +++|** C0S - CALL *0SD*. 03360 M01S02768.1ds +++|* 03361 M01S02769.1ds +++|* ENTRY (A) = 0 IF SPIN UP ALL UNITS. 03362 M01S02770.1ds +++|* = 20B IF SPIN DOWN ALL UNITS. 03363 M01S02771.1ds +++|* 03364 M01S02772.1ds +++|* EXIT (A) = *0SD* PROCESSOR ENTRY ADDRESS. 03365 M01S02773.1ds +++| 03366 M01S02774.1ds +++| 03367 M01S02775.1ds +++| C0S SUBR ENTRY/EXIT 03368 M01S02776.1ds +++| STM L0SD-2 03369 M01S02777.1ds +++| EXECUTE 0SD,L0SD 03370 M01S02778.1ds +++| UJN C0SX RETURN 03371 M01S02779.1ds +++| SFA SPACE 4,15 03372 M01S02780.1ds +++|** SFA - SEARCH FOR FAST ATTACH FILE. 03373 M01S02781.1ds +++|* 03374 M01S02782.1ds +++|* ENTRY (T5) = EST ORDINAL. 03375 M01S02783.1ds +++|* SEARCHES THE FNT FOR ANY FILE OF TYPE 03376 M01S02784.1ds +++|* *FAFT* ASSIGNED TO THIS EQUIPMENT. 03377 M01S02785.1ds +++|* 03378 M01S02786.1ds +++|* EXIT (A) = 0 IF NO FILE FOUND. 03379 M01S02787.1ds +++|* (A) = 1 IF *FAFT* TYPE FILE FOUND ON EQUIPMENT. 03380 M01S02788.1ds +++|* 03381 M01S02789.1ds +++|* USES QA, FN - FN+4, FS - FS+4. 03382 M01S02790.1ds +++|* 03383 M01S02791.1ds +++|* MACROS SFA. 03384 M01S02792.1ds +++| 03385 M01S02793.1ds +++| 03386 M01S02794.1ds +++| SFA SUBR ENTRY/EXIT 03387 M01S02795.1ds +++| LDN 0 03388 M01S02796.1ds +++| STD QA 03389 M01S02797.1ds +++| LDN FNTP READ FNT POINTER 03390 M01S02798.1ds +++| CRD FN 03391 M01S02799.1ds +++| SFA1 AOD QA ADVANCE FNT ORDINAL 03392 M01S02800.1ds +++| LMD FN+2 03393 M01S02801.1ds +++| ZJN SFAX IF END OF FNT 03394 M01S02802.1ds +++| SFA FNT,QA READ FNT ENTRY 03395 M01S02803.1ds +++| CRD FS 03396 M01S02804.1ds +++| LDD FS+4 CHECK FILE TYPE 03397 M01S02805.1ds +++| SHN -6 03398 M01S02806.1ds +++| LMN FAFT 03399 M01S02807.1ds +++| NJN SFA1 IF NOT FAST ATTACH 03400 M01S02808.1ds +++| SFA FNT,QA READ FST ENTRY 03401 M01S02809.1ds +++| ADN FSTG 03402 M01S02810.1ds +++| CRD FS 03403 M01S02811.1ds +++| LDD FS CHECK EQUIPMENT ASSIGNMENT 03404 M01S02812.1ds +++| LMD T5 03405 M01S02813.1ds +++| NJN SFA1 IF NOT SAME EQUIPMENT 03406 M01S02814.1ds +++| LDN 1 03407 M01S02815.1ds +++| UJN SFAX EXIT WITH FAST ATTACH FOUND 03408 M01S00001.1ds24 +++| SFD SPACE 4,10 03409 M01S00002.1ds24 +++|** SFD - SEARCH FOR DAYFILES. 03410 M01S00003.1ds24 +++|* 03411 M01S00004.1ds24 +++|* ENTRY (IR+4) = EST ORDINAL. 03412 M01S00005.1ds24 +++|* 03413 M01S00006.1ds24 +++|* EXIT (A) = 0, IF SYSTEM DAYFILES ON DEVICE. 03414 M01S00007.1ds24 +++|* 03415 M01S00008.1ds24 +++|* USES CM - CM+4, T1 - T5. 03416 M01S00009.1ds24 +++| 03417 M01S00010.1ds24 +++| 03418 M01S00011.1ds24 +++| SFD SUBR ENTRY/EXIT 03419 M01S00012.1ds24 +++| LDK DFPP 03420 M01S00013.1ds24 +++| CRD T1 03421 M01S00014.1ds24 +++| LDN 3*3+2 SET DAYFILE EST OFFSET 03422 M01S00015.1ds24 +++| STD T3 03423 M01S00016.1ds24 +++| SFD1 LDD T1 03424 M01S00017.1ds24 +++| SHN 14 03425 M01S00018.1ds24 +++| LMD T2 03426 M01S00019.1ds24 +++| ADD T3 03427 M01S00020.1ds24 +++| CRD CM 03428 M01S00021.1ds24 +++| LDD CM 03429 M01S00022.1ds24 +++| LMD IR+4 03430 M01S00023.1ds24 +++| ZJN SFDX IF DAYFILE ON EQUIPMENT 03431 M01S00024.1ds24 +++| LCN 3 03432 M01S00025.1ds24 +++| RAD T3 03433 M01S00026.1ds24 +++| PJN SFD1 IF MORE DAYFILES TO CHECK 03434 M01S00027.1ds24 +++| UJN SFDX RETURN 03435 M01S02816.1ds +++| SUL SPACE 4,10 03436 M01S02817.1ds +++|** SUL - SCAN UNIT LIST. 03437 M01S02818.1ds +++|* 03438 M01S02819.1ds +++|* ENTRY (T3) = CONTROL MODULE NUMBER * 10B. 03439 M01S02820.1ds +++|* (AB+4) = ISMD DEVICE MST ADDRESS/10. 03440 M01S02821.1ds +++|* 03441 M01S02822.1ds +++|* EXIT (A) = 0 IF THE ISMD CONTAINS A UNIT ON THE *CM*. 03442 M01S02823.1ds +++|* 03443 M01S02824.1ds +++|* USES T4, T5, FN - FN+4. 03444 M01S02825.1ds +++| 03445 M01S02826.1ds +++| 03446 M01S02827.1ds +++| SUL SUBR ENTRY/EXIT 03447 M01S02828.1ds +++| LDD AB+4 READ MST WORD *DDLL* 03448 M01S02829.1ds +++| SHN 3 03449 M01S02830.1ds +++| ADN DDLL 03450 M01S02831.1ds +++| CRD FN 03451 M01S02832.1ds +++| LDD FN 03452 M01S02833.1ds +++| SHN 21-12 03453 M01S02834.1ds +++| MJN SULX IF NULL EQUIPMENT 03454 M01S02835.1ds +++| LDD FN GET NUMBER OF UNITS - 1 03455 M01S02836.1ds +++| LPN 7 03456 M01S02837.1ds +++| STD T4 03457 M01S02838.1ds +++| LDN FN+4 INITIALIZE UNIT LIST ADDRESS 03458 M01S02839.1ds +++| STD T5 03459 M01S02840.1ds +++| SUL1 LDI T5 03460 M01S02841.1ds +++| LMD T3 COMPARE WITH CONTROL MODULE NUMBER 03461 M01S02842.1ds +++| LPN 70 03462 M01S02843.1ds +++| ZJN SULX IF NUMBER MATCHES 03463 M01S02844.1ds +++| SOD T4 03464 M01S02845.1ds +++| MJN SULX IF END OF UNITS 03465 M01S02846.1ds +++| LDI T5 03466 M01S02847.1ds +++| SHN 3-11 03467 M01S02848.1ds +++| LMD T3 COMPARE WITH CONTROL MODULE NUMBER 03468 M01S02849.1ds +++| LPN 70 03469 M01S02850.1ds +++| ZJN SULX IF NUMBER MATCHES 03470 M01S02851.1ds +++| SOD T4 03471 M01S02852.1ds +++| MJN SULX IF END OF UNITS 03472 M01S02853.1ds +++| SOD T5 03473 M01S02854.1ds +++| UJN SUL1 CHECK NEXT UNIT 03474 M01S02855.1ds +++| UDD SPACE 4,10 03475 M01S02856.1ds +++|** UDD - UP *DD* DRIVE. 03476 M01S02857.1ds +++|* 03477 M01S02858.1ds +++|* ENTRY (AB - AB+4) = EST ENTRY. 03478 M01S02859.1ds +++|* 03479 M01S02860.1ds +++|* EXIT (A) .NE. 0 IF DRIVE SPUN UP. 03480 M01S02861.1ds +++|* (A) = 0 IF CONTROL MODULE DOWN. 03481 M01S02862.1ds +++|* 03482 M01S02863.1ds +++|* USES T1, T3, CN - CN+4. 03483 M01S02864.1ds +++|* 03484 M01S02865.1ds +++|* CALLS COS, SUL. 03485 M01S02866.1ds +++| 03486 M01S02867.1ds +++| 03487 M01S02868.1ds +++| UDD2 RJM C0S SPIN UP *DD* DRIVE 03488 M01S02869.1ds +++| STM UDDA 03489 M01S02870.1ds +++| RJM * 03490 M01S02871.1ds +++| UDDA EQU *-1 03491 M01S02872.1ds +++| LDN 1 03492 M01S02873.1ds +++| 03493 M01S02874.1ds +++| UDD SUBR ENTRY/EXIT 03494 M01S02875.1ds +++| LDN ESTP 03495 M01S02876.1ds +++| CRD CN 03496 M01S02877.1ds +++| LDD CN+2 SET LAST EST ORDINAL + 1 03497 M01S02878.1ds +++| STD T1 03498 M01S02879.1ds +++| UDD1 SOD T1 03499 M01S02880.1ds +++| ZJN UDD2 IF END OF EST 03500 M01S02881.1ds +++| SFA EST 03501 M01S02882.1ds +++| CRD CN 03502 M01S02883.1ds +++| LDD CN+3 03503 M01S02884.1ds +++| LMC 2RCM 03504 M01S02885.1ds +++| NJN UDD1 IF NOT *CM* 03505 M01S02886.1ds +++| LDD CN 03506 M01S02887.1ds +++| LPN 3 CHECK DEVICE STATE 03507 M01S02888.1ds +++| LMN 3 03508 M01S02889.1ds +++| NJN UDD1 IF NOT DOWN 03509 M01S02890.1ds +++| LDD CN+4 03510 M01S02891.1ds +++| SHN 3-11 SAVE EQUIPMENT NUMBER 03511 M01S02892.1ds +++| STD T3 03512 M01S02893.1ds +++| RJM SUL SCAN UNIT LIST 03513 M01S02894.1ds +++| NJN UDD1 IF NO UNIT ON THIS *CM* 03514 M01S02895.1ds +++| UJP UDDX RETURN 03515 M01S02896.1ds +++| TITLE FUNCTION PROCESSORS. 03516 M01S02897.1ds +++| DCM SPACE 4,10 03517 M01S02898.1ds +++|*** FUNCTION DCMF - DOWN CONTROL MODULE. 03518 M01S02899.1ds +++|* 03519 M01S02900.1ds +++|* ENTRY (IR+4) = CONTROL MODULE EQUIPMENT NUMBER. 03520 M01S02901.1ds +++|* 03521 M01S02902.1ds +++|* NOTE IF ANY ISMD DEVICE WHICH IS NOT DOWN HAS A UNIT ON 03522 M01S02903.1ds +++|* THE SPECIFIED CONTROL MODULE, A NEGATIVE REPLY IS 03523 M01S02904.1ds +++|* RETURNED TO *DSD* AND THE CONTROL MODULE IS NOT 03524 M01S02905.1ds +++|* DOWNED. 03525 M01S02906.1ds +++| 03526 M01S02907.1ds +++| 03527 M01S02908.1ds +++| DCM3 LDN DWES *SEQM* SUBFUNCTION 03528 M01S02909.1ds +++| STD CM+2 03529 M01S02910.1ds +++| LDD IR+4 EST ORDINAL 03530 M01S02911.1ds +++| STD CM+1 03531 M01S02912.1ds +++| MONITOR SEQM SET EQUIPMENT DOWN 03532 M01S02913.1ds +++| 03533 M01S02914.1ds +++| DCM ENTRY ENTRY/EXIT 03534 M01S02915.1ds +++| LDN ESTP GET LAST MASS STORAGE ORDINAL + 1 03535 M01S02916.1ds +++| CRD CN 03536 M01S02917.1ds +++| SFA EST,IR+4 GET *CM* EST ENTRY 03537 M01S02918.1ds +++| CRD CM 03538 M01S02919.1ds +++| LDD CM+4 SAVE EQUIPMENT NUMBER 03539 M01S02920.1ds +++| SHN 3-11 03540 M01S02921.1ds +++| STD T3 03541 M01S02922.1ds +++| DCM1 SOD CN+3 03542 M01S02923.1ds +++| ZJN DCM3 IF END OF EST 03543 M01S02924.1ds +++| SFA EST 03544 M01S02925.1ds +++| ADK EQDE FETCH EST ENTRY 03545 M01S02926.1ds +++| CRD AB 03546 M01S02927.1ds +++| LDD AB+3 CHECK DEVICE TYPE 03547 M01S02928.1ds +++| LMC 2RDD 03548 M01S02929.1ds +++| ZJN DCM2 IF ISD (TYPE *DD*) 03549 M01S02930.1ds +++| LMN 1RG&1RD 03550 M01S02931.1ds +++| NJN DCM1 IF NOT TYPE *DG* 03551 M01S02932.1ds +++| DCM2 LDD AB 03552 M01S02933.1ds +++| LPN 3 CHECK DEVICE STATE 03553 M01S02934.1ds +++| LMN 3 03554 M01S02935.1ds +++| ZJN DCM1 IF DEVICE DOWN 03555 M01S02936.1ds +++| RJM SUL SCAN UNIT LIST 03556 M01S02937.1ds +++| NJN DCM1 IF NO UNIT ON THIS *CM* 03557 M01S02938.1ds +++| LDN 1 INDICATE *CM* NOT DOWNED 03558 M01S02939.1ds +++| RJM SRD SAVE REPONSE TO *DSD* 03559 M01S02940.1ds +++| LJM DCMX RETURN 03560 M01S02941.1ds +++| OCM SPACE 4,10 03561 M01S02942.1ds +++|*** FUNCTION OCMF - ON CONTROL MODULE. 03562 M01S02943.1ds +++|* 03563 M01S02944.1ds +++|* ENTRY (IR+4) = CONTROL MODULE EST ORDINAL. 03564 M01S02945.1ds +++| 03565 M01S02946.1ds +++| 03566 M01S02947.1ds +++|* CHECK FOR FIRMWARE RELOAD COMPLETION. 03567 M01S02948.1ds +++| 03568 M01S02949.1ds +++| OCM1 LMN 1&3 03569 M01S02950.1ds +++| NJN OCM2 IF CONTROL MODULE NOT IDLE 03570 M01S02951.1ds +++| LDD FN+2 03571 M01S02952.1ds +++| SHN 0-12 03572 M01S02953.1ds +++| ZJN OCM2 IF FIRMWARE RELOAD COMPLETE 03573 M01S02954.1ds +++| LDK ZERL SET 1 SECOND TIMED RECALL PARAMETERS 03574 M01S02955.1ds +++| CRD CM 03575 M01S02956.1ds +++| LDM IDSC RESTORE ORIGINAL CONTENTS 03576 M01S02957.1ds +++| STD IR+2 03577 M01S02958.1ds +++| LDD MA SET PP INPUT REGISTER IMAGE 03578 M01S02959.1ds +++| CWD IR 03579 M01S02960.1ds +++| MONITOR RECM ENTER RECALL AND DROP PP 03580 M01S02961.1ds +++| LJM PPR EXIT TO PP RESIDENT 03581 M01S02962.1ds +++| 03582 M01S02963.1ds +++|* SET CONTROL MODULE STATUS = ON. 03583 M01S02964.1ds +++| 03584 M01S02965.1ds +++| OCM2 LDN ONES *SEQM* SUBFUNCTION 03585 M01S02966.1ds +++| STD CM+2 03586 M01S02967.1ds +++| MONITOR SEQM 03587 M01S02968.1ds +++| 03588 M01S02969.1ds +++| OCM ENTRY ENTRY 03589 M01S02970.1ds +++| LDD IR+4 03590 M01S02971.1ds +++| STD CM+1 03591 M01S02972.1ds +++| SFA EST READ CONTROL MODULE EST ENTRY 03592 M01S02973.1ds +++| ADK EQDE 03593 M01S02974.1ds +++| CRD CN 03594 M01S02975.1ds +++| ADK EQAE-EQDE 03595 M01S02976.1ds +++| CRD FN 03596 M01S02977.1ds +++| STD CM+4 SAVE ADDRESS OF *EQAE* WORD 03597 M01S02978.1ds +++| SHN -14 03598 M01S02979.1ds +++| STD CM+3 03599 M01S02980.1ds +++| LDD CN 03600 M01S02981.1ds +++| LPN 3 03601 M01S02982.1ds +++| LMN 3 03602 M01S02983.1ds +++| NJP OCM1 IF CONTROL MODULE NOT DOWN 03603 M01S02984.1ds +++| 03604 M01S02985.1ds +++|* IDLE CONTROL MODULE FOR FIRMWARE LOAD. 03605 M01S02986.1ds +++| 03606 M01S02987.1ds +++| LDN IDES SET *SEQM* SUBFUNCTION 03607 M01S02988.1ds +++| STD CM+2 03608 M01S02989.1ds +++| MONITOR SEQM 03609 M01S02990.1ds +++| 03610 M01S02991.1ds +++|* SET CONTROLWARE LOAD FLAG IN EST ENTRY. 03611 M01S02992.1ds +++| 03612 M01S02993.1ds +++| LDN 1 SET REQUEST COUNT 03613 M01S02994.1ds +++| STD CM+1 03614 M01S02995.1ds +++| LDD MA PLACE *UTEM* PARAMETERS IN MB 03615 M01S02996.1ds +++| CWM OCMA,ON 03616 M01S02997.1ds +++| MONITOR UTEM 03617 M01S02998.1ds +++| 03618 M01S02999.1ds +++|* USE THIS PP TO INITIATE CONTROLWARE LOAD. 03619 M01S03000.1ds +++| 03620 M01S03001.1ds +++| LDM IDSC SET FUNCTION CODE 03621 M01S03002.1ds +++| SCN 77 PRESERVE BUFFER LOCK/LOGGING CONTROL BITS 03622 M01S03003.1ds +++| LMN /1DS/ILJF 03623 M01S03004.1ds +++| STD IR+2 03624 M01S03005.1ds +++| LDC 2000 SET *OCMF* CALL FLAG 03625 M01S03006.1ds +++| RAD IR+4 03626 M01S03007.1ds +++| LDD IA REWRITE PP INPUT REGISTER 03627 M01S03008.1ds +++| CWD IR 03628 M01S03009.1ds +++| EXECUTE 1DS,= 03629 M01S03010.1ds +++| LJM PPR EXIT TO PP RESIDENT 03630 M01S03011.1ds +++| 03631 M01S03012.1ds +++| 03632 M01S03013.1ds +++| OCMA VFD 1/0,5/0,6/1,6/43,42/1 *UTEM* REQUEST 03633 M01S00008.ns2767 +++| RST SPACE 4,10 03634 M01S00009.ns2767 +++|*** FUNCTION RSTF - RESTORE PARITY PROTECTION FOR DAS DEVICE. 03635 M01S00010.ns2767 +++|* 03636 M01S00011.ns2767 +++|* ENTRY (IR+4) = DEVICE EST ORDINAL. 03637 M01S00012.ns2767 +++| 03638 M01S00013.ns2767 +++| 03639 M01S00014.ns2767 +++| RST ENTRY ENTRY/EXIT 03640 M01S00015.ns2767 +++| LDD IR+4 03641 M01S00016.ns2767 +++| STD T5 03642 M01S00017.ns2767 +++| SFA EST GET EST ENTRY 03643 M01S00018.ns2767 +++| ADK EQDE 03644 M01S00019.ns2767 +++| CRD CM 03645 M01S00020.ns2767 +++| 03646 M01S00021.ns2767 +++|* CHECK DEVICE TYPE. 03647 M01S00022.ns2767 +++| 03648 M01S00023.ns2767 +++| LDN TRSTL CHECK DEVICE TYPE 03649 M01S00024.ns2767 +++| STD T1 03650 M01S00025.ns2767 +++| RST1 SOD T1 03651 M01S00026.ns2767 +++| MJN RSTX IF DEVICE DOES NOT SUPPORT RESTORE 03652 M01S00027.ns2767 +++| LDD CM+3 03653 M01S00028.ns2767 +++| LMM TRST,T1 03654 M01S00029.ns2767 +++| NJN RST1 IF DEVICE TYPE DOES NOT MATCH 03655 M01S00030.ns2767 +++| 03656 M01S00031.ns2767 +++|* CALCULATE *PUT* ENTRY ADDRESS. 03657 M01S00032.ns2767 +++| 03658 M01S00033.ns2767 +++| LDD CM+4 GET *PUT* ORDINAL 03659 M01S00034.ns2767 +++| SHN 3 03660 M01S00035.ns2767 +++| ADN DILL 03661 M01S00036.ns2767 +++| CRD CM 03662 M01S00037.ns2767 +++| LDD CM+2 03663 M01S00038.ns2767 +++| SHN PUTLS 03664 M01S00039.ns2767 +++| STM RSTA+1 03665 M01S00040.ns2767 +++| SHN -14 03666 M01S00041.ns2767 +++| RAM RSTA 03667 M01S00042.ns2767 +++| LDC BIOL GET POINTER TO BUFFERED I/O TABLES 03668 M01S00043.ns2767 +++| CRD CM 03669 M01S00044.ns2767 +++| LDD CM+1 FETCH *PUT* TABLE POINTER WORD 03670 M01S00045.ns2767 +++| SHN 14 03671 M01S00046.ns2767 +++| LMD CM+2 03672 M01S00047.ns2767 +++| ADN PUTP 03673 M01S00048.ns2767 +++| CRD CM 03674 M01S00049.ns2767 +++| LDD CM+3 FWA OF FIRST *PUT* ENTRY 03675 M01S00050.ns2767 +++| LPN 77 03676 M01S00051.ns2767 +++| SHN 14 03677 M01S00052.ns2767 +++| ADD CM+4 03678 M01S00053.ns2767 +++| RSTA ADC 0 (*PUT* ORDINAL SHIFTED BY *PUTLS*) 03679 M01S00054.ns2767 +++| 03680 M01S00055.ns2767 +++|* SET *RSPF* SPECIAL REQUEST FLAG IN *PUT*. 03681 M01S00056.ns2767 +++| 03682 M01S00057.ns2767 +++| STD CM+4 SET ADDRESS OF *PUT* ENTRY 03683 M01S00058.ns2767 +++| SHN -14 03684 M01S00059.ns2767 +++| STD CM+3 03685 M01S00060.ns2767 +++| LDN 1 SET NUMBER OF REQUESTS 03686 M01S00061.ns2767 +++| STD CM+1 03687 M01S00062.ns2767 +++| LDD MA STORE *UTEM* REQUEST IN MESSAGE BUFFER 03688 M01S00063.ns2767 +++| CWM RSTB,ON 03689 M01S00064.ns2767 +++| MONITOR UTEM SET FLAG FOR BUFFERED DEVICE DRIVER 03690 M01S00065.ns2767 +++| UJP RSTX RETURN 03691 M01S00066.ns2767 +++| 03692 M01S00067.ns2767 +++| 03693 M01S00068.ns2767 +++| RSTB VFD 1/0,5/PILL,6/1,6/RSPF,42/1 *UTEM* REQUEST 03694 M01S00069.ns2767 +++| 03695 M01S00001.ns2775a +++| PURGMAC TBLM 03696 M01S00002.ns2775a +++| 03697 M01S00003.ns2775a +++| TBLM MACRO TY 03698 M01S00004.ns2775a +++| TBLM IFEQ BF_TY,7,1 03699 M01S00005.ns2775a +++| CON 2R_TY 03700 M01S00006.ns2775a +++| TBLM ENDIF 03701 M01S00007.ns2775a +++| TBLM ENDM 03702 M01S00008.ns2775a +++| 03703 M01S00070.ns2767 +++| TRST BSS 0 DEVICES ALLOWED FOR RESTORE
| Line S00071 Modification History | |
|---|---|
M01 (Added by) | ns2767 |
M02 (Updated by) | ns2775a |
Seq # *Modification Id* Act ----------------------------+ 03704 M02S00071.ns2775a ---| CON 2RED 5833 (1XP SABRE)
| Line S00072 Modification History | |
|---|---|
M01 (Added by) | ns2767 |
M02 (Updated by) | ns2775a |
Seq # *Modification Id* Act ----------------------------+ 03705 M02S00072.ns2775a ---| CON 2REF 5833 (2XP SABRE)
| Line S00073 Modification History | |
|---|---|
M01 (Added by) | ns2767 |
M02 (Updated by) | ns2775a |
Seq # *Modification Id* Act ----------------------------+ 03706 M02S00073.ns2775a ---| CON 2REH 5838 (1XP ELITE) 03707 M01S00009.ns2775a +++| LIST G 03708 M01S00010.ns2775a +++| TBL "MSEQ" 03709 M01S00011.ns2775a +++| LIST * 03710 M01S00012.ns2775a +++| TRSTL EQU *-TRST LENGTH OF TABLE 03711 M01S00074.ns2767 +++|
| Line S00075 Modification History | |
|---|---|
M01 (Added by) | ns2767 |
M02 (Updated by) | ns2775a |
Seq # *Modification Id* Act ----------------------------+ 03712 M02S00075.ns2775a ---| TRSTL EQU *-TRST LENGTH OF TABLE 03713 M01S00013.ns2775a +++| PURGMAC TBLM 03714 M01S03014.1ds +++| SCA SPACE 4,10 03715 M01S03015.1ds +++|*** FUNCTION SCAF - SET/CLEAR BIT IN MST WORD ACGL. 03716 M01S03016.1ds +++|* 03717 M01S03017.1ds +++|* ENTRY (IR+3) = BIT NUMBER. 03718 M01S03018.1ds +++|* (IR+4) = EST ORDINAL. 03719 M01S03019.1ds +++|* BIT 2**11 OF (IR+3) SET IF BIT TO BE CLEARED. 03720 M01S03020.1ds +++| 03721 M01S03021.1ds +++| 03722 M01S03022.1ds +++| SCA ENTRY ENTRY/EXIT 03723 M01S03023.1ds +++| LDD IR+4 SET EST ORDINAL 03724 M01S03024.1ds +++| STD T5 03725 M01S03025.1ds +++| LDD IR+3 CHECK REQUEST 03726 M01S03026.1ds +++| LPC 4000 03727 M01S03027.1ds +++| ZJN SCA1 IF BIT TO BE SET 03728 M01S03028.1ds +++| LMC -0 03729 M01S03029.1ds +++| SCA1 LMD IR+3 SET/CLEAR GLOBAL BIT 03730 M01S03030.1ds +++| RJM TGB 03731 M01S03031.1ds +++| UJN SCAX RETURN 03732 M01S03032.1ds +++| SCD SPACE 4,10 03733 M01S03033.1ds +++|*** FUNCTION SCDF - SET/CLEAR FLAGS FOR RMS DEVICES. 03734 M01S03034.1ds +++|* 03735 M01S03035.1ds +++|* ENTRY (IR+3) = *ONES* TO SET DEVICE *ON*. 03736 M01S03036.1ds +++|* *IDES* TO SET DEVICE *IDLE*. 03737 M01S03037.1ds +++|* *OFES* TO SET DEVICE *OFF*. 03738 M01S03038.1ds +++|* *DWES* TO SET DEVICE *DOWN*. 03739 M01S03039.1ds +++|* (IR+4) = EST ORDINAL. 03740 M01S03040.1ds +++| 03741 M01S03041.1ds +++|
| Line S03042 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03742 M02S03042.271l716 ---| SCD11 LDN 1 RETURN NEGATIVE RESPONSE 03743 M01S00194.271l716 +++| SCD14 LDN 1 RETURN NEGATIVE RESPONSE 03744 M01S03043.1ds +++| RJM SRD 03745 M01S03044.1ds +++| 03746 M01S03045.1ds +++| SCD ENTRY 03747 M01S03046.1ds +++| LDD IR+4 SAVE EST ORDINAL 03748 M01S03047.1ds +++| STM L0SD-1 03749 M01S03048.1ds +++| STM SCDA+2 03750 M01S03049.1ds +++| SFA EST FETCH EST ENTRY 03751 M01S03050.1ds +++| ADK EQDE 03752 M01S03051.1ds +++| CRD AB 03753 M01S03052.1ds +++| LDD IR+3 03754 M01S03053.1ds +++| LMN DWES
| Line S03054 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 1ds24 |
Seq # *Modification Id* Act ----------------------------+ 03755 M02S03054.1ds24 ---| ZJN SCD3 IF SETTING DEVICE DOWN
| Line S03055 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 1ds24 |
Seq # *Modification Id* Act ----------------------------+ 03756 M02S03055.1ds24 ---| LDD AB+3
| Line S00028 Modification History | |
|---|---|
M01 (Added by) | 1ds24 |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03757 M02S00028.271l716 ---| NJN SCD0.1 IF NOT SETTING DEVICE DOWN
| Line S00029 Modification History | |
|---|---|
M01 (Added by) | 1ds24 |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03758 M02S00029.271l716 ---| RJM SFD SEARCH FOR DAYFILES ON DEVICE
| Line S00030 Modification History | |
|---|---|
M01 (Added by) | 1ds24 |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03759 M02S00030.271l716 ---| SCD0 ZJN SCD11 IF DAYFILES PRESENT
| Line S00031 Modification History | |
|---|---|
M01 (Added by) | 1ds24 |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03760 M02S00031.271l716 ---| UJN SCD3 CONTINUE DOWN PROCESSING
| Line S00032 Modification History | |
|---|---|
M01 (Added by) | 1ds24 |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03761 M02S00032.271l716 ---|
| Line S00033 Modification History | |
|---|---|
M01 (Added by) | 1ds24 |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03762 M02S00033.271l716 ---| SCD0.1 LDD AB+3
| Line S03056 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03763 M02S03056.271l716 ---| LMC 2RDD
| Line S03057 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03764 M02S03057.271l716 ---| ZJN SCD1 IF ISD DEVICE
| Line S03058 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03765 M02S03058.271l716 ---| LMN 1RG&1RD
| Line S03059 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03766 M02S03059.271l716 ---| ZJN SCD1 IF ISMD DEVICE
| Line S03060 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03767 M02S03060.271l716 ---| LMN 1RF&1RG
| Line S03061 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03768 M02S03061.271l716 ---| ZJN SCD1 IF HYDRA DEVICE
| Line S03062 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03769 M02S03062.271l716 ---| LMN 1RH&1RF
| Line S03063 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03770 M02S03063.271l716 ---| NJN SCD2 IF NOT HYDRA DEVICE
| Line S03064 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03771 M02S03064.271l716 ---| SCD1 RJM UDD SPIN UP ISD DRIVE
| Line S03065 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 1ds24 |
M03 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03772 M03S03065.271l716 ---| ZJN SCD11 IF ERROR
| Line S00034 Modification History | |
|---|---|
M01 (Added by) | 1ds24 |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03773 M02S00034.271l716 ---| ZJN SCD0 IF ERROR
| Line S03066 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03774 M02S03066.271l716 ---| SCD2 LDD AB
| Line S03067 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03775 M02S03067.271l716 ---| SHN 21-6
| Line S03068 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03776 M02S03068.271l716 ---| MJN SCD5.2 IF DEVICE UNAVAILABLE
| Line S03069 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03777 M02S03069.271l716 ---| SCD3 LDD IR+3
| Line S03070 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03778 M02S03070.271l716 ---| SBN OFES
| Line S03071 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03779 M02S03071.271l716 ---| PJN SCD5.1 IF *OFF* OR *DOWN*
| Line S03072 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03780 M02S03072.271l716 ---| ADN OFES-ONES
| Line S03073 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03781 M02S03073.271l716 ---| ZJN SCD4 IF *ON*
| Line S03074 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03782 M02S03074.271l716 ---| LDN ONFC&IDFC
| Line S03075 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03783 M02S03075.271l716 ---| SCD4 LMN ONFC
| Line S03076 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03784 M02S03076.271l716 ---| SCD5 SHN 6 03785 M01S00195.271l716 +++| NJN SCD2 IF NOT SETTING DEVICE DOWN 03786 M01S00196.271l716 +++| RJM SFD SEARCH FOR DAYFILES ON DEVICE 03787 M01S00197.271l716 +++| SCD1 ZJN SCD14 IF DAYFILES PRESENT 03788 M01S00198.271l716 +++| UJN SCD5 CONTINUE DOWN PROCESSING 03789 M01S00199.271l716 +++|
| Line S00200 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 03790 M02S00200.272l774 ---| SCD2 LDD AB+3
| Line S00201 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 03791 M02S00201.272l774 ---| LMC 2RDD
| Line S00202 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 03792 M02S00202.272l774 ---| ZJN SCD3 IF ISD DEVICE
| Line S00203 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 03793 M02S00203.272l774 ---| LMN 1RG&1RD
| Line S00204 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 03794 M02S00204.272l774 ---| ZJN SCD3 IF ISMD DEVICE
| Line S00205 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 03795 M02S00205.272l774 ---| LMN 1RF&1RG
| Line S00206 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 03796 M02S00206.272l774 ---| ZJN SCD3 IF HYDRA DEVICE
| Line S00207 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 03797 M02S00207.272l774 ---| LMN 1RH&1RF
| Line S00208 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 03798 M02S00208.272l774 ---| ZJN SCD3 IF HYDRA DEVICE
| Line S00209 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 03799 M02S00209.272l774 ---| LMN 1RN&1RH
| Line S00210 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 03800 M02S00210.272l774 ---| NJN SCD4 IF NOT XMD DEVICE
| Line S00211 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 03801 M02S00211.272l774 ---| SCD3 RJM UDD 03802 M01S00001.272l774 +++| SCD2 LDN TSCDL CHECK DEVICE TYPE FOR NON-*LDAM* DEVICE 03803 M01S00002.272l774 +++| STD T1 03804 M01S00003.272l774 +++| SCD3 SOD T1 03805 M01S00004.272l774 +++| MJN SCD4 IF DRIVE SHOULD NOT BE SPUN UP 03806 M01S00005.272l774 +++| LDD AB+3 03807 M01S00006.272l774 +++| LMM TSCD,T1 03808 M01S00007.272l774 +++| NJN SCD3 IF DEVICE TYPE DOES NOT MATCH 03809 M01S00008.272l774 +++| RJM UDD SPIN UP DRIVE 03810 M01S00212.271l716 +++| ZJN SCD1 IF SPIN-UP ERROR 03811 M01S00213.271l716 +++| SCD4 LDD AB 03812 M01S00214.271l716 +++| SHN 21-6 03813 M01S00215.271l716 +++| MJN SCD9 IF DEVICE UNAVAILABLE 03814 M01S00216.271l716 +++| SCD5 LDD IR+3 03815 M01S00217.271l716 +++| SBN OFES 03816 M01S00218.271l716 +++| PJN SCD8 IF SETTING DEVICE *OFF* OR *DOWN* 03817 M01S00219.271l716 +++| ADN OFES-ONES 03818 M01S00220.271l716 +++| ZJN SCD6 IF SETTING DEVICE *ON* 03819 M01S00221.271l716 +++| LDN ONFC&IDFC 03820 M01S00222.271l716 +++| SCD6 LMN ONFC 03821 M01S00223.271l716 +++| SCD7 SHN 6 03822 M01S03077.1ds +++| STM SCDA+3 03823 M01S03078.1ds +++| RJM LKC LOG KEYBOARD COMMAND 03824 M01S03079.1ds +++| LDD IR+1 03825 M01S03080.1ds +++| LPN 77 03826 M01S03081.1ds +++| RAM SCDA+1 03827 M01S03082.1ds +++| LDD IA CALL *1MV* TO PROCESS REQUEST 03828 M01S03083.1ds +++| CWM SCDA,ON 03829 M01S03084.1ds +++| EXECUTE 1MV,= 03830 M01S03085.1ds +++| LJM PPR EXIT TO PPR TO LOAD *1MV* 03831 M01S03086.1ds +++|
| Line S03087 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03832 M02S03087.271l716 ---| SCD5.1 ZJN SCD6 IF *OFF* REQUESTED 03833 M01S00224.271l716 +++| SCD8 ZJN SCD10 IF *OFF* REQUESTED 03834 M01S03088.1ds +++| LDK OFES SET DEVICE *OFF* TO ELIMINATE ACTIVITY 03835 M01S03089.1ds +++| STD CM+2 03836 M01S03090.1ds +++| LDD IR+4 03837 M01S03091.1ds +++| STD CM+1 03838 M01S03092.1ds +++| MONITOR SEQM
| Line S03093 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03839 M02S03093.271l716 ---| SCD5.2 UJN SCD7 SET DEVICE *DOWN*
| Line S03094 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03840 M02S03094.271l716 ---|
| Line S03095 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03841 M02S03095.271l716 ---| SCD6 LDD AB 03842 M01S00225.271l716 +++| SCD9 UJN SCD11 SET DEVICE *DOWN* 03843 M01S00226.271l716 +++| 03844 M01S00227.271l716 +++| SCD10 LDD AB 03845 M01S03096.1ds +++| LPN 3 03846 M01S03097.1ds +++| LMN 3
| Line S03098 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03847 M02S03098.271l716 ---| NJN SCD7 IF NOT CURRENTLY DOWN
| Line S03099 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03848 M02S03099.271l716 ---| LDN OFFC
| Line S03100 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03849 M02S03100.271l716 ---| UJN SCD5 CALL *1MV* TO GO FROM DOWN TO OFF
| Line S03101 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03850 M02S03101.271l716 ---|
| Line S03102 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03851 M02S03102.271l716 ---| SCD7 LDD IR+3 *SEQM* SUBFUNCTION 03852 M01S00228.271l716 +++| NJN SCD11 IF NOT CURRENTLY DOWN 03853 M01S00229.271l716 +++| LDN OFFC 03854 M01S00230.271l716 +++| UJN SCD7 CALL *1MV* TO GO FROM DOWN TO OFF 03855 M01S00231.271l716 +++| 03856 M01S00232.271l716 +++| SCD11 LDD IR+3 *SEQM* SUBFUNCTION 03857 M01S03103.1ds +++| STD CM+2 03858 M01S03104.1ds +++| LDD IR+4 EST ORDINAL 03859 M01S03105.1ds +++| STD CM+1 03860 M01S03106.1ds +++| MONITOR SEQM CHANGE EQUIPMENT STATE 03861 M01S03107.1ds +++| LDD CM+1
| Line S03108 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03862 M02S03108.271l716 ---| NJN SCD9 IF DEVICE STATE WAS CHANGED 03863 M01S00233.271l716 +++| NJN SCD12 IF DEVICE STATE WAS CHANGED 03864 M01S03109.1ds +++| LDD AB RESTORE ORIGINAL DEVICE STATE 03865 M01S03110.1ds +++| LPN 3 03866 M01S03111.1ds +++| STD CM+2 03867 M01S03112.1ds +++| ERRNZ ONES CODE DEPENDS ON VALUE 03868 M01S03113.1ds +++| ERRNZ IDES-1 CODE DEPENDS ON VALUE 03869 M01S03114.1ds +++| ERRNZ OFES-2 CODE DEPENDS ON VALUE 03870 M01S03115.1ds +++| LDD IR+4 EST ORDINAL 03871 M01S03116.1ds +++| STD CM+1 03872 M01S03117.1ds +++| MONITOR SEQM
| Line S03118 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03873 M02S03118.271l716 ---| LJM SCD11 RETURN
| Line S03119 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03874 M02S03119.271l716 ---|
| Line S03120 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03875 M02S03120.271l716 ---| SCD9 LDD IR+3
| Line S03121 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 1ds28 |
M03 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03876 M03S03121.271l716 ---| LMK ONES
| Line S03122 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 1ds28 |
M03 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03877 M03S03122.271l716 ---| NJN SCD10 IF NOT TURNING DEVICE ON 03878 M01S00234.271l716 +++| LJM SCD14 RETURN 03879 M01S00235.271l716 +++| 03880 M01S00236.271l716 +++| SCD12 LDD IR+3 03881 M01S00237.271l716 +++| LMK ONES 03882 M01S00238.271l716 +++| NJN SCD13 IF NOT TURNING DEVICE ON 03883 M01S00001.1ds28 +++| LPN 2 03884 M01S00002.1ds28 +++| ERRNZ ONES CODE DEPENDS ON VALUE 03885 M01S00003.1ds28 +++| ERRNZ IDES-1 CODE DEPENDS ON VALUE 03886 M01S00004.1ds28 +++| NJN SCD10 IF NOT ATTEMPTING TO *ON* OR *IDLE* DEVICE 03887 M01S03123.1ds +++| LDD AB 03888 M01S03124.1ds +++| SHN -3 CHECK EQUIPMENT STATUS 03889 M01S03125.1ds +++| LPN 41
| Line S03126 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03890 M02S03126.271l716 ---| NJN SCD10 IF NOT INACTIVE NON-REMOVABLE DEVICE 03891 M01S00239.271l716 +++| NJN SCD13 IF NOT INACTIVE NON-REMOVABLE DEVICE 03892 M01S03127.1ds +++| LDC 4000+LUNL 03893 M01S03128.1ds +++| STD IR+3 03894 M01S03129.1ds +++| RJM .TPS PROCESS MOUNT REQUEST
| Line S03130 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03895 M02S03130.271l716 ---| SCD10 LDN ZERL 03896 M01S00240.271l716 +++| SCD13 LDN ZERL 03897 M01S03131.1ds +++| CRD CM 03898 M01S03132.1ds +++| ADN PFNL+1-ZERL CLEAR *CMS* TIMEOUT 03899 M01S03133.1ds +++| CWD CM 03900 M01S03134.1ds +++| LJM SCDX RETURN 03901 M01S03135.1ds +++| 03902 M01S03136.1ds +++| 03903 M01S03137.1ds +++| SCDA VFD 18/3R1MV,42/0 03904 M01S00009.272l774 +++| 03905 M01S00010.272l774 +++| TSCD BSS 0 DEVICES TO SPIN UP ON *ON* 03906 M01S00011.272l774 +++| CON 2RDD 834 03907 M01S00012.272l774 +++| CON 2RDG 836 03908 M01S00013.272l774 +++| CON 2RDF 887 (4KB SECTOR) 03909 M01S00014.272l774 +++| CON 2RDH 887 (16KB SECTOR)
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | 272l774 |
M02 (Updated by) | ns2750 |
Seq # *Modification Id* Act ----------------------------+ 03910 M02S00015.ns2750 ---| CON 2RDN 9853
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | 272l774 |
M02 (Updated by) | ns2750 |
Seq # *Modification Id* Act ----------------------------+ 03911 M02S00016.ns2750 ---| CON 2REA 5832 (1X SSD)
| Line S00017 Modification History | |
|---|---|
M01 (Added by) | 272l774 |
M02 (Updated by) | ns2750 |
Seq # *Modification Id* Act ----------------------------+ 03912 M02S00017.ns2750 ---| CON 2REB 5832 (2X SSD)
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | 272l774 |
M02 (Updated by) | ns2750 |
Seq # *Modification Id* Act ----------------------------+ 03913 M02S00018.ns2750 ---| CON 2REC 5833 (1X SABRE)
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | 272l774 |
M02 (Updated by) | ns2750 |
Seq # *Modification Id* Act ----------------------------+ 03914 M02S00019.ns2750 ---| CON 2RED 5833 (1XP SABRE)
| Line S00020 Modification History | |
|---|---|
M01 (Added by) | 272l774 |
M02 (Updated by) | ns2750 |
Seq # *Modification Id* Act ----------------------------+ 03915 M02S00020.ns2750 ---| CON 2REE 5833 (2X SABRE)
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | 272l774 |
M02 (Updated by) | ns2750 |
Seq # *Modification Id* Act ----------------------------+ 03916 M02S00021.ns2750 ---| CON 2REF 5833 (2XP SABRE) 03917 M01S00022.272l774 +++| 03918 M01S00023.272l774 +++| TSCDL EQU *-TSCD LENGTH OF TABLE 03919 M01S03138.1ds +++| SPD SPACE 4,10 03920 M01S03139.1ds +++|*** FUNCTION SPNF - SPIN MASS STORAGE DRIVE. 03921 M01S03140.1ds +++|* 03922 M01S03141.1ds +++|* ENTRY (IR+3) = 0 IF SPIN UP. 03923 M01S03142.1ds +++|* .GT. 0 IF SPIN DOWN. 03924 M01S03143.1ds +++|* (IR+4) = DEVICE EST ORDINAL. 03925 M01S03144.1ds +++| 03926 M01S03145.1ds +++| 03927 M01S03146.1ds +++| SPD ENTRY ENTRY/EXIT 03928 M01S03147.1ds +++| LDD IR+3 03929 M01S03148.1ds +++| ZJN SPD1 IF SPIN UP 03930 M01S03149.1ds +++| LDN 20 03931 M01S03150.1ds +++| SPD1 RJM C0S CALL *0SD* 03932 M01S03151.1ds +++| STM SPDA SAVE *0SD* PROCESSOR ENTRY ADDRESS 03933 M01S03152.1ds +++| LDD IR+4 SET EST ORDINAL 03934 M01S03153.1ds +++| STM L0SD-1 03935 M01S03154.1ds +++| RJM * SPIN UP/DOWN MASS STORAGE DEVICE 03936 M01S03155.1ds +++| SPDA EQU *-1 (*0SD* PROCESSOR ENTRY ADDRESS) 03937 M01S03156.1ds +++| UJN SPDX RETURN 03938 M01S03157.1ds +++| TPS SPACE 4,20 03939 M01S03158.1ds +++|*** FUNCTION TPSF - TOGGLE PF STATUS. 03940 M01S03159.1ds +++|* 03941 M01S03160.1ds +++|* PROCESS COMMAND FOR *DSD* - 03942 M01S03161.1ds +++|* *INITIALIZE*, *MOUNT*, OR *UNLOAD*. 03943 M01S03162.1ds +++|* 03944 M01S03163.1ds +++|* ENTRY (IR+3) = 1/M, 11/TYPE. 03945 M01S03164.1ds +++|* M = 1, IF *MOUNT* REQUEST. 03946 M01S03165.1ds +++|* = 0, IF *UNLOAD* REQUEST. 03947 M01S03166.1ds +++|* TYPE = LUNL, IF *MOUNT* OR *UNLOAD*. 03948 M01S03167.1ds +++|* (IR+4) = 1/, 1/S, 10/EQ. 03949 M01S03168.1ds +++|* S = 1, IF SHARED RMS IS PRESET. 03950 M01S03169.1ds +++|* EQ = EST ORDINAL, IF NOT *INITIALIZE*. 03951 M01S03170.1ds +++|* = UNUSED, IF *INITIALIZE*. 03952 M01S03171.1ds +++|* (PARAMETER WORD) = 12/EQ1,12/EQ2,12/EQ3,12/EQ4,12/EQ5. 03953 M01S03172.1ds +++|* (USED ONLY FOR *INITIALIZE*.) 03954 M01S03173.1ds +++|* THE FIRST EQUIPMENT THAT EQUALS 03955 M01S03174.1ds +++|* ZERO ENDS THE LIST OF EQUIPMENTS. 03956 M01S03175.1ds +++| 03957 M01S03176.1ds +++| 03958 M01S03177.1ds +++|* PROCESS *MOUNT* OR *UNLOAD* OF ONE EQUIPMENT. 03959 M01S03178.1ds +++| 03960 M01S03179.1ds +++| TPS14 LDD IR+4 GET EST ENTRY 03961 M01S03180.1ds +++| LPC 777 03962 M01S03181.1ds +++| STD T5 03963 M01S03182.1ds +++| STM L0SD-1 03964 M01S03183.1ds +++| SFA EST 03965 M01S03184.1ds +++| ADK EQDE 03966 M01S03185.1ds +++| CRD MS-4
| Line S03186 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 03967 M02S03186.274l797 ---| LDD IR+3 03968 M01S00001.274l797 +++|* 03969 M01S00002.274l797 +++|* CHECK IF OPTICAL DISK DRIVE. 03970 M01S00003.274l797 +++|* 03971 M01S00004.274l797 +++| LDD MS-1 03972 M01S00005.274l797 +++| LMC 2ROD OPTICAL DISK 03973 M01S00006.274l797 +++| NJN TPS14.1 IF NOT OPTICAL DISK 03974 M01S00007.274l797 +++| RJM DOD DISMOUNT OPTICAL DISK 03975 M01S00008.274l797 +++| LJM TPSX RETURN TO CALLER 03976 M01S00009.274l797 +++| 03977 M01S00010.274l797 +++| TPS14.1 LDD IR+3 03978 M01S03187.1ds +++| SHN 0-13 03979 M01S03188.1ds +++| ZJP TPS20 IF UNLOAD REQUEST 03980 M01S03189.1ds +++| LDD MS-4 03981 M01S03190.1ds +++| SHN 21-3 03982 M01S03191.1ds +++| PJN TPS15 IF DEVICE INACTIVE 03983 M01S03192.1ds +++| SHN 4+21-10 03984 M01S03193.1ds +++| PJN TPS16 IF NON-REMOVABLE DEVICE 03985 M01S03194.1ds +++| TPS15 LDD MS 03986 M01S03195.1ds +++| SHN 3 03987 M01S03196.1ds +++| ADN STLL 03988 M01S03197.1ds +++| CRD CM 03989 M01S03198.1ds +++| LDD CM CHECK LOCAL STATUS 03990 M01S03199.1ds +++| LPN MLDUL 03991 M01S03200.1ds +++| ZJN TPS19 IF DEVICE NOT UNLOADED 03992 M01S03201.1ds +++| SMSTF LPTU PROHIBIT TRT UPDATE BY *1RU* 03993 M01S03202.1ds +++| TPS16 RJM CSM 03994 M01S03203.1ds +++| MJN TPS17 IF BAD CALL 03995 M01S03204.1ds +++| NJN TPS18 IF INDEPENDENT SHARED DEVICE MOUNT 03996 M01S03205.1ds +++| RJM CSD CHECK EXTENDED MEMORY MMF SHARED DEVICE 03997 M01S03206.1ds +++| TPS17 NJN TPS21 IF DEVICE CANNOT BE RECOVERED 03998 M01S03207.1ds +++| TPS18 CMSTF LDUL CLEAR DEVICE UNLOADED STATUS 03999 M01S03208.1ds +++| CMSTF GUNL CLEAR GLOBAL UNLOAD 04000 M01S03209.1ds +++| RJM C0S CALL 0SD 04001 M01S03210.1ds +++| STM TPSB 04002 M01S03211.1ds +++| RJM ** SPIN UP ISMD DEVICE 04003 M01S03212.1ds +++| TPSB EQU *-1 (*0SD* PROCESSOR ENTRY ADDRESS) 04004 M01S03213.1ds +++| TPS19 LCN 0 04005 M01S03214.1ds +++| TPS20 LMN LUNL SET/CLEAR UNLOAD REQUESTED 04006 M01S03215.1ds +++| RJM TLB 04007 M01S03216.1ds +++| TPS21 LDK ZERL 04008 M01S03217.1ds +++| CRD CM 04009 M01S03218.1ds +++| ADN PFNL+1-ZERL CLEAR *CMS* TIMEOUT 04010 M01S03219.1ds +++| CWD CM 04011 M01S03220.1ds +++| 04012 M01S03221.1ds +++| TPS ENTRY ENTRY/EXIT 04013 M01S03222.1ds +++| LDD IR+3 CHECK REQUEST 04014 M01S03223.1ds +++| LPN 77 04015 M01S03224.1ds +++| LMN LUNL 04016 M01S03225.1ds +++| NJN TPS1 IF NOT MOUNT/UNLOAD 04017 M01S03226.1ds +++| LJM TPS14 PROCESS MOUNT/UNLOAD 04018 M01S03227.1ds +++| 04019 M01S03228.1ds +++|* PROCESS *INITIALIZE* OF MULTIPLE EQUIPMENTS. 04020 M01S03229.1ds +++| 04021 M01S03230.1ds +++| TPS1 LDC /1DS/DSDL+/1DS/KBCML READ SPECIAL PARAMETER WORD 04022 M01S03231.1ds +++| CRM TPSA,ON 04023 M01S03232.1ds +++| LDD IR+3 SET REQUESTED INITIALIZE OPTION 04024 M01S03233.1ds +++| RAM CIOA 04025 M01S03234.1ds +++| LDC TPSA 04026 M01S03235.1ds +++| STD T4 04027 M01S03236.1ds +++| UJN TPS3 ENTER LOOP 04028 M01S03237.1ds +++| 04029 M01S03238.1ds +++| TPS2 AOD T4 04030 M01S03239.1ds +++| ADC -TPSA-4-1 04031 M01S03240.1ds +++| ZJN TPSX IF END OF PARAMETER WORD 04032 M01S03241.1ds +++| TPS3 LDI T4 GET NEXT EQUIPMENT 04033 M01S03242.1ds +++| ZJN TPSX IF NO MORE EQUIPMENTS 04034 M01S03243.1ds +++| STD T5 04035 M01S03244.1ds +++| SFA EST GET EST ENTRY 04036 M01S03245.1ds +++| ADK EQDE 04037 M01S03246.1ds +++| CRD MS-4 04038 M01S03247.1ds +++| LDD MS READ *STLL* 04039 M01S03248.1ds +++| SHN 3 04040 M01S03249.1ds +++| ADN STLL 04041 M01S03250.1ds +++| CRD AB 04042 M01S03251.1ds +++| RJM CIO CHECK INITIALIZE OPTIONS 04043 M01S03252.1ds +++| LDD AB 04044 M01S03253.1ds +++| LPC MLFPR+MLIAL+MLIHD+MLIFD 04045 M01S03254.1ds +++| ZJN TPS7 IF FULL INITIALIZE NOT SET 04046 M01S03255.1ds +++| LDD IR+3 04047 M01S03256.1ds +++| SBN LIFD 04048 M01S03257.1ds +++| MJN TPS2 IF REQUEST FOR PARTIAL INITIALIZE 04049 M01S03258.1ds +++| ADN LIFD 04050 M01S03259.1ds +++| RJM TLB SET INITIALIZE REQUEST 04051 M01S03260.1ds +++| LDN LIAL 04052 M01S03261.1ds +++| STD T2 04053 M01S03262.1ds +++| LDD CM+1 CHECK REPLY 04054 M01S03263.1ds +++| LPN 1 04055 M01S03264.1ds +++| ZJN TPS4 IF INITIALIZE FLAG NOT ALREADY SET 04056 M01S03265.1ds +++| LJM TPS9 CLEAR INITIALIZE FLAG 04057 M01S03266.1ds +++| 04058 M01S03267.1ds +++| TPS4 LDD IR+3 CHECK FULL INITIALIZE FLAG 04059 M01S03268.1ds +++| LMD T2 04060 M01S03269.1ds +++| ZJN TPS5 IF FLAG JUST SET 04061 M01S03270.1ds +++| LCN 0 CLEAR OTHER FULL INITIALIZE FLAGS 04062 M01S03271.1ds +++| LMD T2 04063 M01S03272.1ds +++| RJM TLB 04064 M01S03273.1ds +++| TPS5 SOD T2 DECREMENT FLAG NUMBER 04065 M01S03274.1ds +++| LMN LIFD-1 04066 M01S03275.1ds +++| NJN TPS4 IF NOT END OF FULL INITIALIZE FLAG 04067 M01S03276.1ds +++| TPS6 LJM TPS2 LOOP 04068 M01S03277.1ds +++| 04069 M01S03278.1ds +++| TPS7 LDD IR+3 04070 M01S03279.1ds +++| SBN LIQF 04071 M01S03280.1ds +++| MJN TPS8 IF PRESERVED FILES NOT BEING INITIALIZED 04072 M01S03281.1ds +++| RJM CSD CHECK SHARED DEVICE 04073 M01S03282.1ds +++| NJN TPS6 IF NOT CLEAR FOR INITIALIZE 04074 M01S03283.1ds +++| LDD IR+3 04075 M01S03284.1ds +++| SBN LIPF 04076 M01S03285.1ds +++| MJN TPS8 IF PERMANENT FILES NOT INVOLVED 04077 M01S03286.1ds +++| RJM SFA 04078 M01S03287.1ds +++| ZJN TPS8 IF NO FAST ATTACH FILES ON DEVICE 04079 M01S03288.1ds +++| LDC =C*FAST ATTACH FILES ON DEVICE.* 04080 M01S03289.1ds +++| RJM DFM 04081 M01S03290.1ds +++| LJM TPSX RETURN 04082 M01S03291.1ds +++| 04083 M01S03292.1ds +++| TPS8 LDD IR+3 SET INITIALIZE REQUEST 04084 M01S03293.1ds +++| RJM TLB 04085 M01S03294.1ds +++| LDD CM+1 CHECK REPLY 04086 M01S03295.1ds +++| LPN 1 04087 M01S03296.1ds +++| ZJN TPS10 IF INITIALIZE FLAG NOT ALREADY SET 04088 M01S03297.1ds +++| TPS9 LCN 0 CLEAR INITIALIZE FLAG 04089 M01S03298.1ds +++| LMD IR+3 04090 M01S03299.1ds +++| RJM TLB 04091 M01S03300.1ds +++| TPS10 LDD IR+3 CHECK REQUEST 04092 M01S03301.1ds +++| SBN LIFD 04093 M01S03302.1ds +++| MJN TPS12 IF NOT FULL INITIALIZE REQUEST 04094 M01S03303.1ds +++| LDD AB 04095 M01S03304.1ds +++| LPC MLIPF+MLIQF 04096 M01S03305.1ds +++| ZJN TPS11 IF PARTIAL INITIALIZE NOT SET 04097 M01S03306.1ds +++| CMSTF LIPF 04098 M01S03307.1ds +++| CMSTF LIQF 04099 M01S03308.1ds +++| TPS11 LDD AB+1 04100 M01S03309.1ds +++| LPC MLIDF+MLIAF+MLIEF+MLIMF 04101 M01S03310.1ds +++| ZJN TPS12 IF NO DAYFILE INITIALIZATION SET 04102 M01S03311.1ds +++| CMSTF LIDF 04103 M01S03312.1ds +++| CMSTF LIAF 04104 M01S03313.1ds +++| CMSTF LIEF 04105 M01S03314.1ds +++| CMSTF LIMF 04106 M01S03315.1ds +++| TPS12 LDD MS REREAD INITIALIZE STATUS FROM MST 04107 M01S03316.1ds +++| SHN 3 04108 M01S03317.1ds +++| ADN STLL 04109 M01S03318.1ds +++| CRD AB 04110 M01S03319.1ds +++| LDD AB+1 04111 M01S03320.1ds +++| SCN 77 04112 M01S03321.1ds +++| SHN 6 04113 M01S03322.1ds +++| LMD AB 04114 M01S03323.1ds +++| SCN MLIRP+MLUNL+MLCKP+MLDUL+MRASD+MLPTU 04115 M01S03324.1ds +++| ZJN TPS13 IF NO INITIALIZE FLAGS SET 04116 M01S03325.1ds +++| LCN 0 04117 M01S03326.1ds +++| TPS13 LMC -LIRP SET/CLEAR INITIALIZE PENDING 04118 M01S03327.1ds +++| RJM TLB 04119 M01S03328.1ds +++| LJM TPS2 LOOP 04120 M01S03329.1ds +++| 04121 M01S03330.1ds +++| 04122 M01S03331.1ds +++| TPSA VFD 60/0 EQUIPMENT LIST 04123 M01S03332.1ds +++| VMS SPACE 4,10 04124 M01S03333.1ds +++|*** VMSF - VERIFY MASS STORAGE FUNCTION. 04125 M01S03334.1ds +++|* 04126 M01S03335.1ds +++|* ENTRY (IR+4) = EST ORDINAL. 04127 M01S03336.1ds +++| 04128 M01S03337.1ds +++| 04129 M01S03338.1ds +++| VMS ENTRY ENTRY/EXIT 04130 M01S03339.1ds +++| LDD IR+4 SET EST ORDINAL 04131 M01S03340.1ds +++| STD T5 04132 M01S03341.1ds +++| SFA EST 04133 M01S03342.1ds +++| ADK EQDE 04134 M01S03343.1ds +++| CRD CM 04135 M01S03344.1ds +++| LDD CM+4 GET MST PARAMETERS 04136 M01S03345.1ds +++| SHN 3 04137 M01S03346.1ds +++| ADN SDGL 04138 M01S03347.1ds +++| CRD CM 04139 M01S03348.1ds +++| ADN STLL-SDGL 04140 M01S03349.1ds +++| CRD AB 04141 M01S03350.1ds +++| LDD AB+1 EXTRACT CURRENT ERROR STATUS 04142 M01S03351.1ds +++| LPN 77 04143 M01S03352.1ds +++| STD T7 04144 M01S03353.1ds +++| LDD CM+4 04145 M01S03354.1ds +++| LPN 1 04146 M01S03355.1ds +++| ZJN VMS1 IF DEVICE NOT INTERLOCKED 04147 M01S03356.1ds +++| LDD T7 CHECK CURRENT ERROR STATUS
| Line S03357 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | ns2552 |
Seq # *Modification Id* Act ----------------------------+ 04148 M02S03357.ns2552 ---| LMN /LSD/STVE 04149 M01S00022.ns2552 +++| LMN STVE 04150 M01S03358.1ds +++| SHN 14 04151 M01S03359.1ds +++| NJN VMS1 IF NOT INTERLOCKED WITH VALIDATION ERROR 04152 M01S03360.1ds +++| SMSTF LPTU PROHIBIT TRT UPDATE BY *1RU* 04153 M01S03361.1ds +++| LDN VEQS&VEIS 04154 M01S03362.1ds +++| VMS1 LMK VEIS SET UP MONITOR CALL 04155 M01S03363.1ds +++| STD CM+3 04156 M01S03364.1ds +++| LDD T5 04157 M01S03365.1ds +++| STD CM+1 04158 M01S03366.1ds +++| MONITOR VMSM REQUEST MASS STORAGE VALIDATION 04159 M01S03367.1ds +++| LDD CM+1 04160 M01S03368.1ds +++| NJN VMS3 IF VALIDATION NOT SUCCESSFUL 04161 M01S03369.1ds +++| CMSTF LPTU ALLOW TRT UPDATES BY *1RU* 04162 M01S03370.1ds +++| LDD T7 CHECK PREVIOUS ERROR STATUS
| Line S03371 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | ns2552 |
Seq # *Modification Id* Act ----------------------------+ 04163 M02S03371.ns2552 ---| LMN /LSD/STVE 04164 M01S00023.ns2552 +++| LMN STVE 04165 M01S03372.1ds +++| NJN VMS2 IF NOT VALIDATION ERROR 04166 M01S03373.1ds +++| RJM SES CLEAR MST ERROR STATUS 04167 M01S03374.1ds +++| LDN NCPL 04168 M01S03375.1ds +++| CRD CN 04169 M01S03376.1ds +++| AOD CN+1 CLEAR MESSAGE AT SYSTEM CONTROL POINT 04170 M01S03377.1ds +++| SHN 7 04171 M01S03378.1ds +++| ADN MS2W 04172 M01S03379.1ds +++| CWD CM 04173 M01S03380.1ds +++| CMSTF GDEI CLEAR ERROR IDLE FLAG 04174 M01S03381.1ds +++| SMSTF LCKP SET CHECKPOINT REQUEST 04175 M01S03382.1ds +++| VMS2 LJM VMSX RETURN 04176 M01S03383.1ds +++| 04177 M01S03384.1ds +++| VMS3 STD IR+2 SET ERROR CODES 04178 M01S03385.1ds +++| LDD T7 CHECK PREVIOUS ERROR STATUS
| Line S03386 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | ns2552 |
Seq # *Modification Id* Act ----------------------------+ 04179 M02S03386.ns2552 ---| SBN /LSD/MNEC 04180 M01S00024.ns2552 +++| SBN MNEC 04181 M01S03387.1ds +++| PJN VMS4 IF PREVIOUS ERROR NOT TO BE CHANGED 04182 M01S03388.1ds +++| LDD TH 04183 M01S03389.1ds +++| RAD T5
| Line S03390 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | ns2552 |
Seq # *Modification Id* Act ----------------------------+ 04184 M02S03390.ns2552 ---| LDN /LSD/STVE SET ERROR STATUS IN MST 04185 M01S00025.ns2552 +++| LDN STVE SET ERROR STATUS IN MST 04186 M01S03391.1ds +++| RJM SES 04187 M01S03392.1ds +++| VMS4 LDD T5 SET EST ORDINAL FOR *5ME* 04188 M01S03393.1ds +++| STD IR+3 04189 M01S03394.1ds +++| EXECUTE 5ME 04190 M01S03395.1ds +++| UJN VMS2 RETURN 04191 M01S00011.274l797 +++| DOD SPACE 4,10 04192 M01S00012.274l797 +++|** DOD - DISMOUNT OPTICAL DRIVE. 04193 M01S00013.274l797 +++|* 04194 M01S00014.274l797 +++|* ENTRY (T5) = EST ORDINAL. 04195 M01S00015.274l797 +++|* 04196 M01S00016.274l797 +++|* USES CM+1. 04197 M01S00017.274l797 +++|* 04198 M01S00018.274l797 +++|* CALLS (1OS). 04199 M01S00019.274l797 +++|* 04200 M01S00020.274l797 +++|* MACROS DELAY, MONITOR. 04201 M01S00021.274l797 +++| 04202 M01S00022.274l797 +++| 04203 M01S00023.274l797 +++| DOD2 LDD CP CLEAR WAIT MESSAGE 04204 M01S00024.274l797 +++| ADK MS2W 04205 M01S00025.274l797 +++| CWD CM 04206 M01S00026.274l797 +++| 04207 M01S00027.274l797 +++| DOD SUBR ENTRY/EXIT 04208 M01S00028.274l797 +++| LDM IDSC PASS RELEVANT CALL DATA ON TO *1OS* 04209 M01S00029.274l797 +++| STM DODA+2 04210 M01S00030.274l797 +++| LDD IR+3 04211 M01S00031.274l797 +++| STM DODA+3 04212 M01S00032.274l797 +++| LDD IR+4 04213 M01S00033.274l797 +++| STM DODA+4 04214 M01S00034.274l797 +++| DOD1 LDD MA PLACE REQUEST IN MESSAGE BUFFER 04215 M01S00035.274l797 +++| CWM DODA,ON 04216 M01S00036.274l797 +++| LDN 0 04217 M01S00037.274l797 +++| STD CM+1 04218 M01S00038.274l797 +++| MONITOR RPPM CALL *1OS* 04219 M01S00039.274l797 +++| LDD CM+1 04220 M01S00040.274l797 +++| NJP DOD2 IF PP ASSIGNED OR IN REQUEST QUEUE 04221 M01S00041.274l797 +++| LDD CP ISSUE WAIT MESSAGE 04222 M01S00042.274l797 +++| ADK MS2W 04223 M01S00043.274l797 +++| CWM DODB,TR 04224 M01S00044.274l797 +++| DELAY 100D DELAY BETWEEN *1OS* CALLS 04225 M01S00045.274l797 +++| UJN DOD1 RETRY *1OS* CALL 04226 M01S00046.274l797 +++| 04227 M01S00047.274l797 +++| 04228 M01S00048.274l797 +++| DODA VFD 18/3R1OS,6/0,12/0,12/0,12/0 04229 M01S00049.274l797 +++| DODB DATA C*WAITING FOR PP.* 04230 M01S03396.1ds +++| SPACE 4,10 04231 M01S03397.1ds +++|** COMMON DECKS. 04232 M01S03398.1ds +++| 04233 M01S03399.1ds +++| 04234 M01S00026.ns2552 +++| QUAL$ EQU 0 DON-T QUALIFY COMMON DECKS 04235 M01S00027.ns2552 +++|*CALL COMPCLC 04236 M01S03400.1ds +++|*CALL COMPSES 04237 M01S03401.1ds +++|*CALL COMPSMI 04238 M01S03402.1ds +++| 04239 M01S03403.1ds +++| 04240 M01S03404.1ds +++| L0SD EQU *+2 *0SD* LOAD ADDRESS 04241 M01S03405.1ds +++| 04242 M01S03406.1ds +++| ERRNG BFMS-L0SD-ZSDL *0SD* OVERFLOW 04243 M01S03407.1ds +++|
| Line S03408 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | 1ds21 |
Seq # *Modification Id* Act ----------------------------+ 04244 M02S03408.1ds21 ---| OVERFLOW OVLA,BFMS 04245 M01S00079.1ds21 +++| OVERFLOW OVLA,/OVERLAY/BUFB
| Line S03409 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | ns2765 |
Seq # *Modification Id* Act ----------------------------+ 04246 M02S03409.ns2765 ---| OVERLAY (IAF FUNCTIONS.) 04247 M01S00014.ns2765 +++| OVERLAY (IAF/MAGNET FUNCTIONS.) 04248 M01S03410.1ds +++| DIA SPACE 4,10 04249 M01S03411.1ds +++|*** FUNCTION DIAF - SEND MESSAGE TO *IAF* USER. 04250 M01S03412.1ds +++|* 04251 M01S03413.1ds +++|* ENTRY (CP) = *IAF* CONTROL POINT ADDRESS. 04252 M01S03414.1ds +++|* (IR+3) = USER TERMINAL NUMBER. 04253 M01S00016.ns2680 +++|* = 7777 IF DIALING ALL TERMINALS. 04254 M01S03415.1ds +++|* (IR+4) = 6/KEYBOARD BUFFER OFFSET, 6/. 04255 M01S03416.1ds +++| 04256 M01S03417.1ds +++| 04257 M01S03418.1ds +++| DIA ENTRY ENTRY/EXIT 04258 M01S03419.1ds +++| LDC IFSI FIND *IAF* 04259 M01S03420.1ds +++| RJM CSS
| Line S03421 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04260 M02S03421.ns2680 ---| PAUSE
| Line S03422 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04261 M02S03422.ns2680 ---| LDD CM+1 04262 M01S00017.ns2680 +++| CHKERR CHECK ERROR FLAG 04263 M01S03423.1ds +++| NJN DIAX IF ERROR FLAG
| Line S03424 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04264 M02S03424.ns2680 ---| LDN 3 ONE HEADER AND TWO LINKAGE WORDS 04265 M01S00018.ns2680 +++| LDN 1 INITIALIZE TERMINAL COUNT 04266 M01S00019.ns2680 +++| STD SR+4 04267 M01S00020.ns2680 +++| LDN 40 INITIALIZE NO POT CHAIN RETRY COUNT 04268 M01S00021.ns2680 +++| STD AB 04269 M01S00022.ns2680 +++| LDD IR+3 GET TERMINAL NUMBER 04270 M01S00023.ns2680 +++| LMC 7777 CHECK FOR DIAL ALL REQUEST 04271 M01S00024.ns2680 +++| NJP DIA2 IF DIALING A SPECIFIC JSN 04272 M01S00025.ns2680 +++| LDK /REM/VPST INITIALIZE TERMINAL NUMBER 04273 M01S00026.ns2680 +++| STD IR+3 04274 M01S00027.ns2680 +++| LDD RA 04275 M01S00028.ns2680 +++| SHN 6 04276 M01S00029.ns2680 +++| ADK /REM/VTTP 04277 M01S00030.ns2680 +++| CRD CN GET FWA OF TERMINAL TABLE 04278 M01S00031.ns2680 +++| ADK /REM/VMNL-/REM/VTTP 04279 M01S00032.ns2680 +++| CRD SR GET MAX NUMBER OF TERMINALS 04280 M01S00033.ns2680 +++| LDN 2 SET WORD COUNT FOR CM READ 04281 M01S00034.ns2680 +++| STD CN 04282 M01S00035.ns2680 +++| LDK /REM/VPST*/REM/VTTL 04283 M01S00036.ns2680 +++| DIA1 RAD CN+2 04284 M01S00037.ns2680 +++| SHN -14 04285 M01S00038.ns2680 +++| RAD CN+1 04286 M01S00039.ns2680 +++| SHN 6 CALCULATE ADDRESS FOR THIS ENTRY 04287 M01S00040.ns2680 +++| ADD RA 04288 M01S00041.ns2680 +++| SHN 6 04289 M01S00042.ns2680 +++| ADD CN+2 04290 M01S00043.ns2680 +++| ADK /REM/VFST 04291 M01S00044.ns2680 +++| CRD T1 READ JSN 04292 M01S00045.ns2680 +++| ADK /REM/VDCT-/REM/VFST GET OUTPUT POT POINTERS 04293 M01S00046.ns2680 +++| ERRNZ /REM/VSTT-/REM/VDCT-1 CODE REQUIRES CONTIGUOUS WORDS 04294 M01S00047.ns2680 +++| CRM T3,CN 04295 M01S00048.ns2680 +++| LDD T1 04296 M01S00049.ns2680 +++| ZJN DIA3 IF ENTRY NOT IN USE 04297 M01S00050.ns2680 +++| STM DIAA+7 PLACE JSN IN FAILURE MESSAGE 04298 M01S00051.ns2680 +++| LDD T3+4 04299 M01S00052.ns2680 +++| ADD T3+5+4 04300 M01S00053.ns2680 +++| ZJN DIA2 IF OUTPUT NOT ALREADY QUEUED 04301 M01S00054.ns2680 +++| LDD T2 04302 M01S00055.ns2680 +++| STM DIAA+10 04303 M01S00056.ns2680 +++| LDC DIAA 04304 M01S00057.ns2680 +++| RJM DFM SEND FAILURE MESSAGE TO DAYFILE 04305 M01S00058.ns2680 +++| UJN DIA3 CHECK FOR ERROR 04306 M01S00059.ns2680 +++| 04307 M01S00060.ns2680 +++| DIA2 LDN 3 ONE HEADER AND TWO LINKAGE WORDS 04308 M01S03425.1ds +++| RJM SBT FILL POTS WITH MESSAGE
| Line S03426 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04309 M02S03426.ns2680 ---| ZJN DIAX IF POT CHAIN UNAVAILABLE 04310 M01S00061.ns2680 +++| ZJN DIA7 IF NO POT CHAIN AVAILABLE 04311 M01S00062.ns2680 +++| LDN 40 RESET NO POT CHAIN RETRY COUNT 04312 M01S00063.ns2680 +++| STD AB 04313 M01S03427.1ds +++| LDD IR+3 04314 M01S03428.1ds +++| STM WARA+4 ADD TERMINAL NUMBER TO REQUEST 04315 M01S03429.1ds +++| RJM ITR ISSUE *TSEM* REQUEST
| Line S03430 Modification History | |
|---|---|
M01 (Added by) | 1ds |
M02 (Updated by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04316 M02S03430.ns2680 ---| UJN DIAX EXIT 04317 M01S00064.ns2680 +++| DIA3 CHKERR CHECK ERROR FLAG 04318 M01S00065.ns2680 +++| NJN DIA6 IF ERROR FLAG SET 04319 M01S00066.ns2680 +++| AOD IR+3 INCREMENT TERMINAL NUMBER 04320 M01S00067.ns2680 +++| SOD SR+4 DECREMENT TERMINAL COUNT 04321 M01S00068.ns2680 +++| ZJN DIA6 IF ALL TERMINALS DIALED 04322 M01S00069.ns2680 +++| LDN /REM/VTTL ADVANCE TERMINAL TABLE POINTER 04323 M01S00070.ns2680 +++| DIA4 UJP DIA1 READ TERMINAL TABLE ENTRY 04324 M01S00071.ns2680 +++| 04325 M01S00072.ns2680 +++| DIA5 LDC DIAB *DIAL - NO POT CHAIN.* 04326 M01S00073.ns2680 +++| RJM DFM SEND FAILURE MESSAGE 04327 M01S00074.ns2680 +++| DIA6 LJM DIAX RETURN 04328 M01S00075.ns2680 +++| 04329 M01S00076.ns2680 +++| DIA7 SOD AB DECREMENT NO POT CHAIN RETRY COUNT 04330 M01S00077.ns2680 +++| MJN DIA5 IF THROUGH RETRYING 04331 M01S00078.ns2680 +++| LDC 1400 DELAY 100 MILLISECONDS AND RETRY 04332 M01S00079.ns2680 +++| STD T0 04333 M01S00080.ns2680 +++| DIA8 DELAY 04334 M01S00081.ns2680 +++| CHKERR CHECK ERROR FLAG 04335 M01S00082.ns2680 +++| NJN DIA6 IF ERROR FLAG SET 04336 M01S00083.ns2680 +++| SOD T0 04337 M01S00084.ns2680 +++| NJN DIA8 IF NOT THROUGH DELAYING 04338 M01S00085.ns2680 +++| UJN DIA4 RETRY DIAL 04339 M01S00086.ns2680 +++| 04340 M01S00087.ns2680 +++| 04341 M01S00088.ns2680 +++| DIAA DATA C*OUTPUT BUSY - JSNX.* 04342 M01S00089.ns2680 +++| DIAB DATA C*DIAL - NO POT CHAIN.* 04343 M01S00002.ns2587 +++| KIJ SPACE 4,10 04344 M01S00003.ns2587 +++|*** FUNCTION KIJF - KILL INTERACTIVE JOB. 04345 M01S00004.ns2587 +++|* 04346 M01S00005.ns2587 +++|* ENTRY (IR+3 - IR+4) = JSN. 04347 M01S00006.ns2587 +++| 04348 M01S00007.ns2587 +++| 04349 M01S00008.ns2587 +++| KIJ ENTRY ENTRY/EXIT 04350 M01S00009.ns2587 +++| LDD MA COPY JSN INTO (AB - AB+1) 04351 M01S00010.ns2587 +++| CWD IR+3 04352 M01S00011.ns2587 +++| CRD AB
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | ns2587 |
M02 (Updated by) | ns2748a |
Seq # *Modification Id* Act ----------------------------+ 04353 M02S00012.ns2748a ---| LDN /REM/VCPT IAF CP NUMBER
| Line S00013 Modification History | |
|---|---|
M01 (Added by) | ns2587 |
M02 (Updated by) | ns2748a |
Seq # *Modification Id* Act ----------------------------+ 04354 M02S00013.ns2748a ---| SHN 7
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | ns2587 |
M02 (Updated by) | ns2748a |
Seq # *Modification Id* Act ----------------------------+ 04355 M02S00014.ns2748a ---| STD CP 04356 M01S00003.ns2748a +++| LDN /REM/VCPT MOVE TO *IAF* CP 04357 M01S00004.ns2748a +++| STD CM+1 04358 M01S00005.ns2748a +++| MONITOR CCAM 04359 M01S00006.ns2748a +++| LDD CM+1 04360 M01S00007.ns2748a +++| NJP IDS2 IF UNABLE TO CHANGE CONTROL POINTS 04361 M01S00015.ns2587 +++| LDC IFSI CHECK IF IAF PRESENT 04362 M01S00016.ns2587 +++| RJM CSS 04363 M01S00017.ns2587 +++|* LDN 0 04364 M01S00018.ns2587 +++| STD AB+3 INITIALIZE TERMINAL NUMBER
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | ns2587 |
M02 (Updated by) | ns2748a |
Seq # *Modification Id* Act ----------------------------+ 04365 M02S00019.ns2748a ---| LDD CP GET IAF-S RA
| Line S00020 Modification History | |
|---|---|
M01 (Added by) | ns2587 |
M02 (Updated by) | ns2748a |
Seq # *Modification Id* Act ----------------------------+ 04366 M02S00020.ns2748a ---| ADN FLSW
Proceed to Part 3
cdc/nos2.source/opl.opl871/deck/1ds.002.txt · Last modified: by 127.0.0.1