v4.0/src/CMD/ASSIGN/ASSGPARM.INC

   1
   2  ASS_PARMS      label  dword
   3       dw        ASS_PARMSX
   4       db        1   ;list of extra delimiters
   5       db        3   ;0 length
   6       db        ";+="
   7
   8  ASS_PARMSX     label  byte
   9       db        0,1
  10
  11 ;Min 0 - no drive or switch specified
  12 ;Max 1 - maximal allowance of drive letters
  13 ;repeats
  14
  15       dw        ASS_POS1  ;positional ctl ptr
  16       db        1         ;# of switches
  17       dw        ASS_SW1   ;switch ptr
  18
  19   ASS_POS1       label  word
  20        dw        2010h    ;Simple string,
  21                            ;ignore colon, &
  22                            ;repeat
  23                            ;allowed
  24        dw        0002h     ;Cap result by
  25                            ; character table
  26        dw        Result_Val   ;tbl
  27        dw        Res_CTLVAL ;value list
  28        db        0         ;no switch or
  29                            ;keyword synonyms
  30        db        0         ;alternative keyword
  31
  32  ASS_SW1        label  word
  33                 dw        0         ;20010h    ;Simple string,
  34                                     ;ignore colon & repeat
  35                                     ;allowed
  36                 dw        0002h     ;Cap result by
  37                                     ;character table
  38                 dw        Result_Valsw ;tbl
  39                 dw        0            ; ;value list
  40                 db        2            ;switch or
  41                                        ;keyword synonyms
  42  SW_Syn1        db        "/STATUS",0  ;alternate keyword
  43  SW_Syn2        db        "/STA",0     ;alternate keyword
  44
  45
  46  Res_CTLVAL     label  word
  47       db        3        ;List of simple strings
  48       db        0        ;not in range defn.
  49       db        0        ;not in numeric defn.
  50       db        26       ;# of strings defined
  51       db        "A"        ;item tag
  52                          ;value returned
  53       dw        DRVA_PTR ;string ptr
  54       db        "B"        ;item tag
  55                          ;value returned
  56       dw        DRVB_PTR ;string ptr
  57       db        "C"        ;item tag
  58                          ;value returned
  59       dw        DRVC_PTR ;string ptr
  60       db        "D"        ;item tag
  61                          ;value returned
  62       dw        DRVD_PTR ;string ptr
  63       db        "E"        ;item tag
  64                          ;value returned
  65       dw        DRVE_PTR ;string ptr
  66       db        "F"        ;item tag
  67                          ;value returned
  68       dw        DRVF_PTR ;string ptr
  69       db        "G"        ;item tag
  70                          ;value returned
  71       dw        DRVG_PTR ;string ptr
  72       db        "H"        ;item tag
  73                          ;value returned
  74       dw        DRVH_PTR ;string ptr
  75       db        "I"        ;item tag
  76                          ;value returned
  77       dw        DRVI_PTR ;string ptr
  78       db        "J"        ;item tag
  79                          ;value returned
  80       dw        DRVJ_PTR ;string ptr
  81       db        "K"        ;item tag
  82                          ;value returned
  83       dw        DRVK_PTR ;string ptr
  84       db        "L"        ;item tag
  85                          ;value returned
  86       dw        DRVL_PTR ;string ptr
  87       db        "M"        ;item tag
  88                          ;value returned
  89       dw        DRVM_PTR ;string ptr
  90       db        "N"        ;item tag
  91                          ;value returned
  92       dw        DRVN_PTR ;string ptr
  93       db        "O"        ;item tag
  94                          ;value returned
  95       dw        DRVO_PTR ;string ptr
  96       db        "P"        ;item tag
  97                          ;value returned
  98       dw        DRVP_PTR ;string ptr
  99       db        "Q"        ;item tag
 100                          ;value returned
 101       dw        DRVQ_PTR ;string ptr
 102       db        "R"        ;item tag
 103                          ;value returned
 104       dw        DRVR_PTR ;string ptr
 105       db        "S"        ;item tag
 106                          ;value returned
 107       dw        DRVS_PTR ;string ptr
 108       db        "T"        ;item tag
 109                          ;value returned
 110       dw        DRVT_PTR ;string ptr
 111       db        "U"        ;item tag
 112                          ;value returned
 113       dw        DRVU_PTR ;string ptr
 114       db        "V"        ;item tag
 115                          ;value returned
 116       dw        DRVV_PTR ;string ptr
 117       db        "W"        ;item tag
 118                          ;value returned
 119       dw        DRVW_PTR ;string ptr
 120       db        "X"        ;item tag
 121                          ;value returned
 122       dw        DRVX_PTR ;string ptr
 123       db        "Y"        ;item tag
 124                          ;value returned
 125       dw        DRVY_PTR ;string ptr
 126       db        "Z"        ;item tag
 127                          ;value returned
 128       dw        DRVZ_PTR ;string ptr
 129
 130  DRVA_PTR      LABEL      word
 131       db       "A",0
 132
 133  DRVB_PTR      LABEL      word
 134       db       "B",0
 135
 136  DRVC_PTR      LABEL      word
 137       db       "C",0
 138
 139  DRVD_PTR      LABEL      word
 140       db       "D",0
 141
 142  DRVE_PTR      LABEL      word
 143       db       "E",0
 144
 145  DRVF_PTR      LABEL      word
 146       db       "F",0
 147
 148  DRVG_PTR      LABEL      word
 149       db       "G",0
 150
 151  DRVH_PTR      LABEL      word
 152       db       "H",0
 153
 154  DRVI_PTR      LABEL      word
 155       db       "I",0
 156
 157  DRVJ_PTR      LABEL      word
 158       db       "J",0
 159
 160  DRVK_PTR      LABEL      word
 161       db       "K",0
 162
 163  DRVL_PTR      LABEL      word
 164       db       "L",0
 165
 166  DRVM_PTR      LABEL      word
 167       db       "M",0
 168
 169  DRVN_PTR      LABEL      word
 170       db       "N",0
 171
 172  DRVO_PTR      LABEL      word
 173       db       "O",0
 174
 175  DRVP_PTR      LABEL      word
 176       db       "P",0
 177
 178  DRVQ_PTR      LABEL      word
 179       db       "Q",0
 180
 181  DRVR_PTR      LABEL      word
 182       db       "R",0
 183
 184  DRVS_PTR      LABEL      word
 185       db       "S",0
 186
 187  DRVT_PTR      LABEL      word
 188       db       "T",0
 189
 190  DRVU_PTR      LABEL      word
 191       db       "U",0
 192
 193  DRVV_PTR      LABEL      word
 194       db       "V",0
 195
 196  DRVW_PTR      LABEL      word
 197       db       "W",0
 198
 199  DRVX_PTR      LABEL      word
 200       db       "X",0
 201
 202  DRVY_PTR      LABEL      word
 203       db       "Y",0
 204
 205  DRVZ_PTR      LABEL      word
 206       db       "Z",0
 207
 208  RESULT_VAL     label   word
 209  RESULT_VALSW   label   word
 210
 211    RES_TYPE  db        0       ;Result_type
 212    RES_ITAG  db        0       ;Matched
 213                                   ;item tag
 214    RES_SYN   dw        0       ;synonym
 215                                ;returned
 216    RES_SOFF  dw        0       ;drive type
 217                                ;or beginning
 218                                ;of string
 219                                ;may be string
 220    RES_SEG   dw        0       ;string offset
 221                             ;if type specified
 222
 223
 224 ;=========================================================================
 225 ;       Sublist Definition Area
 226 ;=========================================================================
 227
 228 Parse_Sublist   label   word
 229
 230                 db      Sublist_Length  ;sublist length                         ;an002; dms;
 231                 db      Reserved        ;reserved for future growth             ;an002; dms;
 232 Parse_Sub_Off   dw      ?               ;offset of replaceable parm             ;an002; dms;
 233 Parse_Sub_Seg   dw      ?               ;segment of replaceable parm            ;an002; dms;
 234                 db      0               ;replaceable parm 0                     ;an002; dms;
 235                 db      Left_Align+Char_Field_ASCIIZ ;                          ;an002; dms;
 236                 db      40              ;max width                              ;an002; dms;
 237                 db      1               ;min width                              ;an002; dms;
 238                 db      20h             ;blank fill                             ;an002; dms;
 239
 240
 241
 242