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

You tried what? how?

Sadly http://search.cpan.org/grep?cpanid=MQSERIES&release=MQSeries-1.32&string=browse&i=1&n=1&C=0 doesn't show any example of MQOO_BROWSE

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 :(	[reply]

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

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

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

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=

[reply]