----- Forwarded message from Luis Colon <luiscolon00@yahoo.com> -----

Date: Mon, 5 Mar 2001 07:44:29 -0800 (PST)
From: Luis Colon <luiscolon00@yahoo.com>
Subject: "Can't call method execute" error "undefined value"
To: Tim.Bunce@ig.co.uk

Please assist:
I'm trying to create an interactive HTML that will
Post data into a Perl script, parse the data, then
connect to an Oracle database and INSERT the data in a
table.

The script seems like it connects to the db, but fails
to perform the $sth->execute(); that runs the SQL
statement.

My ENV is set to the proper directory on the Unix box,
and I'm specifying use DBI; in the beginning of the
script. I'm receiving "Can't call method "execute",
undefined value /'cgi file name' line (line of the
execute statement)

Any suggestions?

__________________________________________________
Do You Yahoo!?
Get email at your own domain with Yahoo! Mail. 
http://personal.mail.yahoo.com/

----- End forwarded message -----

Date sent:      	Mon, 5 Mar 2001 16:30:56 +0000
From:           	Tim Bunce <Tim.Bunce@ig.co.uk>
To:             	dbi-users@perl.org
Copies to:      	luiscolon00@yahoo.com
Subject:        	(Fwd) "Can't call method execute" error "undefined value"
Organization:   	Paul Ingram Group, Software Systems, +44 1 483 862800

> ----- Forwarded message from Luis Colon <luiscolon00@yahoo.com> -----
> 
> Date: Mon, 5 Mar 2001 07:44:29 -0800 (PST)
> From: Luis Colon <luiscolon00@yahoo.com>
> Subject: "Can't call method execute" error "undefined value"
> To: Tim.Bunce@ig.co.uk
> 
> Please assist:
> I'm trying to create an interactive HTML that will
> Post data into a Perl script, parse the data, then
> connect to an Oracle database and INSERT the data in a
> table.
> 
> The script seems like it connects to the db, but fails
> to perform the $sth->execute(); that runs the SQL
> statement.
> 
> My ENV is set to the proper directory on the Unix box,
> and I'm specifying use DBI; in the beginning of the
> script. I'm receiving "Can't call method "execute",
> undefined value /'cgi file name' line (line of the
> execute statement)
> 
> Any suggestions?

Sounds as if you forgot to

my $sth = $dbh->prepare($your_sql_statement);

before executing it. A bit more of your code would help anyways.

Bodo

eingb@uni-muenster.de

Luis,

On Mon, Mar 05, 2001 at 04:30:56PM +0000, Tim Bunce wrote:
> ----- Forwarded message from Luis Colon <luiscolon00@yahoo.com> -----
> 
> Date: Mon, 5 Mar 2001 07:44:29 -0800 (PST)
> From: Luis Colon <luiscolon00@yahoo.com>
> Subject: "Can't call method execute" error "undefined value"
> To: Tim.Bunce@ig.co.uk
> 
> Please assist:
> I'm trying to create an interactive HTML that will
> Post data into a Perl script, parse the data, then
> connect to an Oracle database and INSERT the data in a
> table.
> 
> The script seems like it connects to the db, but fails
> to perform the $sth->execute(); that runs the SQL
> statement.

It sounds like you forgot to check that your

$sth = $dbh->prepare($sql) 

command was successfull. prepare() and all other DBI methods return a
true value when there was no error and a false value if an error
occurred. (perldoc DBI for more info)

Try:

$sth = $dbh->prepare($sql)
  or die "Problem preparing: ", $dbh->errstr;

Also, an excerpt from your code showing the problem area would be useful
to anyone trying to help you.

hth,
-C.

Here is the code in question:

#!/usr/local/bin/perl

use DBI;
&parse;
&connect;

sub parse
{
(parses data code)
}



