RE: Problem with QSNDDTAQ

I'm using JCRDQE to review the contents of the data queue, and I've also
used my own programs using QRCVDTAQ to retrieve entries.

The Data Queue has an entry length of 4296, sized at *MAX2GB, and is a local
data queue. It is non-keyed. Here's the command to create it...

crtdtaq dtaq(LibraryName/QueueName) type(*std) size(*max2gb) maxlen(4296)
force(*yes) seq(*fifo) autorcl(*yes) text('some text info')

Here's the code pertinent to the call to QRCVDTAQ...


C eval DataQueueLen = 4296
C* DataQueueData is assembled from several records of file data
C* when this program is placed in debug, just before execution of the
following line, all parameter values are correct
C call(e) 'QSNDDTAQ'
C parm QueueName
C parm QueueLibrary
C parm DataQueueLen
C parm DataQueueData
C* the following line is inserted simply to assist debugging. No error is
produced.
C if %error
C eval JournalCode = JournalCode
C endif



-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Dennis Lovelady
Sent: Tuesday, September 08, 2009 3:09 PM
To: 'Midrange Systems Technical Discussion'
Subject: RE: Problem with QSNDDTAQ

I'm having a problem with QSNDDTAQ and could use some advice.

It is a program. So is QUSRJOBI, for example. The fact that it is a
program does not make it not an API. It is an Application Program Interface
into some system function - ergo API.

data to insert). I can see the data to insert in the parameter being
passed. It's there. The entry does get inserted but the data is
blank.

My first question is: How do you know the message is blank, and there's not
some problem with the receiver? Have you dumped the queue? Or ???


Dennis Lovelady
http://www.linkedin.com/in/dennislovelady
--
"Speak when you are angry and you will make the best speech you will ever
regret."
-- Ambrose Bierce


--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe, unsubscribe,
or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a
moment to review the archives at http://archive.midrange.com/midrange-l.