CALL 'MQPUT' USING HCONN, HOBJ, MSGDESC, PUTMSGOPTS, BUFFERLENGTH, BUFFER, COMPCODE, REASON.
Declare the parameters as follows:
** Connection handle 01 HCONN PIC S9(9) BINARY. ** Object handle 01 HOBJ PIC S9(9) BINARY. ** Message descriptor 01 MSGDESC. COPY CMQMDV. ** Options that control the action of MQPUT 01 PUTMSGOPTS. COPY CMQPMOV. ** Length of the message in BUFFER 01 BUFFERLENGTH PIC S9(9) BINARY. ** Message data 01 BUFFER PIC X(n). ** Completion code 01 COMPCODE PIC S9(9) BINARY. ** Reason code qualifying COMPCODE 01 REASON PIC S9(9) BINARY.
Notices |
Downloads |
Library |
Support |
Feedback
![]() ![]() |
csqzak10335 |