F.Y.I
The real error I am getting is the Oracle table does not accept null values, because
all the columns are not null.And I guess that shouldn't matter since I am sending an
empty string. The same script works on most of my other servers(inserting an empty
string in a not null column) except the one which I showed it down below. Please email
me if you have any questions. Thank You and have a great day.
Rajesh Yenumulapally <[EMAIL PROTECTED]> wrote:
Hi
I wrote a script which uses a bind_param function of the DBI and it works perfectly
fine on one server but
not on the other one. My first server has the perl 5.003/DBI 0.79 and my second server
has perl
5.6.0/DBI 1.13.I noticed that the bind param function stopped taking empty strings as
one of the parameter
on the new server.I am getting an error called "Bad file number" when I am trying to
excute the
statement. So is it the problem with the DBD::Oracle driver or the DBI version or the
PERL version.
Has any thing changed with the new versions of the drivers.Everything is working
perfectly fine on my old server.Can any one
please tell me what the problem is????
the script is very simple and is as follows.......
**********************************************************
#!/usr/local/bin/perl
use DBI; # Only for DBI
print "Content-type: text/html\n\n";
$lda = DBI->connect( 'dpscs4', 'meweb01', 'meweb01',Oracle );
$sql = "insert into table_name ID_USER,ID_RACF,ID_ROLE,ID_LAST_UPDATE,
DT_LAST_UPDATE)values(:TEST1,:TEST2,:TEST3,:TEST4,:TEST5)";
$csr = $lda -> prepare($sql) || die $ora_errstr;
$csr->bind_param(":TEST1","STEVE");
$csr->bind_param(":TEST2"," "); # here it dosen't take an empty string
$csr->bind_param(":TEST3","1");
$csr->bind_param(":TEST4","RYENUMUL");
$csr->bind_param(":TEST5","2000-12-09");
if( $csr -> execute )
{
print "Could execute\n";
$ret = $lda->commit ;
$csr -> finish;
}
else{
print "Could not execute because: $!\n";
}
$ret = $lda->disconnect;
---------------------------------
Do You Yahoo!?
Yahoo! Auctions - Buy the things you want at great prices.
---------------------------------
Do You Yahoo!?
Yahoo! Auctions - Buy the things you want at great prices.
