/********************************************************************/ 00050000
 /*                                                          @G24LB37*/ 00200000
 /*          NAME:  IEZUNITP                                 @G24LB37*/ 00250000
 /*                                                          @G24LB37*/ 00300000
 /*          FUNCTION:                                       @G24LB37*/ 00350000
 /*          MAPS THE REQUEST PARAMETER LIST FOR THE UNIT    @G24LB37*/ 00500000
 /*          PROCESSOR FUNCTION.  REGISTER 1 MUST POINT TO   @G24LB37*/ 00550000
 /*          THIS PARAMETER LIST WHEN THE REQUEST IS         @G24LB37*/ 00560000
 /*          EXECUTED.                                       @G24LB37*/ 00570000
 /*                                                          @G24LB37*/ 00600000
 /*          STATUS:  MVS                                    @G24LB37*/ 00650000
 /*                                                          @G24LB37*/ 00700000
 /*          CHANGE LEVEL:  NONE                             @G24LB37*/ 00702000
 /*                                                          @G24LB37*/ 00710000
 /********************************************************************/ 00750000
     DCL 1 UNITP BDY(WORD) BASED,    /* UNIT PROCESSOR RPL   @G24LB37*/ 00850000
           2 UNIDEVTP CHAR(4),       /* DEVICE TYPE          @G24LB37*/ 00900000
           2 UNIVOL   CHAR(6),       /* VOLUME SERIAL        @G24LB37*/ 00950000
           2 *        CHAR(2),       /* UNUSED               @G24LB37*/ 01000000
           2 UNIUCBP  PTR(31),       /* UCB ADDRESS          @G24LB37*/ 01050000
           2 UNIFLAGS,               /* REQUEST FLAGS        @G24LB37*/ 01100000
             3 UNIFMTD  BIT(1),      /* VOLUME MOUNTED       @G24LB37*/ 01150000
             3 UNIFINCL BIT(1),      /* UNIT INCLUDED        @G24LB37*/ 01200000
             3 UNIFALLV BIT(1),      /* UNITS ALL 3330V      @G24LB37*/ 01250000
             3 *        BIT(5);      /* UNUSED               @G24LB37*/ 01300000