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

[sselva]

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 :(