TITLE      '** ALLOCATION/TERMINATION COMMUNICATION AREA **'   00050002
*********************************************************************** 00100002
*                                                                     * 00110002
*   MODULE NAME - IEFATECB                                            * 00120002
*                                                                     * 00130002
*   CSECT NAME - IEFQMWR                                              * 00140002
*                                                                     * 00150002
*   DESCRIPTIVE NAME:                                                 * 00200002
*                   ALLOCATION/TERMINATION COMMUNICATION AREA         * 00230002
*                                                                     * 00260002
*   STATUS:         OS/VS2, RELEASE 2.0                               * 00300002
*                                                                     * 00350002
*   FUNCTION:       PROVIDE THE ADDRESS OF THE NUCLEUS RESIDENT       * 00400002
*                   UPDATE DDR COUNT ROUTINE(IEFAB438) AND A PTR      * 00430002
*                   TO THE FIRST MOUNT/VERIFY COMMUNICATION           * 00460002
*                   AREA(MVCA)                                        * 00490002
*                                                                     * 00550002
*   ENTRY POINT:    IEFQMWR                                           * 00600002
*                                                                     * 00650002
*   INPUT:          NONE                                              * 00700002
*                                                                     * 00750002
*   OUTPUT:         NONE                                              * 00800002
*                                                                     * 00850002
*   EXTERNAL ROUTINES:                                                * 00900002
*                   NONE                                              * 00950002
*                                                                     * 01000002
*   EXITS:          NONE                                              * 01050002
*                                                                     * 01100002
*   TABLES/WORKAREAS:                                                 * 01150002
*                   THIS AREA IS MAPPED BY MACRO IEFZB432 AND IS Y02670 01250002
*                   CALLED THE ATCA (ALLOCATION/TERMINATION      Y02670 01300002
*                   COMMUNICATION AREA).                         Y02670 01350002
*                                                                     * 01400002
*   ATTRIBUTES:     MEMBER OF RESIDENT NUCLEUS                        * 01450002
*********************************************************************** 01500002
IEFQMWR  CSECT                                                          01550002
         DC    V(IEFAB438)                   DDR COUNT ROUTINE   Y02670 01650002
         DC    F'0'                          RESERVED.           Y02670 01700002
         DC    F'0'                          RESERVED.           Y02670 01750002
         DC    F'0'                          PTR TO FIRST MVCA   Y02670 02000002
         END                                                            02400002