cdc:nos2.source:opl.opl871:common:cpcom
Common CPCOM
25 Modifications
Listing Sections
- Common CPCOM Start
- Common CPCOM Part 1 (Line 1223)
- Common CPCOM Part 2 (Line 2741)
- Common CPCOM Part 3 (Line 3920)
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M01S00001.cpcom +++| TTL CPCOM - CENTRAL PROGRAM SYSTEM COMMUNICATION MACROS. 00002 M01S00002.cpcom +++| TITLE
Line S00003 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00003 M02S00003.ns2011 ---| CPCOM SPACE 4 00004 M01S00001.ns2011 +++| CPCOM SPACE 4,10
Line S00004 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00005 M02S00004.281l803 ---|* COMMENT COPYRIGHT CONTROL DATA CORP. 1970. 00006 M01S00001.281l803 +++|* COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992.
Line S00005 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00007 M02S00005.ns2011 ---| CPCOM SPACE 4 00008 M01S00002.ns2011 +++| CPCOM SPACE 4,10 00009 M01S00006.cpcom +++|*** CPCOM - CENTRAL PROGRAM SYSTEM COMMUNICATION MACROS. 00010 M01S00003.ns2011 +++|* 00011 M01S00007.cpcom +++|* G. R. MANSFIELD. 70/09/21.
Line S00008 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00012 M02S00008.ns2011 ---| CPCOM SPACE 4
Line S00009 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00013 M02S00009.ns2011 ---|*** THE SYSTEM MACROS PROVIDE THE USER WITH PREDEFINED
Line S00010 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00014 M02S00010.ns2011 ---|* CALLS FOR COMMONLY USED SYSTEM REQUESTS.
Line S00011 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00015 M02S00011.ns2011 ---|* WHERE A PARAMETER REFERS TO AN ADDRESS EXPRESSION, THE
Line S00012 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00016 M02S00012.ns2011 ---|* PARAMETER MAY BE A REGISTER NAME, A RELOCATABLE ADDRESS,
Line S00013 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00017 M02S00013.ns2011 ---|* AN EXTERNAL SYMBOL NAME, OR AN ABSOLUTE ADDRESS.
Line S00014 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00018 M02S00014.ns2011 ---|* WHERE A RECALL OPTION IS SPECIFIED, THE PRESENCE OF THE
Line S00015 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00019 M02S00015.ns2011 ---|* OPTION CAUSES RECALL OPERATION TO TAKE PLACE.
Line S00016 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00020 M02S00016.ns2011 ---| SPACE 4 00021 M01S00004.ns2011 +++| CPCOM SPACE 4,10 00022 M01S00005.ns2011 +++|*** THE SYSTEM MACROS PROVIDE THE USER WITH PREDEFINED CALLS FOR 00023 M01S00006.ns2011 +++|* COMMONLY USED SYSTEM REQUESTS. WHERE A PARAMETER REFERS TO 00024 M01S00007.ns2011 +++|* AN ADDRESS EXPRESSION, THE PARAMETER MAY BE A REGISTER NAME, 00025 M01S00008.ns2011 +++|* A RELOCATABLE ADDRESS, AN EXTERNAL SYMBOL NAME, OR AN 00026 M01S00009.ns2011 +++|* ABSOLUTE ADDRESS. WHERE A RECALL OPTION IS SPECIFIED, THE 00027 M01S00010.ns2011 +++|* PRESENCE OF THE OPTION CAUSES RECALL OPERATION TO TAKE PLACE. 00028 M01S00011.ns2011 +++| SPACE 4,10 00029 M01S00017.cpcom +++| BASE DECIMAL 00030 M01S00018.cpcom +++| TITLE GENERAL MACROS. 00031 M01S00019.cpcom +++| MACREF SPACE 4,10 00032 M01S00020.cpcom +++|** MACREF - GENERATE MACRO SYMBOLIC REFERENCE TABLE LISTING. 00033 M01S00021.cpcom +++|* 00034 M01S00022.cpcom +++|* CAUSES THE MACRO NAME TO BE LISTED IN THE SYMBOLIC 00035 M01S00023.cpcom +++|* REFERENCE TABLE UNDER THE QUALIFIER *MACRO$*. 00036 M01S00024.cpcom +++|* 00037 M01S00025.cpcom +++|* MACREF MNAME 00038 M01S00026.cpcom +++|* MNAME MACRO NAME FOR REFERENCE TABLE. 00039 M01S00027.cpcom +++| 00040 M01S00028.cpcom +++| 00041 M01S00029.cpcom +++| PURGMAC MACREF 00042 M01S00030.cpcom +++| 00043 M01S00031.cpcom +++| MACREF MACRO N 00044 M01S00032.cpcom +++| QUAL MACRO$ 00045 M01S00033.cpcom +++|N SET * 00046 M01S00034.cpcom +++| QUAL * 00047 M01S00035.cpcom +++| ENDM
Line S00036 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00048 M02S00036.ns2011 ---| GENERAL SPACE 4 00049 M01S00012.ns2011 +++| SYSCOM SPACE 4,10 00050 M01S00037.cpcom +++|*** SYSCOM - DEFINE SYSTEMS COMMUNICATION SYMBOLS.
Line S00038 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00051 M02S00038.ns2011 ---|* 00052 M01S00039.cpcom +++|* 00053 M01S00040.cpcom +++|* SYSCOM B1 00054 M01S00041.cpcom +++|* IF *B1* IS PRESENT, USER DEFINES (B1) = 1. 00055 M01S00042.cpcom +++| 00056 M01S00043.cpcom +++| 00057 M01S00044.cpcom +++| PURGMAC SYSCOM 00058 M01S00045.cpcom +++| 00059 M01S00046.cpcom +++| SYSCOM MACRO N 00060 M01S00047.cpcom +++| MACREF SYSCOM 00061 M01S00048.cpcom +++| IFC EQ,$N$B1$,1 00062 M01S00049.cpcom +++| B1=1 00063 M01S00050.cpcom +++|**** PROGRAM CONTROL AREA 00064 M01S00051.cpcom +++|*
Line S00052 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00065 M02S00052.ns2011 ---|* 00066 M01S00053.cpcom +++|* RA+1 00067 M01S00054.cpcom +++|RA.MTR = 1 00068 M01S00055.cpcom +++|* FIRST ARGUMENT 00069 M01S00056.cpcom +++|ARGR = 2 00070 M01S00057.cpcom +++|* SPECIAL PROGRAM PARAMETER AREA (27B-47B) 00071 M01S00058.cpcom +++|SPPR = 27B 00072 M01S00001.242l642 +++|* MEMORY LINK BUFFER POINTER (BITS 0 - 17) 00073 M01S00002.242l642 +++|MLBR = 55B 00074 M01S00059.cpcom +++|* PROGRAM NAME (BITS 18 - 59) 00075 M01S00060.cpcom +++|PGNR = 64B 00076 M01S00061.cpcom +++|* ARGUMENT COUNT (BITS 0 - 17) 00077 M01S00062.cpcom +++|ACTR = 64B 00078 M01S00063.cpcom +++|* CMU OPTION AVAILABLE (BIT 59) 00079 M01S00064.cpcom +++|CMUR = 65B 00080 M01S00065.cpcom +++|* LWA+1 ASSIGNED PROGRAM SPACE (BITS 0 - 17) 00081 M01S00066.cpcom +++|LWPR = 65B 00082 M01S00067.cpcom +++|* CMU OPTION AVAILABLE (BIT 59) 00083 M01S00068.cpcom +++|RA.CMU = 65B 00084 M01S00069.cpcom +++|* FWA ASSIGNED PROGRAM SPACE (BITS 0 - 17) 00085 M01S00070.cpcom +++|FWPR = 66B 00086 M01S00071.cpcom +++|* JOB ORIGIN TYPE(BITS 24 - 35) 00087 M01S00072.cpcom +++|JOPR = 66B 00088 M01S00073.cpcom +++|* CEJ OPTION AVAILABLE (BIT 59) 00089 M01S00074.cpcom +++|RA.CEJ = 66B 00090 M01S00075.cpcom +++|* CEJ OPTION AVAILABLE (BIT 59) 00091 M01S00076.cpcom +++|XJPR = 66B 00092 M01S00077.cpcom +++|* *LDR* COMPLETION (BIT 29) 00093 M01S00078.cpcom +++|LDRR = 67B 00094 M01S00079.cpcom +++|* SYSTEM CHARACTER SET MODE FLAG 00095 M01S00080.cpcom +++|CSMR = 67B 00096 M01S00081.cpcom +++|* CONTROL CARD (8 LOCATIONS) 00097 M01S00082.cpcom +++|CCDR = 70B 00098 M01S00083.cpcom +++|* LINES/PRINTER PAGE 00099 M01S00084.cpcom +++|LINP = 60D 00100 M01S00085.cpcom +++|**** 00101 M01S00086.cpcom +++| ENDM
Line S00087 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00102 M02S00087.ns2011 ---| IDIV SPACE 4 00103 M01S00013.ns2011 +++| IDIV SPACE 4,10 00104 M01S00088.cpcom +++|*** IXI XJ/XK - INTEGER DIVISION. 00105 M01S00089.cpcom +++|* 00106 M01S00090.cpcom +++|* IXI XJ/XK 00107 M01S00091.cpcom +++|* DIVIDE XJ BY XK TO XI. 00108 M01S00092.cpcom +++|* DESTROYS XJ, XK, B7. 00109 M01S00093.cpcom +++| 00110 M01S00094.cpcom +++| 00111 M01S00095.cpcom +++| PURGDEF IXX/X 00112 M01S00096.cpcom +++| 00113 M01S00097.cpcom +++| IXX/X OPDEF I,J,K 00114 M01S00098.cpcom +++| PX.J X.J 00115 M01S00099.cpcom +++| PX.K X.K 00116 M01S00100.cpcom +++| NX.K X.K 00117 M01S00101.cpcom +++| FX.I X.J/X.K 00118 M01S00102.cpcom +++| UX.I B7,X.I 00119 M01S00103.cpcom +++| LX.I X.I,B7 00120 M01S00104.cpcom +++| ENDM
Line S00105 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00121 M02S00105.ns2011 ---| MOVE SPACE 4 00122 M01S00014.ns2011 +++| MOVE SPACE 4,10 00123 M01S00106.cpcom +++|*** MOVE - MOVE DATA BLOCK. 00124 M01S00107.cpcom +++|* 00125 M01S00015.ns2011 +++|* MOVE COUNT,FROM,TO 00126 M01S00108.cpcom +++|*
Line S00109 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00127 M02S00109.ns2011 ---|* MOVE COUNT,FROM,TO 00128 M01S00110.cpcom +++|* ENTRY *COUNT* = WORD COUNT OF BLOCK TO BE MOVED. 00129 M01S00111.cpcom +++|* *FROM* = ADDRESS OF FIRST WORD OF BLOCK. 00130 M01S00112.cpcom +++|* *TO* = ADDRESS OF FIRST WORD OF DESTINATION. 00131 M01S00016.ns2011 +++|* 00132 M01S00113.cpcom +++|* CALLS MVE= (COMCMVE). 00133 M01S00114.cpcom +++| 00134 M01S00115.cpcom +++| 00135 M01S00116.cpcom +++| PURGMAC MOVE 00136 M01S00117.cpcom +++| 00137 M01S00118.cpcom +++| MOVE MACRO C,F,T 00138 M01S00119.cpcom +++| MACREF MOVE 00139 M01S00120.cpcom +++| R= X1,C 00140 M01S00121.cpcom +++| R= X2,F 00141 M01S00122.cpcom +++| R= X3,T 00142 M01S00123.cpcom +++| RJ =XMVE= 00143 M01S00124.cpcom +++| ENDM 00144 M01S00125.cpcom +++| TITLE SYSTEM REQUESTS.
Line S00126 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00145 M02S00126.ns2011 ---| SYSTEM SPACE 4
Line S00127 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00146 M02S00127.ns2011 ---|*** SYSTEM REQUEST MACROS FORMAT REQUESTS INTO X REGISTERS
Line S00128 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00147 M02S00128.ns2011 ---|* AND RETURN JUMP TO THE SYSTEM COMMUNICATION SUBROUTINES.
Line S00129 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00148 M02S00129.ns2011 ---|* THESE SUBROUTINES ARE AVAILABLE AS ENTRY POINTS FOR
Line S00130 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00149 M02S00130.ns2011 ---|* RELOCATABLE PROGRAMS OR AS COMMON DECKS FOR ABSOLUTE
Line S00131 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00150 M02S00131.ns2011 ---|* PROGRAMS. 00151 M01S00017.ns2011 +++| SYSTEM SPACE 4,15 00152 M01S00018.ns2011 +++|*** SYSTEM REQUEST MACROS FORMAT REQUESTS INTO X REGISTERS AND 00153 M01S00019.ns2011 +++|* RETURN JUMP TO THE SYSTEM COMMUNICATION SUBROUTINES. THESE 00154 M01S00020.ns2011 +++|* SUBROUTINES ARE AVAILABLE AS ENTRY POINTS FOR RELOCATABLE 00155 M01S00021.ns2011 +++|* PROGRAMS OR AS COMMON DECKS FOR ABSOLUTE PROGRAMS. 00156 M01S00132.cpcom +++|* 00157 M01S00133.cpcom +++|* ENTRY COMMON DECK
Line S00134 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00158 M02S00134.ns2011 ---|*
Line S00135 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00159 M02S00135.ns2011 ---|* SYS= COMCSYS
Line S00136 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00160 M02S00136.ns2011 ---|* MSG= COMCSYS
Line S00137 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00161 M02S00137.ns2011 ---|* RCL= COMCSYS
Line S00138 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00162 M02S00138.ns2011 ---|* WNB= COMCSYS
Line S00139 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00163 M02S00139.ns2011 ---|* CPM= COMCCPM
Line S00140 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00164 M02S00140.ns2011 ---|* OVL= COMCOVL
Line S00141 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00165 M02S00141.ns2011 ---| ABORT SPACE 4 00166 M01S00022.ns2011 +++|* SYS= *COMCSYS* 00167 M01S00023.ns2011 +++|* MSG= *COMCSYS* 00168 M01S00024.ns2011 +++|* RCL= *COMCSYS* 00169 M01S00025.ns2011 +++|* WNB= *COMCSYS* 00170 M01S00026.ns2011 +++|* CPM= *COMCCPM* 00171 M01S00027.ns2011 +++|* OVL= *COMCOVL* 00172 M01S00028.ns2011 +++| ABORT SPACE 4,10 00173 M01S00142.cpcom +++|*** ABORT - ABORT JOB. 00174 M01S00143.cpcom +++|* 00175 M01S00029.ns2011 +++|* ABORT 00176 M01S00144.cpcom +++|*
Line S00145 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00177 M02S00145.ns2011 ---|* ABORT 00178 M01S00146.cpcom +++|* CALLS SYS=. 00179 M01S00147.cpcom +++| 00180 M01S00148.cpcom +++| 00181 M01S00149.cpcom +++| PURGMAC ABORT 00182 M01S00150.cpcom +++| 00183 M01S00151.cpcom +++| ABORT MACRO 00184 M01S00152.cpcom +++| MACREF ABORT
Line S00153 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00185 M02S00153.ns2011 ---|* FORM ABORT REQUEST 00186 M01S00030.ns2011 +++|* FORM ABORT REQUEST. 00187 M01S00154.cpcom +++| SX6 4RABTP/16D 00188 M01S00155.cpcom +++| LX6 40D
Line S00156 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00189 M02S00156.ns2011 ---|* PROCESS SYSTEM REQUEST 00190 M01S00031.ns2011 +++|* PROCESS SYSTEM REQUEST. 00191 M01S00157.cpcom +++| RJ =XSYS= 00192 M01S00158.cpcom +++| ENDM
Line S00159 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00193 M02S00159.ns2011 ---| CLOCK SPACE 4 00194 M01S00032.ns2011 +++| CLOCK SPACE 4,10 00195 M01S00160.cpcom +++|*** CLOCK - RETURN TIME OF DAY. 00196 M01S00161.cpcom +++|* 00197 M01S00033.ns2011 +++|* CLOCK STATUS 00198 M01S00162.cpcom +++|*
Line S00163 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00199 M02S00163.ns2011 ---|* CLOCK STATUS 00200 M01S00164.cpcom +++|* ENTRY *STATUS* = ADDRESS FOR TIME OF DAY RESPONSE. 00201 M01S00034.ns2011 +++|* 00202 M01S00165.cpcom +++|* EXIT - 00203 M01S00166.cpcom +++|*T STATUS 60/ * HH.MM.SS.*
Figure STATUS
00204 M01S00035.ns2011 +++|* 00205 M01S00167.cpcom +++|* CALLS SYS=. 00206 M01S00168.cpcom +++| 00207 M01S00169.cpcom +++| 00208 M01S00170.cpcom +++| PURGMAC CLOCK 00209 M01S00171.cpcom +++| 00210 M01S00172.cpcom +++| CLOCK MACRO S 00211 M01S00173.cpcom +++| MACREF CLOCK
Line S00174 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00212 M02S00174.ns2011 ---|* FORM TIME (CLOCK) REQUEST 00213 M01S00036.ns2011 +++|* FORM TIME (CLOCK) REQUEST. 00214 M01S00175.cpcom +++| SX6 3RTIM 00215 M01S00176.cpcom +++| R= X1,S 00216 M01S00177.cpcom +++| LX6 42D 00217 M01S00178.cpcom +++| BX6 X6+X1 00218 M01S00179.cpcom +++| SX1 200002B 00219 M01S00180.cpcom +++| LX1 24D 00220 M01S00181.cpcom +++| BX6 X6+X1
Line S00182 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00221 M02S00182.ns2011 ---|* PROCESS SYSTEM REQUEST 00222 M01S00037.ns2011 +++|* PROCESS SYSTEM REQUEST. 00223 M01S00183.cpcom +++| RJ =XSYS= 00224 M01S00184.cpcom +++| ENDM
Line S00185 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00225 M02S00185.ns2011 ---| CONTROL SPACE 4 00226 M01S00038.ns2011 +++| CONTROL SPACE 4,20 00227 M01S00186.cpcom +++|*** CONTROL - READ NEXT CONTROL CARD. 00228 M01S00187.cpcom +++|* 00229 M01S00039.ns2011 +++|* CONTROL BUF,RSS,LF,SF 00230 M01S00188.cpcom +++|*
Line S00189 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00231 M02S00189.ns2011 ---|* CONTROL BUF,RSS,LF,SF
Line S00190 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00232 M02S00190.ns2011 ---|* ENTRY *BUF* = ADDRESS TO WHICH CONTROL CARD WILL BE READ.
Line S00191 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00233 M02S00191.ns2011 ---|* (ALLOW 8 WORDS) 00234 M01S00040.ns2011 +++|* ENTRY *BUF* = ADDRESS TO WHICH CONTROL STATEMENT WILL BE 00235 M01S00041.ns2011 +++|* READ. (ALLOW 8 WORDS) 00236 M01S00192.cpcom +++|* *RSS* IF PRESENT SUPPRESSES THE ADVANCEMENT OF THE
Line S00193 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00237 M02S00193.ns2011 ---|* CONTROL CARDS. THIS OPTION ALLOWS
Line S00194 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00238 M02S00194.ns2011 ---|* THE NEXT CONTROL CARD TO BE CHECKED.
Line S00195 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00239 M02S00195.ns2011 ---|* *LF* IF PRESENT INDICATES TO RETURN CONTROL CARD
Line S00196 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00240 M02S00196.ns2011 ---|* IRREGARDLESS OF WHETHER IT POINTS AT A LOCAL FILE.
Line S00197 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00241 M02S00197.ns2011 ---|* NORMALLY NO CONTROL CARD WILL BE RETURNED IF IT CALLS
Line S00198 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00242 M02S00198.ns2011 ---|* FOR EXECUTION OF A LOCAL FILE. IF THIS OPTION IS
Line S00199 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00243 M02S00199.ns2011 ---|* SELECTED BIT 17 IN THE PARAMETER COUNT WORD WILL
Line S00200 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00244 M02S00200.ns2011 ---|* BE SET IF A CONTROL CARD IS FOR A LOCAL FILE. 00245 M01S00042.ns2011 +++|* CONTROL STATEMENTS. THIS OPTION ALLOWS THE 00246 M01S00043.ns2011 +++|* NEXT CONTROL STATEMENT TO BE CHECKED. 00247 M01S00044.ns2011 +++|* *LF* IF PRESENT INDICATES TO RETURN CONTROL STATEMENT 00248 M01S00045.ns2011 +++|* IRREGARDLESS OF WHETHER IT POINTS AT A LOCAL 00249 M01S00046.ns2011 +++|* FILE. NORMALLY NO CONTROL STATEMENT WILL BE 00250 M01S00047.ns2011 +++|* RETURNED IF IT CALLS FOR EXECUTION OF A LOCAL 00251 M01S00048.ns2011 +++|* FILE. IF THIS OPTION IS SELECTED BIT 17 IN 00252 M01S00049.ns2011 +++|* THE PARAMETER COUNT WORD WILL BE SET IF A 00253 M01S00050.ns2011 +++|* CONTROL STATEMENT IS FOR A LOCAL FILE. 00254 M01S00201.cpcom +++|* *SF* IF PRESENT INDICATES PARAMETERS UNPACKED IN SCOPE
Line S00202 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00255 M02S00202.ns2011 ---|* FORMAT. 00256 M01S00051.ns2011 +++|* FORMAT. 00257 M01S00052.ns2011 +++|* 00258 M01S00203.cpcom +++|* CALLS SYS=. 00259 M01S00204.cpcom +++| 00260 M01S00205.cpcom +++| 00261 M01S00206.cpcom +++| PURGMAC CONTROL 00262 M01S00207.cpcom +++| 00263 M01S00208.cpcom +++| CONTROL MACRO A,B,C,D 00264 M01S00209.cpcom +++| MACREF CONTROL 00265 M01S00210.cpcom +++| R= X1,A 00266 M01S00211.cpcom +++|.1 IFC EQ,$B$$ 00267 M01S00212.cpcom +++|.2 IFC EQ,$D$$ 00268 M01S00213.cpcom +++| BX6 X6-X6 00269 M01S00214.cpcom +++|.2 ELSE 00270 M01S00215.cpcom +++| SX6 40B 00271 M01S00216.cpcom +++|.2 ENDIF 00272 M01S00217.cpcom +++|.1 ELSE 00273 M01S00218.cpcom +++|.2 IFC EQ,$C$$ 00274 M01S00219.cpcom +++|.3 IFC EQ,$D$$ 00275 M01S00220.cpcom +++| R= X6,1 00276 M01S00221.cpcom +++|.3 ELSE 00277 M01S00222.cpcom +++| SX6 41B 00278 M01S00223.cpcom +++|.3 ENDIF 00279 M01S00224.cpcom +++|.2 ELSE 00280 M01S00225.cpcom +++|.3 IFC EQ,$D$$ 00281 M01S00226.cpcom +++| R= X6,2 00282 M01S00227.cpcom +++|.3 ELSE 00283 M01S00228.cpcom +++| SX6 42B 00284 M01S00229.cpcom +++|.3 ENDIF 00285 M01S00230.cpcom +++|.2 ENDIF 00286 M01S00231.cpcom +++|.1 ENDIF 00287 M01S00232.cpcom +++| LX6 18D 00288 M01S00233.cpcom +++| BX6 X6+X1 00289 M01S00234.cpcom +++| SX2 1LP+4 00290 M01S00235.cpcom +++| SX1 3RTCS 00291 M01S00236.cpcom +++| LX2 24D 00292 M01S00237.cpcom +++| LX1 42D 00293 M01S00238.cpcom +++| BX6 X6+X2 00294 M01S00239.cpcom +++| BX6 X6+X1 00295 M01S00240.cpcom +++| RJ =XSYS= 00296 M01S00241.cpcom +++| ENDM
Line S00242 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00297 M02S00242.ns2011 ---| DATE SPACE 4 00298 M01S00053.ns2011 +++| DATE SPACE 4,10 00299 M01S00243.cpcom +++|*** DATE - RETURN DATE. 00300 M01S00244.cpcom +++|*
Line S00054 Modification History | |
---|---|
M01 (Added by) | ns2011 |
M02 (Updated by) | ns2789 |
Seq # *Modification Id* Act ----------------------------+ 00301 M02S00054.ns2789 ---|* DATE STATUS 00302 M01S00001.ns2789 +++|* DATE STATUS,FORMAT 00303 M01S00245.cpcom +++|*
Line S00246 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00304 M02S00246.ns2011 ---|* DATE STATUS 00305 M01S00247.cpcom +++|* ENTRY *STATUS* = ADDRESS FOR DATE RESPONSE. 00306 M01S00002.ns2789 +++|* *FORMAT* = *4*, RETURN 4-DIGIT YEAR FORMAT. 00307 M01S00055.ns2011 +++|* 00308 M01S00248.cpcom +++|* EXIT -
Line S00249 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2789 |
Seq # *Modification Id* Act ----------------------------+ 00309 M02S00249.ns2789 ---|*T STATUS 60/ * YY/MM/DD.*
Figure STATUS
00310 M01S00003.ns2789 +++|*T STATUS 60/ * YY/MM/DD.* (IF *FORMAT* OMITTED OR .NE. *4*)
Figure STATUS
00311 M01S00004.ns2789 +++|*T STATUS 60/ *YYYY/MM/DD* (IF *FORMAT* = *4*)
Figure STATUS
00312 M01S00056.ns2011 +++|* 00313 M01S00250.cpcom +++|* CALLS SYS=. 00314 M01S00251.cpcom +++| 00315 M01S00252.cpcom +++| 00316 M01S00253.cpcom +++| PURGMAC DATE 00317 M01S00254.cpcom +++|
Line S00255 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2789 |
Seq # *Modification Id* Act ----------------------------+ 00318 M02S00255.ns2789 ---| DATE MACRO S 00319 M01S00005.ns2789 +++| DATE MACRO S,F 00320 M01S00256.cpcom +++| MACREF DATE
Line S00257 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00321 M02S00257.ns2011 ---|* FORM TIME (DATE) REQUEST 00322 M01S00057.ns2011 +++|* FORM TIME (DATE) REQUEST. 00323 M01S00258.cpcom +++| SX6 3RTIM 00324 M01S00259.cpcom +++| R= X1,S 00325 M01S00260.cpcom +++| LX6 42D 00326 M01S00261.cpcom +++| BX6 X6+X1 00327 M01S00006.ns2789 +++|A IFC EQ,*F*4* 00328 M01S00007.ns2789 +++| SX1 200013B 00329 M01S00008.ns2789 +++|A ELSE 00330 M01S00262.cpcom +++| SX1 200001B 00331 M01S00009.ns2789 +++|A ENDIF 00332 M01S00263.cpcom +++| LX1 24D 00333 M01S00264.cpcom +++| BX6 X6+X1
Line S00265 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00334 M02S00265.ns2011 ---|* PROCESS SYSTEM REQUEST 00335 M01S00058.ns2011 +++|* PROCESS SYSTEM REQUEST. 00336 M01S00266.cpcom +++| RJ =XSYS= 00337 M01S00267.cpcom +++| ENDM
Line S00268 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00338 M02S00268.ns2011 ---| ENDRUN SPACE 4 00339 M01S00059.ns2011 +++| ENDRUN SPACE 4,10 00340 M01S00269.cpcom +++|*** ENDRUN - END CENTRAL PROGRAM. 00341 M01S00270.cpcom +++|* 00342 M01S00060.ns2011 +++|* ENDRUN 00343 M01S00271.cpcom +++|*
Line S00272 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00344 M02S00272.ns2011 ---|* ENDRUN 00345 M01S00273.cpcom +++|* CALLS SYS=. 00346 M01S00274.cpcom +++| 00347 M01S00275.cpcom +++| 00348 M01S00276.cpcom +++| PURGMAC ENDRUN 00349 M01S00277.cpcom +++| 00350 M01S00278.cpcom +++| ENDRUN MACRO 00351 M01S00279.cpcom +++| MACREF ENDRUN
Line S00280 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00352 M02S00280.ns2011 ---|* FORM END REQUEST 00353 M01S00061.ns2011 +++|* FORM END REQUEST. 00354 M01S00281.cpcom +++| SX6 4RENDP/16D 00355 M01S00282.cpcom +++| LX6 40D
Line S00283 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00356 M02S00283.ns2011 ---|* PROCESS SYSTEM REQUEST 00357 M01S00062.ns2011 +++|* PROCESS SYSTEM REQUEST. 00358 M01S00284.cpcom +++| RJ =XSYS= 00359 M01S00285.cpcom +++| ENDM
Line S00286 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00360 M02S00286.ns2011 ---| EREXIT SPACE 4 00361 M01S00063.ns2011 +++| EREXIT SPACE 4,20 00362 M01S00287.cpcom +++|*** EREXIT - SET ERROR RETURN ADDRESS.
Line S00288 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00363 M02S00288.ns2011 ---|* THIS WILL SET CPU PROGRAM ADDRESS TO RESTART THE PROGRAM AT 00364 M01S00064.ns2011 +++|* 00365 M01S00065.ns2011 +++|* THIS WILL SET CPU PROGRAM ADDRESS TO RESTART THE PROGRAM 00366 M01S00289.cpcom +++|* AFTER IT HAS BEEN ABORTED DUE TO EITHER AN ILLEGAL OPERATION
Line S00290 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00367 M02S00290.ns2011 ---|* OR OPERATOR INTERVENTION. IF THE ERROR WAS DUE TO TIME
Line S00291 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00368 M02S00291.ns2011 ---|* LIMIT BEING EXCEEDED, AN ADDITIONAL 8 SECONDS OF CPU TIME
Line S00292 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00369 M02S00292.ns2011 ---|* WILL BE ALLOWED. ALL ERRORS EXCEPT CPU ABORT WILL BE
Line S00293 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00370 M02S00293.ns2011 ---|* PROCESSED. 00371 M01S00066.ns2011 +++|* OR OPERATOR INTERVENTION. IF THE ERROR WAS DUE TO TIME LIMIT 00372 M01S00067.ns2011 +++|* BEING EXCEEDED, AN ADDITIONAL 8 SECONDS OF CPU TIME WILL BE 00373 M01S00068.ns2011 +++|* ALLOWED. ALL ERRORS EXCEPT CPU ABORT WILL BE PROCESSED. 00374 M01S00294.cpcom +++|* 00375 M01S00069.ns2011 +++|* EREXIT ADDR 00376 M01S00295.cpcom +++|*
Line S00296 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00377 M02S00296.ns2011 ---|* EREXIT ADDR 00378 M01S00297.cpcom +++|* ENTRY *ADDR* = ADDRESS FOR ERROR RETURN. 00379 M01S00298.cpcom +++|* 00380 M01S00299.cpcom +++|* THE CPU WILL BE STARTED AT *ADDR* WITH RA = 00381 M01S00300.cpcom +++|*T,RA 6/0,6/MO,18/EA,6/EF,24/0
Figure RA
00382 M01S00301.cpcom +++|* MO = IF ARITHMETIC ERROR CONTAINS EXIT CONDTION 00383 M01S00302.cpcom +++|* EA = ADDRESS WHERE CPU WAS AT WHEN ERROR OCCURED 00384 M01S00303.cpcom +++|* EF = ERROR FLAG 00385 M01S00070.ns2011 +++|* 00386 M01S00304.cpcom +++|* CALLS CPM=. 00387 M01S00305.cpcom +++| 00388 M01S00306.cpcom +++| 00389 M01S00307.cpcom +++| PURGMAC EREXIT 00390 M01S00308.cpcom +++| 00391 M01S00309.cpcom +++| EREXIT MACRO A 00392 M01S00310.cpcom +++| MACREF EREXIT 00393 M01S00311.cpcom +++| R= X1,A 00394 M01S00312.cpcom +++| SX2 4 00395 M01S00313.cpcom +++| RJ =XCPM= 00396 M01S00314.cpcom +++| ENDM 00397 M01S00315.cpcom +++| HTIME SPACE 4,20 00398 M01S00316.cpcom +++|*** HTIME - REQUEST ACCUMULATED CYBER 176 CPU CLOCK CYCLE COUNT. 00399 M01S00317.cpcom +++|* 00400 M01S00318.cpcom +++|* HTIME STATUS,OPTION 00401 M01S00071.ns2011 +++|* 00402 M01S00319.cpcom +++|* ENTRY *STATUS* = ADDRESS FOR CLOCK CYCLE RESPONSE. 00403 M01S00320.cpcom +++|* *OPTION* = 0, CONTROL POINT ACCUMULATED CLOCK CYCLE 00404 M01S00321.cpcom +++|* COUNT. 00405 M01S00322.cpcom +++|* 1, ACCUMULATED CLOCK CYCLE COUNT SINCE 00406 M01S00323.cpcom +++|* DEADSTART. 00407 M01S00072.ns2011 +++|* 00408 M01S00324.cpcom +++|* EXIT - 00409 M01S00325.cpcom +++|*T STATUS 12/TYPE,48/CLOCK CYCLE COUNT
Figure STATUS
Line S00326 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00410 M02S00326.ns2011 ---|* 00411 M01S00327.cpcom +++|* *TYPE* = 2000B, IF CYBER 176 CPU CLOCK CYCLE COUNT IS 00412 M01S00328.cpcom +++|* AVAILABLE. 00413 M01S00329.cpcom +++|* = 6000B, IF CYBER 176 CPU CLOCK NOT AVAILABLE. 00414 M01S00073.ns2011 +++|* 00415 M01S00330.cpcom +++|* CALLS SYS=. 00416 M01S00331.cpcom +++| 00417 M01S00332.cpcom +++| 00418 M01S00333.cpcom +++| PURGMAC HTIME 00419 M01S00334.cpcom +++| 00420 M01S00335.cpcom +++| HTIME MACRO S,O 00421 M01S00336.cpcom +++| MACREF HTIME
Line S00337 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00422 M02S00337.ns2011 ---|* FORM TIME (HTIME) REQUEST. 00423 M01S00074.ns2011 +++|* FORM TIME (HTIME) REQUEST. 00424 M01S00338.cpcom +++| IFNE O,0,2 00425 M01S00339.cpcom +++| IFNE O,1,1 00426 M01S00340.cpcom +++| ERR ILLEGAL OPTION - O 00427 M01S00341.cpcom +++| SX6 3RTIM 00428 M01S00342.cpcom +++| R= X1,S 00429 M01S00343.cpcom +++| LX6 42D 00430 M01S00344.cpcom +++| BX6 X6+X1 00431 M01S00345.cpcom +++| SX1 11B+O 00432 M01S00346.cpcom +++| LX1 24D 00433 M01S00347.cpcom +++| BX6 X6+X1
Line S00348 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00434 M02S00348.ns2011 ---|* PROCESS SYSTEM REQUEST. 00435 M01S00075.ns2011 +++|* PROCESS SYSTEM REQUEST. 00436 M01S00349.cpcom +++| RJ =XSYS= 00437 M01S00350.cpcom +++| ENDM HTIME
Line S00351 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00438 M02S00351.ns2011 ---| JDATE SPACE 4 00439 M01S00076.ns2011 +++| JDATE SPACE 4,10 00440 M01S00352.cpcom +++|*** JDATE - JULIAN DATE. 00441 M01S00353.cpcom +++|*
Line S00077 Modification History | |
---|---|
M01 (Added by) | ns2011 |
M02 (Updated by) | ns2789 |
Seq # *Modification Id* Act ----------------------------+ 00442 M02S00077.ns2789 ---|* JDATE STATUS 00443 M01S00010.ns2789 +++|* JDATE STATUS,FORMAT 00444 M01S00354.cpcom +++|*
Line S00355 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00445 M02S00355.ns2011 ---|* JDATE STATUS 00446 M01S00356.cpcom +++|* ENTRY *STATUS* = ADDRESS FOR JULIAN DATE. 00447 M01S00011.ns2789 +++|* *FORMAT* OMITTED, RETURN NORMAL FORMAT *YYDDD*. 00448 M01S00012.ns2789 +++|* = *I*, RETURN *ISO* FORMAT *CYYDDD* 00449 M01S00013.ns2789 +++|* = *4*, RETURN 4-DIGIT YEAR FORMAT *YYYYDDD*. 00450 M01S00014.ns2789 +++|* = ANY OTHER, RETURN NORMAL FORMAT *YYDDD*. 00451 M01S00078.ns2011 +++|* 00452 M01S00357.cpcom +++|* EXIT -
Line S00358 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2789 |
Seq # *Modification Id* Act ----------------------------+ 00453 M02S00358.ns2789 ---|*T STATUS 30/,30/ *YYDDD*
Figure STATUS
00454 M01S00015.ns2789 +++|*T STATUS 30/,30/ *YYDDD* (IF *FORMAT* OMITTED OR .NE. *I* AND *4*)
Figure STATUS
00455 M01S00016.ns2789 +++|*T STATUS 24/,36/ *CYYDDD* (IF *FORMAT* = *I*)
Figure STATUS
00456 M01S00017.ns2789 +++|*T STATUS 18/,42/ *YYYYDDD* (IF *FORMAT* = *4*)
Figure STATUS
00457 M01S00079.ns2011 +++|* 00458 M01S00359.cpcom +++|* CALLS SYS=. 00459 M01S00360.cpcom +++| 00460 M01S00361.cpcom +++| 00461 M01S00362.cpcom +++| PURGMAC JDATE 00462 M01S00363.cpcom +++|
Line S00364 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2789 |
Seq # *Modification Id* Act ----------------------------+ 00463 M02S00364.ns2789 ---| JDATE MACRO S 00464 M01S00018.ns2789 +++| JDATE MACRO S,F 00465 M01S00365.cpcom +++| MACREF JDATE
Line S00366 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00466 M02S00366.ns2011 ---|* FORM TIME (JDATE) REQUEST. 00467 M01S00080.ns2011 +++|* FORM TIME (JDATE) REQUEST. 00468 M01S00367.cpcom +++| SX6 3RTIM 00469 M01S00368.cpcom +++| R= X1,S 00470 M01S00369.cpcom +++| LX6 42D 00471 M01S00370.cpcom +++| BX6 X6+X1
Line S00371 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2789 |
Seq # *Modification Id* Act ----------------------------+ 00472 M02S00371.ns2789 ---| SX1 200003B 00473 M01S00019.ns2789 +++|A IFC EQ,*F*4* 00474 M01S00020.ns2789 +++| SX1 200014B RETURN *YYYYDDD* FORMAT 00475 M01S00021.ns2789 +++|A ELSE 00476 M01S00022.ns2789 +++|B IFC EQ,*F*I* 00477 M01S00023.ns2789 +++| SX1 200015B RETURN *CYYDDD* FORMAT 00478 M01S00024.ns2789 +++|B ELSE 00479 M01S00025.ns2789 +++| SX1 200003B RETURN *YYDDD* FORMAT 00480 M01S00026.ns2789 +++| ENDIF 00481 M01S00372.cpcom +++| LX1 24D 00482 M01S00373.cpcom +++| BX6 X6+X1
Line S00374 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00483 M02S00374.ns2011 ---|* PROCESS SYSTEM REQUEST. 00484 M01S00081.ns2011 +++|* PROCESS SYSTEM REQUEST. 00485 M01S00375.cpcom +++| RJ =XSYS= 00486 M01S00376.cpcom +++| ENDM
Line S00377 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00487 M02S00377.ns2011 ---| MEMORY SPACE 4 00488 M01S00082.ns2011 +++| MEMORY SPACE 4,35 00489 M01S00378.cpcom +++|*** MEMORY - REQUEST MEMORY.
Line S00379 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00490 M02S00379.ns2011 ---|* 00491 M01S00380.cpcom +++|* 00492 M01S00381.cpcom +++|* MEMORY TYPE,STATUS,RECALL,WORDS,NABORT 00493 M01S00382.cpcom +++|* *TYPE* = *CM*, REQUEST CENTRAL MEMORY. 00494 M01S00383.cpcom +++|* BLANK, REQUEST CENTRAL MEMORY. 00495 M01S00384.cpcom +++|* *SCM*, REQUEST CENTRAL MEMORY. 00496 M01S00385.cpcom +++|* *ECS*, REQUEST EXTENDED CORE STORAGE. 00497 M01S00386.cpcom +++|* *LCM*, REQUEST EXTENDED CORE STORAGE.
Line S00387 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00498 M02S00387.ns2011 ---|* *STATUS* = ADDRESS OF STATUS WORD, IF DESIRED.
Line S00388 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00499 M02S00388.ns2011 ---|* THIS IS REQUIRED IF NOT CENTRAL MEMORY AND/OR
Line S00389 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00500 M02S00389.ns2011 ---|* NABORT IS SELECTED.
Line S00390 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00501 M02S00390.ns2011 ---|* *WORDS* = MEMORY ASSIGNMENT REQUEST.
Line S00391 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00502 M02S00391.ns2011 ---|* THIS IS NOT REQUIRED IF NUMBER OF WORDS HAS BEEN
Line S00392 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00503 M02S00392.ns2011 ---|* PLACED INTO *STATUS*. IF THE VALUE OF *WORDS*
Line S00393 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00504 M02S00393.ns2011 ---|* IS GREATER THAN 377777B THE VALUE MUST BE PASSED
Line S00394 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00505 M02S00394.ns2011 ---|* TO THE *MEMORY* MACRO IN AN X REGISTER. 00506 M01S00083.ns2011 +++|* *STATUS* = ADDRESS OF STATUS WORD, IF DESIRED. THIS 00507 M01S00084.ns2011 +++|* IS REQUIRED IF NOT CENTRAL MEMORY AND/OR 00508 M01S00085.ns2011 +++|* *NABORT* IS SELECTED. 00509 M01S00086.ns2011 +++|* *WORDS* = MEMORY ASSIGNMENT REQUEST. THIS IS NOT 00510 M01S00087.ns2011 +++|* REQUIRED IF NUMBER OF WORDS HAS BEEN PLACED 00511 M01S00088.ns2011 +++|* INTO *STATUS*. IF THE VALUE OF *WORDS* IS 00512 M01S00089.ns2011 +++|* GREATER THAN 377777B THE VALUE MUST BE PASSED 00513 M01S00090.ns2011 +++|* TO THE *MEMORY* MACRO IN AN X REGISTER. 00514 M01S00395.cpcom +++|* *NABORT* = BLANK IF PROGRAM IS TO BE ABORTED IF THE
Line S00396 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00515 M02S00396.ns2011 ---|* REQUESTED MEMORY IS NOT AVAILABLE. IF NON-BLANK AND
Line S00397 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00516 M02S00397.ns2011 ---|* THE MEMORY IS UNAVAILABLE, THE CURRENT FIELD LENGTH
Line S00398 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00517 M02S00398.ns2011 ---|* IS RETURNED IN BITS 30-59 OF *STATUS*. 00518 M01S00091.ns2011 +++|* REQUESTED MEMORY IS NOT AVAILABLE. IF NON- 00519 M01S00092.ns2011 +++|* BLANK AND THE MEMORY IS UNAVAILABLE, THE 00520 M01S00093.ns2011 +++|* CURRENT FIELD LENGTH IS RETURNED IN BITS 00521 M01S00094.ns2011 +++|* 30-59 OF *STATUS*. 00522 M01S00399.cpcom +++|* 00523 M01S00400.cpcom +++|*T STATUS 30/ N,30/ 0
Figure STATUS
00524 M01S00401.cpcom +++|* N MEMORY REQUEST (IF N .GT. 0 THEN THE FOLLOWING IS
Line S00402 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00525 M02S00402.ns2011 ---|* RETURNED) 00526 M01S00095.ns2011 +++|* RETURNED) 00527 M01S00096.ns2011 +++|* N = 12/0,1/R,17/FL 00528 M01S00097.ns2011 +++|* R = NO REDUCE OVERRIDE. 00529 M01S00098.ns2011 +++|* FL = CM FIELD LENGTH. 00530 M01S00099.ns2011 +++|* (IF N = -1 MAX FL IS RETURNED) 00531 M01S00403.cpcom +++|*
Line S00404 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00532 M02S00404.ns2011 ---|* N = 12/0,1/N,17/FL
Line S00405 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00533 M02S00405.ns2011 ---|*
Line S00406 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00534 M02S00406.ns2011 ---|* N = NO REDUCE OVERRIDE.
Line S00407 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00535 M02S00407.ns2011 ---|* FL = CM FIELD LENGTH.
Line S00408 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00536 M02S00408.ns2011 ---|*
Line S00409 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00537 M02S00409.ns2011 ---|* (IF N = -1 MAX FL IS RETURNED) 00538 M01S00410.cpcom +++|* CALLS SYS=. 00539 M01S00411.cpcom +++| 00540 M01S00412.cpcom +++| 00541 M01S00413.cpcom +++| PURGMAC MEMORY 00542 M01S00414.cpcom +++| 00543 M01S00415.cpcom +++| MEMORY MACRO T,S,L,W,N 00544 M01S00416.cpcom +++| LOCAL A,B,C,D 00545 M01S00417.cpcom +++| MACREF MEMORY 00546 M01S00418.cpcom +++| C SET 2 00547 M01S00419.cpcom +++| ECHO 3,A=(,CM,SCM,ECS,LCM),B=(0,0,0,1,1) 00548 M01S00420.cpcom +++| IFC EQ,$T$_A$,2 00549 M01S00421.cpcom +++| C SET B 00550 M01S00422.cpcom +++| STOPDUP 00551 M01S00423.cpcom +++| D SET C 00552 M01S00424.cpcom +++| IFEQ C,2,1 00553 M01S00425.cpcom +++| ERR ILLEGAL MEMORY REQUEST - (T) 00554 M01S00426.cpcom +++| IFC NE,$N$$,3 00555 M01S00427.cpcom +++| IFC EQ,$S$$,1 00556 M01S00428.cpcom +++| ERR ILLEGAL MEMORY REQUEST - (S) 00557 M01S00429.cpcom +++| C SET C+2 00558 M01S00430.cpcom +++|.1 IFC NE,$W$$ 00559 M01S00431.cpcom +++|.2 IFNE C,0 00560 M01S00432.cpcom +++| IFC EQ,$S$$,1 00561 M01S00433.cpcom +++| ERR ILLEGAL MEMORY REQUEST - (S) 00562 M01S00434.cpcom +++|.5 IFNE D,0 00563 M01S00435.cpcom +++|.5 IF REG,W 00564 M01S00436.cpcom +++|.3 MICRO 1,, W 00565 M01S00437.cpcom +++|.4 MICCNT .3 00566 M01S00438.cpcom +++|.5 IFEQ .4,2 00567 M01S00439.cpcom +++|.3 MICRO 1,1, W 00568 M01S00440.cpcom +++|.5 IFC EQ,*X*".3"* 00569 M01S00441.cpcom +++| BX6 W
Line S00442 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | cpcom9 |
Seq # *Modification Id* Act ----------------------------+ 00570 M02S00442.cpcom9 ---| MX1 -21 00571 M01S00001.cpcom9 +++| MX1 -30 00572 M01S00443.cpcom +++| BX6 -X1*X6 00573 M01S00444.cpcom +++|.5 ELSE 00574 M01S00445.cpcom +++| R= X6,W 00575 M01S00446.cpcom +++|.5 ENDIF 00576 M01S00447.cpcom +++| LX6 30D 00577 M01S00448.cpcom +++| R= A6,S 00578 M01S00449.cpcom +++| SYSTEM MEM,L,S,C 00579 M01S00450.cpcom +++|.2 ELSE 00580 M01S00451.cpcom +++| SYSTEM RFL,L,W,S 00581 M01S00452.cpcom +++|.2 ENDIF 00582 M01S00453.cpcom +++|.1 ELSE 00583 M01S00454.cpcom +++| SYSTEM MEM,L,S,C 00584 M01S00455.cpcom +++|.1 ENDIF 00585 M01S00456.cpcom +++| ENDM
Line S00457 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00586 M02S00457.ns2011 ---| MESSAGE SPACE 4,50 00587 M01S00100.ns2011 +++| MESSAGE SPACE 4,40 00588 M01S00458.cpcom +++|*** MESSAGE - DISPLAY MESSAGE. 00589 M01S00459.cpcom +++|* 00590 M01S00101.ns2011 +++|* MESSAGE MESSAGE,OPTION,RECALL 00591 M01S00460.cpcom +++|*
Line S00461 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00592 M02S00461.ns2011 ---|* MESSAGE MESSAGE,OPTION,RECALL 00593 M01S00102.ns2011 +++|* ENTRY *MESSAGE* = ADDRESS OF MESSAGE IN *C* FORMAT. 00594 M01S00103.ns2011 +++|* 0 = PLACE MESSAGE IN SYSTEM DAYFILE, JOB DAYFILE, 00595 M01S00104.ns2011 +++|* AND DISPLAY AT LINE 1 OF CONTROL POINT. 00596 M01S00105.ns2011 +++|* 1 = DISPLAY AT LINE 1 OF CONTROL POINT ONLY. 00597 M01S00106.ns2011 +++|* 2 = DISPLAY AT LINE 2 OF CONTROL POINT ONLY. 00598 M01S00107.ns2011 +++|* 3 = PLACE MESSAGE IN JOB DAYFILE ONLY. 00599 M01S00108.ns2011 +++|* 4 = PLACE MESSAGE IN ERROR LOG (SYOT OR *SSJ=* 00600 M01S00109.ns2011 +++|* ONLY). 00601 M01S00110.ns2011 +++|* 5 = PLACE MESSAGE IN ACCOUNT LOG (SYOT OR *SSJ=* 00602 M01S00111.ns2011 +++|* ONLY). 00603 M01S00462.cpcom +++|* 00604 M01S00112.ns2011 +++|* THE FOLLOWING ARE INCLUDED FOR NOS/BE COMPATIBILITY. 00605 M01S00113.ns2011 +++|* (CONVERTED BY *CPUMTR*/*1MA*) 00606 M01S00114.ns2011 +++|* 6 = PROCESS AS OPTION *0*. 00607 M01S00115.ns2011 +++|* 7 = PROCESS AS OPTION *3*. 00608 M01S00463.cpcom +++|*
Line S00464 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00609 M02S00464.ns2011 ---|* ENTRY *MESSAGE* = ADDRESS OF MESSAGE IN *C* FORMAT.
Line S00465 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00610 M02S00465.ns2011 ---|* *OPTION* = DISPLAY OPTION AS FOLLOWS.
Line S00466 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00611 M02S00466.ns2011 ---|*
Line S00467 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00612 M02S00467.ns2011 ---|* 0 = PLACE MESSAGE IN SYSTEM DAYFILE, JOB DAYFILE,
Line S00468 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00613 M02S00468.ns2011 ---|* AND DISPLAY AT LINE 1 OF CONTROL POINT.
Line S00469 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00614 M02S00469.ns2011 ---|* 1 = DISPLAY AT LINE 1 OF CONTROL POINT ONLY.
Line S00470 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00615 M02S00470.ns2011 ---|* 2 = DISPLAY AT LINE 2 OF CONTROL POINT ONLY.
Line S00471 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00616 M02S00471.ns2011 ---|* 3 = PLACE MESSAGE IN JOB DAYFILE ONLY.
Line S00472 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00617 M02S00472.ns2011 ---|* 4 = PLACE MESSAGE IN ERROR LOG (SYOT OR SSJ= ONLY).
Line S00473 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00618 M02S00473.ns2011 ---|* 5 = PLACE MESSAGE IN ACCOUNT LOG (SYOT OR SSJ= ONLY).
Line S00474 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00619 M02S00474.ns2011 ---|*
Line S00475 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00620 M02S00475.ns2011 ---|* THE FOLLOWING ARE INCLUDED FOR NOS/BE COMPATIBILITY.
Line S00476 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00621 M02S00476.ns2011 ---|* (CONVERTED BY CPUMTR/1MA)
Line S00477 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00622 M02S00477.ns2011 ---|*
Line S00478 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00623 M02S00478.ns2011 ---|* 6 = PROCESS AS OPTION *0*.
Line S00479 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00624 M02S00479.ns2011 ---|* 7 = PROCESS AS OPTION *3*.
Line S00480 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00625 M02S00480.ns2011 ---|*
Line S00481 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00626 M02S00481.ns2011 ---|* FOR *OPTION* THE FOLLOWING RULES APPLY
Line S00482 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00627 M02S00482.ns2011 ---|*
Line S00483 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00628 M02S00483.ns2011 ---|* IF *OPTION* IF NOT DEFINED (COMPASS *DEF*), FORCE
Line S00484 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00629 M02S00484.ns2011 ---|* A VALUE OF 1.
Line S00485 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00630 M02S00485.ns2011 ---|* IF *OPTION* IS DEFINED (COMPASS *DEF*), PASS TO
Line S00486 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00631 M02S00486.ns2011 ---|* THE SYSTEM.
Line S00487 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00632 M02S00487.ns2011 ---|* IF *OPTION* IS EMPTY, FORCE A VALUE OF 0.
Line S00488 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00633 M02S00488.ns2011 ---|* IF *OPTION* IS STRING *LOCAL*, FORCE A VALUE OF 3.
Line S00489 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00634 M02S00489.ns2011 ---|*
Line S00490 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00635 M02S00490.ns2011 ---|* ILLEGAL *OPTION* VALUES ARE RESET TO *1* BY THE
Line S00491 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00636 M02S00491.ns2011 ---|* SYSTEM. 00637 M01S00116.ns2011 +++|* FOR *OPTION* THE FOLLOWING RULES APPLY - 00638 M01S00117.ns2011 +++|* IF *OPTION* IF NOT DEFINED (COMPASS *DEF*), FORCE 00639 M01S00118.ns2011 +++|* A VALUE OF 1. 00640 M01S00119.ns2011 +++|* IF *OPTION* IS DEFINED (COMPASS *DEF*), PASS TO 00641 M01S00120.ns2011 +++|* THE SYSTEM. 00642 M01S00121.ns2011 +++|* IF *OPTION* IS EMPTY, FORCE A VALUE OF 0. 00643 M01S00122.ns2011 +++|* IF *OPTION* IS STRING *LOCAL*, FORCE A VALUE OF 3. 00644 M01S00123.ns2011 +++|* ILLEGAL *OPTION* VALUES ARE RESET TO 1 BY THE SYSTEM. 00645 M01S00492.cpcom +++|* 00646 M01S00493.cpcom +++|* *RECALL* = OPTIONAL RECALL PARAMETER 00647 M01S00494.cpcom +++|* 00648 M01S00495.cpcom +++|* CALLS MSG=. 00649 M01S00496.cpcom +++| 00650 M01S00497.cpcom +++| 00651 M01S00498.cpcom +++| PURGMAC MESSAGE 00652 M01S00499.cpcom +++| 00653 M01S00500.cpcom +++| MESSAGE MACRO M,O,L 00654 M01S00501.cpcom +++| LOCAL A 00655 M01S00502.cpcom +++| MACREF MESSAGE 00656 M01S00503.cpcom +++| R= X1,M 00657 M01S00504.cpcom +++|A SET 200000B 00658 M01S00505.cpcom +++| IFC EQ,$L$$,1 00659 M01S00506.cpcom +++|A SET 0 00660 M01S00507.cpcom +++|.1 IFC EQ,$O$LOCAL$ 00661 M01S00508.cpcom +++| R= X6,3+A 00662 M01S00509.cpcom +++|.1 ELSE 4 00663 M01S00510.cpcom +++|.2 IF DEF,O 00664 M01S00511.cpcom +++| R= X6,O+A 00665 M01S00512.cpcom +++|.2 ELSE 1 00666 M01S00513.cpcom +++| R= X6,1+A 00667 M01S00514.cpcom +++|* PROCESS MESSAGE REQUEST 00668 M01S00515.cpcom +++| RJ =XMSG= 00669 M01S00516.cpcom +++| ENDM
Line S00517 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00670 M02S00517.ns2011 ---| ONSW SPACE 4 00671 M01S00124.ns2011 +++| ONSW SPACE 4,10 00672 M01S00518.cpcom +++|*** ONSW - TURN ON SENSE SWITCHES.
Line S00519 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00673 M02S00519.ns2011 ---|* 00674 M01S00520.cpcom +++|* 00675 M01S00521.cpcom +++|* ONSW N 00676 M01S00522.cpcom +++|* 00677 M01S00523.cpcom +++|* ENTRY *N* = SENSE SWITCH BITS. (BIT 0 = SWITCH 1) 00678 M01S00524.cpcom +++|* IF A BIT IS SET, THE CORRESPONDING SWITCH IS SET. 00679 M01S00525.cpcom +++|* IF N=0, ALL SWITCHES REMAIN UNCHANGED. 00680 M01S00526.cpcom +++|* 00681 M01S00527.cpcom +++|* CALLS CPM=. 00682 M01S00528.cpcom +++| 00683 M01S00529.cpcom +++| 00684 M01S00530.cpcom +++| PURGMAC ONSW 00685 M01S00531.cpcom +++| 00686 M01S00532.cpcom +++| ONSW MACRO N 00687 M01S00533.cpcom +++| MACREF ONSW 00688 M01S00534.cpcom +++| R= X1,N 00689 M01S00535.cpcom +++| SX2 11B 00690 M01S00536.cpcom +++| RJ =XCPM= 00691 M01S00537.cpcom +++| ENDM
Line S00538 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00692 M02S00538.ns2011 ---| OFFSW SPACE 4 00693 M01S00125.ns2011 +++| OFFSW SPACE 4,10 00694 M01S00539.cpcom +++|*** OFFSW - TURN OFF SENSE SWITCHES.
Line S00540 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00695 M02S00540.ns2011 ---|* 00696 M01S00541.cpcom +++|* 00697 M01S00542.cpcom +++|* OFFSW N 00698 M01S00543.cpcom +++|* 00699 M01S00544.cpcom +++|* ENTRY *N* = SENSE SWITCH BITS. (BIT 0 = SWITCH 1) 00700 M01S00545.cpcom +++|* IF A BIT IS SET, THE CORRESPONDING SWITCH IS CLEARED. 00701 M01S00546.cpcom +++|* IF N=0, ALL SWITCHES REMAIN UNCHANGED. 00702 M01S00547.cpcom +++|* 00703 M01S00548.cpcom +++|* CALLS CPM=. 00704 M01S00549.cpcom +++| 00705 M01S00550.cpcom +++| 00706 M01S00551.cpcom +++| PURGMAC OFFSW 00707 M01S00552.cpcom +++| 00708 M01S00553.cpcom +++| OFFSW MACRO N 00709 M01S00554.cpcom +++| MACREF OFFSW 00710 M01S00555.cpcom +++| R= X1,N 00711 M01S00556.cpcom +++| SX2 12B 00712 M01S00557.cpcom +++| RJ =XCPM= 00713 M01S00558.cpcom +++| ENDM
Line S00559 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00714 M02S00559.ns2011 ---| OVERLAY SPACE 4 00715 M01S00126.ns2011 +++| OVERLAY SPACE 4,15 00716 M01S00560.cpcom +++|*** OVERLAY - LOAD OVERLAY. 00717 M01S00561.cpcom +++|* 00718 M01S00127.ns2011 +++|* OVERLAY NAME,LEVEL,SYSTEM,FWA 00719 M01S00562.cpcom +++|*
Line S00563 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00720 M02S00563.ns2011 ---|* OVERLAY NAME,LEVEL,SYSTEM,FWA 00721 M01S00564.cpcom +++|* ENTRY *NAME* = ADDRESS OF FILE NAME IN *L* FORMAT. 00722 M01S00565.cpcom +++|* *LEVEL* = OVERLAY LEVEL. 00723 M01S00566.cpcom +++|* *SYSTEM* IF SPECIFIED, OVERLAY WILL BE LOADED FROM
Line S00567 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00724 M02S00567.ns2011 ---|* SYSTEM LIBRARY, AND (NAME) = NAME OF
Line S00568 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00725 M02S00568.ns2011 ---|* OVERLAY. 00726 M01S00128.ns2011 +++|* SYSTEM LIBRARY, AND (NAME) = NAME OF OVERLAY. 00727 M01S00569.cpcom +++|* *FWA* IF SPECIFIED = ADDRESS AT WHICH OVERLAY WILL
Line S00570 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00728 M02S00570.ns2011 ---|* BE LOADED. 00729 M01S00129.ns2011 +++|* BE LOADED. 00730 M01S00130.ns2011 +++|* 00731 M01S00571.cpcom +++|* EXIT (X1) = OVERLAY ENTRY ADDRESS. 00732 M01S00131.ns2011 +++|* 00733 M01S00572.cpcom +++|* CALLS OVL=. 00734 M01S00573.cpcom +++| 00735 M01S00574.cpcom +++| 00736 M01S00575.cpcom +++| PURGMAC OVERLAY 00737 M01S00576.cpcom +++| 00738 M01S00577.cpcom +++| OVERLAY MACRO N,L,S,F 00739 M01S00578.cpcom +++| LOCAL A 00740 M01S00579.cpcom +++| MACREF OVERLAY 00741 M01S00580.cpcom +++|A SET 0 00742 M01S00581.cpcom +++| IFC NE,$S$$,1 00743 M01S00582.cpcom +++|A SET 1 00744 M01S00583.cpcom +++| IFC NE,$L$$ 00745 M01S00584.cpcom +++| SX6 L*100B+A 00746 M01S00585.cpcom +++| ELSE 1 00747 M01S00586.cpcom +++| SX6 A 00748 M01S00587.cpcom +++| R= X2,F 00749 M01S00588.cpcom +++| IFC NE,$N$X1$,1 00750 M01S00589.cpcom +++| SA1 N 00751 M01S00590.cpcom +++| RJ =XOVL= 00752 M01S00591.cpcom +++| ENDM
Line S00592 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00753 M02S00592.ns2011 ---| PDATE SPACE 4 00754 M01S00132.ns2011 +++| PDATE SPACE 4,10 00755 M01S00593.cpcom +++|*** PDATE - RETURN PACKED DATE. 00756 M01S00594.cpcom +++|* 00757 M01S00133.ns2011 +++|* PDATE STATUS 00758 M01S00595.cpcom +++|*
Line S00596 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00759 M02S00596.ns2011 ---|* PDATE STATUS 00760 M01S00597.cpcom +++|* ENTRY *STATUS* = ADDRESS FOR PACKED DATE. 00761 M01S00134.ns2011 +++|* 00762 M01S00598.cpcom +++|* EXIT - 00763 M01S00599.cpcom +++|*T STATUS 24/,18/ YYMMDD,18/ HHMMSS
Figure STATUS
00764 M01S00135.ns2011 +++|* 00765 M01S00600.cpcom +++|* CALLS SYS=. 00766 M01S00601.cpcom +++| 00767 M01S00602.cpcom +++| 00768 M01S00603.cpcom +++| PURGMAC PDATE 00769 M01S00604.cpcom +++| 00770 M01S00605.cpcom +++| PDATE MACRO S 00771 M01S00606.cpcom +++| MACREF PDATE
Line S00607 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00772 M02S00607.ns2011 ---|* FORM TIME (PDATE) REQUEST 00773 M01S00136.ns2011 +++|* FORM TIME (PDATE) REQUEST. 00774 M01S00608.cpcom +++| SX6 3RTIM 00775 M01S00609.cpcom +++| R= X1,S 00776 M01S00610.cpcom +++| LX6 42D 00777 M01S00611.cpcom +++| BX6 X6+X1 00778 M01S00612.cpcom +++| SX1 200006B 00779 M01S00613.cpcom +++| LX1 24D 00780 M01S00614.cpcom +++| BX6 X6+X1
Line S00615 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00781 M02S00615.ns2011 ---|* PROCESS SYSTEM REQUEST 00782 M01S00137.ns2011 +++|* PROCESS SYSTEM REQUEST. 00783 M01S00616.cpcom +++| RJ =XSYS= 00784 M01S00617.cpcom +++| ENDM
Line S00618 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00785 M02S00618.ns2011 ---| RECALL SPACE 4 00786 M01S00138.ns2011 +++| RECALL SPACE 4,10 00787 M01S00619.cpcom +++|*** RECALL - PLACE PROGRAM IN RECALL STATUS. 00788 M01S00620.cpcom +++|* 00789 M01S00139.ns2011 +++|* RECALL STATUS 00790 M01S00621.cpcom +++|*
Line S00622 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00791 M02S00622.ns2011 ---|* RECALL STATUS 00792 M01S00623.cpcom +++|* ENTRY *STATUS* IF PRESENT, PROGRAM WILL BE RECALLED WHEN 00793 M01S00624.cpcom +++|* BIT 0 OF (STATUS) IS SET. UNLESS 00794 M01S00625.cpcom +++|* (STATUS) = 0.
Line S00626 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00795 M02S00626.ns2011 ---|* CALLS RCL= OR WNB=. 00796 M01S00140.ns2011 +++|* 00797 M01S00141.ns2011 +++|* CALLS RCL=, WNB=. 00798 M01S00627.cpcom +++| 00799 M01S00628.cpcom +++| 00800 M01S00629.cpcom +++| PURGMAC RECALL 00801 M01S00630.cpcom +++| 00802 M01S00631.cpcom +++| RECALL MACRO S 00803 M01S00632.cpcom +++| MACREF RECALL
Line S00633 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00804 M02S00633.ns2011 ---|* RECALL 00805 M01S00142.ns2011 +++|* RECALL. 00806 M01S00634.cpcom +++| IFC EQ,$S$$ 00807 M01S00635.cpcom +++| RJ =XRCL= 00808 M01S00636.cpcom +++| ELSE 2
Line S00637 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00809 M02S00637.ns2011 ---|* WAIT NOT BUSY 00810 M01S00143.ns2011 +++|* WAIT NOT BUSY. 00811 M01S00638.cpcom +++| R= X2,S 00812 M01S00639.cpcom +++| RJ =XWNB= 00813 M01S00640.cpcom +++| ENDIF 00814 M01S00641.cpcom +++| ENDM
Line S00642 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00815 M02S00642.ns2011 ---| RTIME SPACE 4 00816 M01S00144.ns2011 +++| RTIME SPACE 4,10 00817 M01S00643.cpcom +++|*** RTIME - REQUEST REAL TIME CLOCK READING. 00818 M01S00644.cpcom +++|* 00819 M01S00145.ns2011 +++|* RTIME STATUS 00820 M01S00645.cpcom +++|*
Line S00646 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00821 M02S00646.ns2011 ---|* RTIME STATUS 00822 M01S00647.cpcom +++|* ENTRY *STATUS* = ADDRESS FOR CLOCK RESPONSE. 00823 M01S00146.ns2011 +++|* 00824 M01S00648.cpcom +++|* EXIT - 00825 M01S00649.cpcom +++|*T STATUS 24/ SECONDS,36/ MILLISECONDS
Figure STATUS
00826 M01S00147.ns2011 +++|* 00827 M01S00650.cpcom +++|* CALLS SYS=. 00828 M01S00651.cpcom +++| 00829 M01S00652.cpcom +++| 00830 M01S00653.cpcom +++| PURGMAC RTIME 00831 M01S00654.cpcom +++| 00832 M01S00655.cpcom +++| RTIME MACRO S 00833 M01S00656.cpcom +++| MACREF RTIME
Line S00657 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00834 M02S00657.ns2011 ---|* FORM TIME (REAL TIME CLOCK) REQUEST 00835 M01S00148.ns2011 +++|* FORM TIME (REAL TIME CLOCK) REQUEST. 00836 M01S00658.cpcom +++| SX6 3RTIM 00837 M01S00659.cpcom +++| R= X1,S 00838 M01S00660.cpcom +++| LX6 42D 00839 M01S00661.cpcom +++| BX6 X6+X1 00840 M01S00662.cpcom +++| SX1 200005B 00841 M01S00663.cpcom +++| LX1 24D 00842 M01S00664.cpcom +++| BX6 X6+X1
Line S00665 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00843 M02S00665.ns2011 ---|* PROCESS SYSTEM REQUEST 00844 M01S00149.ns2011 +++|* PROCESS SYSTEM REQUEST. 00845 M01S00666.cpcom +++| RJ =XSYS= 00846 M01S00667.cpcom +++| ENDM
Line S00668 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00847 M02S00668.ns2011 ---| STIME SPACE 4 00848 M01S00150.ns2011 +++| STIME SPACE 4,10 00849 M01S00669.cpcom +++|*** STIME - REQUEST ACCUMULATED SRUS. 00850 M01S00670.cpcom +++|* 00851 M01S00151.ns2011 +++|* STIME STATUS 00852 M01S00671.cpcom +++|*
Line S00672 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00853 M02S00672.ns2011 ---|* STIME STATUS 00854 M01S00673.cpcom +++|* ENTRY *STATUS* = ADDRESS FOR RESPONSE. 00855 M01S00152.ns2011 +++|* 00856 M01S00674.cpcom +++|* EXIT - 00857 M01S00675.cpcom +++|*T STATUS 12/ 2000B,12/ 0,36/ MILLI-UNITS
Figure STATUS
00858 M01S00153.ns2011 +++|* 00859 M01S00676.cpcom +++|* CALLS SYS= 00860 M01S00677.cpcom +++| 00861 M01S00678.cpcom +++| 00862 M01S00679.cpcom +++| PURGMAC STIME 00863 M01S00680.cpcom +++| 00864 M01S00681.cpcom +++| STIME MACRO S 00865 M01S00682.cpcom +++| MACREF STIME
Line S00683 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00866 M02S00683.ns2011 ---|* FORM TIME (STIME) REQUEST 00867 M01S00154.ns2011 +++|* FORM TIME (STIME) REQUEST. 00868 M01S00684.cpcom +++| SX6 3RTIM 00869 M01S00685.cpcom +++| R= X1,S 00870 M01S00686.cpcom +++| LX6 42D 00871 M01S00687.cpcom +++| BX6 X6+X1 00872 M01S00688.cpcom +++| SX1 200007B 00873 M01S00689.cpcom +++| LX1 24D 00874 M01S00690.cpcom +++| BX6 X6+X1
Line S00691 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00875 M02S00691.ns2011 ---|* PROCESS SYSTEM REQUEST 00876 M01S00155.ns2011 +++|* PROCESS SYSTEM REQUEST. 00877 M01S00156.ns2011 +++| SYSTEM SPACE 4,15 00878 M01S00692.cpcom +++| RJ =XSYS= 00879 M01S00693.cpcom +++| ENDM 00880 M01S00694.cpcom +++| SYSTEM SPACE 4 00881 M01S00695.cpcom +++|*** SYSTEM - REQUEST SYSTEM FUNCTION. 00882 M01S00696.cpcom +++|* 00883 M01S00157.ns2011 +++|* SYSTEM REQUEST,RECALL,P1,P2 00884 M01S00697.cpcom +++|*
Line S00698 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00885 M02S00698.ns2011 ---|* SYSTEM REQUEST,RECALL,P1,P2 00886 M01S00699.cpcom +++|* ENTRY *REQUEST* = 3 CHARACTER SYSTEM REQUEST. 00887 M01S00700.cpcom +++|* *P1* = PARAMETER FOR BITS 0 - 17 OF REQUEST. 00888 M01S00701.cpcom +++|* *P2* = PARAMETER FOR BITS 18 - 35 OF REQUEST. 00889 M01S00702.cpcom +++|* USES X2. 00890 M01S00158.ns2011 +++|* 00891 M01S00703.cpcom +++|* CALLS SYS=. 00892 M01S00704.cpcom +++| 00893 M01S00705.cpcom +++| 00894 M01S00706.cpcom +++| PURGMAC SYSTEM 00895 M01S00707.cpcom +++| 00896 M01S00708.cpcom +++| SYSTEM MACRO C,L,P1,P2 00897 M01S00709.cpcom +++| MACREF SYSTEM 00898 M01S00710.cpcom +++| QUAL 00899 M01S00711.cpcom +++|(C) SET 0 00900 M01S00712.cpcom +++| QUAL * 00901 M01S00001.ns22000 +++| .1 IFC NE,/L/=/
Line S00713 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00902 M02S00713.ns2011 ---|* FORM REQUEST 00903 M01S00159.ns2011 +++|* FORM REQUEST. 00904 M01S00714.cpcom +++| IFC NE,$C$$,2 00905 M01S00715.cpcom +++| SX6 3R;A 00906 M01S00716.cpcom +++| LX6 42D
Line S00717 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00907 M02S00717.ns2011 ---|* PROCESS *P2* 00908 M01S00160.ns2011 +++|* PROCESS *P2*. 00909 M01S00718.cpcom +++| IFC NE,$P2$$,3 00910 M01S00719.cpcom +++| R= X2,P2 00911 M01S00720.cpcom +++| LX2 18D 00912 M01S00721.cpcom +++| IX6 X6+X2
Line S00722 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00913 M02S00722.ns2011 ---|* PROCESS *P1* 00914 M01S00161.ns2011 +++|* PROCESS *P1*. 00915 M01S00723.cpcom +++| IFC NE,$P1$$,2 00916 M01S00724.cpcom +++| R= X1,P1 00917 M01S00725.cpcom +++| BX6 X6+X1
Line S00726 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00918 M02S00726.ns2011 ---|* PROCESS RECALL REQUEST 00919 M01S00162.ns2011 +++|* PROCESS RECALL REQUEST. 00920 M01S00727.cpcom +++| IFC NE,$L$$,3 00921 M01S00728.cpcom +++| MX1 1 00922 M01S00729.cpcom +++| LX1 41D 00923 M01S00730.cpcom +++| IX6 X6+X1 00924 M01S00731.cpcom +++| RJ =XSYS= 00925 M01S00002.ns22000 +++| .1 ENDIF 00926 M01S00732.cpcom +++| ENDM
Line S00733 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00927 M02S00733.ns2011 ---| TIME SPACE 4 00928 M01S00163.ns2011 +++| TIME SPACE 4,15 00929 M01S00734.cpcom +++|*** TIME - REQUEST ACCUMULATED CPU TIME. 00930 M01S00735.cpcom +++|* 00931 M01S00164.ns2011 +++|* TIME STATUS 00932 M01S00736.cpcom +++|*
Line S00737 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00933 M02S00737.ns2011 ---|* TIME STATUS 00934 M01S00738.cpcom +++|* ENTRY *STATUS* = ADDRESS FOR TIME RESPONSE. 00935 M01S00165.ns2011 +++|* 00936 M01S00739.cpcom +++|* EXIT - 00937 M01S00740.cpcom +++|*T STATUS 12/ 2000B,12/0,24/ SEC,12/ MS
Figure STATUS
00938 M01S00741.cpcom +++|* SEC SECONDS 00939 M01S00742.cpcom +++|* MS MILLISECONDS 00940 M01S00166.ns2011 +++|* 00941 M01S00743.cpcom +++|* CALLS SYS=. 00942 M01S00744.cpcom +++| 00943 M01S00745.cpcom +++| 00944 M01S00746.cpcom +++| PURGMAC TIME 00945 M01S00747.cpcom +++| 00946 M01S00748.cpcom +++| TIME MACRO S 00947 M01S00749.cpcom +++| MACREF TIME
Line S00750 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00948 M02S00750.ns2011 ---|* FORM TIME (CPU TIME) REQUEST 00949 M01S00167.ns2011 +++|* FORM TIME (CPU TIME) REQUEST. 00950 M01S00751.cpcom +++| SX6 3RTIM 00951 M01S00752.cpcom +++| R= X1,S 00952 M01S00753.cpcom +++| LX6 42D 00953 M01S00754.cpcom +++| BX6 X6+X1 00954 M01S00755.cpcom +++| SX1 200000B 00955 M01S00756.cpcom +++| LX1 24D 00956 M01S00757.cpcom +++| BX6 X6+X1
Line S00758 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00957 M02S00758.ns2011 ---|* PROCESS SYSTEM REQUEST 00958 M01S00168.ns2011 +++|* PROCESS SYSTEM REQUEST. 00959 M01S00759.cpcom +++| RJ =XSYS= 00960 M01S00760.cpcom +++| ENDM
Line S00761 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00961 M02S00761.ns2011 ---| USECPU SPACE 4 00962 M01S00169.ns2011 +++| USECPU SPACE 4,10 00963 M01S00762.cpcom +++|*** USECPU - SET CPU TO BE USED. 00964 M01S00763.cpcom +++|* 00965 M01S00170.ns2011 +++|* USECPU N 00966 M01S00764.cpcom +++|*
Line S00765 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00967 M02S00765.ns2011 ---|* USECPU N 00968 M01S00766.cpcom +++|* *N* = 0, USE ANY CPU.
Line S00767 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00969 M02S00767.ns2011 ---|* = 1, USE CPU - 0.
Line S00768 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00970 M02S00768.ns2011 ---|* = 2, USE CPU - 1. 00971 M01S00171.ns2011 +++|* = 1, USE CPU - 0. 00972 M01S00172.ns2011 +++|* = 2, USE CPU - 1. 00973 M01S00769.cpcom +++| 00974 M01S00770.cpcom +++| 00975 M01S00771.cpcom +++| PURGMAC USECPU 00976 M01S00772.cpcom +++| 00977 M01S00773.cpcom +++| USECPU MACRO N 00978 M01S00774.cpcom +++| MACREF USECPU 00979 M01S00775.cpcom +++| R= X1,N 00980 M01S00776.cpcom +++| SX2 31B 00981 M01S00777.cpcom +++| RJ =XCPM= 00982 M01S00778.cpcom +++| ENDM
Line S00779 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00983 M02S00779.ns2011 ---| USERNUM SPACE 4 00984 M01S00173.ns2011 +++| USERNUM SPACE 4,10 00985 M01S00780.cpcom +++|*** USERNUM - RETURN USER NUMBER. 00986 M01S00781.cpcom +++|* 00987 M01S00174.ns2011 +++|* USERNUM STATUS 00988 M01S00782.cpcom +++|*
Line S00783 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 00989 M02S00783.ns2011 ---|* USERNUM STATUS 00990 M01S00784.cpcom +++|* ENTRY *STATUS* = ADDRESS FOR USER NUMBER RETURN. 00991 M01S00175.ns2011 +++|* 00992 M01S00785.cpcom +++|* EXIT - 00993 M01S00786.cpcom +++|*T STATUS 42/ *USERNUM* ,18/0
Figure STATUS
00994 M01S00176.ns2011 +++|* 00995 M01S00787.cpcom +++|* CALLS CPM=. 00996 M01S00788.cpcom +++| 00997 M01S00789.cpcom +++| 00998 M01S00790.cpcom +++| PURGMAC USERNUM 00999 M01S00791.cpcom +++| 01000 M01S00792.cpcom +++| USERNUM MACRO A 01001 M01S00793.cpcom +++| MACREF USERNUM 01002 M01S00794.cpcom +++| R= X1,A 01003 M01S00795.cpcom +++| SX2 32B 01004 M01S00796.cpcom +++| RJ =XCPM= 01005 M01S00797.cpcom +++| ENDM 01006 M01S00001.ns21000 +++| WAIT SPACE 4,10 01007 M01S00002.ns21000 +++|*** WAIT - PLACE PROGRAM IN RECALL STATUS FOR SPECIFIC TIME. 01008 M01S00003.ns21000 +++|* 01009 M01S00004.ns21000 +++|* 01010 M01S00005.ns21000 +++|* WAIT DELAY 01011 M01S00006.ns21000 +++|* ENTRY *DELAY* = TIME IN MILLESECONDS FOR JOB TO REMAIN 01012 M01S00007.ns21000 +++|* IN RECALL (10D .LE. *DELAY* .LE. 4095D). A VALUE 01013 M01S00008.ns21000 +++|* .LT. 10D DEFAULTS TO 10D AND A VALUE .GT. 4095D 01014 M01S00009.ns21000 +++|* DEFAULTS TO 4095D. 01015 M01S00010.ns21000 +++|* CALLS SYS=. 01016 M01S00011.ns21000 +++| 01017 M01S00012.ns21000 +++| 01018 M01S00013.ns21000 +++| PURGMAC WAIT 01019 M01S00014.ns21000 +++| 01020 M01S00015.ns21000 +++| WAIT MACRO S 01021 M01S00016.ns21000 +++| MACREF WAIT 01022 M01S00017.ns21000 +++| SX6 3RWCL 01023 M01S00018.ns21000 +++| R= X2,S 01024 M01S00019.ns21000 +++| LX6 42D 01025 M01S00020.ns21000 +++| BX6 X6+X2 01026 M01S00021.ns21000 +++| RJ =XSYS= 01027 M01S00022.ns21000 +++| ENDM 01028 M01S00798.cpcom +++| TITLE FET CREATION MACROS.
Line S00799 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01029 M02S00799.ns2011 ---| FET SPACE 4 01030 M01S00177.ns2011 +++| FET SPACE 4,60 01031 M01S00800.cpcom +++|*** THE FOLLOWING MACROS INITIALIZE FETS FOR FILES. 01032 M01S00801.cpcom +++|* PARAMETERS ARE AS FOLLOWS - 01033 M01S00802.cpcom +++|* FILE = FILE NAME.
Line S00803 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01034 M02S00803.ns2011 ---|* FWA = FIRST WORD ADDRESS OF CIO BUFFER.
Line S00804 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01035 M02S00804.ns2011 ---|* LENGTH = LENGTH OF CIO BUFFER. 01036 M01S00178.ns2011 +++|* FWA = FIRST WORD ADDRESS OF *CIO* BUFFER. 01037 M01S00179.ns2011 +++|* LENGTH = LENGTH OF *CIO* BUFFER. 01038 M01S00805.cpcom +++|* PN = PARAMETERS FOR FIELDS IN FET. 01039 M01S00806.cpcom +++|* 01040 M01S00807.cpcom +++|* P1 - P5 MAY BE IN ANY ORDER AND ONE OF THE FOLLOWING - 01041 M01S00180.ns2011 +++|* 01042 M01S00181.ns2011 +++|* (WSA=I,L) 01043 M01S00182.ns2011 +++|* SET WORKING STORAGE FIELD TO FWA = I, LENGTH = L. 01044 M01S00808.cpcom +++|*
Line S00809 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01045 M02S00809.ns2011 ---|* (WSA=I,L)
Line S00810 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01046 M02S00810.ns2011 ---|* SET WORKING STORAGE FIELD TO FWA = I, LENGTH = L. 01047 M01S00183.ns2011 +++|* (IND=I,L) 01048 M01S00184.ns2011 +++|* SET INDEX FIELD TO FWA = I, LENGTH = L. 01049 M01S00811.cpcom +++|*
Line S00812 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01050 M02S00812.ns2011 ---|* (IND=I,L)
Line S00813 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01051 M02S00813.ns2011 ---|* SET INDEX FIELD TO FWA = I, LENGTH = L. 01052 M01S00185.ns2011 +++|* (OWN = I,J) 01053 M01S00186.ns2011 +++|* SET OWNCODE EOI ADDRESS = I. 01054 M01S00187.ns2011 +++|* SET OWNCODE ERROR EXIT ADDRESS = J. 01055 M01S00188.ns2011 +++|* IF J PRESENT, ERROR PROCESSING BIT IS SET. 01056 M01S00814.cpcom +++|*
Line S00815 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01057 M02S00815.ns2011 ---|* (OWN = I,J)
Line S00816 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01058 M02S00816.ns2011 ---|* SET OWNCODE EOI ADDRESS = I.
Line S00817 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01059 M02S00817.ns2011 ---|* SET OWNCODE ERROR EXIT ADDRESS = J.
Line S00818 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01060 M02S00818.ns2011 ---|* IF J PRESENT, ERROR PROCESSING BIT IS SET. 01061 M01S00189.ns2011 +++|* (FET=L) 01062 M01S00190.ns2011 +++|* SET LENGTH OF FET = L. 01063 M01S00819.cpcom +++|*
Line S00820 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01064 M02S00820.ns2011 ---|* (FET=L)
Line S00821 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01065 M02S00821.ns2011 ---|* SET LENGTH OF FET = L. 01066 M01S00191.ns2011 +++|* (DTY=N) 01067 M01S00192.ns2011 +++|* SET DEVICE TYPE = N. 01068 M01S00822.cpcom +++|*
Line S00823 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01069 M02S00823.ns2011 ---|* (DTY=N)
Line S00824 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01070 M02S00824.ns2011 ---|* SET DEVICE TYPE = N. 01071 M01S00193.ns2011 +++|* (DSC = X) 01072 M01S00194.ns2011 +++|* VALID PARAMETER BUT IGNORED. 01073 M01S00825.cpcom +++|*
Line S00826 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01074 M02S00826.ns2011 ---|* (DSC = X)
Line S00827 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01075 M02S00827.ns2011 ---|* VALID PARAMETER BUT IGNORED. 01076 M01S00195.ns2011 +++|* (EPR) 01077 M01S00196.ns2011 +++|* SET ERROR PROCESSING BIT. 01078 M01S00828.cpcom +++|* 01079 M01S00001.ns2599 +++|* (IPR) 01080 M01S00002.ns2599 +++|* SET INTERLOCK PROCESSING BIT. 01081 M01S00003.ns2599 +++|*
Line S00829 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01082 M02S00829.ns2011 ---|* (EPR)
Line S00830 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01083 M02S00830.ns2011 ---|* SET ERROR PROCESSING BIT. 01084 M01S00197.ns2011 +++|* (LBL) 01085 M01S00198.ns2011 +++|* SET FET LENGTH TO 13D. 01086 M01S00831.cpcom +++|* 01087 M01S00001.cpcom6 +++|* (RTP) 01088 M01S00002.cpcom6 +++|* SET REAL-TIME BIT. 01089 M01S00004.ns2599 +++|* 01090 M01S00005.ns2599 +++|* (SAD) 01091 M01S00006.ns2599 +++|* SET *SUPPRESS ADDRESS ON ERROR MESSAGE* BIT. 01092 M01S00003.cpcom6 +++|*
Line S00832 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01093 M02S00832.ns2011 ---|* (LBL)
Line S00833 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01094 M02S00833.ns2011 ---|* SET FET LENGTH TO 13D. 01095 M01S00199.ns2011 +++|* (UPR) 01096 M01S00200.ns2011 +++|* SET USER PROCESSING BIT. 01097 M01S00834.cpcom +++|*
Line S00835 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01098 M02S00835.ns2011 ---|* (UPR)
Line S00836 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01099 M02S00836.ns2011 ---|* SET USER PROCESSING BIT. 01100 M01S00201.ns2011 +++|* (XL) 01101 M01S00202.ns2011 +++|* SET EXTENDED LABEL BIT AND FET LENGTH TO 13D. 01102 M01S00837.cpcom +++|*
Line S00838 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01103 M02S00838.ns2011 ---|* (XL)
Line S00839 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01104 M02S00839.ns2011 ---|* SET EXTENDED LABEL BIT AND FET LENGTH TO 13D. 01105 M01S00203.ns2011 +++|* THE FOLLOWING PARAMETERS ARE FOR COMMUNICATION WITH THE 01106 M01S00204.ns2011 +++|* PERMANENT FILE MANAGER. REQUIRES *COMSPFM*. 01107 M01S00840.cpcom +++|*
Line S00841 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01108 M02S00841.ns2011 ---|* THE FOLLOWING PARAMETERS ARE FOR COMUNICATION WITH THE
Line S00842 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01109 M02S00842.ns2011 ---|* PERMANENT FILE MANAGER
Line S00843 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01110 M02S00843.ns2011 ---|* REQUIRES COMSPFM 01111 M01S00205.ns2011 +++|* (PFN=PNAME) 01112 M01S00206.ns2011 +++|* SET PERMANENT FILE NAME *PNAME*. 01113 M01S00844.cpcom +++|* 01114 M01S00207.ns2011 +++|* (USN=UNAME) 01115 M01S00208.ns2011 +++|* SET USER NAME *UNAME*. 01116 M01S00845.cpcom +++|*
Line S00846 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01117 M02S00846.ns2011 ---|* (PFN=PNAME)
Line S00847 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01118 M02S00847.ns2011 ---|* SET PERMANENT FILE NAME *PNAME*. 01119 M01S00209.ns2011 +++|* (PWD=PASWORD) 01120 M01S00210.ns2011 +++|* SET PERMANENT FILE PASSWORD. 01121 M01S00848.cpcom +++|*
Line S00849 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01122 M02S00849.ns2011 ---|* (USN=UNAME)
Line S00850 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01123 M02S00850.ns2011 ---|* SET USER NAME *UNAME*. 01124 M01S00211.ns2011 +++|* (UCW=USERCON) 01125 M01S00212.ns2011 +++|* SET USER CONTROL BITS (BIT 59 MUST BE SET TO INDICATE 01126 M01S00213.ns2011 +++|* WORD CONTAINS USER CONTROL INFORMATION). 01127 M01S00851.cpcom +++|*
Line S00852 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01128 M02S00852.ns2011 ---|* (PWD=PASWORD)
Line S00853 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01129 M02S00853.ns2011 ---|* SET PERMANENT FILE PASSWORD.
Line S00854 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01130 M02S00854.ns2011 ---|*
Line S00855 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01131 M02S00855.ns2011 ---|* (UCW=USERCON)
Line S00856 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01132 M02S00856.ns2011 ---|* SET USER CONTROL BITS (BIT 59 MUST BE SET TO INDICATE
Line S00857 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01133 M02S00857.ns2011 ---|* WORD CONTAINS USER CONTROL INFORMATION).
Line S00858 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01134 M02S00858.ns2011 ---|*
Line S00859 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01135 M02S00859.ns2011 ---|* (PKN = PACKNAM)
Line S00860 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | ns2011 |
Seq # *Modification Id* Act ----------------------------+ 01136 M02S00860.ns2011 ---|* SET PERMANENT FILE PACKNAME TO *PACKNAM*. 01137 M01S00214.ns2011 +++|* (PKN = PACKNAM) 01138 M01S00215.ns2011 +++|* SET PERMANENT FILE PACKNAME TO *PACKNAM*. 01139 M01S00861.cpcom +++| 01140 M01S00862.cpcom +++| 01141 M01S00863.cpcom +++|* BASIC FET CREATION MACRO. 01142 M01S00864.cpcom +++| 01143 M01S00865.cpcom +++| PURGMAC =1 01144 M01S00866.cpcom +++| 01145 M01S00867.cpcom +++| =1 MACRO M,R,S,F,B,L,V
Line S00868 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | cpcom6 |
Seq # *Modification Id* Act ----------------------------+ 01146 M02S00868.cpcom6 ---| LOCAL FL,UP,EP,XX
Line S00004 Modification History | |
---|---|
M01 (Added by) | cpcom6 |
M02 (Updated by) | ns2599 |
Seq # *Modification Id* Act ----------------------------+ 01147 M02S00004.ns2599 ---| LOCAL FL,UP,EP,RT,XX 01148 M01S00007.ns2599 +++| LOCAL FL,SA,UP,EP,RT,IP,XX 01149 M01S00869.cpcom +++|* FL = FET LENGTH. 01150 M01S00008.ns2599 +++|* SA = *SUPPRESS ADDRESS* BIT IN FET+1. 01151 M01S00870.cpcom +++|* UP = USER PROCESSING BIT IN FET+1. 01152 M01S00871.cpcom +++|* EP = ERROR PROCESSING BIT IN FET+1. 01153 M01S00005.cpcom6 +++|* RT = REAL-TIME BIT IN FET+1. 01154 M01S00009.ns2599 +++|* IP = INTERLOCK PROCESSING BIT IN FET+1. 01155 M01S00872.cpcom +++|* XX = EXTENDED LABEL PROCESSING BIT IN FET+1.
Line S00873 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | cpcom3 |
Seq # *Modification Id* Act ----------------------------+ 01156 M02S00873.cpcom3 ---|F VFD 42D/0L_F,16D/,1/M,1/1 01157 M01S00001.cpcom3 +++| F VFD 42D/0L_F,16D/,1/M,1/1 01158 M01S00874.cpcom +++|* SET INITIAL FET LENGTH BY RANDOM DETERMINATION. 01159 M01S00875.cpcom +++|FL SET 3*R+5 01160 M01S00010.ns2599 +++|SA SET 0 01161 M01S00876.cpcom +++|UP SET 0 01162 M01S00877.cpcom +++|EP SET 0 01163 M01S00006.cpcom6 +++|RT SET 0 01164 M01S00011.ns2599 +++|IP SET 0 01165 M01S00878.cpcom +++|XX SET 0 01166 M01S00879.cpcom +++|* INITIALIZE VARIOUS MICROS. 01167 M01S00880.cpcom +++| ECHO 1,X=(EOI,ERR,INF,INL,WSF,WSL) 01168 M01S00881.cpcom +++|=1_X MICRO 1,, 0
Line S00882 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | cpcom6 |
Seq # *Modification Id* Act ----------------------------+ 01169 M02S00882.cpcom6 ---| ECHO 1,X=(EPR,UPR,XL,DSC,DTY,FET,IND,LBL,OWN,PFN,PFO,PKN,PWD,UCW,USN,W
Line S00883 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | cpcom6 |
Seq # *Modification Id* Act ----------------------------+ 01170 M02S00883.cpcom6 ---|,SA) 01171 M01S00007.cpcom6 +++| ECHO 1,X=(EPR,UPR,RTP,XL,DSC,DTY,FET,IND,LBL,OWN,PFN,PFO,PKN,PWD,UCW,U
Line S00008 Modification History | |
---|---|
M01 (Added by) | cpcom6 |
M02 (Updated by) | ns2599 |
Seq # *Modification Id* Act ----------------------------+ 01172 M02S00008.ns2599 ---|,SN,WSA) 01173 M01S00012.ns2599 +++|,SN,WSA,IPR,SAD) 01174 M01S00884.cpcom +++|=1_X MICRO , 01175 M01S00885.cpcom +++|* PROCESS VALUE SPECIFICATIONS. 01176 M01S00886.cpcom +++| ECHO 4,P=(V) 01177 M01S00887.cpcom +++| IFC NE, P
Line S00888 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | cpcom6 |
Seq # *Modification Id* Act ----------------------------+ 01178 M02S00888.cpcom6 ---| =1A FL,UP,EP,XX,P
Line S00009 Modification History | |
---|---|
M01 (Added by) | cpcom6 |
M02 (Updated by) | ns2599 |
Seq # *Modification Id* Act ----------------------------+ 01179 M02S00009.ns2599 ---| =1A FL,UP,EP,RT,XX,P 01180 M01S00013.ns2599 +++| =1A FL,SA,UP,EP,RT,IP,XX,P 01181 M01S00889.cpcom +++| ELSE 1 01182 M01S00890.cpcom +++| STOPDUP 01183 M01S00891.cpcom +++|* GENERATE REMAINDER OF FET.
Line S00892 Modification History | |
---|---|
M01 (Added by) | cpcom |
M02 (Updated by) | cpcom6 |
Seq # *Modification Id* Act ----------------------------+ 01184 M02S00892.cpcom6 ---| VFD 12D/"=1DTY",1/R,2/UP,1/EP,3/XX,17D/,6/FL-5,18D/B
Line S00010 Modification History | |
---|---|
M01 (Added by) | cpcom6 |
M02 (Updated by) | ns2599 |
Seq # *Modification Id* Act ----------------------------+ 01185 M02S00010.ns2599 ---| VFD 12D/"=1DTY",1/R,2/UP,1/EP,1/RT,2/XX,17D/,6/FL-5,18D/B 01186 M01S00014.ns2599 +++| VFD 12D/"=1DTY",1/R,1/SA,1/UP,1/EP,1/RT,1/IP,1/XX,17D/,6/FL-5,18D/B 01187 M01S00893.cpcom +++| VFD 42D/0,18D/B 01188 M01S00894.cpcom +++| VFD 42D/0,18D/B 01189 M01S00895.cpcom +++| VFD 42D/0,18D/B+L 01190 M01S00896.cpcom +++| IFGE FL,6D,19D 01191 M01S00897.cpcom +++| VFD 30D/"=1WSF",30D/"=1WSF"+"=1WSL" 01192 M01S00898.cpcom +++| IFGE FL,7D,17D 01193 M01S00899.cpcom +++| CON 0 01194 M01S00900.cpcom +++| IFGE FL,8D,15D 01195 M01S00901.cpcom +++| VFD 24D/0,18D/"=1INL",18D/"=1INF" 01196 M01S00902.cpcom +++| IFGE FL,9D,13D 01197 M01S00903.cpcom +++| VFD 30D/"=1EOI"+0L"=1PFN",30D/"=1ERR"+0L"=1PFO" 01198 M01S00904.cpcom +++| IFGE FL,10D,11D 01199 M01S00905.cpcom +++| IFC EQ,$"=1USN"$$ 01200 M01S00906.cpcom +++| CON 0 01201 M01S00907.cpcom +++| ELSE 1 01202 M01S00908.cpcom +++| DATA 0L"=1USN" 01203 M01S00909.cpcom +++| IFGE FL,11D,6 01204 M01S00910.cpcom +++| CON 0L"=1PWD" 01205 M01S00911.cpcom +++| IFGE FL,12D,4 01206 M01S00912.cpcom +++| CON 0L"=1UCW" 01207 M01S00913.cpcom +++| IFGE FL,13D,2 01208 M01S00914.cpcom +++| CON 0L"=1PKN" 01209 M01S00915.cpcom +++| BSSZ FL-13D 01210 M01S00916.cpcom +++| ENDM 01211 M01S00917.cpcom +++| SPACE 4,10 01212 M01S00918.cpcom +++|** FET CREATION MACRO SUPPORT MACROS. 01213 M01S00919.cpcom +++|* 01214 M01S00920.cpcom +++|* THE FOLLOWING MACROS ARE USED BY THE *=1* MACRO 01215 M01S00921.cpcom +++|* TO ASSIST IN GENERATION OF VALUES FOR EACH INDIVIDUAL 01216 M01S00922.cpcom +++|* PARAMETER. THE *=1A* MACRO IS USED TO CALL EACH OF 01217 M01S00923.cpcom +++|* THE INDIVIDUAL MACROS THAT GENERATE EACH INDIVIDUAL 01218 M01S00924.cpcom +++|* PARAMETER. THE *=1B* MACRO IS A STENCIL USED BY MOST 01219 M01S00925.cpcom +++|* OF THE INDIVIDUAL PARAMETRIC MACROS TO GENERATE VALUES 01220 M01S00926.cpcom +++|* REQUIRED BY THE PARAMETER. 01221 M01S00927.cpcom +++|* 01222 M01S00928.cpcom +++|* THE INDIVIDUAL PARAMETRIC MACROS GENERATE MICROS WHICH
Proceed to Part 1
cdc/nos2.source/opl.opl871/common/cpcom.txt · Last modified: by 127.0.0.1