cdc:nos2.source:opl.opl871:deck:ssarg
Deck SSARG
Library Member Format: MODIFY
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M00S00001.ssarg +++|BLTAB 00002 M00S00002.ssarg +++| IDENT BLTAB 00003 M00S00003.ssarg +++|*CALL COMCMAC 00004 M00S00004.ssarg +++| ENTRY BLTAB 00005 M00S00005.ssarg +++| SYSCOM B1 00006 M00S00006.ssarg +++| TITLE BLTAB - SET UP *SSBLD* ARGUMENT LIST. 00007 M00S00007.ssarg +++|*COMMENT SET UP *SSBLD* ARGUMENT LIST. 00008 M00S00008.ssarg +++| 00009 M00S00009.ssarg +++|** BLTAB SETS UP THE ARGUMENT LIST. 00010 M00S00010.ssarg +++|* 00011 M00S00011.ssarg +++|* THIS PROCEDURE SETS UP THE ARGUMENT LIST. 00012 M00S00012.ssarg +++|* IT CALLS *COMTBLP* TO SET UP THE ADDRESSES OF 00013 M00S00013.ssarg +++|* FOR THE CRACKED PARAMETERS IN THE COMMON 00014 M00S00014.ssarg +++|* AREA *UBLPCOM*. IT PASSES THE ADDRESS OF THE 00015 M00S00015.ssarg +++|* ARGUMENT LIST BACK TO THE CALLING PROCEDURE. 00016 M00S00016.ssarg +++|* 00017 M00S00017.ssarg +++|* SYMPL CALL BLTAB(ARGLIST) 00018 M00S00018.ssarg +++|* 00019 M00S00019.ssarg +++|* EXIT ARGUMENT LIST SET UP. 00020 M00S00020.ssarg +++|* ARGLIST - AN ITEM TO HOLD THE ADDRESS 00021 M00S00021.ssarg +++|* OF THE ARGUMENT LIST. 00022 M00S00022.ssarg +++|* 00023 M00S00023.ssarg +++|* USES A - 6 00024 M00S00024.ssarg +++|* X - 1,6 00025 M00S00025.ssarg +++|* 00026 M00S00026.ssarg +++|* MACRO ARG 00027 M00S00027.ssarg +++| 00028 M00S00028.ssarg +++| BLTAB SUBR ENTRY/EXIT 00029 M00S00029.ssarg +++| SX6 ARGLIST RETURN ADDRESS OF ARGUMENT LIST 00030 M00S00030.ssarg +++| SA6 X1 00031 M00S00031.ssarg +++| EQ BLTABX 00032 M00S00032.ssarg +++| 00033 M00S00033.ssarg +++|* SET UP THE ARGUMENT LIST FOR THE *SSBLD* CONTROL 00034 M00S00034.ssarg +++|* CARD PARAMETERS. 00035 M00S00035.ssarg +++| 00036 M00S00036.ssarg +++| ARGLIST BSS 0 00037 M00S00037.ssarg +++| CF ARG CFASV,CF CONFIGURATION FILE NAME 00038 M00S00038.ssarg +++| BF ARG BFASV,BF BUDT FILE NAME 00039 M00S00039.ssarg +++| ARG END OF ARGUMENT LIST 00040 M00S00040.ssarg +++| 00041 M00S00041.ssarg +++|* DEFAULT VALUES. 00042 M00S00042.ssarg +++| 00043 M00S00043.ssarg +++| CFASV DATA 0LSUDT 00044 M00S00044.ssarg +++| BFASV DATA 0LBUDT 00045 M00S00045.ssarg +++| 00046 M00S00046.ssarg +++|*CALL COMTBLP 00047 M00S00047.ssarg +++| END 00048 M00S00048.ssarg +++| IDENT DBTAB 00049 M00S00049.ssarg +++| ENTRY DBTAB 00050 M00S00050.ssarg +++| SYSCOM B1 00051 M00S00051.ssarg +++| TITLE DBTAB - SET UP *SSDEBUG* ARGUMENT LIST. 00052 M00S00052.ssarg +++|*COMMENT SET UP *SSDEBUG* ARGUMENT LIST.
| Line S00053 Modification History | |
|---|---|
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00053 M01S00053.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1979.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00054 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00055 M00S00054.ssarg +++| 00056 M00S00055.ssarg +++|*CALL COMCMAC 00057 M00S00056.ssarg +++| DBTAB SPACE 4,15 00058 M00S00057.ssarg +++|** DBTAB - SET UP *SSDEBUG* ARGUMENT LIST. 00059 M00S00058.ssarg +++|* 00060 M00S00059.ssarg +++|* DBTAB(ARGLIST); (*SYMPL* CALL) 00061 M00S00060.ssarg +++|* 00062 M00S00061.ssarg +++|* EXIT ARGUMENT LIST SET UP. 00063 M00S00062.ssarg +++|* (ARGLIST) = FWA OF ARGUMENT LIST. 00064 M00S00063.ssarg +++|* 00065 M00S00064.ssarg +++|* USES A - 6. 00066 M00S00065.ssarg +++|* B - 1. 00067 M00S00066.ssarg +++|* X - 6. 00068 M00S00067.ssarg +++|* 00069 M00S00068.ssarg +++|* MACROS ARG. 00070 M00S00069.ssarg +++| 00071 M00S00070.ssarg +++| 00072 M00S00071.ssarg +++| DBTAB SUBR ENTRY/EXIT 00073 M00S00072.ssarg +++| SB1 1 00074 M00S00073.ssarg +++| SX6 ARGLIST ADDRESS OF ARGUMENT LIST 00075 M00S00074.ssarg +++| SA6 X1 00076 M00S00075.ssarg +++| EQ DBTABX RETURN 00077 M00S00076.ssarg +++| 00078 M00S00077.ssarg +++|* ARGUMENT LIST. 00079 M00S00078.ssarg +++| 00080 M00S00079.ssarg +++| ARGLIST BSS 0 00081 M00S00080.ssarg +++| I ARG IASV,I,400B DIRECTIVE FILE 00082 M00S00081.ssarg +++| L ARG L,L OUTPUT FILE 00083 M00S00082.ssarg +++| Z ARG -ZASV,Z *Z* OPTION 00084 M00S00083.ssarg +++| OP ARG OPASV,OP,400B DIRECTIVE NAME 00085 M00S00084.ssarg +++| PF ARG PFASV,PF,400B PERMANENT FILE NAME 00086 M00S00085.ssarg +++| FO ARG FOASV,FO,400B,1 *FCT* ORDINAL 00087 M00S00086.ssarg +++| ST ARG STASV,ST,400B,1 STARTING AU NUMBER 00088 M00S00087.ssarg +++| FM ARG FMASV,FM,400B FAMILY NAME 00089 M00S00088.ssarg +++| SB ARG SBASV,SB,400B SUBFAMILY IDENTIFIER 00090 M00S00089.ssarg +++| SM ARG SMASV,SM,400B SM IDENTIFIER 00091 M00S00090.ssarg +++| SL ARG SLASV,SL,400B LOWER STREAM LIMIT 00092 M00S00091.ssarg +++| SU ARG SUASV,SU,400B UPPER STREAM LIMIT 00093 M00S00092.ssarg +++| CM ARG CMASV,CM,400B CARTRIDGE MAKER IDENTIFIER 00094 M00S00093.ssarg +++| CN ARG CNASV,CN,400B,1 CARTRIDGE SERIAL NUMBER 00095 M00S00094.ssarg +++| YI ARG YIASV,YI,400B,1 Y COORDINATE 00096 M00S00095.ssarg +++| FL ARG FLASV,FL,400B,1 FLAG TO BE CHANGED 00097 M00S00096.ssarg +++| ON ARG -ONASV,ON TURN FLAG ON 00098 M00S00097.ssarg +++| OF ARG -OFASV,OF TURN FLAG OFF 00099 M00S00098.ssarg +++| ZI ARG ZIASV,ZI,400B,1 Z COORDINATE 00100 M00S00099.ssarg +++| ARG END OF ARGLIST. 00101 M00S00100.ssarg +++| 00102 M00S00101.ssarg +++|* DEFAULT VALUES. 00103 M00S00102.ssarg +++| 00104 M00S00103.ssarg +++| IASV DATA 0LINPUT 00105 M00S00104.ssarg +++| ZASV DATA 1 00106 M00S00105.ssarg +++| OPASV DATA 0 00107 M00S00106.ssarg +++| PFASV DATA 0 00108 M00S00107.ssarg +++| FOASV DATA -1 00109 M00S00108.ssarg +++| STASV DATA -1 00110 M00S00109.ssarg +++| FMASV DATA 0
| Line S00110 Modification History | |
|---|---|
M01 (Removed by) | msea014 |
Seq # *Modification Id* Act ----------------------------+ 00111 M01S00110.msea014 ---| SBASV DATA 0
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | msea014 |
Seq # *Modification Id* Act ----------------------------+ 00112 M01S00001.msea014 +++| SBASV DATA -1 00113 M00S00111.ssarg +++| SMASV DATA 1 00114 M00S00112.ssarg +++| SLASV DATA 0 00115 M00S00113.ssarg +++| SUASV DATA 0 00116 M00S00114.ssarg +++| CMASV DATA 2LA- 00117 M00S00115.ssarg +++| CNASV DATA -1 00118 M00S00116.ssarg +++| DASV DATA -1 00119 M00S00117.ssarg +++| ZIASV DATA 7777B 00120 M00S00118.ssarg +++| YIASV DATA 7777B 00121 M00S00119.ssarg +++| FLASV DATA -1 00122 M00S00120.ssarg +++| ONASV DATA 1 00123 M00S00121.ssarg +++| OFASV DATA 1 00124 M00S00122.ssarg +++| 00125 M00S00123.ssarg +++|*CALL COMTDBP 00126 M00S00124.ssarg +++| 00127 M00S00125.ssarg +++| END 00128 M00S00126.ssarg +++| IDENT DFTAB 00129 M00S00127.ssarg +++|*CALL COMCMAC 00130 M00S00128.ssarg +++| ENTRY DFTAB 00131 M00S00129.ssarg +++| SYSCOM B1 00132 M00S00130.ssarg +++| TITLE DFTAB - SET UP *SSDEF* ARGUMENT LIST. 00133 M00S00131.ssarg +++|*COMMENT SET UP *SSDEF* ARGUMENT LIST. 00134 M00S00132.ssarg +++| 00135 M00S00133.ssarg +++|** DFTAB SETS UP THE ARGUMENT LIST. 00136 M00S00134.ssarg +++|* 00137 M00S00135.ssarg +++|* THIS PROCEDURE SETS UP THE ARGUMENT LIST. 00138 M00S00136.ssarg +++|* IT CALLS *COMUDFP* TO SET UP THE ADDRESSES OF 00139 M00S00137.ssarg +++|* FOR THE CRACKED PARAMETERS IN THE COMMON 00140 M00S00138.ssarg +++|* AREA *UDFPCOM*. IT PASSES THE ADDRESS OF THE 00141 M00S00139.ssarg +++|* ARGUMENT LIST BACK TO THE CALLING PROCEDURE. 00142 M00S00140.ssarg +++|* 00143 M00S00141.ssarg +++|* SYMPL CALL DFTAB(ARGLIST) 00144 M00S00142.ssarg +++|* 00145 M00S00143.ssarg +++|* EXIT ARGUMENT LIST SET UP. 00146 M00S00144.ssarg +++|* ARGLIST - AN ITEM TO HOLD THE ADDRESS 00147 M00S00145.ssarg +++|* OF THE ARGUMENT LIST. 00148 M00S00146.ssarg +++|* 00149 M00S00147.ssarg +++|* USES A - 6 00150 M00S00148.ssarg +++|* X - 1,6 00151 M00S00149.ssarg +++|* 00152 M00S00150.ssarg +++|* MACRO ARG 00153 M00S00151.ssarg +++| 00154 M00S00152.ssarg +++| DFTAB SUBR ENTRY/EXIT 00155 M00S00153.ssarg +++| SX6 ARGLIST RETURN ADDRESS OF ARGUMENT LIST 00156 M00S00154.ssarg +++| SA6 X1 00157 M00S00155.ssarg +++| EQ DFTABX 00158 M00S00156.ssarg +++| 00159 M00S00157.ssarg +++|* SET UP THE ARGUMENT LIST FOR THE *SSDEF* CONTROL 00160 M00S00158.ssarg +++|* CARD PARAMETERS. 00161 M00S00159.ssarg +++| 00162 M00S00160.ssarg +++| ARGLIST BSS 0 00163 M00S00161.ssarg +++| FM ARG FMASV,FM FAMILY NAME 00164 M00S00162.ssarg +++| SM ARG SMASV,SM SM NUMBER 00165 M00S00163.ssarg +++| ARG END OF ARGUMENT LIST 00166 M00S00164.ssarg +++| 00167 M00S00165.ssarg +++|* DEFAULT VALUES. 00168 M00S00166.ssarg +++| 00169 M00S00167.ssarg +++| FMASV DATA 0 00170 M00S00168.ssarg +++| SMASV DATA 0LA 00171 M00S00169.ssarg +++| 00172 M00S00170.ssarg +++|*CALL COMTDFP 00173 M00S00171.ssarg +++| END 00174 M00S00172.ssarg +++| IDENT EXTAB 00175 M00S00173.ssarg +++|*CALL COMCMAC 00176 M00S00174.ssarg +++| ENTRY EXTAB 00177 M00S00175.ssarg +++| SYSCOM B1 00178 M00S00176.ssarg +++| TITLE EXTAB - SET UP *SSEXEC* ARGUMENT LIST. 00179 M00S00177.ssarg +++|*COMMENT SET UP *SSEXEC* ARGUMENT LIST. 00180 M00S00178.ssarg +++| 00181 M00S00179.ssarg +++|** EXTAB SETS UP THE ARGUMENT LIST. 00182 M00S00180.ssarg +++|* 00183 M00S00181.ssarg +++|* THIS PROCEDURE SETS UP THE ARGUMENT LIST. 00184 M00S00182.ssarg +++|* IT CALLS *COMEEXP* TO SET UP THE ADDRESSES FOR THE CRACKED 00185 M00S00183.ssarg +++|* PARAMETERS IN THE COMMON AREA *EEXPCOM*. IT PASSES THE 00186 M00S00184.ssarg +++|* ADDRESS OF THE ARGUMENT LIST BACK TO THE CALLING PROCEDURE. 00187 M00S00185.ssarg +++|* 00188 M00S00186.ssarg +++|* SYMPL CALL EXTAB(ARGLIST). 00189 M00S00187.ssarg +++|* 00190 M00S00188.ssarg +++|* EXIT ARGUMENT LIST SET UP. 00191 M00S00189.ssarg +++|* ARGLIST - AN ITEM TO HOLD THE ADDRESS OF THE ARGUMENT 00192 M00S00190.ssarg +++|* LIST. 00193 M00S00191.ssarg +++|* 00194 M00S00192.ssarg +++|* USES A - 6. 00195 M00S00193.ssarg +++|* X - 1,6. 00196 M00S00194.ssarg +++|* 00197 M00S00195.ssarg +++|* MACRO ARG. 00198 M00S00196.ssarg +++| 00199 M00S00197.ssarg +++| EXTAB SUBR ENTRY/EXIT 00200 M00S00198.ssarg +++| SX6 ARGLIST RETURN ADDRESS OF ARGUMENT LIST 00201 M00S00199.ssarg +++| SA6 X1 00202 M00S00200.ssarg +++| EQ EXTABX 00203 M00S00201.ssarg +++| 00204 M00S00202.ssarg +++|* SET UP THE ARGUMENT LIST FOR *SSEXEC* PARAMETERS. 00205 M00S00203.ssarg +++| 00206 M00S00204.ssarg +++|ARGLIST BSS 0 00207 M00S00205.ssarg +++|Q ARG QASV,Q TUNING PARAMETER 00208 M00S00206.ssarg +++|TM ARG TMASV,TM TRACE MODE PARMAMETER 00209 M00S00207.ssarg +++|S ARG SASV,S SET INDEX PARAMETER 00210 M00S00208.ssarg +++| ARG END OF ARGUMENT LIST 00211 M00S00209.ssarg +++| 00212 M00S00210.ssarg +++|* DEFAULT VALUES. 00213 M00S00211.ssarg +++| 00214 M00S00212.ssarg +++| 00215 M00S00213.ssarg +++|QASV DATA 0 00216 M00S00214.ssarg +++|TMASV DATA 0 00217 M00S00215.ssarg +++|SASV DATA 0 00218 M00S00216.ssarg +++| 00219 M00S00217.ssarg +++|*CALL COMXEXP 00220 M00S00218.ssarg +++| 00221 M00S00219.ssarg +++| END 00222 M00S00220.ssarg +++| IDENT LBTAB 00223 M00S00221.ssarg +++| ENTRY LBTAB 00224 M00S00222.ssarg +++|*COMMENT SET UP *SSLABEL* ARGUMENT LIST. 00225 M00S00223.ssarg +++| SYSCOM B1 00226 M00S00224.ssarg +++| TITLE LBTAB - SET UP *SSLABEL* ARGUMENT LIST.
| Line S00225 Modification History | |
|---|---|
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00227 M01S00225.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1978.
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00228 M01S00002.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00229 M00S00226.ssarg +++| 00230 M00S00227.ssarg +++|*CALL COMCMAC 00231 M00S00228.ssarg +++| LBTAB SPACE 4,15 00232 M00S00229.ssarg +++|** LBTAB - SET UP *SSLABEL* ARGUMENT LIST. 00233 M00S00230.ssarg +++|* 00234 M00S00231.ssarg +++|* LBTAB(ARGLIST); (*SYMPL* CALL) 00235 M00S00232.ssarg +++|* 00236 M00S00233.ssarg +++|* EXIT ARGUMENT LIST SET UP. 00237 M00S00234.ssarg +++|* (ARGLIST) = FWA OF ARGUMENT LIST. 00238 M00S00235.ssarg +++|* 00239 M00S00236.ssarg +++|* USES A - 6. 00240 M00S00237.ssarg +++|* B - 1. 00241 M00S00238.ssarg +++|* X - 6. 00242 M00S00239.ssarg +++|* 00243 M00S00240.ssarg +++|* MACROS ARG. 00244 M00S00241.ssarg +++| 00245 M00S00242.ssarg +++| 00246 M00S00243.ssarg +++| LBTAB SUBR ENTRY/EXIT 00247 M00S00244.ssarg +++| SB1 1 00248 M00S00245.ssarg +++| SX6 ARGLIST ADDRESS OF ARGUMENT LIST 00249 M00S00246.ssarg +++| SA6 X1 00250 M00S00247.ssarg +++| EQ LBTABX RETURN 00251 M00S00248.ssarg +++| 00252 M00S00249.ssarg +++|* ARGUMENT LIST FOR *SSLABEL* CONTROL STATEMENT 00253 M00S00250.ssarg +++|* AND DIRECTIVE PARAMETERS. 00254 M00S00251.ssarg +++| 00255 M00S00252.ssarg +++| ARGLIST BSS 0 00256 M00S00253.ssarg +++| I ARG IASV,I,400B DIRECTIVE OPTION 00257 M00S00254.ssarg +++| L ARG L,L OUTPUT FILE 00258 M00S00255.ssarg +++| Z ARG -ZASV,Z *Z* OPTION 00259 M00S00256.ssarg +++| OP ARG OPASV,OP,400B DIRECTIVE NAME 00260 M00S00257.ssarg +++| N ARG NASV,N,400B NUMBER OF CUBES/CARTRIDGES TO PROCESS 00261 M00S00258.ssarg +++| CN ARG CNASV,CN,400B,1 CARTRIDGE SERIAL NUMBER 00262 M00S00259.ssarg +++| PK ARG PKASV,PK,400B PICK OPTION 00263 M00S00260.ssarg +++| PT ARG PTASV,PT,400B PUT OPTION 00264 M00S00261.ssarg +++| GR ARG GRASV,GR 00265 M00S00262.ssarg +++| LT ARG -LTASV,LT CARTRIDGE *LOST* OPTION 00266 M00S00263.ssarg +++| SM ARG SMASV,SM,400B STORAGE MODULE IDENTIFIER 00267 M00S00264.ssarg +++| ON ARG -ONASV,ON TURN FLAG ON OPTION 00268 M00S00265.ssarg +++| OF ARG -OFASV,OF TURN FLAG OFF OPTION 00269 M00S00266.ssarg +++| YI ARG YIASV,YI,400B FIRST Y COORDINATE 00270 M00S00267.ssarg +++| YF ARG YFASV,YF,400B SECOND Y COORDINATE 00271 M00S00268.ssarg +++| ZI ARG ZIASV,ZI,400B FIRST Z COORDINATE 00272 M00S00269.ssarg +++| ZF ARG ZFASV,ZF,400B SECOND Z COORDINATE 00273 M00S00270.ssarg +++| FM ARG FMASV,FM,400B FAMILY NAME 00274 M00S00271.ssarg +++| SB ARG SBASV,SB,400B SUBFAMILY IDENTIFIER 00275 M00S00272.ssarg +++| CM ARG CMASV,CM,400B CARTRIDGE MANUFACTURER 00276 M00S00273.ssarg +++| CC ARG CCASV,CC,400B STORE CLEAR CARTRIDGE 00277 M00S00274.ssarg +++| B ARG BASV,B,400B SMALL FILE SPACE 00278 M00S00275.ssarg +++| ARG END OF STATUS LIST 00279 M00S00276.ssarg +++| 00280 M00S00277.ssarg +++|* DEFAULT VALUES. 00281 M00S00278.ssarg +++| 00282 M00S00279.ssarg +++| IASV DATA 0LINPUT 00283 M00S00280.ssarg +++| ZASV DATA 1 00284 M00S00281.ssarg +++| OPASV DATA 0 00285 M00S00282.ssarg +++| NASV DATA 1 00286 M00S00283.ssarg +++| CNASV DATA 0 00287 M00S00284.ssarg +++| PKASV DATA 0 00288 M00S00285.ssarg +++| PTASV VFD 6/0LP,54/ 00289 M00S00286.ssarg +++| GRASV DATA 7777 00290 M00S00287.ssarg +++| LTASV DATA 1 00291 M00S00288.ssarg +++| SMASV DATA 0LA 00292 M00S00289.ssarg +++| ONASV DATA 1 00293 M00S00290.ssarg +++| OFASV DATA 1 00294 M00S00291.ssarg +++| YIASV DATA 7777B 00295 M00S00292.ssarg +++| YFASV DATA 7777B 00296 M00S00293.ssarg +++| ZIASV DATA 7777B 00297 M00S00294.ssarg +++| ZFASV DATA 7777B 00298 M00S00295.ssarg +++| FMASV DATA -1 00299 M00S00296.ssarg +++| SBASV DATA 0 00300 M00S00297.ssarg +++| CCASV DATA -1 00301 M00S00298.ssarg +++| CMASV DATA 2LA- 00302 M00S00299.ssarg +++| BASV DATA 600 00303 M00S00300.ssarg +++| 00304 M00S00301.ssarg +++|*CALL COMTLBP 00305 M00S00302.ssarg +++| 00306 M00S00303.ssarg +++| END 00307 M00S00304.ssarg +++| IDENT MVTAB 00308 M00S00305.ssarg +++| ENTRY MVTAB 00309 M00S00306.ssarg +++| SYSCOM B1 00310 M00S00307.ssarg +++| TITLE MVTAB - SET UP *SSMOVE* ARGUMENT LIST. 00311 M00S00308.ssarg +++|*COMMENT SET UP *SSMOVE* ARGUMENT LIST.
| Line S00309 Modification History | |
|---|---|
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00312 M01S00309.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1979.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00313 M01S00003.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00314 M00S00310.ssarg +++| 00315 M00S00311.ssarg +++|*CALL COMCMAC 00316 M00S00312.ssarg +++|*CALL,COMSPFM 00317 M00S00313.ssarg +++| MVTAB SPACE 4,15 00318 M00S00314.ssarg +++|*** MVTAB - SET UP *SSMOVE* ARGUMENT LIST. 00319 M00S00315.ssarg +++|* 00320 M00S00316.ssarg +++|* MVTAB(ARGLIST); (*SYMPL* CALL) 00321 M00S00317.ssarg +++|* 00322 M00S00318.ssarg +++|* EXIT (ARGLIST) = ADDRESS OF ARGUMENT LIST. 00323 M00S00319.ssarg +++|* 00324 M00S00320.ssarg +++|* USES A - 6. 00325 M00S00321.ssarg +++|* B - 1. 00326 M00S00322.ssarg +++|* X - 6. 00327 M00S00323.ssarg +++|* 00328 M00S00324.ssarg +++|* MACROS ARG. 00329 M00S00325.ssarg +++| 00330 M00S00326.ssarg +++| 00331 M00S00327.ssarg +++|MVTAB SUBR ENTRY/EXIT 00332 M00S00328.ssarg +++| SB1 1 00333 M00S00329.ssarg +++| SX6 ARGLIST ADDRESS OF ARGUMENT LIST 00334 M00S00330.ssarg +++| SA6 X1 00335 M00S00331.ssarg +++| EQ MVTABX RETURN 00336 M00S00332.ssarg +++| 00337 M00S00333.ssarg +++|* ARGUMENT LIST. 00338 M00S00334.ssarg +++| 00339 M00S00335.ssarg +++| ARGLIST BSS 0 00340 M00S00336.ssarg +++| L ARG L,L OUTPUT FILE 00341 M00S00337.ssarg +++| NW ARG ON,NW NO WAIT OPTION 00342 M00S00338.ssarg +++| FM ARG FM,FM,400B FAMILY NAME 00343 M00S00339.ssarg +++| UI ARG UIASV,UI,400B USER INDEX OPTION 00344 M00S00340.ssarg +++| DN ARG DN,DN DEVICE NUMBER 00345 M00S00341.ssarg +++| I ARG I,I DIRECTIVE FILE 00346 M00S00342.ssarg +++| LO ARG LO,LO LIST OPTION 00347 M00S00343.ssarg +++| PX ARG PX,PX PROCESS EXCEPTIONS 00348 M00S00344.ssarg +++| LB ARG ON,LB LARGE FILE BOUNDARY 00349 M00S00345.ssarg +++| ARG END OF ARGLIST 00350 M00S00346.ssarg +++| 00351 M00S00347.ssarg +++|* DEFAULT VALUES. 00352 M00S00348.ssarg +++| 00353 M00S00349.ssarg +++| ON CON -1 00354 M00S00350.ssarg +++| UIASV DATA -1 00355 M00S00351.ssarg +++| 00356 M00S00352.ssarg +++|*CALL,COMTMVD 00357 M00S00353.ssarg +++|*CALL,COMTMVP 00358 M00S00354.ssarg +++| 00359 M00S00355.ssarg +++| END 00360 M00S00356.ssarg +++| IDENT USTAB 00361 M00S00357.ssarg +++| ENTRY USTAB 00362 M00S00358.ssarg +++| ENTRY ARG= 00363 M00S00359.ssarg +++| SYSCOM B1 00364 M00S00360.ssarg +++| TITLE USTAB - SET UP *SSUSE* ARGUMENT LIST. 00365 M00S00361.ssarg +++|*COMMENT SET UP *SSUSE* ARGUMENT LIST.
| Line S00362 Modification History | |
|---|---|
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00366 M01S00362.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1979.
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00367 M01S00004.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00368 M00S00363.ssarg +++| 00369 M00S00364.ssarg +++|*CALL COMCMAC 00370 M00S00365.ssarg +++| USTAB SPACE 4,15 00371 M00S00366.ssarg +++|** USTAB - SET UP *SSUSE* ARGUMENT LIST. 00372 M00S00367.ssarg +++|* 00373 M00S00368.ssarg +++|* USTAB(ARGLIST); (*SYMPL* CALL) 00374 M00S00369.ssarg +++|* 00375 M00S00370.ssarg +++|* EXIT ARGUMENT LIST SET UP. 00376 M00S00371.ssarg +++|* (ARGLIST) = FWA OF ARGUMENT LIST. 00377 M00S00372.ssarg +++|* 00378 M00S00373.ssarg +++|* USES A - 6. 00379 M00S00374.ssarg +++|* B - 1 00380 M00S00375.ssarg +++|* X - 6. 00381 M00S00376.ssarg +++|* 00382 M00S00377.ssarg +++|* MACROS ARG. 00383 M00S00378.ssarg +++| 00384 M00S00379.ssarg +++| 00385 M00S00380.ssarg +++| ARG= BSS 0 00386 M00S00381.ssarg +++| USTAB SUBR ENTRY/EXIT 00387 M00S00382.ssarg +++| SB1 1 00388 M00S00383.ssarg +++| SX6 ARGLIST RETURN ADDRESS OF ARGUMENT LIST 00389 M00S00384.ssarg +++| SA6 X1 00390 M00S00385.ssarg +++| EQ USTABX RETURN 00391 M00S00386.ssarg +++| 00392 M00S00387.ssarg +++|* ARGUMENT LIST FOR *SSUSE* CONTROL STATEMENT. 00393 M00S00388.ssarg +++| 00394 M00S00389.ssarg +++| ARGLIST BSS 0 00395 M00S00390.ssarg +++| OP ARG OPASV,OP,400B RETURN OPTION 00396 M00S00391.ssarg +++| FM ARG FMASV,FM,400B FAMILY NAME 00397 M00S00392.ssarg +++| SB ARG SBASV,SB,400B,1 SELECTED SUBFAMILIES 00398 M00S00393.ssarg +++| SM ARG SMASV,SM,400B,1 SELECTED SM-ID-S 00399 M00S00394.ssarg +++| L ARG LASV,L OUTPUT FILE 00400 M00S00395.ssarg +++| CN ARG CNASV,CN,400B,1 CARTRIDGE SERIAL NUMBER 00401 M00S00396.ssarg +++| CM ARG CMASV,CM,400B CARTRIDGE MANUFACTURER 00402 M00S00397.ssarg +++| ARG END OF ARGUMENT LIST 00403 M00S00398.ssarg +++| 00404 M00S00399.ssarg +++|* DEFAULT VALUES. 00405 M00S00400.ssarg +++| 00406 M00S00401.ssarg +++| OPASV DATA 0 00407 M00S00402.ssarg +++| FMASV DATA 0 00408 M00S00403.ssarg +++| SBASV DATA 0L01234567 00409 M00S00404.ssarg +++| SMASV DATA 1HA 00410 M00S00405.ssarg +++| LASV DATA 0LOUTPUT 00411 M00S00406.ssarg +++| CNASV DATA 0 00412 M00S00407.ssarg +++| CMASV DATA 2LA 00413 M00S00408.ssarg +++| 00414 M00S00409.ssarg +++|*CALL COMTUSP 00415 M00S00410.ssarg +++| 00416 M00S00411.ssarg +++| END 00417 M00S00412.ssarg +++| IDENT VLTAB 00418 M00S00413.ssarg +++| ENTRY VLTAB 00419 M00S00414.ssarg +++| ENTRY ARG= 00420 M00S00415.ssarg +++| SYSCOM B1 00421 M00S00416.ssarg +++| TITLE VLTAB - SET UP *SSVAL* ARGUMENT LIST. 00422 M00S00417.ssarg +++|*COMMENT SET UP *SSVAL* ARGUMENT LIST. 00423 M00S00418.ssarg +++| 00424 M00S00419.ssarg +++|*CALL COMCMAC 00425 M00S00420.ssarg +++| VLTAB SPACE 4,30 00426 M00S00421.ssarg +++| 00427 M00S00422.ssarg +++|** VLTAB - ASVAL CONTROL CARD ARGUMENTS TABLE. 00428 M00S00423.ssarg +++|* 00429 M00S00424.ssarg +++|* *VLTAB* RETURNS THE ADDRESS OF *ARGLIST* TO THE CALLER 00430 M00S00425.ssarg +++|* IN THE CALLING PARAMETER *ARGADDR*. 00431 M00S00426.ssarg +++|* 00432 M00S00427.ssarg +++|* SYMPL CALL - VLTAB(ARGADDR); 00433 M00S00428.ssarg +++|* 00434 M00S00429.ssarg +++|* ENTRY (X1) = ADDRESS OF *ARGADDR*. 00435 M00S00430.ssarg +++|* 00436 M00S00431.ssarg +++|* EXIT (ARGADDR) = ADDRESS OF *ARGLIST*. 00437 M00S00432.ssarg +++|* 00438 M00S00433.ssarg +++|* USES X - 6 00439 M00S00434.ssarg +++|* A - 6 00440 M00S00435.ssarg +++|* 00441 M00S00436.ssarg +++|* CALLS COMTVLP - SSVAL CONTROL STATEMENT PARAMETERS ARRAY. 00442 M00S00437.ssarg +++|* 00443 M00S00438.ssarg +++|* NOTES *ARGLIST* IS A TABLE THAT DESCRIBES THE 00444 M00S00439.ssarg +++|* *SSVAL* CONTROL STATEMENT ARGUMENTS, AND DEFAULTS 00445 M00S00440.ssarg +++|* USING THE *NOS* MACRO *ARG*. 00446 M00S00441.ssarg +++|* 00447 M00S00442.ssarg +++|* 00448 M00S00443.ssarg +++|* 00449 M00S00444.ssarg +++|* 00450 M00S00445.ssarg +++| 00451 M00S00446.ssarg +++| ARG= BSS 0 00452 M00S00447.ssarg +++| VLTAB SUBR ENTRY/EXIT 00453 M00S00448.ssarg +++| SX6 ARGLIST 00454 M00S00449.ssarg +++| SA6 X1 RETURN ADDRESS OF ARGUMENT LIST 00455 M00S00450.ssarg +++| EQ VLTABX 00456 M00S00451.ssarg +++| 00457 M00S00452.ssarg +++|* ARGUMENT TABLE 00458 M00S00453.ssarg +++|* 00459 M00S00454.ssarg +++|* THE CONTROL CARD PARAMETERS ARE DESCRIBED BY THE ARG MACRO - 00460 M00S00455.ssarg +++|* OP ARG ASV,ADDR,ST,WC 00461 M00S00456.ssarg +++|* WHERE OP = 2 CHARACTER KEYWORD. 00462 M00S00457.ssarg +++|* ASV = ASSUMED VALUE IF OP, FORM DETECTED. 00463 M00S00458.ssarg +++|* ADDR = ADDRESS FOR RESULTANT PARAMETER. 00464 M00S00459.ssarg +++|* ST = A STATUS. 00465 M00S00460.ssarg +++|* WC = PARAMETER LENGTH. 00466 M00S00461.ssarg +++|* 00467 M00S00462.ssarg +++| 00468 M00S00463.ssarg +++| ARGLIST BSS 0 00469 M00S00464.ssarg +++| L ARG LF,LF 00470 M00S00465.ssarg +++| RF ARG RFA,RF 00471 M00S00466.ssarg +++| AM ARG ON,AM 00472 M00S00467.ssarg +++| SM ARG SM,SM,400B,1 00473 M00S00468.ssarg +++| FM ARG ON,FM 00474 M00S00469.ssarg +++| FX ARG FX,FX,400B 00475 M00S00470.ssarg +++| RL ARG ON,RL 00476 M00S00471.ssarg +++| SB ARG SB,SB,400B,1 00477 M00S00472.ssarg +++| ST ARG STA,ST,400B 00478 M00S00473.ssarg +++|ENDARGS BSSZ 1 END OF ARGLIST 00479 M00S00474.ssarg +++| 00480 M00S00475.ssarg +++|* DEFAULTS 00481 M00S00476.ssarg +++| 00482 M00S00477.ssarg +++| RFA CON 7LZZZZRDF 00483 M00S00478.ssarg +++| ON CON -1 00484 M00S00479.ssarg +++| STA DATA 1HX 00485 M00S00480.ssarg +++| 00486 M00S00481.ssarg +++|*CALL COMTVLP 00487 M00S00482.ssarg +++| 00488 M00S00483.ssarg +++| END
cdc/nos2.source/opl.opl871/deck/ssarg.txt · Last modified: by 127.0.0.1