sub connect
{

$host = "$nameofmyserver";
$sid = "$sid";
$user = "lcolon";
$password = "time2fly";
$|=1;

BEGIN {
$ENV{ORACLE_HOME} = "/apps/oracle/product/8.1.6";
$ENV{EPC_DISABLED} = "TRUE";
}

$dbh =
DBI->connect("DBI:Oracle:host=$host;sid=$sid;port=1521",$user,
$password) or die "Can't connect:$DBI::errstr\n";

$deviationid = time();
$statement = "INSERT INTO CGTI_AR VALUES
($deviationid,$formdata{'Requestor_Name'},$formdata{'Requestor_Email'},$formdata{'Requestor_Telephone'})";

my $sth = $dbh->prepare($statement);

$sth->execute;
$sth->finish;
$dbh->disconnect;

}


--- Bodo Eing <eingb@uni-muenster.de> wrote:
> Date sent:      	Mon, 5 Mar 2001 16:30:56 +0000
> From:           	Tim Bunce <Tim.Bunce@ig.co.uk>
> To:             	dbi-users@perl.org
> Copies to:      	luiscolon00@yahoo.com
> Subject:        	(Fwd) "Can't call method execute"
> error "undefined value"
> Organization:   	Paul Ingram Group, Software
> Systems, +44 1 483 862800
> 
> > ----- Forwarded message from Luis Colon
> <luiscolon00@yahoo.com> -----
> > 
> > Date: Mon, 5 Mar 2001 07:44:29 -0800 (PST)
> > From: Luis Colon <luiscolon00@yahoo.com>
> > Subject: "Can't call method execute" error
> "undefined value"
> > To: Tim.Bunce@ig.co.uk
> > 
> > Please assist:
> > I'm trying to create an interactive HTML that will
> > Post data into a Perl script, parse the data, then
> > connect to an Oracle database and INSERT the data
> in a
> > table.
> > 
> > The script seems like it connects to the db, but
> fails
> > to perform the $sth->execute(); that runs the SQL
> > statement.
> > 
> > My ENV is set to the proper directory on the Unix
> box,
> > and I'm specifying use DBI; in the beginning of
> the
> > script. I'm receiving "Can't call method
> "execute",
> > undefined value /'cgi file name' line (line of the
> > execute statement)
> > 
> > Any suggestions?
> 
> Sounds as if you forgot to
> 
> my $sth = $dbh->prepare($your_sql_statement);
> 
> before executing it. A bit more of your code would
> help anyways.
> 
> Bodo
> 
> eingb@uni-muenster.de
> 


__________________________________________________
Do You Yahoo!?
Get email at your own domain with Yahoo! Mail. 
http://personal.mail.yahoo.com/

Hi there.

My question is very easy.
How can i execute a Oracle Function (into ORacle package body) from perl
code (Cgi), and catch the return code after execution that Oracle function?

Ptda: excuseme for my poor english, sorry.

Thank's you very much.

On Mon, 5 Mar 2001, Luis Colon wrote:

> my $sth = $dbh->prepare($statement);

You need to make sure that this call is successful.  I would also use
placeholders:

$statement = qq(INSERT INTO CGTI_AR VALUES(?,?,?,?));

my $sth = $dbh->prepare($statement) or die "error preparing statement
	  $DBI::errstr\n";

$sth->execute($deviationid,$formdata{'Requestor_Name'},
	$formdata{'Requestor_Email'},$formdata{'Requestor_Telephone'});

-- Brett
				http://www.chapelperilous.net/~bmccoy/
------------------------------------------------------------------------
Kettering's Observation:
	Logic is an organized way of going wrong with confidence.

I think the problem is that the connect method failed.  Use the double
pipe  ||  version of the 'or' operator instead of the word 'or' here:

$dbh= DBI->connect("DBI:Oracle:host=$host;sid=$sid;port=1521",$user,
 $password) 
-->	|| die "Can't connect:$DBI::errstr\n";

(If you use 'or' perl is actually checking to see if the assignment to
$dbh worked, rather than whether the connect method succeeded).

You should also check the result of prepare and execute the same way for
good measure.

hope that helps!

Ian Macdonald



On Mon, 5 Mar 2001, Luis Colon wrote:

