Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation
 
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)
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 making s'mores by the fire in the courtyard of the Monastery: (7)
As of 2014-08-29 05:49 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The best computer themed movie is:











    Results (275 votes), past polls