/********************************************************************/ 00200003
 /*          MACCOMP  Y30LB22          SC1DR/BL0019          @Y30LB22*/ 00250003
 /*          MACSTAT  Y30LB22          74/170/341040         @Y30LB22*/ 00300003
 /*                                                                   */00350003
 /*          NAME: IEZCOVCE                                  @Y30LB22*/ 00400003
 /*                                                                   */00450003
 /*          FUNCTION:                                       @Y30LB22*/ 00500003
 /*          MAPS THE REQUEST BLOCK EXTENSION WHICH          @Y30LB22*/ 00502003
 /*          IS USED TO PASS ADDITIONAL INFORMATION TO MASS  @Y30LB22*/ 00504003
 /*          STORAGE VOLUME CONTROL DURING AN COPY           @Y30LB22*/ 00506003
 /*          CARTRIDGE OR COPY VOLUME REQUEST.               @Y30LB22*/ 00508003
 /*                                                                   */00550003
 /*          STATUS:  CHANGE LEVEL = 0                       @Y30LB22*/ 00600003
 /*                                                                   */00650003
 /********************************************************************/ 00700003
    /* CONSTANTS FOR IEZCOVCE                                @Y30LB22*/ 00710003
     DCL  COVLEN  FIXED(15) INIT(LENGTH(COVCE)); /* LENGTH   @Y30LB22   00720003
                                            OF EXTENSION     @Y30LB22*/ 00730003
     DCL                                                                00750003
       1        COVCE BASED(COVCEPTR) BDY(WORD),                        00950003
         2      COVLNGTH  FIXED(31), /* LENGTH OF EXTENSION  @Y30LB22*/ 00960003
         2      COVDESCR  CHAR(30),  /* DESCRIPTIVE INFO     @Y30LB22*/ 01000003
         2      COVFLAGA  BIT(8),    /* SPECIFICATION FLAG   @Y30LB22*/ 01050003
           3    COVSPDES  BIT(1),    /* COVDESCR SPECIFIED   @Y30LB22*/ 01100003
           3    *         BIT(7),    /* UNUSED               @Y30LB22*/ 01150003
         2      COVFLAGB  BIT(32),   /* INDICATOR FLAGS      @Y30LB22*/ 01200003
           3    COVSETFL  BIT(8),    /* RECOVERY FLAGS       @Y30LB22   01250003
                                        INDICATORS           @Y30LB22*/ 01260003
             4  COVSRCVY  BIT(1),    /* SET RECOVERY FLAGS   @Y30LB22*/ 01300003
             4  COVCRCVY  BIT(1),    /* CLEAR RECOVERY FLAGS @Y30LB22*/ 01400003
             4  *         BIT(6),    /* UNUSED               @Y30LB22*/ 01600003
           3    COVRECFL  BIT(8),    /* RECOVERY FLAGS       @Y30LB22*/ 01650003
             4  COVICOPY  BIT(1),    /* INCOMPLETE COPY OPER @Y30LB22*/ 01700003
             4  COVCREAT  BIT(1),    /* INCOMPLETE CREATION  @Y30LB22*/ 01750003
             4  COVLAMIS  BIT(1),    /* VOL LABEL MISMATCH   @Y30LB22*/ 01800003
             4  *         BIT(5),    /* UNUSED               @Y30LB22*/ 01850003
           3    COVTYPE   BIT(8),    /* VOLUME TYPE FLAG     @Y30LB22*/ 01900003
             4  COVSAM    BIT(1),    /* VSAM TYPE VOLUME     @Y30LB22*/ 01950003
             4  COVREUSE  BIT(1),    /* REUSE OLD COPY REC.  @Y30LB22*/ 01960003
             4  *         BIT(6),    /* UNUSED               @Y30LB22*/ 02100003
           3    *         BIT(8),    /* UNUSED               @Y30LB22*/ 02150003
         2      *         CHAR(4);   /* UNUSED               @Y30LB22*/ 02200003