Sorry, I am assuming you are using Oracle, are you?
Look for bind_paraminout().
On Thu, 2004-10-21 at 08:34, Scott T. Hildreth wrote:
> perldoc DBD::Oracle will show you how to do this.
>
>
> On Wed, 2004-10-20 at 15:27, Denesa K Shaw wrote:
> >
> >
> > Hi,
> > I'm calling a stored procedure called Pg_Move_Files.Pr_Return_Cycle_File.
> > After the stored procedure executes, it returns an out parameter called
> > out_v_RECV_FILE_NM.
> > I have a perl script which uses the DBI:: Module.
> > My Question is:
> > Is the correct way retrieve the value of my out
> > parameter(out_v_RECV_FILE_NM) from the stored procedure in my Perl script?
> > Thanks!
> >
> >
> > This is the code I used:
> >
> > ####Declarations####
> > use DBI;
> > $dbname = 'xxxx';
> > $user = 'xxxx';
> > $password = 'xxxxxx';
> > $dbd = 'Oracle';
> > $RECV_FILE_NM = $out_v_RECV_FILE_NM;
> >
> >
> > ####Connect To Oracle####
> > $dbh = DBI->connect ($dbname, $user, $password, $dbd);
> >
> > if (!$dbh)
> > {
> > print "Error connecting to database; $DBI::errstr\n";
> > }
> >
> > else
> > {
> > print "Connecting to database; $DBI::errstr\n";
> > }
> >
> > ####Calling Pg_Move_Files.Pr_Return_Cycle_File stored procedure####
> >
> > print "Calling Pg_Move_Files.Pr_Return_Cycle_File\n";
> > $dbh->do( "BEGIN Pg_Move_Files.Pr_Return_Cycle_File($RECV_FILE_NM); END;");
> >
> >
> >
> >
> > Denesa Shaw
