|
RSS Feed - WebSphere MQ Support
|
RSS Feed - Message Broker Support
|
 |
|
[Solved] help with perl, MQCONNECT reason 2058 |
« View previous topic :: View next topic » |
Author |
Message
|
golemwashere |
Posted: Tue Jan 13, 2004 6:22 am Post subject: [Solved] help with perl, MQCONNECT reason 2058 |
|
|
Newbie
Joined: 29 Dec 2003 Posts: 8
|
Hello,
I have a problem with some perl scripts
using this connection code
[code]
$qmgr = MQSeries::QueueManager->new
(
QueueManager => $qmgr_name,
ClientConn => { 'ChannelName' => $channelname,
'TransportType' => 'TCP', # Default
'ConnectionName' => $connectionname,
'MaxMsgLength' => 32 * 1024 * 1024,
ConnectTimeout => 12,
RetryCount => 5,
RetrySleep => 5,
CompCode => \$QmgCompCode,
Reason => \$QmgReason,
},
) || &unabletoopenqmgr();
[\code]
the script was successfully tested in a development environment.
In production,
testing amqsputc with the proper MQSERVER environment works great...
but the script dies in the connection with Reason 2058 (unknown qmanager)
I tried also to set MQSERVER environment in the script,
[code]
$ENV{MQSERVER} = "$channelname/TCP/$connectionname";
[/code]
but nothing changes,
even
[code]
$coption = { 'ChannelName' => $channelname,
'TransportType' => 'TCP',
'ConnectionName' => $connectionname,
};
$Hconn = MQCONNX($qmgr_name, { 'ClientConn' => $coption,
}, $CompCode,$Reason) or die("MQCONNX failed ,$CompCode,$Reason");
[/code]
or a plain MQCONN with proper MQSERVER fail with a miserable 2058
any idea why?
Many thanks
Golem |
|
Back to top |
|
 |
mrlinux |
Posted: Tue Jan 13, 2004 7:32 am Post subject: |
|
|
 Grand Master
Joined: 14 Feb 2002 Posts: 1261 Location: Detroit,MI USA
|
If the system where you are running the perl script contains MQSeries Server, then you need to specify use MQSeries::Client to override the default of using server libs. _________________ Jeff
IBM Certified Developer MQSeries
IBM Certified Specialist MQSeries
IBM Certified Solutions Expert MQSeries |
|
Back to top |
|
 |
golemwashere |
Posted: Tue Jan 13, 2004 8:03 am Post subject: MQServer::Client |
|
|
Newbie
Joined: 29 Dec 2003 Posts: 8
|
Thanks!
It might be that!!!!!
ehm
looks like I can't find MQSeries::Client
I uncommented
# NOSERVER = 1
and rebuild the module (
make clean
perl Makefile.PL
make
make install)
but still I get
Client.pm not found....
any suggestions?
thanks again
Golem
(if it'll work I owe you a beer) |
|
Back to top |
|
 |
golemwashere |
Posted: Tue Jan 13, 2004 8:16 am Post subject: use MQClient::MQSeries; |
|
|
Newbie
Joined: 29 Dec 2003 Posts: 8
|
actually it was just that!!!!
use MQClient::MQSeries;
thanks a lot again
Golem |
|
Back to top |
|
 |
|
|
 |
|
Page 1 of 1 |
|
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum
|
|
|
|