RPG invocation

     C*..1....:....2....:....3....:....4....:....5....:....6....:....7..
     C                     CALLP     MQCONNX(QMNAME : CNOPT : HCONN :
     C                                       CMPCOD : REASON)

The prototype definition for the call is:

     D*..1....:....2....:....3....:....4....:....5....:....6....:....7..
     DMQCONNX          PR                  EXTPROC('MQCONNX')
     D* Name of queue manager
     D QMNAME                        48A
     D* Options that control the action of MQCONNX
     D CNOPT                         32A
     D* Connection handle
     D HCONN                         10I 0
     D* Completion code
     D CMPCOD                        10I 0
     D* Reason code qualifying CMPCOD
     D REASON                        10I 0