RPG invocation
C*..1....:....2....:....3....:....4....:....5....:....6....:....7.. C CALLP MQPUT(HCONN : HOBJ : MSGDSC : PMO : C BUFLEN : BUFFER : CMPCOD : C REASON)The prototype definition for the call is:
D*..1....:....2....:....3....:....4....:....5....:....6....:....7.. DMQPUT PR EXTPROC('MQPUT') D* Connection handle D HCONN 10I 0 VALUE D* Object handle D HOBJ 10I 0 VALUE D* Message descriptor D MSGDSC 364A D* Options that control the action of MQPUT D PMO 176A D* Length of the message in BUFFER D BUFLEN 10I 0 VALUE D* Message data D BUFFER * VALUE D* Completion code D CMPCOD 10I 0 D* Reason code qualifying CMPCOD D REASON 10I 0