Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things
 
PerlMonks  

Re: Browse message from MQSeries queue using perl API for MQSeries(WMQ)

by Anonymous Monk
on Jan 27, 2012 at 09:16 UTC ( #950293=note: print w/ replies, xml ) Need Help??

Comment on Re: Browse message from MQSeries queue using perl API for MQSeries(WMQ)
Replies are listed 'Best First'.
Re^2: Browse message from MQSeries queue using perl API for MQSeries(WMQ)
by sselva (Novice) on Jan 30, 2012 at 13:57 UTC
    Hi ,

    I tried with below code snippet while get message (MQGET) from queue

    my $mh = MQSeries::Message->new ( MsgDesc => { CodedCharSetId => 1208}, Options => (MQGMO_BROWSE_FIRST), BufferLength => 16 * 1024 * 1024 ) ;

    and queue initialize (MQ OPEN) code snippet

    $inqh = MQSeries::Queue->new ( QueueManager => $qmh, Queue => "QL.TEST", Options => (MQOO_BROWSE|), )

    here I tried with both MQOO_INPUT_* as well . While tried with MQOO_BROWSE option I am getting 2037 error " Queue not opend for input" , but when I tried with MQOO_INPUT_* its getting message with destructive manner .

    I have checked the below link and they recommend to use MQOO_BROWSE :http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/CSQZAL05/2.5.10?SHELF=AMQZA90E&DT=20001013121047&CASE=

    but its not working :(

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://950293]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others meditating upon the Monastery: (18)
As of 2015-07-30 13:31 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (271 votes), past polls