> Here is the code in question:
> 
> #!/usr/local/bin/perl
> 
> use DBI;
> &parse;
> &connect;
> 
> sub parse
> {
> (parses data code)
> }
> 
> 
> 
> sub connect
> {
> 
> $host = "$nameofmyserver";
> $sid = "$sid";
> $user = "lcolon";
> $password = "time2fly";
> $|=1;
> 
> BEGIN {
> $ENV{ORACLE_HOME} = "/apps/oracle/product/8.1.6";
> $ENV{EPC_DISABLED} = "TRUE";
> }
> 
> $dbh =
> DBI->connect("DBI:Oracle:host=$host;sid=$sid;port=1521",$user,
> $password) or die "Can't connect:$DBI::errstr\n";
> 
> $deviationid = time();
> $statement = "INSERT INTO CGTI_AR VALUES
> ($deviationid,$formdata{'Requestor_Name'},$formdata{'Requestor_Email'},$formdata{'Requestor_Telephone'})";
> 
> my $sth = $dbh->prepare($statement);
> 
> $sth->execute;
> $sth->finish;
> $dbh->disconnect;
> 
> }
> 
> 
> --- Bodo Eing <eingb@uni-muenster.de> wrote:
> > Date sent:      	Mon, 5 Mar 2001 16:30:56 +0000
> > From:           	Tim Bunce <Tim.Bunce@ig.co.uk>
> > To:             	dbi-users@perl.org
> > Copies to:      	luiscolon00@yahoo.com
> > Subject:        	(Fwd) "Can't call method execute"
> > error "undefined value"
> > Organization:   	Paul Ingram Group, Software
> > Systems, +44 1 483 862800
> > 
> > > ----- Forwarded message from Luis Colon
> > <luiscolon00@yahoo.com> -----
> > > 
> > > Date: Mon, 5 Mar 2001 07:44:29 -0800 (PST)
> > > From: Luis Colon <luiscolon00@yahoo.com>
> > > Subject: "Can't call method execute" error
> > "undefined value"
> > > To: Tim.Bunce@ig.co.uk
> > > 
> > > Please assist:
> > > I'm trying to create an interactive HTML that will
> > > Post data into a Perl script, parse the data, then
> > > connect to an Oracle database and INSERT the data
> > in a
> > > table.
> > > 
> > > The script seems like it connects to the db, but
> > fails
> > > to perform the $sth->execute(); that runs the SQL
> > > statement.
> > > 
> > > My ENV is set to the proper directory on the Unix
> > box,
> > > and I'm specifying use DBI; in the beginning of
> > the
> > > script. I'm receiving "Can't call method
> > "execute",
> > > undefined value /'cgi file name' line (line of the
> > > execute statement)
> > > 
> > > Any suggestions?
> > 
> > Sounds as if you forgot to
> > 
> > my $sth = $dbh->prepare($your_sql_statement);
> > 
> > before executing it. A bit more of your code would
> > help anyways.
> > 
> > Bodo
> > 
> > eingb@uni-muenster.de
> > 
> 
> 
> __________________________________________________
> Do You Yahoo!?
> Get email at your own domain with Yahoo! Mail. 
> http://personal.mail.yahoo.com/
> 

The value of an assignment operation is the value assigned; in this case the
result from DBI->connect().  The 'or' version is generally preferred in this
sort of situation to be sure all operations to the left have been performed
before the 'or'.
--
Mac :})
** I normally forward private database questions to the DBI mail lists. **
Give a hobbit a fish and he'll eat fish for a day.
Give a hobbit a ring and he'll eat fish for an age.
----- Original Message -----
From: "Ian Macdonald" <ian@mail.tsgroup.net>
To: "Luis Colon" <luiscolon00@yahoo.com>
Cc: "Bodo Eing" <eingb@uni-muenster.de>; <dbi-users@perl.org>
Sent: Monday, March 05, 2001 11:55 AM
Subject: Re: (Fwd) "Can't call method execute" error "undefined value"


> I think the problem is that the connect method failed.  Use the double
> pipe  ||  version of the 'or' operator instead of the word 'or' here:
>
> $dbh= DBI->connect("DBI:Oracle:host=$host;sid=$sid;port=1521",$user,
>  $password)
> --> || die "Can't connect:$DBI::errstr\n";
>
> (If you use 'or' perl is actually checking to see if the assignment to
> $dbh worked, rather than whether the connect method succeeded).
>
> You should also check the result of prepare and execute the same way for
> good measure.