* /*     06/30/72  R2                                                */ 00003002
*   %GOTO QMREQBSL;                           /* BILINGUAL MAPPING      00004002
         MACRO                                                          00006002
&NAME    IEFQMREQ                                                       00009002
*   LINKAGE MACRO TO SWA MANAGER - IEFQB550                             00012002
&NAME    L     15,16(0,0)              LOAD CVT POINTER                 00015002
         USING CVTMAP,15               START OF CVT                     00018002
         L     15,CVTJESCT             LOAD JESCT POINTER               00021002
         USING JESCT,15                                                 00024002
         L     15,JESQMGR              LOAD QUEUE MANAGER ENTRY POINT   00027002
         BALR  14,15                   BRANCH TO SWA MANAGER            00030002
         DROP  15                                                       00033002
         MEND                                                        */ 00036002
*%QMREQBSL:;                                                            03036002
*  DCL                                                                  03086002
*         SWAMGPTR REG(15) PTR(31);                                     03136002
*   SWAMGPTR = CVTJESCT -> JESQMGR;                                     06036002
*GEN (BALR 14,15);                            /* GO TO SWA MANAGER   */ 09036002