
          IDENT  RHAQOQ
          ENTRY  RHPQOQ
* RHPQOQ
*
*      THE PURPOSE OF THIS A170 COMPASS ROUTINE IS TO DEFINE THE
* RHMQOQ ENTRY POINT IN A NON-CYBIL MANNER.  THIS IS DONE TO
* FACILITATE NOS/A170 PROCEDURE EXECUTION OF THE REMOTE HOST.
*



*
 RHPQOQ   BSS    0
*
* TRANSFER TO CYBIL MAIN PROGRAM, I.E. RHMQOQ
*
          JP     =XSW=MAIN
          END
