Subject: | MQSeries 1.34 suspected bug |
Date: | Tue, 23 Feb 2016 18:57:24 +0000 |
To: | "bug-MQSeries [...] rt.cpan.org" <bug-MQSeries [...] rt.cpan.org> |
From: | "Rasol, Mikhail " <mikhail.rasol [...] credit-suisse.com> |
Hello,
While trying to run my code:
$::replyq = MQSeries::Queue->new
(
QueueManager => $::qmgr,
ClientConn => { 'ChannelName' => $::qmgrname . '_SVRCONN',
'TransportType' => 'TCP', # Default
'ConnectionName' => "$ConName($ConPort)",
'MaxMsgLength' => 16 * 1024 * 1024,
},
Queue => $::replyqname,
Mode => 'output',
) || die "Unable to open $::replyqname\n"; I was getting the following error:
I received the following error:
The following parameter was passed in the call to MQSeries::Queue::new but was not listed in the validation options: ClientConn
at /home/psods/externalperl/Params-Validate-1.00/lib/Params/ValidatePP.pm line 650
Params::Validate::__ANON__('The following parameter was passed in the call to MQSeries::Q...') called at /home/psods/externalperl/Params-Validate-1.00/lib/Params/ValidatePP.pm line 304
Params::Validate::validate('ARRAY(0x12998ee0)', 'HASH(0x13132310)') called at /home/psods/externalperl/MQSeries-1.34/blib/lib/MQSeries/Queue.pm line 34
MQSeries::Queue::new('undef', 'QueueManager', 'undef', 'ClientConn', 'HASH(0x119db2a0)', 'Queue', 'FBOC_OPSIT_PBS_PSDW_P', 'Mode', 'output', ...) called at /home/psods/bin/testConnection_LN.pl line 130
I reviewed MQSeries/Queue.pm and discovered that ClientConn is not being passed to validate routine, although it is a valid parameter:
My %args = validate(@_, { 'Carp' => 0,
'QueueManager' => 0,
'Queue' => 0,
'ObjDesc' => 0,
'DynamicQName' => 0,
'Options' => 0,
'Mode' => 0,
'CompCode' => 0,
'Reason' => 0,
'PutConvert' => 0,
'GetConvert' => 0,
'CloseOptions' => 0,
'RetrySleep' => 0,
'RetryCount' => 0,
'RetryReasons' => 0,
'AutoOpen' => 0,
'DisableAutoResize' => 0,
'SelectionString' => 0,
}),
Thank you and regards,
Mikhail A Rasol
CREDIT SUISSE
Information Technology | PS IT Reporting, KFCB 6
One Madison Avenue | 10010 New York | United States
Phone
mikhail.rasol@credit-suisse.com<mailto:mikhail.rasol@credit-suisse.com> | www.credit-suisse.com<http://www.credit-suisse.com>
===============================================================================
Please access the attached hyperlink for an important electronic communications disclaimer:
http://www.credit-suisse.com/legal/en/disclaimer_email_ib.html
===============================================================================
Message body is not shown because it is too large.