/********************************************************************/ 00050003
 /*                                                                  */ 00100003
 /*   MACRO NAME = IDAVVOLL                                          */ 00150003
 /*                                                                  */ 00200003
 /*   DESCRIPTIVE NAME = VOLUME LIST FOR VSAM VOLUME MOUNT.          */ 00250003
 /*                                                                  */ 00300003
 /*   FUNCTION = IDAVVOLL CONTAINS INFORMATIONS OF MOUNTED VOLUME.   */ 00350003
 /*                                                                  */ 00400003
 /*   CONTROL BLOCK STRUCTURE = N/A                                  */ 00450003
 /*                                                                  */ 00500003
 /*   INCLUDED MACROS = NONE                                         */ 00550003
 /*                                                                  */ 00600003
 /*   METHOD OF ACCESS = PL/S - RESPECIFY IDAVVOLL BASED.            */ 00650003
 /*                                                                  */ 00700003
 /*   CREATED BY: N/A                                                */ 00750003
 /*                                                                  */ 00800003
 /*   STATUS = VS1 RELEASE 4   (CHANGE FLAG @X04SVXX)                */ 00850003
 /*                                                                  */ 00900003
 /*   DATE OF LAST CHANGE = 1 AUGUST 74                              */ 00950003
 /*                                                                  */ 01000003
 /********************************************************************/ 01050003
   DCL 1 IDAVVOLL BASED BDY(WORD),      /* VOLUME LIST */               03000003
         2 * BIT(8),                                                    06000003
           3 *       BIT(1),            /* MUST BE ZERO              */ 09000003
           3 VVOLLID BIT(1),            /* INDICATES VOLUME LIST     */ 12000003
           3 VVOLLTIO BIT(1),           /* INDICS VUCBL CREATED      */ 15000003
           3 VVOLLOPE BIT(1),           /* CALLED BY OPEN            */ 18000003
            3 VVOLLEOV BIT(1),          /* CALLED BY EOV             */ 21000003
           3 VVOLLCAT BIT(1),           /* CALLED BY CATALOG         */ 24000003
           3 VVOLLSWD BIT(1),           /* SEQUENCE SET WITH DATA    */ 24050003
         2 * CHAR(1),                                                   27000003
         2 VVOLLNBR FIXED(15),          /* NUMBER OF VOLSER ENTRIES */  30000003
         2 VVOLLTAB PTR(31),            /* PTR TO TIOT DD ENTRY (TIOE)*/33000003
         2 VVOLLACB PTR(31),            /* PTR TO CATALOG ACB */        36000003
         2 VVOLLERR FIXED(31),          /* RETURN CODE       @X04SVRP*/ 36050003
           3 VVOLLPDC FIXED(8),         /* PROB DET ERR CODE @X04SVRP*/ 36100003
           3 VVOLLFNC FIXED(8),         /* FUNCTION CODE     @X04SVRP*/ 36150003
           3 VVOLLSFC FIXED(8),         /* SUB-FUNCTION CODE @X04SVRP*/ 36200003
           3 VVOLLCNT FIXED(8),         /* VOLUME COUNT      @X04SVRP*/ 36300003
         2 VVOLLSFI CHAR(12),           /* SUB-FUNCTION INFORMATION     36350003
                                                        AREA @X04SVRP*/ 36400003
         2 VVOLLBIB PTR(31),           /* PTR TO BIB         @X04SVRP*/ 36450003
         2 VVOLLDEB PTR(31),           /* PTR TO DEB         @X04SVRP*/ 36500003
         2 VVOLLENT (*),                                                39000003
           3 VVOLLUCB PTR(31),          /* PTR TO UCB USED           */ 42000003
           3 * BIT(16),                                                 45000003
             4 VVOLLMNT BIT(1),         /* INDICS VOLUME MOUNTED     */ 48000003
             4 VVOLLVFY BIT(1),         /* VOLUME IS VERIFIED        */ 51000003
           3 VVOLLVSR CHAR(6);          /* VOLSER FOR VOLUME         */ 54000003