|
And I missed one; ORDER
so here is the call in rpgle that works:
0388.00 * RECEIVER QUEUE
0389.00 c #rcvdq plist
0390.00 c parm 'RCVQ' QNAME
0391.00 c parm #lib QLIB
0392.00 c parm 0 RCVLEN
0393.00 c parm RCVBUF
0394.00 c parm 60 RCVWAIT
0395.00 c parm 'EQ' KEYORD
0396.00 c parm 6 KEYLEN
0397.00 c parm #jobn KEYVAL
So try:
Call "QRCVDTAQ"
Using NAME-OF-QUEUE, NAME-OF-LIBRARY,
SIZE-OF-MSG, WS-PASS-BUFFER,
WS-WAIT-TIME,
WS-KEY-ORDER, WS-KLEN, WS-KEY
End-Call
-----Original Message-----
From: Weatherly, Howard [mailto:Howard.Weatherly@dlis.dla.mil]
You are missing the wait time parameter.
Try:
Call "QRCVDTAQ"
Using NAME-OF-QUEUE, NAME-OF-LIBRARY,
SIZE-OF-MSG, WS-PASS-BUFFER,
WS-WAIT-TIME,
WS-KLEN, WS-KEY
End-Call
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.