Action unknown: copypageplugin__copy
cdc:nos2.source:opl.opl871:deck:ssarg
Deck SSARG
2 Modifications
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M01S00001.ssarg +++|BLTAB 00002 M01S00002.ssarg +++| IDENT BLTAB 00003 M01S00003.ssarg +++|*CALL COMCMAC 00004 M01S00004.ssarg +++| ENTRY BLTAB 00005 M01S00005.ssarg +++| SYSCOM B1 00006 M01S00006.ssarg +++| TITLE BLTAB - SET UP *SSBLD* ARGUMENT LIST. 00007 M01S00007.ssarg +++|*COMMENT SET UP *SSBLD* ARGUMENT LIST. 00008 M01S00008.ssarg +++| 00009 M01S00009.ssarg +++|** BLTAB SETS UP THE ARGUMENT LIST. 00010 M01S00010.ssarg +++|* 00011 M01S00011.ssarg +++|* THIS PROCEDURE SETS UP THE ARGUMENT LIST. 00012 M01S00012.ssarg +++|* IT CALLS *COMTBLP* TO SET UP THE ADDRESSES OF 00013 M01S00013.ssarg +++|* FOR THE CRACKED PARAMETERS IN THE COMMON 00014 M01S00014.ssarg +++|* AREA *UBLPCOM*. IT PASSES THE ADDRESS OF THE 00015 M01S00015.ssarg +++|* ARGUMENT LIST BACK TO THE CALLING PROCEDURE. 00016 M01S00016.ssarg +++|* 00017 M01S00017.ssarg +++|* SYMPL CALL BLTAB(ARGLIST) 00018 M01S00018.ssarg +++|* 00019 M01S00019.ssarg +++|* EXIT ARGUMENT LIST SET UP. 00020 M01S00020.ssarg +++|* ARGLIST - AN ITEM TO HOLD THE ADDRESS 00021 M01S00021.ssarg +++|* OF THE ARGUMENT LIST. 00022 M01S00022.ssarg +++|* 00023 M01S00023.ssarg +++|* USES A - 6 00024 M01S00024.ssarg +++|* X - 1,6 00025 M01S00025.ssarg +++|* 00026 M01S00026.ssarg +++|* MACRO ARG 00027 M01S00027.ssarg +++| 00028 M01S00028.ssarg +++| BLTAB SUBR ENTRY/EXIT 00029 M01S00029.ssarg +++| SX6 ARGLIST RETURN ADDRESS OF ARGUMENT LIST 00030 M01S00030.ssarg +++| SA6 X1 00031 M01S00031.ssarg +++| EQ BLTABX 00032 M01S00032.ssarg +++| 00033 M01S00033.ssarg +++|* SET UP THE ARGUMENT LIST FOR THE *SSBLD* CONTROL 00034 M01S00034.ssarg +++|* CARD PARAMETERS. 00035 M01S00035.ssarg +++| 00036 M01S00036.ssarg +++| ARGLIST BSS 0 00037 M01S00037.ssarg +++| CF ARG CFASV,CF CONFIGURATION FILE NAME 00038 M01S00038.ssarg +++| BF ARG BFASV,BF BUDT FILE NAME 00039 M01S00039.ssarg +++| ARG END OF ARGUMENT LIST 00040 M01S00040.ssarg +++| 00041 M01S00041.ssarg +++|* DEFAULT VALUES. 00042 M01S00042.ssarg +++| 00043 M01S00043.ssarg +++| CFASV DATA 0LSUDT 00044 M01S00044.ssarg +++| BFASV DATA 0LBUDT 00045 M01S00045.ssarg +++| 00046 M01S00046.ssarg +++|*CALL COMTBLP 00047 M01S00047.ssarg +++| END 00048 M01S00048.ssarg +++| IDENT DBTAB 00049 M01S00049.ssarg +++| ENTRY DBTAB 00050 M01S00050.ssarg +++| SYSCOM B1 00051 M01S00051.ssarg +++| TITLE DBTAB - SET UP *SSDEBUG* ARGUMENT LIST. 00052 M01S00052.ssarg +++|*COMMENT SET UP *SSDEBUG* ARGUMENT LIST.
| Line S00053 Modification History | |
|---|---|
M01 (Added by) | ssarg |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00053 M02S00053.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1979. 00054 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00055 M01S00054.ssarg +++| 00056 M01S00055.ssarg +++|*CALL COMCMAC 00057 M01S00056.ssarg +++| DBTAB SPACE 4,15 00058 M01S00057.ssarg +++|** DBTAB - SET UP *SSDEBUG* ARGUMENT LIST. 00059 M01S00058.ssarg +++|* 00060 M01S00059.ssarg +++|* DBTAB(ARGLIST); (*SYMPL* CALL) 00061 M01S00060.ssarg +++|* 00062 M01S00061.ssarg +++|* EXIT ARGUMENT LIST SET UP. 00063 M01S00062.ssarg +++|* (ARGLIST) = FWA OF ARGUMENT LIST. 00064 M01S00063.ssarg +++|* 00065 M01S00064.ssarg +++|* USES A - 6. 00066 M01S00065.ssarg +++|* B - 1. 00067 M01S00066.ssarg +++|* X - 6. 00068 M01S00067.ssarg +++|* 00069 M01S00068.ssarg +++|* MACROS ARG. 00070 M01S00069.ssarg +++| 00071 M01S00070.ssarg +++| 00072 M01S00071.ssarg +++| DBTAB SUBR ENTRY/EXIT 00073 M01S00072.ssarg +++| SB1 1 00074 M01S00073.ssarg +++| SX6 ARGLIST ADDRESS OF ARGUMENT LIST 00075 M01S00074.ssarg +++| SA6 X1 00076 M01S00075.ssarg +++| EQ DBTABX RETURN 00077 M01S00076.ssarg +++| 00078 M01S00077.ssarg +++|* ARGUMENT LIST. 00079 M01S00078.ssarg +++| 00080 M01S00079.ssarg +++| ARGLIST BSS 0 00081 M01S00080.ssarg +++| I ARG IASV,I,400B DIRECTIVE FILE 00082 M01S00081.ssarg +++| L ARG L,L OUTPUT FILE 00083 M01S00082.ssarg +++| Z ARG -ZASV,Z *Z* OPTION 00084 M01S00083.ssarg +++| OP ARG OPASV,OP,400B DIRECTIVE NAME 00085 M01S00084.ssarg +++| PF ARG PFASV,PF,400B PERMANENT FILE NAME 00086 M01S00085.ssarg +++| FO ARG FOASV,FO,400B,1 *FCT* ORDINAL 00087 M01S00086.ssarg +++| ST ARG STASV,ST,400B,1 STARTING AU NUMBER 00088 M01S00087.ssarg +++| FM ARG FMASV,FM,400B FAMILY NAME 00089 M01S00088.ssarg +++| SB ARG SBASV,SB,400B SUBFAMILY IDENTIFIER 00090 M01S00089.ssarg +++| SM ARG SMASV,SM,400B SM IDENTIFIER 00091 M01S00090.ssarg +++| SL ARG SLASV,SL,400B LOWER STREAM LIMIT 00092 M01S00091.ssarg +++| SU ARG SUASV,SU,400B UPPER STREAM LIMIT 00093 M01S00092.ssarg +++| CM ARG CMASV,CM,400B CARTRIDGE MAKER IDENTIFIER 00094 M01S00093.ssarg +++| CN ARG CNASV,CN,400B,1 CARTRIDGE SERIAL NUMBER 00095 M01S00094.ssarg +++| YI ARG YIASV,YI,400B,1 Y COORDINATE 00096 M01S00095.ssarg +++| FL ARG FLASV,FL,400B,1 FLAG TO BE CHANGED 00097 M01S00096.ssarg +++| ON ARG -ONASV,ON TURN FLAG ON 00098 M01S00097.ssarg +++| OF ARG -OFASV,OF TURN FLAG OFF 00099 M01S00098.ssarg +++| ZI ARG ZIASV,ZI,400B,1 Z COORDINATE 00100 M01S00099.ssarg +++| ARG END OF ARGLIST. 00101 M01S00100.ssarg +++| 00102 M01S00101.ssarg +++|* DEFAULT VALUES. 00103 M01S00102.ssarg +++| 00104 M01S00103.ssarg +++| IASV DATA 0LINPUT 00105 M01S00104.ssarg +++| ZASV DATA 1 00106 M01S00105.ssarg +++| OPASV DATA 0 00107 M01S00106.ssarg +++| PFASV DATA 0 00108 M01S00107.ssarg +++| FOASV DATA -1 00109 M01S00108.ssarg +++| STASV DATA -1 00110 M01S00109.ssarg +++| FMASV DATA 0
| Line S00110 Modification History | |
|---|---|
M01 (Added by) | ssarg |
M02 (Updated by) | msea014 |
Seq # *Modification Id* Act ----------------------------+ 00111 M02S00110.msea014 ---| SBASV DATA 0 00112 M01S00001.msea014 +++| SBASV DATA -1 00113 M01S00111.ssarg +++| SMASV DATA 1 00114 M01S00112.ssarg +++| SLASV DATA 0 00115 M01S00113.ssarg +++| SUASV DATA 0 00116 M01S00114.ssarg +++| CMASV DATA 2LA- 00117 M01S00115.ssarg +++| CNASV DATA -1 00118 M01S00116.ssarg +++| DASV DATA -1 00119 M01S00117.ssarg +++| ZIASV DATA 7777B 00120 M01S00118.ssarg +++| YIASV DATA 7777B 00121 M01S00119.ssarg +++| FLASV DATA -1 00122 M01S00120.ssarg +++| ONASV DATA 1 00123 M01S00121.ssarg +++| OFASV DATA 1 00124 M01S00122.ssarg +++| 00125 M01S00123.ssarg +++|*CALL COMTDBP 00126 M01S00124.ssarg +++| 00127 M01S00125.ssarg +++| END 00128 M01S00126.ssarg +++| IDENT DFTAB 00129 M01S00127.ssarg +++|*CALL COMCMAC 00130 M01S00128.ssarg +++| ENTRY DFTAB 00131 M01S00129.ssarg +++| SYSCOM B1 00132 M01S00130.ssarg +++| TITLE DFTAB - SET UP *SSDEF* ARGUMENT LIST. 00133 M01S00131.ssarg +++|*COMMENT SET UP *SSDEF* ARGUMENT LIST. 00134 M01S00132.ssarg +++| 00135 M01S00133.ssarg +++|** DFTAB SETS UP THE ARGUMENT LIST. 00136 M01S00134.ssarg +++|* 00137 M01S00135.ssarg +++|* THIS PROCEDURE SETS UP THE ARGUMENT LIST. 00138 M01S00136.ssarg +++|* IT CALLS *COMUDFP* TO SET UP THE ADDRESSES OF 00139 M01S00137.ssarg +++|* FOR THE CRACKED PARAMETERS IN THE COMMON 00140 M01S00138.ssarg +++|* AREA *UDFPCOM*. IT PASSES THE ADDRESS OF THE 00141 M01S00139.ssarg +++|* ARGUMENT LIST BACK TO THE CALLING PROCEDURE. 00142 M01S00140.ssarg +++|* 00143 M01S00141.ssarg +++|* SYMPL CALL DFTAB(ARGLIST) 00144 M01S00142.ssarg +++|* 00145 M01S00143.ssarg +++|* EXIT ARGUMENT LIST SET UP. 00146 M01S00144.ssarg +++|* ARGLIST - AN ITEM TO HOLD THE ADDRESS 00147 M01S00145.ssarg +++|* OF THE ARGUMENT LIST. 00148 M01S00146.ssarg +++|* 00149 M01S00147.ssarg +++|* USES A - 6 00150 M01S00148.ssarg +++|* X - 1,6 00151 M01S00149.ssarg +++|* 00152 M01S00150.ssarg +++|* MACRO ARG 00153 M01S00151.ssarg +++| 00154 M01S00152.ssarg +++| DFTAB SUBR ENTRY/EXIT 00155 M01S00153.ssarg +++| SX6 ARGLIST RETURN ADDRESS OF ARGUMENT LIST 00156 M01S00154.ssarg +++| SA6 X1 00157 M01S00155.ssarg +++| EQ DFTABX 00158 M01S00156.ssarg +++| 00159 M01S00157.ssarg +++|* SET UP THE ARGUMENT LIST FOR THE *SSDEF* CONTROL 00160 M01S00158.ssarg +++|* CARD PARAMETERS. 00161 M01S00159.ssarg +++| 00162 M01S00160.ssarg +++| ARGLIST BSS 0 00163 M01S00161.ssarg +++| FM ARG FMASV,FM FAMILY NAME 00164 M01S00162.ssarg +++| SM ARG SMASV,SM SM NUMBER 00165 M01S00163.ssarg +++| ARG END OF ARGUMENT LIST 00166 M01S00164.ssarg +++| 00167 M01S00165.ssarg +++|* DEFAULT VALUES. 00168 M01S00166.ssarg +++| 00169 M01S00167.ssarg +++| FMASV DATA 0 00170 M01S00168.ssarg +++| SMASV DATA 0LA 00171 M01S00169.ssarg +++| 00172 M01S00170.ssarg +++|*CALL COMTDFP 00173 M01S00171.ssarg +++| END 00174 M01S00172.ssarg +++| IDENT EXTAB 00175 M01S00173.ssarg +++|*CALL COMCMAC 00176 M01S00174.ssarg +++| ENTRY EXTAB 00177 M01S00175.ssarg +++| SYSCOM B1 00178 M01S00176.ssarg +++| TITLE EXTAB - SET UP *SSEXEC* ARGUMENT LIST. 00179 M01S00177.ssarg +++|*COMMENT SET UP *SSEXEC* ARGUMENT LIST. 00180 M01S00178.ssarg +++| 00181 M01S00179.ssarg +++|** EXTAB SETS UP THE ARGUMENT LIST. 00182 M01S00180.ssarg +++|* 00183 M01S00181.ssarg +++|* THIS PROCEDURE SETS UP THE ARGUMENT LIST. 00184 M01S00182.ssarg +++|* IT CALLS *COMEEXP* TO SET UP THE ADDRESSES FOR THE CRACKED 00185 M01S00183.ssarg +++|* PARAMETERS IN THE COMMON AREA *EEXPCOM*. IT PASSES THE 00186 M01S00184.ssarg +++|* ADDRESS OF THE ARGUMENT LIST BACK TO THE CALLING PROCEDURE. 00187 M01S00185.ssarg +++|* 00188 M01S00186.ssarg +++|* SYMPL CALL EXTAB(ARGLIST). 00189 M01S00187.ssarg +++|* 00190 M01S00188.ssarg +++|* EXIT ARGUMENT LIST SET UP. 00191 M01S00189.ssarg +++|* ARGLIST - AN ITEM TO HOLD THE ADDRESS OF THE ARGUMENT 00192 M01S00190.ssarg +++|* LIST. 00193 M01S00191.ssarg +++|* 00194 M01S00192.ssarg +++|* USES A - 6. 00195 M01S00193.ssarg +++|* X - 1,6. 00196 M01S00194.ssarg +++|* 00197 M01S00195.ssarg +++|* MACRO ARG. 00198 M01S00196.ssarg +++| 00199 M01S00197.ssarg +++| EXTAB SUBR ENTRY/EXIT 00200 M01S00198.ssarg +++| SX6 ARGLIST RETURN ADDRESS OF ARGUMENT LIST 00201 M01S00199.ssarg +++| SA6 X1 00202 M01S00200.ssarg +++| EQ EXTABX 00203 M01S00201.ssarg +++| 00204 M01S00202.ssarg +++|* SET UP THE ARGUMENT LIST FOR *SSEXEC* PARAMETERS. 00205 M01S00203.ssarg +++| 00206 M01S00204.ssarg +++|ARGLIST BSS 0 00207 M01S00205.ssarg +++|Q ARG QASV,Q TUNING PARAMETER 00208 M01S00206.ssarg +++|TM ARG TMASV,TM TRACE MODE PARMAMETER 00209 M01S00207.ssarg +++|S ARG SASV,S SET INDEX PARAMETER 00210 M01S00208.ssarg +++| ARG END OF ARGUMENT LIST 00211 M01S00209.ssarg +++| 00212 M01S00210.ssarg +++|* DEFAULT VALUES. 00213 M01S00211.ssarg +++| 00214 M01S00212.ssarg +++| 00215 M01S00213.ssarg +++|QASV DATA 0 00216 M01S00214.ssarg +++|TMASV DATA 0 00217 M01S00215.ssarg +++|SASV DATA 0 00218 M01S00216.ssarg +++| 00219 M01S00217.ssarg +++|*CALL COMXEXP 00220 M01S00218.ssarg +++| 00221 M01S00219.ssarg +++| END 00222 M01S00220.ssarg +++| IDENT LBTAB 00223 M01S00221.ssarg +++| ENTRY LBTAB 00224 M01S00222.ssarg +++|*COMMENT SET UP *SSLABEL* ARGUMENT LIST. 00225 M01S00223.ssarg +++| SYSCOM B1 00226 M01S00224.ssarg +++| TITLE LBTAB - SET UP *SSLABEL* ARGUMENT LIST.
| Line S00225 Modification History | |
|---|---|
M01 (Added by) | ssarg |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00227 M02S00225.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1978. 00228 M01S00002.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00229 M01S00226.ssarg +++| 00230 M01S00227.ssarg +++|*CALL COMCMAC 00231 M01S00228.ssarg +++| LBTAB SPACE 4,15 00232 M01S00229.ssarg +++|** LBTAB - SET UP *SSLABEL* ARGUMENT LIST. 00233 M01S00230.ssarg +++|* 00234 M01S00231.ssarg +++|* LBTAB(ARGLIST); (*SYMPL* CALL) 00235 M01S00232.ssarg +++|* 00236 M01S00233.ssarg +++|* EXIT ARGUMENT LIST SET UP. 00237 M01S00234.ssarg +++|* (ARGLIST) = FWA OF ARGUMENT LIST. 00238 M01S00235.ssarg +++|* 00239 M01S00236.ssarg +++|* USES A - 6. 00240 M01S00237.ssarg +++|* B - 1. 00241 M01S00238.ssarg +++|* X - 6. 00242 M01S00239.ssarg +++|* 00243 M01S00240.ssarg +++|* MACROS ARG. 00244 M01S00241.ssarg +++| 00245 M01S00242.ssarg +++| 00246 M01S00243.ssarg +++| LBTAB SUBR ENTRY/EXIT 00247 M01S00244.ssarg +++| SB1 1 00248 M01S00245.ssarg +++| SX6 ARGLIST ADDRESS OF ARGUMENT LIST 00249 M01S00246.ssarg +++| SA6 X1 00250 M01S00247.ssarg +++| EQ LBTABX RETURN 00251 M01S00248.ssarg +++| 00252 M01S00249.ssarg +++|* ARGUMENT LIST FOR *SSLABEL* CONTROL STATEMENT 00253 M01S00250.ssarg +++|* AND DIRECTIVE PARAMETERS. 00254 M01S00251.ssarg +++| 00255 M01S00252.ssarg +++| ARGLIST BSS 0 00256 M01S00253.ssarg +++| I ARG IASV,I,400B DIRECTIVE OPTION 00257 M01S00254.ssarg +++| L ARG L,L OUTPUT FILE 00258 M01S00255.ssarg +++| Z ARG -ZASV,Z *Z* OPTION 00259 M01S00256.ssarg +++| OP ARG OPASV,OP,400B DIRECTIVE NAME 00260 M01S00257.ssarg +++| N ARG NASV,N,400B NUMBER OF CUBES/CARTRIDGES TO PROCESS 00261 M01S00258.ssarg +++| CN ARG CNASV,CN,400B,1 CARTRIDGE SERIAL NUMBER 00262 M01S00259.ssarg +++| PK ARG PKASV,PK,400B PICK OPTION 00263 M01S00260.ssarg +++| PT ARG PTASV,PT,400B PUT OPTION 00264 M01S00261.ssarg +++| GR ARG GRASV,GR 00265 M01S00262.ssarg +++| LT ARG -LTASV,LT CARTRIDGE *LOST* OPTION 00266 M01S00263.ssarg +++| SM ARG SMASV,SM,400B STORAGE MODULE IDENTIFIER 00267 M01S00264.ssarg +++| ON ARG -ONASV,ON TURN FLAG ON OPTION 00268 M01S00265.ssarg +++| OF ARG -OFASV,OF TURN FLAG OFF OPTION 00269 M01S00266.ssarg +++| YI ARG YIASV,YI,400B FIRST Y COORDINATE 00270 M01S00267.ssarg +++| YF ARG YFASV,YF,400B SECOND Y COORDINATE 00271 M01S00268.ssarg +++| ZI ARG ZIASV,ZI,400B FIRST Z COORDINATE 00272 M01S00269.ssarg +++| ZF ARG ZFASV,ZF,400B SECOND Z COORDINATE 00273 M01S00270.ssarg +++| FM ARG FMASV,FM,400B FAMILY NAME 00274 M01S00271.ssarg +++| SB ARG SBASV,SB,400B SUBFAMILY IDENTIFIER 00275 M01S00272.ssarg +++| CM ARG CMASV,CM,400B CARTRIDGE MANUFACTURER 00276 M01S00273.ssarg +++| CC ARG CCASV,CC,400B STORE CLEAR CARTRIDGE 00277 M01S00274.ssarg +++| B ARG BASV,B,400B SMALL FILE SPACE 00278 M01S00275.ssarg +++| ARG END OF STATUS LIST 00279 M01S00276.ssarg +++| 00280 M01S00277.ssarg +++|* DEFAULT VALUES. 00281 M01S00278.ssarg +++| 00282 M01S00279.ssarg +++| IASV DATA 0LINPUT 00283 M01S00280.ssarg +++| ZASV DATA 1 00284 M01S00281.ssarg +++| OPASV DATA 0 00285 M01S00282.ssarg +++| NASV DATA 1 00286 M01S00283.ssarg +++| CNASV DATA 0 00287 M01S00284.ssarg +++| PKASV DATA 0 00288 M01S00285.ssarg +++| PTASV VFD 6/0LP,54/ 00289 M01S00286.ssarg +++| GRASV DATA 7777 00290 M01S00287.ssarg +++| LTASV DATA 1 00291 M01S00288.ssarg +++| SMASV DATA 0LA 00292 M01S00289.ssarg +++| ONASV DATA 1 00293 M01S00290.ssarg +++| OFASV DATA 1 00294 M01S00291.ssarg +++| YIASV DATA 7777B 00295 M01S00292.ssarg +++| YFASV DATA 7777B 00296 M01S00293.ssarg +++| ZIASV DATA 7777B 00297 M01S00294.ssarg +++| ZFASV DATA 7777B 00298 M01S00295.ssarg +++| FMASV DATA -1 00299 M01S00296.ssarg +++| SBASV DATA 0 00300 M01S00297.ssarg +++| CCASV DATA -1 00301 M01S00298.ssarg +++| CMASV DATA 2LA- 00302 M01S00299.ssarg +++| BASV DATA 600 00303 M01S00300.ssarg +++| 00304 M01S00301.ssarg +++|*CALL COMTLBP 00305 M01S00302.ssarg +++| 00306 M01S00303.ssarg +++| END 00307 M01S00304.ssarg +++| IDENT MVTAB 00308 M01S00305.ssarg +++| ENTRY MVTAB 00309 M01S00306.ssarg +++| SYSCOM B1 00310 M01S00307.ssarg +++| TITLE MVTAB - SET UP *SSMOVE* ARGUMENT LIST. 00311 M01S00308.ssarg +++|*COMMENT SET UP *SSMOVE* ARGUMENT LIST.
| Line S00309 Modification History | |
|---|---|
M01 (Added by) | ssarg |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00312 M02S00309.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1979. 00313 M01S00003.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00314 M01S00310.ssarg +++| 00315 M01S00311.ssarg +++|*CALL COMCMAC 00316 M01S00312.ssarg +++|*CALL,COMSPFM 00317 M01S00313.ssarg +++| MVTAB SPACE 4,15 00318 M01S00314.ssarg +++|*** MVTAB - SET UP *SSMOVE* ARGUMENT LIST. 00319 M01S00315.ssarg +++|* 00320 M01S00316.ssarg +++|* MVTAB(ARGLIST); (*SYMPL* CALL) 00321 M01S00317.ssarg +++|* 00322 M01S00318.ssarg +++|* EXIT (ARGLIST) = ADDRESS OF ARGUMENT LIST. 00323 M01S00319.ssarg +++|* 00324 M01S00320.ssarg +++|* USES A - 6. 00325 M01S00321.ssarg +++|* B - 1. 00326 M01S00322.ssarg +++|* X - 6. 00327 M01S00323.ssarg +++|* 00328 M01S00324.ssarg +++|* MACROS ARG. 00329 M01S00325.ssarg +++| 00330 M01S00326.ssarg +++| 00331 M01S00327.ssarg +++|MVTAB SUBR ENTRY/EXIT 00332 M01S00328.ssarg +++| SB1 1 00333 M01S00329.ssarg +++| SX6 ARGLIST ADDRESS OF ARGUMENT LIST 00334 M01S00330.ssarg +++| SA6 X1 00335 M01S00331.ssarg +++| EQ MVTABX RETURN 00336 M01S00332.ssarg +++| 00337 M01S00333.ssarg +++|* ARGUMENT LIST. 00338 M01S00334.ssarg +++| 00339 M01S00335.ssarg +++| ARGLIST BSS 0 00340 M01S00336.ssarg +++| L ARG L,L OUTPUT FILE 00341 M01S00337.ssarg +++| NW ARG ON,NW NO WAIT OPTION 00342 M01S00338.ssarg +++| FM ARG FM,FM,400B FAMILY NAME 00343 M01S00339.ssarg +++| UI ARG UIASV,UI,400B USER INDEX OPTION 00344 M01S00340.ssarg +++| DN ARG DN,DN DEVICE NUMBER 00345 M01S00341.ssarg +++| I ARG I,I DIRECTIVE FILE 00346 M01S00342.ssarg +++| LO ARG LO,LO LIST OPTION 00347 M01S00343.ssarg +++| PX ARG PX,PX PROCESS EXCEPTIONS 00348 M01S00344.ssarg +++| LB ARG ON,LB LARGE FILE BOUNDARY 00349 M01S00345.ssarg +++| ARG END OF ARGLIST 00350 M01S00346.ssarg +++| 00351 M01S00347.ssarg +++|* DEFAULT VALUES. 00352 M01S00348.ssarg +++| 00353 M01S00349.ssarg +++| ON CON -1 00354 M01S00350.ssarg +++| UIASV DATA -1 00355 M01S00351.ssarg +++| 00356 M01S00352.ssarg +++|*CALL,COMTMVD 00357 M01S00353.ssarg +++|*CALL,COMTMVP 00358 M01S00354.ssarg +++| 00359 M01S00355.ssarg +++| END 00360 M01S00356.ssarg +++| IDENT USTAB 00361 M01S00357.ssarg +++| ENTRY USTAB 00362 M01S00358.ssarg +++| ENTRY ARG= 00363 M01S00359.ssarg +++| SYSCOM B1 00364 M01S00360.ssarg +++| TITLE USTAB - SET UP *SSUSE* ARGUMENT LIST. 00365 M01S00361.ssarg +++|*COMMENT SET UP *SSUSE* ARGUMENT LIST.
| Line S00362 Modification History | |
|---|---|
M01 (Added by) | ssarg |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00366 M02S00362.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1979. 00367 M01S00004.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00368 M01S00363.ssarg +++| 00369 M01S00364.ssarg +++|*CALL COMCMAC 00370 M01S00365.ssarg +++| USTAB SPACE 4,15 00371 M01S00366.ssarg +++|** USTAB - SET UP *SSUSE* ARGUMENT LIST. 00372 M01S00367.ssarg +++|* 00373 M01S00368.ssarg +++|* USTAB(ARGLIST); (*SYMPL* CALL) 00374 M01S00369.ssarg +++|* 00375 M01S00370.ssarg +++|* EXIT ARGUMENT LIST SET UP. 00376 M01S00371.ssarg +++|* (ARGLIST) = FWA OF ARGUMENT LIST. 00377 M01S00372.ssarg +++|* 00378 M01S00373.ssarg +++|* USES A - 6. 00379 M01S00374.ssarg +++|* B - 1 00380 M01S00375.ssarg +++|* X - 6. 00381 M01S00376.ssarg +++|* 00382 M01S00377.ssarg +++|* MACROS ARG. 00383 M01S00378.ssarg +++| 00384 M01S00379.ssarg +++| 00385 M01S00380.ssarg +++| ARG= BSS 0 00386 M01S00381.ssarg +++| USTAB SUBR ENTRY/EXIT 00387 M01S00382.ssarg +++| SB1 1 00388 M01S00383.ssarg +++| SX6 ARGLIST RETURN ADDRESS OF ARGUMENT LIST 00389 M01S00384.ssarg +++| SA6 X1 00390 M01S00385.ssarg +++| EQ USTABX RETURN 00391 M01S00386.ssarg +++| 00392 M01S00387.ssarg +++|* ARGUMENT LIST FOR *SSUSE* CONTROL STATEMENT. 00393 M01S00388.ssarg +++| 00394 M01S00389.ssarg +++| ARGLIST BSS 0 00395 M01S00390.ssarg +++| OP ARG OPASV,OP,400B RETURN OPTION 00396 M01S00391.ssarg +++| FM ARG FMASV,FM,400B FAMILY NAME 00397 M01S00392.ssarg +++| SB ARG SBASV,SB,400B,1 SELECTED SUBFAMILIES 00398 M01S00393.ssarg +++| SM ARG SMASV,SM,400B,1 SELECTED SM-ID-S 00399 M01S00394.ssarg +++| L ARG LASV,L OUTPUT FILE 00400 M01S00395.ssarg +++| CN ARG CNASV,CN,400B,1 CARTRIDGE SERIAL NUMBER 00401 M01S00396.ssarg +++| CM ARG CMASV,CM,400B CARTRIDGE MANUFACTURER 00402 M01S00397.ssarg +++| ARG END OF ARGUMENT LIST 00403 M01S00398.ssarg +++| 00404 M01S00399.ssarg +++|* DEFAULT VALUES. 00405 M01S00400.ssarg +++| 00406 M01S00401.ssarg +++| OPASV DATA 0 00407 M01S00402.ssarg +++| FMASV DATA 0 00408 M01S00403.ssarg +++| SBASV DATA 0L01234567 00409 M01S00404.ssarg +++| SMASV DATA 1HA 00410 M01S00405.ssarg +++| LASV DATA 0LOUTPUT 00411 M01S00406.ssarg +++| CNASV DATA 0 00412 M01S00407.ssarg +++| CMASV DATA 2LA 00413 M01S00408.ssarg +++| 00414 M01S00409.ssarg +++|*CALL COMTUSP 00415 M01S00410.ssarg +++| 00416 M01S00411.ssarg +++| END 00417 M01S00412.ssarg +++| IDENT VLTAB 00418 M01S00413.ssarg +++| ENTRY VLTAB 00419 M01S00414.ssarg +++| ENTRY ARG= 00420 M01S00415.ssarg +++| SYSCOM B1 00421 M01S00416.ssarg +++| TITLE VLTAB - SET UP *SSVAL* ARGUMENT LIST. 00422 M01S00417.ssarg +++|*COMMENT SET UP *SSVAL* ARGUMENT LIST. 00423 M01S00418.ssarg +++| 00424 M01S00419.ssarg +++|*CALL COMCMAC 00425 M01S00420.ssarg +++| VLTAB SPACE 4,30 00426 M01S00421.ssarg +++| 00427 M01S00422.ssarg +++|** VLTAB - ASVAL CONTROL CARD ARGUMENTS TABLE. 00428 M01S00423.ssarg +++|* 00429 M01S00424.ssarg +++|* *VLTAB* RETURNS THE ADDRESS OF *ARGLIST* TO THE CALLER 00430 M01S00425.ssarg +++|* IN THE CALLING PARAMETER *ARGADDR*. 00431 M01S00426.ssarg +++|* 00432 M01S00427.ssarg +++|* SYMPL CALL - VLTAB(ARGADDR); 00433 M01S00428.ssarg +++|* 00434 M01S00429.ssarg +++|* ENTRY (X1) = ADDRESS OF *ARGADDR*. 00435 M01S00430.ssarg +++|* 00436 M01S00431.ssarg +++|* EXIT (ARGADDR) = ADDRESS OF *ARGLIST*. 00437 M01S00432.ssarg +++|* 00438 M01S00433.ssarg +++|* USES X - 6 00439 M01S00434.ssarg +++|* A - 6 00440 M01S00435.ssarg +++|* 00441 M01S00436.ssarg +++|* CALLS COMTVLP - SSVAL CONTROL STATEMENT PARAMETERS ARRAY. 00442 M01S00437.ssarg +++|* 00443 M01S00438.ssarg +++|* NOTES *ARGLIST* IS A TABLE THAT DESCRIBES THE 00444 M01S00439.ssarg +++|* *SSVAL* CONTROL STATEMENT ARGUMENTS, AND DEFAULTS 00445 M01S00440.ssarg +++|* USING THE *NOS* MACRO *ARG*. 00446 M01S00441.ssarg +++|* 00447 M01S00442.ssarg +++|* 00448 M01S00443.ssarg +++|* 00449 M01S00444.ssarg +++|* 00450 M01S00445.ssarg +++| 00451 M01S00446.ssarg +++| ARG= BSS 0 00452 M01S00447.ssarg +++| VLTAB SUBR ENTRY/EXIT 00453 M01S00448.ssarg +++| SX6 ARGLIST 00454 M01S00449.ssarg +++| SA6 X1 RETURN ADDRESS OF ARGUMENT LIST 00455 M01S00450.ssarg +++| EQ VLTABX 00456 M01S00451.ssarg +++| 00457 M01S00452.ssarg +++|* ARGUMENT TABLE 00458 M01S00453.ssarg +++|* 00459 M01S00454.ssarg +++|* THE CONTROL CARD PARAMETERS ARE DESCRIBED BY THE ARG MACRO - 00460 M01S00455.ssarg +++|* OP ARG ASV,ADDR,ST,WC 00461 M01S00456.ssarg +++|* WHERE OP = 2 CHARACTER KEYWORD. 00462 M01S00457.ssarg +++|* ASV = ASSUMED VALUE IF OP, FORM DETECTED. 00463 M01S00458.ssarg +++|* ADDR = ADDRESS FOR RESULTANT PARAMETER. 00464 M01S00459.ssarg +++|* ST = A STATUS. 00465 M01S00460.ssarg +++|* WC = PARAMETER LENGTH. 00466 M01S00461.ssarg +++|* 00467 M01S00462.ssarg +++| 00468 M01S00463.ssarg +++| ARGLIST BSS 0 00469 M01S00464.ssarg +++| L ARG LF,LF 00470 M01S00465.ssarg +++| RF ARG RFA,RF 00471 M01S00466.ssarg +++| AM ARG ON,AM 00472 M01S00467.ssarg +++| SM ARG SM,SM,400B,1 00473 M01S00468.ssarg +++| FM ARG ON,FM 00474 M01S00469.ssarg +++| FX ARG FX,FX,400B 00475 M01S00470.ssarg +++| RL ARG ON,RL 00476 M01S00471.ssarg +++| SB ARG SB,SB,400B,1 00477 M01S00472.ssarg +++| ST ARG STA,ST,400B 00478 M01S00473.ssarg +++|ENDARGS BSSZ 1 END OF ARGLIST 00479 M01S00474.ssarg +++| 00480 M01S00475.ssarg +++|* DEFAULTS 00481 M01S00476.ssarg +++| 00482 M01S00477.ssarg +++| RFA CON 7LZZZZRDF 00483 M01S00478.ssarg +++| ON CON -1 00484 M01S00479.ssarg +++| STA DATA 1HX 00485 M01S00480.ssarg +++| 00486 M01S00481.ssarg +++|*CALL COMTVLP 00487 M01S00482.ssarg +++| 00488 M01S00483.ssarg +++| END
cdc/nos2.source/opl.opl871/deck/ssarg.txt · Last modified: by 127.0.0.1