*COMDECK  COMSIOC - DEFINE I/O CONTROL CODE VALUES FOR FCL. 
 COMSIOC  SPACE  4,10 
**        DEFINE I/O CONTROL CODES. 
  
  
          LOC    1
 IOCAD    EQU    *O 
 UNT      ICDEF  UNIT=
 END      ICDEF  END= 
 ERR      ICDEF  ERR= 
 FMT      ICDEF  FMT= 
 IOS      ICDEF  IOSTAT=
 REC      ICDEF  REC= 
 SKP      ICDEF  SKIP 
 NML      ICDEF  NAMELIST NAME (GROUP)
          ICDEF 
          ICDEF 
          ICDEF 
 ACC      ICDEF  ACCESS=
 BLK      ICDEF  BLANK= 
 BFL      ICDEF  BUFL=
 DIR      ICDEF  DIRECT=
 EXS      ICDEF  EXIST= 
 FIL      ICDEF  FILE=
 FOR      ICDEF  FORM=
 FMD      ICDEF  FORMATTED= 
 NAM      ICDEF  NAME=
 NMD      ICDEF  NAMED= 
 NXT      ICDEF  NEXTREC= 
 NUM      ICDEF  NUMBER=
 OPE      ICDEF  OPENED=
 RCL      ICDEF  RECL=
 SEQ      ICDEF  SEQUENTIAL=
 STA      ICDEF  STATUS=
 UNF      ICDEF  UNFORMATTED= 
 BUF      ICDEF  BFFER I/O FWA AND LWA
 CNT      ICDEF  ENCODE/DECODE COUNT
 MOD      ICDEF  BUFFER I/O MODE
 STR      ICDEF  ENCODE/DECODE STRING ADDRESS 
 FMTA     ICDEF  ASSIGNED FORMAT
  
          LOC    *O 
