|
|
sybperl-l Archive
Up Prev Next
From: "Damodharan, Venkat (VDamodharan)"
<Venkat dot Damodharan at dresdnerrcm dot com>
Subject: RE: Prints for stored process not working in Perl5
Date: Aug 23 1999 10:24PM
You need to do the fetch in order to get them. You have only ran the query.
The results are in the result set (Buffer 2).
Rgds
Venkat
-----Original Message-----
From: Ravipudi, Murali [mailto:Murali.Ravipudi@gs.com]
Sent: Monday, August 23, 1999 2:10 PM
To: SybPerl Discussion List
Subject: RE: Prints for stored procs not working in Perl5
I guess you can only get the content of the result sets your procedure
returns, not the 'print'ed messages.
Probably you can use 'select' to get the messages in their own result sets,
so, you have them coming out too, when you run your proc.
-murali
> -----Original Message-----
> From: kvk@hmco.com [SMTP:kvk@hmco.com]
> Sent: Monday, August 23, 1999 5:01 PM
> To: SybPerl Discussion List
> Subject: Prints for stored procs not working in Perl5
>
>
> I have always used prints in stored procs to get output. I'm doing
> it now with Perl5 but the messages aren't coming out.
>
> Here's any example--
>
>
> -----------------------------------------------------------
> create fooproc as print "This is a test"
> --------------------------------------------------
> #!/usr/local/bin/perl5
> use Sybase::DBlib;
>
> $DB = Sybase::DBlib->dblogin('foouser', 'footest', 'CORPTSTW',
> 'printproc');
>
> $sql="exec fooproc";
>
> $DB->sql($sql);
>
> --------------------------------------------------
>
> I get nothing on stdout when I run the program.
> Any clue?
|
