Hi Tim, Becka,
        Thanks, I had always converted my Oracle functions
        into stored procs to call them.

        This will be useful
Dave


Becka Louden wrote

> Thanks Tim, that worked!!
>  
> my $insert_cr    = $dbh->prepare("DECLARE result_cr VARCHAR2(30);
>            BEGIN ? := SYSTEM.LoadCreditReport(?,?,?); 
>            END;"); #crr_id, directory, filename
> 
> ##############################################           
>  
> $insert_cr->bind_param_inout(1, $return_val, 748363, SQL_VARCHAR);          
> $insert_cr->bind_param(2, $crr_id); 
> $insert_cr->bind_param(3, $mainpath); 
> $insert_cr->bind_param(4, $tempfile); 
>  
> print "Return value for insert into CRR table for $crr_id: $$return_val\n";
>  
> Thanks for your help!
> Becka
> 
> -----Original Message-----
> From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]
> Sent: Wednesday, November 21, 2001 6:27 AM
> To: [EMAIL PROTECTED]; [EMAIL PROTECTED]
> Subject: RE: retrieving exit value from SQL function in Perl


-- 
Dave Morgan
[EMAIL PROTECTED]
403 399 2442

Reply via email to