|
|
sybperl-l Archive
Up Prev Next
From: kvk at hmco dot com
Subject: Re: Prints for stored process not working in Perl5
Date: Aug 24 1999 1:10PM
The ->sql method does a dbresults, dbnextrow loops, Any and all
results sets are fetched.
> 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
>
> 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?
>
>
|
