I was finally able to get the version 1.0 of the DBD::DB2 installed, but
am still getting the same error as before?   Any more ideas, I'll try
anything.....

Brent


C:\Perl>perl aactss.pl
Subroutine AUTOLOAD redefined at c:/Perl/site/lib/DBD/DB2/CONSTANTS.pm
line
        1563 (#1)
    (W redefine) You redefined a subroutine.  To suppress this warning,
say

        {
        no warnings 'redefine';
        eval "sub name { ... }";
        }

Operating System = MSWin32
Perl Binary      = c:\Perl\bin\perl.exe
Perl Version     = 5.008008
DBI Version      = 1.53
DBD::DB2 Version = 1.0

Available DB2 DSNs:

DBI connect('dsn2.prdplexa.sabre.com','Z156505',...) failed: [IBM][CLI
Driver] C
LI0124E  Invalid argument value. SQLSTATE=HY009 at aactss.pl line 67
Uncaught exception from user code:
        Connection failed with error: [IBM][CLI Driver] CLI0124E
Invalid argume
nt value. SQLSTATE=HY009 at aactss.pl line 67.
 at aactss.pl line 67

C:\Perl>
 

-----Original Message-----
From: Kellen F Bombardier [mailto:[EMAIL PROTECTED] On Behalf Of
db2perl
Sent: Monday, January 15, 2007 1:23 PM
To: Brimacomb, Brent
Cc: db2perl; dbi-users@perl.org; Jeffrey Seger
Subject: RE: DBD::DB2 question need an example

Hi Brent,

The problem appears to be that you are using 0.78 version of DBD::DB2.
You will need to update to the latest version for this to work
correctly.




"Brimacomb, Brent" <[EMAIL PROTECTED]> 
01/15/2007 11:38 AM

To
db2perl/Toronto/[EMAIL PROTECTED]
cc
<dbi-users@perl.org>, "Jeffrey Seger" <[EMAIL PROTECTED]>
Subject
RE: DBD::DB2 question need an example






Being new to Perl I'm not sure how to list out the variables you asked
for?
 list node directory 
 list database directory 
get dbm cfg 
 
Below is the complete output of the current program.
 
Thank you!
Brent
 
 
 
 
 
C:\Perl>perl aactss.pl
Subroutine AUTOLOAD redefined at c:/Perl/site/lib/DBD/DB2/CONSTANTS.pm
line
        1560 (#1)
    (W redefine) You redefined a subroutine.  To suppress this warning,
say
 
        {
        no warnings 'redefine';
        eval "sub name { ... }";
        }
 
Operating System = MSWin32
Perl Binary      = c:\Perl\bin\perl.exe
Perl Version     = 5.008008
DBI Version      = 1.53
DBD::DB2 Version = 0.78
 
Available DB2 DSNs:
 
DBI connect('dsn2.prdplexa.sabre.com','Z156505',...) failed: [IBM][CLI
Driver] C
LI0124E  Invalid argument value. SQLSTATE=HY009 at aactss.pl line 66
Uncaught exception from user code:
        Connection failed with error: [IBM][CLI Driver] CLI0124E
Invalid argume
nt value. SQLSTATE=HY009 at aactss.pl line 66.
 at aactss.pl line 66
 
C:\Perl>
 
 


________________________________

                 From: Kellen F Bombardier [mailto:[EMAIL PROTECTED]
On 
Behalf
Of db2perl
                 Sent: Monday, January 15, 2007 11:05 AM
                 To: Brimacomb, Brent
                 Cc: dbi-users@perl.org; Jeffrey Seger
                 Subject: RE: DBD::DB2 question need an example
 
 

                 Hi Jeffrey, 
 
                 Can you please paste the output from the entire script 
you
provided in the original email (the one that displays the versions of
everything)?  Also, can you run the following commands from the DB2 CLP
and give us the output: 
 
                         list node directory 
                         list database directory 
                         get dbm cfg 
 
                 Thanks, 
 
 
 
 
"Brimacomb, Brent" <[EMAIL PROTECTED]> 

01/11/2007 09:19 AM 

To
"Jeffrey Seger" <[EMAIL PROTECTED]> 
cc
<dbi-users@perl.org> 
Subject
RE: DBD::DB2 question need an example

 




                 First let me say THANK YOU! for trying to help.   I've 
been
beating my
                 head on this one for a couple days now.... 
 
                 I tried what you suggested and basically got the same 
error:
 
                 DBI connect('database=USNETAALDSN2','Z156505',...) 
failed:
[IBM][CLI
                 Driver] CLI
                 0124E  Invalid argument value. SQLSTATE=HY009 at 
aactss.pl line
38
                 Uncaught exception from user code:
                        Connection failed with error: [IBM][CLI Driver] 
CLI0124E
                 Invalid argume
                 nt value. SQLSTATE=HY009 at aactss.pl line 38.
                 at aactss.pl line 38
 
 
                 Brent 
 
                 -----Original Message-----
                 From: Jeffrey Seger [mailto:[EMAIL PROTECTED] 
                 Sent: Wednesday, January 10, 2007 7:22 PM
                 To: Brimacomb, Brent
                 Cc: dbi-users@perl.org
                 Subject: Re: DBD::DB2 question need an example
 
                 On 1/10/07, Brimacomb, Brent <[EMAIL PROTECTED]> 
wrote:
                 > : [IBM][CLI Driver] CLI0124E  Invalid argument value.
SQLSTATE=HY009 
                 > at AACTSS.pl line 38 Uncaught exception from user
code:
                 >         Connection failed with error: [IBM][CLI
Driver]
CLI0124E 
                 > Invalid argument value. SQLSTATE=HY009 at AACTSS.pl 
line 38.
                 >  at AACTSS.pl line 38
                 >
                 > Brent
 
                 I'm no DB2 expert, but a quick google revealed that
that 
error
message
                 means that DB2 is not liking something about your $dsn.

The
first thing
                 I don't know is whether that database showed up in your

list of
                 DB2 datasources.  If it is showing up, try just passing

the
DataSource
                 Name in the $dsn portion of the connect string:
 
                 my $dsn = 'USNETAALDSN2';
                 my $dbh = DBI->connect("dbi:DB2:$dsn",$user,$pass) or
die
$DBI::errstr;
 
                 According to perldoc DBD::DB2, your format is correct
for 
an
                 un-cataloged database.  I'm wondering if the database 
name on
the OS/390
                 box is different from the alias that you have cataloged

on your
local
                 box, since this format uses the database name on the 
host, not
the DSN
                 name that as it's cataloged on the client.
 
                 --
 
------------------------------------------------------------------------
                 --------------------------------------
                 The darkest places in hell are reserved for those who 
maintain
their
                 neutrality in times of moral crisis.
                    Dante Alighieri (1265 - 1321)
 
                 They who would give up an essential liberty for
temporary
security,
                 deserve neither liberty or security.
                 Benjamin Franklin
 
                 Our lives begin to end the day we become silent about 
things
that
                 matter.
                 Martin Luther King
 
                 The right of the people to be secure in their persons, 
houses,
papers,
                 and effects, against unreasonable searches and
seizures, 
shall
not be
                 violated, and no warrants shall issue, but upon
probable 
cause,
                 supported by oath or affirmation, and particularly 
describing
the place
                 to be searched, and the persons or things to be seized.
 
                 Amendment IV to the Constitution of the United States
 
------------------------------------------------------------------------
                 --------------------------------------
 
 


Reply via email to