cdc:nos2.source:opl.opl871:common:comtmvd
Common COMTMVD
1 Modification
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M01S00001.comtmvd +++| # 00002 M01S00002.comtmvd +++| CTEXT COMTMVD - *SSMOVE* DIRECTIVE PARAMETERS. 00003 M01S00003.comtmvd +++| # 00004 M01S00004.comtmvd +++| 00005 M01S00005.comtmvd +++| CONTROL NOLIST; 00006 M01S00006.comtmvd +++| CONTROL IFEQ LISTCON,1; 00007 M01S00007.comtmvd +++| CONTROL LIST; 00008 M01S00008.comtmvd +++| CONTROL FI; 00009 M01S00009.comtmvd +++| 00010 M01S00010.comtmvd +++| BEGIN # COMTMVD # 00011 M01S00011.comtmvd +++| # 00012 M01S00012.comtmvd +++|*** COMTMVD - *SSMOVE* DIRECTIVE PARAMETERS. 00013 M01S00013.comtmvd +++|* DISCUSS FUNCTION.. 00014 M01S00014.comtmvd +++| 00015 M01S00015.comtmvd +++| 00016 M01S00016.comtmvd +++| 00017 M01S00017.comtmvd +++| 00018 M01S00018.comtmvd +++| # 00019 M01S00019.comtmvd +++| # 00020 M01S00020.comtmvd +++|* *COMPASS*+*SYMPL* DEFINITIONS. 00021 M01S00021.comtmvd +++| # 00022 M01S00022.comtmvd +++| 00023 M01S00023.comtmvd +++|
| Line S00024 Modification History | |
|---|---|
M01 (Added by) | comtmvd |
M02 (Updated by) | mse0017 |
Seq # *Modification Id* Act ----------------------------+ 00024 M02S00024.mse0017 ---|#MXINDX #DEF# 4 # MXINDX #4#; # MAX PARAMS ANY DIRECTIVE # 00025 M01S00001.mse0017 +++|#MXINDX #DEF# 5 # MXINDX #5#; # MAX PARAMS ANY DIRECTIVE # 00026 M01S00025.comtmvd +++|#NUMDIR #DEF# 7 # NUMDIR #7#; #NUMBER OF DIRECTIVES # 00027 M01S00026.comtmvd +++| 00028 M01S00027.comtmvd +++|#SMMG #DEF# 1 # SMMG #1#; # MASTER GOAL # 00029 M01S00028.comtmvd +++|#SMSG #DEF# 2 # SMSG #2#; # SECONDARY GOAL # 00030 M01S00029.comtmvd +++|#SMP1 #DEF# 3 # SMP1 #3#; # SITE PARAMETER 1 # 00031 M01S00030.comtmvd +++|#SMP2 #DEF# 4 # SMP2 #4#; # SITE PARAMETER 2 # 00032 M01S00031.comtmvd +++|#SMMX #DEF# 4 # SMMX #4#; # MAXIMUM SM INDEX # 00033 M01S00032.comtmvd +++| 00034 M01S00033.comtmvd +++|#SFFN #DEF# 1 # SFFN #1#; # FILE NAME # 00035 M01S00034.comtmvd +++|#SFUIX #DEF# 2 # SFUI #2#; # USER INDEX # 00036 M01S00035.comtmvd +++|#SFPO #DEF# 3 # SFPO #3#; # PROCESSING OPTION # 00037 M01S00036.comtmvd +++|#SFPC #DEF# 4 # SFPC #4#; # PRIVATE CARTRIDGE ID # 00038 M01S00037.comtmvd +++|#SFMX #DEF# 4 # SFMX #4#; # MAXIMUM SF INDEX # 00039 M01S00038.comtmvd +++| 00040 M01S00039.comtmvd +++|#FRMN #DEF# 1 # FRMN #1#; # MINIMUM SIZE # 00041 M01S00040.comtmvd +++|#FRMX #DEF# 2 # FRMX #2#; # MAXIMUM SIZE # 00042 M01S00041.comtmvd +++|#FRDD #DEF# 3 # FRDD #3#; # DELTA TIME (DAYS) # 00043 M01S00042.comtmvd +++|#FRTH #DEF# 4 # FRTH #4#; # THRESHOLD # 00044 M01S00043.comtmvd +++|#FRMXX #DEF# 4 # FRMXX #4#; # MAXIMUM FR INDEX # 00045 M01S00044.comtmvd +++| 00046 M01S00045.comtmvd +++|#WMAG #DEF# 1 # WMAG #1#; # AGE # 00047 M01S00046.comtmvd +++|#WMLN #DEF# 2 # WMLN #2#; # LENGTH # 00048 M01S00047.comtmvd +++|#WMAC #DEF# 3 # WMAC #3#; # ACCESS COUNT # 00049 M01S00048.comtmvd +++|#WMMXX #DEF# 3 # WMMXX #3#; # MAXIMUM WM INDEX # 00050 M01S00049.comtmvd +++| 00051 M01S00050.comtmvd +++|#WAAG #DEF# 1 # WAAG #1#; # AGE # 00052 M01S00051.comtmvd +++|#WALN #DEF# 2 # WALN #2#; # LENGTH # 00053 M01S00052.comtmvd +++|#WAAC #DEF# 3 # WAAC #3#; # ACCESS COUNT # 00054 M01S00053.comtmvd +++|#WADV #DEF# 4 # WADV #4#; # DIVISOR # 00055 M01S00054.comtmvd +++|#WAMX #DEF# 4 # WAMX #4#; # MAXIMUM WA INDEX # 00056 M01S00055.comtmvd +++| # 00057 M01S00056.comtmvd +++| 00058 M01S00057.comtmvd +++| 00059 M01S00058.comtmvd +++| MACRO TQARG,KEY,SEC,INDX 00060 M01S00059.comtmvd +++| IFOK IFLE INDX,MXINDX 00061 M01S00060.comtmvd +++| KEY ARG SEC,TQBUFP+INDX,400B 00062 M01S00061.comtmvd +++| IFOK ELSE 00063 M01S00062.comtmvd +++| 2 ERR IF INDX TOO BIG 00064 M01S00063.comtmvd +++| IFOK ENDIF 00065 M01S00064.comtmvd +++| ENDM 00066 M01S00065.comtmvd +++| 00067 M01S00066.comtmvd +++| 00068 M01S00067.comtmvd +++| TQ MACRO 00069 M01S00068.comtmvd +++| IA ARG -SEC,TQBUF 00070 M01S00069.comtmvd +++| DA ARG -SEC,TQBUF+1 00071 M01S00070.comtmvd +++| RL ARG -SEC,TQBUF+2 00072 M01S00071.comtmvd +++| DS ARG -SEC,TQBUF+3 00073 M01S00072.comtmvd +++| ENDM 00074 M01S00073.comtmvd +++| 00075 M01S00074.comtmvd +++| 00076 M01S00075.comtmvd +++| 00077 M01S00076.comtmvd +++|* PARAMETER LIST FOR THE *PR* DIRECTIVE. 00078 M01S00077.comtmvd +++| 00079 M01S00078.comtmvd +++| 00080 M01S00079.comtmvd +++| PRARG BSS 0 00081 M01S00080.comtmvd +++| TQ 00082 M01S00081.comtmvd +++| PR TQARG -IGNORE,0 00083 M01S00082.comtmvd +++| L TQARG IGNORE,RSLK 00084 M01S00083.comtmvd +++| D TQARG IGNORE,RSDS 00085 M01S00084.comtmvd +++| M TQARG IGNORE,RSMS 00086 M01S00085.comtmvd +++| N TQARG IGNORE,RSNP 00087 M01S00002.mse0017 +++| T TQARG IGNORE,RSTP 00088 M01S00086.comtmvd +++| ARG END OF PARAMETERS. 00089 M01S00087.comtmvd +++| 00090 M01S00088.comtmvd +++| 00091 M01S00089.comtmvd +++|* PARAMETER LIST FOR THE *BR* DIRECTIVE. 00092 M01S00090.comtmvd +++| 00093 M01S00091.comtmvd +++| 00094 M01S00092.comtmvd +++| BRARG BSS 0 00095 M01S00093.comtmvd +++| TQ 00096 M01S00094.comtmvd +++| BR TQARG -IGNORE,0 00097 M01S00095.comtmvd +++| N TQARG IGNORE,BRNO 00098 M01S00096.comtmvd +++| Y TQARG IGNORE,BRAL 00099 M01S00097.comtmvd +++| MD TQARG IGNORE,BRMD 00100 M01S00098.comtmvd +++| ARG END OF PARAMETER LIST. 00101 M01S00099.comtmvd +++| 00102 M01S00100.comtmvd +++| 00103 M01S00101.comtmvd +++|* PARAMETER LIST FOR THE *SM* DIRECTIVE. 00104 M01S00102.comtmvd +++| 00105 M01S00103.comtmvd +++| 00106 M01S00104.comtmvd +++| SMARG BSS 0 00107 M01S00105.comtmvd +++| TQ 00108 M01S00106.comtmvd +++| SM TQARG -IGNORE,0 00109 M01S00107.comtmvd +++| MG TQARG IGNORE,SMMG 00110 M01S00108.comtmvd +++| SG TQARG IGNORE,SMSG 00111 M01S00109.comtmvd +++| P1 TQARG IGNORE,SMP1 00112 M01S00110.comtmvd +++| P2 TQARG IGNORE,SMP2 00113 M01S00111.comtmvd +++| ARG END OF PARAMETER LIST. 00114 M01S00112.comtmvd +++| 00115 M01S00113.comtmvd +++| 00116 M01S00114.comtmvd +++|* PARAMETER LIST FOR THE *FR* DIRECTIVE. 00117 M01S00115.comtmvd +++| 00118 M01S00116.comtmvd +++| 00119 M01S00117.comtmvd +++| FRARG BSS 0 00120 M01S00118.comtmvd +++| TQ 00121 M01S00119.comtmvd +++| FR TQARG -IGNORE,0 00122 M01S00120.comtmvd +++| MN TQARG IGNORE,FRMN 00123 M01S00121.comtmvd +++| MX TQARG IGNORE,FRMX 00124 M01S00122.comtmvd +++| DD TQARG IGNORE,FRDD 00125 M01S00123.comtmvd +++| TH TQARG IGNORE,FRTH 00126 M01S00124.comtmvd +++| ARG END OF PARAMETER LIST. 00127 M01S00125.comtmvd +++| 00128 M01S00126.comtmvd +++| 00129 M01S00127.comtmvd +++|* PARAMETER LIST FOR THE *WM* DIRECTIVE. 00130 M01S00128.comtmvd +++| 00131 M01S00129.comtmvd +++| 00132 M01S00130.comtmvd +++| WMARG BSS 0 00133 M01S00131.comtmvd +++| TQ 00134 M01S00132.comtmvd +++| WM TQARG -IGNORE,0 00135 M01S00133.comtmvd +++| AG TQARG IGNORE,WMAG 00136 M01S00134.comtmvd +++| LN TQARG IGNORE,WMLN 00137 M01S00135.comtmvd +++| AC TQARG IGNORE,WMAC 00138 M01S00136.comtmvd +++| ARG END OF PARAMETER LIST. 00139 M01S00137.comtmvd +++| 00140 M01S00138.comtmvd +++| 00141 M01S00139.comtmvd +++|* PARAMETER LIST FOR THE *WA* DIRECTIVE. 00142 M01S00140.comtmvd +++| 00143 M01S00141.comtmvd +++| 00144 M01S00142.comtmvd +++| WAARG BSS 0 00145 M01S00143.comtmvd +++| TQ 00146 M01S00144.comtmvd +++| WA TQARG -IGNORE,0 00147 M01S00145.comtmvd +++| AG TQARG IGNORE,WAAG 00148 M01S00146.comtmvd +++| LN TQARG IGNORE,WALN 00149 M01S00147.comtmvd +++| AC TQARG IGNORE,WAAC 00150 M01S00148.comtmvd +++| DV TQARG IGNORE,WADV 00151 M01S00149.comtmvd +++| ARG END OF PARAMETER LIST. 00152 M01S00150.comtmvd +++| 00153 M01S00151.comtmvd +++| 00154 M01S00152.comtmvd +++|* PARAMETER LIST FOR THE *SF* DIRECTIVE. 00155 M01S00153.comtmvd +++| 00156 M01S00154.comtmvd +++| 00157 M01S00155.comtmvd +++| SFARG BSS 0 00158 M01S00156.comtmvd +++| TQ 00159 M01S00157.comtmvd +++| SF TQARG -IGNORE,0 00160 M01S00158.comtmvd +++| FN TQARG IGNORE,SFFN 00161 M01S00159.comtmvd +++| UI TQARG IGNORE,SFUIX 00162 M01S00160.comtmvd +++| PO TQARG IGNORE,SFPO 00163 M01S00161.comtmvd +++| PC TQARG IGNORE,SFPC 00164 M01S00162.comtmvd +++| ARG END OF PARAMETER LIST. 00165 M01S00163.comtmvd +++| 00166 M01S00164.comtmvd +++| 00167 M01S00165.comtmvd +++| 00168 M01S00166.comtmvd +++| 00169 M01S00167.comtmvd +++| 00170 M01S00168.comtmvd +++| 00171 M01S00169.comtmvd +++| SEC DATA 1 00172 M01S00170.comtmvd +++| IGNORE DATA 0 00173 M01S00171.comtmvd +++| 00174 M01S00172.comtmvd +++| 00175 M01S00173.comtmvd +++| TQBUF BSS 0 00176 M01S00174.comtmvd +++| BSS 4 FOR THE T(I/D) AND Q(A/B) PARAMETERS. 00177 M01S00175.comtmvd +++| TQBUFP BSS 1 FOR THE DIRECTIVE KEYWORD 00178 M01S00176.comtmvd +++| BSS MXINDX HOLDS PARAMETER VALUES 00179 M01S00177.comtmvd +++| 00180 M01S00178.comtmvd +++| 00181 M01S00179.comtmvd +++|* TEXT LINES FOR THE *SSMOVE* REPORT. 00182 M01S00180.comtmvd +++| 00183 M01S00181.comtmvd +++| FRTEXT DATA 20HFILE REQUIREMENTS 00184 M01S00182.comtmvd +++| WMTEXT DATA 20HWEIGHT MULTIPLIER 00185 M01S00183.comtmvd +++| WATEXT DATA 20HWEIGHT ADDER 00186 M01S00184.comtmvd +++| PRTEXT DATA 20HPREFERRED RESIDENCE 00187 M01S00185.comtmvd +++| BRTEXT DATA 20HBACKUP REQUIREMENT 00188 M01S00186.comtmvd +++| SMTEXT DATA 20HSITE MANAGEMENT 00189 M01S00187.comtmvd +++| 00190 M01S00188.comtmvd +++| USE /TMVDCOM/ 00191 M01S00189.comtmvd +++| 00192 M01S00190.comtmvd +++| TQPTR BSS 0 00193 M01S00191.comtmvd +++| VFD 12/2L,, 00194 M01S00192.comtmvd +++| VFD 18/TQBUFP+1 LOCATION OF FIRST PARAMETER 00195 M01S00193.comtmvd +++| VFD 12/MXINDX+5 LENGTH OF TOTAL TQ ARRAY 00196 M01S00194.comtmvd +++| VFD 18/TQBUF 00197 M01S00195.comtmvd +++| VFD 60/0 00198 M01S00196.comtmvd +++| 00199 M01S00197.comtmvd +++| SF BSS 0 00200 M01S00198.comtmvd +++| VFD 12/2LSF KEYWORD 00201 M01S00199.comtmvd +++| VFD 18/SFVAL PARM VALUE TABLE ADDRESS 00202 M01S00200.comtmvd +++| VFD 12/SFMX MAXIMUM INDEX 00203 M01S00201.comtmvd +++| VFD 18/SFARG ADDRESS OF ARG TABLE 00204 M01S00202.comtmvd +++| VFD 60/0 ADDRESS OF TEXT LINE 00205 M01S00203.comtmvd +++| 00206 M01S00204.comtmvd +++| FR BSS 0 KEYWORD 00207 M01S00205.comtmvd +++| VFD 12/2LFR 00208 M01S00206.comtmvd +++| VFD 18/FRVAL PARM VALUE TABLE ADDRESS 00209 M01S00207.comtmvd +++| VFD 12/FRMXX MAXIMUM INDEX 00210 M01S00208.comtmvd +++| VFD 18/FRARG ADDRESS OF ARG TABLE 00211 M01S00209.comtmvd +++| VFD 60/FRTEXT ADDRESS OF TEXT LINE 00212 M01S00210.comtmvd +++| 00213 M01S00211.comtmvd +++| WM BSS 0 00214 M01S00212.comtmvd +++| VFD 12/2LWM KEYWORD 00215 M01S00213.comtmvd +++| VFD 18/WMVAL PARM VALUE TABLE ADDRESS 00216 M01S00214.comtmvd +++| VFD 12/WMMXX MAXIMUM INDEX 00217 M01S00215.comtmvd +++| VFD 18/WMARG ADDRESS OF ARG TABLE 00218 M01S00216.comtmvd +++| VFD 60/WMTEXT ADDRESS OF TEXT LINE 00219 M01S00217.comtmvd +++| 00220 M01S00218.comtmvd +++| WA BSS 0 00221 M01S00219.comtmvd +++| VFD 12/2LWA KEYWORD 00222 M01S00220.comtmvd +++| VFD 18/WAVAL PARM VALUE TABLE ADDRESS 00223 M01S00221.comtmvd +++| VFD 12/WAMX MAXIMUM INDEX 00224 M01S00222.comtmvd +++| VFD 18/WAARG ADDRESS OF ARG TABLE 00225 M01S00223.comtmvd +++| VFD 60/WATEXT ADDRESS OF TEXT LINE 00226 M01S00224.comtmvd +++| 00227 M01S00225.comtmvd +++| PR BSS 0 KEYWORD 00228 M01S00226.comtmvd +++| VFD 12/2LPR 00229 M01S00227.comtmvd +++| VFD 18/PRVAL PARM VALUE TABLE ADDRESS 00230 M01S00228.comtmvd +++| VFD 12/RSMX MAXIMUM INDEX 00231 M01S00229.comtmvd +++| VFD 18/PRARG ADDRESS OF ARG TABLE 00232 M01S00230.comtmvd +++| VFD 60/PRTEXT ADDRESS OF TEXT LINE 00233 M01S00231.comtmvd +++| 00234 M01S00232.comtmvd +++| BR BSS 0 00235 M01S00233.comtmvd +++| VFD 12/2LBR KEYWORD 00236 M01S00234.comtmvd +++| VFD 18/BRVAL PARM VALUE TABLE ADDRESS 00237 M01S00235.comtmvd +++| VFD 12/BRMX MAXIMUM INDEX 00238 M01S00236.comtmvd +++| VFD 18/BRARG ADDRESS OF ARG TABLE 00239 M01S00237.comtmvd +++| VFD 60/BRTEXT ADDRESS OF TEXT LINE 00240 M01S00238.comtmvd +++| 00241 M01S00239.comtmvd +++| SM BSS 0 00242 M01S00240.comtmvd +++| VFD 12/2LSM KEYWORD 00243 M01S00241.comtmvd +++| VFD 18/SMVAL PARM VALUE TABLE ADDRESS 00244 M01S00242.comtmvd +++| VFD 12/SMMX MAXIMUM INDEX 00245 M01S00243.comtmvd +++| VFD 18/SMARG ADDRESS OF ARG TABLE 00246 M01S00244.comtmvd +++| VFD 60/SMTEXT ADDRESS OF TEXT LINE 00247 M01S00245.comtmvd +++| 00248 M01S00246.comtmvd +++| SFVAL BSS 4*SFMX *SF* PARAMETER VALUES 00249 M01S00247.comtmvd +++| FRVAL BSS 4*FRMXX *FR* PARAMETER VALUES 00250 M01S00248.comtmvd +++| PRVAL BSS 4*RSMX *PR* PARAMETER VALUES 00251 M01S00249.comtmvd +++| BRVAL BSS 4*BRMX *BR* PARAMETER VALUES 00252 M01S00250.comtmvd +++| SMVAL BSS 4*SMMX *SM* PARAMETER VALUES 00253 M01S00251.comtmvd +++| WAVAL BSS 4*WAMX *WA* PARAMETER VALUES 00254 M01S00252.comtmvd +++| WMVAL BSS 4*WMMXX *WM* PARAMETER VALUES 00255 M01S00253.comtmvd +++| 00256 M01S00254.comtmvd +++| USE * 00257 M01S00255.comtmvd +++| 00258 M01S00256.comtmvd +++| # 00259 M01S00257.comtmvd +++| 00260 M01S00258.comtmvd +++| 00261 M01S00259.comtmvd +++| # 00262 M01S00260.comtmvd +++| COL 12 FORCE *COMPASS* TO IGNORE *SYMPL* CODE 00263 M01S00261.comtmvd +++| # 00264 M01S00262.comtmvd +++| 00265 M01S00263.comtmvd +++| 00266 M01S00264.comtmvd +++| # 00267 M01S00265.comtmvd +++|*** *SYMPL* DEFINITIONS OF THE COMMON BLOCK *TMVDCOM* 00268 M01S00266.comtmvd +++| # 00269 M01S00267.comtmvd +++| 00270 M01S00268.comtmvd +++| COMMON TMVDCOM; 00271 M01S00269.comtmvd +++| 00272 M01S00270.comtmvd +++| BEGIN # TMVDCOM # 00273 M01S00271.comtmvd +++| # 00274 M01S00272.comtmvd +++|* ARRAY WHICH HAS POINTERS TO THE *ARG* TABLE FOR EACH DIRECTIVE. 00275 M01S00273.comtmvd +++| # 00276 M01S00274.comtmvd +++| 00277 M01S00275.comtmvd +++| ARRAY ARGP [0:NUMDIR] S(2); 00278 M01S00276.comtmvd +++| BEGIN 00279 M01S00277.comtmvd +++| ITEM ARG$KEY C(00,00,02); # DIRECTIVE KEY # 00280 M01S00278.comtmvd +++| ITEM ARG$VAL U(00,12,18); # PARAMETER VALUES # 00281 M01S00279.comtmvd +++| ITEM ARG$MX U(00,30,12); # MAXIMUM INDEX # 00282 M01S00280.comtmvd +++| ITEM ARG$TAB U(00,42,18); # LOC(*ARG* TABLE) # 00283 M01S00281.comtmvd +++| ITEM ARG$TEXT U(01,42,18); # LOC(*TEXT LINE*) # 00284 M01S00282.comtmvd +++| END 00285 M01S00283.comtmvd +++| 00286 M01S00284.comtmvd +++| 00287 M01S00285.comtmvd +++| # 00288 M01S00286.comtmvd +++|* THE FOLLOWING ARRAYS CONTAIN DEFAULT VALUES FOR EACH 00289 M01S00287.comtmvd +++|* OF THE PARAMETERS FOR EACH DIRECTIVE. 00290 M01S00288.comtmvd +++|* EACH ARRAY ITEM IS ACCESSED BY REFERENCING 00291 M01S00289.comtmvd +++|* KEY$VAL[T,Q,PAR] 00292 M01S00290.comtmvd +++|* KEY = KEYWORD FOR THE DIRECTIVE. 00293 M01S00291.comtmvd +++|* PAR = INDEX FOR THE PARAMETER. 00294 M01S00292.comtmvd +++|* T = FILE TYPE (1=INDIRECT, 2=DIRECT). 00295 M01S00293.comtmvd +++|* Q = ACTION TYPE (1=ARCHIVE, 2=BACKUP). 00296 M01S00294.comtmvd +++| # 00297 M01S00295.comtmvd +++| 00298 M01S00296.comtmvd +++| ARRAY SFVAL [1:2,1:2,1:SFMX] S(1); 00299 M01S00297.comtmvd +++| BEGIN 00300 M01S00298.comtmvd +++| ITEM SF$VAL I(00,00,60)=[ ## # DEFAULT VALUES BELOW # 00301 M01S00299.comtmvd +++| ## 00302 M01S00300.comtmvd +++| ]; 00303 M01S00301.comtmvd +++| END 00304 M01S00302.comtmvd +++| 00305 M01S00303.comtmvd +++| 00306 M01S00304.comtmvd +++| ARRAY FRVAL [1:2,1:2,1:FRMXX] S(1); 00307 M01S00305.comtmvd +++| BEGIN 00308 M01S00306.comtmvd +++| ITEM FR$VAL I(00,00,60)=[ ## # DEFAULT VALUES BELOW # 00309 M01S00307.comtmvd +++| [ [DS$FR$MN] [RL$FR$MN] ] 00310 M01S00308.comtmvd +++| [ [DS$FR$MX] [RL$FR$MX] ] 00311 M01S00309.comtmvd +++| [ [DS$FR$DD] [RL$FR$DD] ] 00312 M01S00310.comtmvd +++| [ [DS$FR$TH] [RL$FR$TH] ] 00313 M01S00311.comtmvd +++| ]; 00314 M01S00312.comtmvd +++| END 00315 M01S00313.comtmvd +++| 00316 M01S00314.comtmvd +++| 00317 M01S00315.comtmvd +++| 00318 M01S00316.comtmvd +++| ARRAY PRVAL [1:2,1:2,1:RSMX] S(1); 00319 M01S00317.comtmvd +++| BEGIN 00320 M01S00318.comtmvd +++| ITEM PR$VAL I(00,00,60)=[ ## # DEFAULT VALUES FOLLOW # 00321 M01S00319.comtmvd +++| [ [DS$PR$L ] [RL$PR$L ] ] 00322 M01S00320.comtmvd +++| [ [DS$PR$D ] [RL$PR$D ] ] 00323 M01S00321.comtmvd +++| [ [DS$PR$M ] [RL$PR$M ] ] 00324 M01S00322.comtmvd +++| [ [DS$PR$N ] [RL$PR$N ] ] 00325 M01S00003.mse0017 +++| [ [DS$PR$T ] [RL$PR$T ] ] 00326 M01S00323.comtmvd +++| ]; 00327 M01S00324.comtmvd +++| END 00328 M01S00325.comtmvd +++| 00329 M01S00326.comtmvd +++| 00330 M01S00327.comtmvd +++| ARRAY BRVAL [1:2,1:2,1:BRMX] S(1); 00331 M01S00328.comtmvd +++| BEGIN 00332 M01S00329.comtmvd +++| ITEM BR$VAL I(00,00,60)=[ ## # DEFAULT VALUES BELOW # 00333 M01S00330.comtmvd +++| [ [DS$BR$N ] [RL$BR$N ] ] 00334 M01S00331.comtmvd +++| [ [DS$BR$Y ] [RL$BR$Y ] ] 00335 M01S00332.comtmvd +++| [ [DS$BR$MD] [RL$BR$MD] ] 00336 M01S00333.comtmvd +++| ]; 00337 M01S00334.comtmvd +++| END 00338 M01S00335.comtmvd +++| 00339 M01S00336.comtmvd +++| 00340 M01S00337.comtmvd +++| ARRAY SMVAL [1:2,1:2,1:SMMX] S(1); 00341 M01S00338.comtmvd +++| BEGIN 00342 M01S00339.comtmvd +++| ITEM SM$VAL I(00,00,60)=[ ## # DEFAULT VALUES BELOW # 00343 M01S00340.comtmvd +++| [ [DS$SM$MG] [RL$SM$MG] ] 00344 M01S00341.comtmvd +++| [ [DS$SM$SG] [RL$SM$SG] ] 00345 M01S00342.comtmvd +++| [ [DS$SM$P1] [RL$SM$P1] ] 00346 M01S00343.comtmvd +++| [ [DS$SM$P2] [RL$SM$P2] ] 00347 M01S00344.comtmvd +++| ]; 00348 M01S00345.comtmvd +++| END 00349 M01S00346.comtmvd +++| 00350 M01S00347.comtmvd +++| 00351 M01S00348.comtmvd +++| ARRAY WAVAL [1:2,1:2,1:WAMX] S(1); 00352 M01S00349.comtmvd +++| BEGIN 00353 M01S00350.comtmvd +++| ITEM WA$VAL I(00,00,60)=[ ## # DEFAULT VALUES BELOW # 00354 M01S00351.comtmvd +++| [ [DS$WA$AG] [RL$WA$AG] ] 00355 M01S00352.comtmvd +++| [ [DS$WA$LN] [RL$WA$LN] ] 00356 M01S00353.comtmvd +++| [ [DS$WA$AC] [RL$WA$AC] ] 00357 M01S00354.comtmvd +++| [ [DS$WA$DV] [RL$WA$DV] ] 00358 M01S00355.comtmvd +++| ]; 00359 M01S00356.comtmvd +++| END 00360 M01S00357.comtmvd +++| 00361 M01S00358.comtmvd +++| 00362 M01S00359.comtmvd +++| ARRAY WMVAL [1:2,1:2,1:WMMXX] S(1); 00363 M01S00360.comtmvd +++| BEGIN 00364 M01S00361.comtmvd +++| ITEM WM$VAL I(00,00,60)=[ ## # DEFAULT VALUES BELOW # 00365 M01S00362.comtmvd +++| [ [DS$WM$AG] [RL$WM$AG] ] 00366 M01S00363.comtmvd +++| [ [DS$WM$LN] [RL$WM$LN] ] 00367 M01S00364.comtmvd +++| [ [DS$WM$AC] [RL$WM$AC] ] 00368 M01S00365.comtmvd +++| ]; 00369 M01S00366.comtmvd +++| END 00370 M01S00367.comtmvd +++| 00371 M01S00368.comtmvd +++| 00372 M01S00369.comtmvd +++| END # TMVDCOM # 00373 M01S00370.comtmvd +++| 00374 M01S00371.comtmvd +++| END # COMTMVD # 00375 M01S00372.comtmvd +++| # 00376 M01S00373.comtmvd +++| COL 30 RESUME NORMAL *COMPASS* 00377 M01S00374.comtmvd +++| ENDX # 00378 M01S00375.comtmvd +++| CONTROL LIST;
cdc/nos2.source/opl.opl871/common/comtmvd.txt · Last modified: by 127.0.0.1