RPG invocation

     C*..1....:....2....:....3....:....4....:....5....:....6....:....7..
     C                     CALLP     MQCMIT(HCONN : COMCOD : REASON)

The prototype definition for the call is:

     D*..1....:....2....:....3....:....4....:....5....:....6....:....7..
     DMQCMIT           PR                  EXTPROC('MQCMIT')
     D* Connection handle
     D HCONN                         10I 0 VALUE
     D* Completion code
     D COMCOD                        10I 0
     D* Reason code qualifying COMCOD
     D REASON                        10I 0