[[ This message was both posted and mailed: see
the "To," "Cc," and "Newsgroups" headers for details. ]]
Hi Santosh,
The modules@perl.org list is an administration account for PAUSE. We
don't offer support for individual modules. You don't need to include
us on further questions with the modul
$Hconn = MQCONN($qm_name,
\$compCode,
\$Reason,
)|| die "Unable to Connect to Queuemanager\n";
Thanks,
Santosh
________
From: perl-mqser...@morganstanley.com [perl-mqser...@morgan
___
From: perl-mqser...@morganstanley.com [perl-mqser...@morganstanley.com]
Sent: Saturday, February 25, 2012 12:55 AM
To: Santosh Sadangi
Cc: perl-mqser...@morganstanley.com; modules@perl.org
Subject: Re: CPAN Mqseries Module for Solaris5.10
On Sat, Feb 25, 2012 at 12:24:08AM +0530,
NVIRONMENT_ERROR ) {
> print "environment error in Queue Mager\n";
> #return -1;
> } elsif ( $self->{"Reason"} == MQRC_MULTIPLE_REASONS) {
> print "hconn errorr\n";
> } elsif ( $self->{"Rea
nt "Reason is $Reason\n";
print "\n";
}
print "After MQCONN\n";
}
1;
Please kindly help me in this issue,as i am stuck in this issue from quite long
time.
Thanks,
Santosh
From: perl-mqser...@morganstanley.com [p
[snip]
>
>
> Step-4-if you look above code,even the control is not comming to any of the
> resoncode and compcode,which i have specified in the above if else condition.
it seemed to do so for me. what output are you getting exactly?
>
>
} elsif ( $self->{"Reason"} == MQSeries::MQRC_Q_MGR_NAME_ERROR) {
print "Queue Manager errorr\n";
}
else {
print "Reason is $Reason\n";
print "\n";
}
print "After MQCONN\n";
}
Step-4-i
On Wed, Feb 22, 2012 at 11:59:55AM +0530, Santosh Sadangi wrote:
> Hi Team,
>
> I am new to perl and Cpan Mqseries.I have written one script to connect to
> local queuemanager by using perl.However it is not connecting to my
> Queuemanager and the error code and completion code which i am getting
