sybperl-l Archive

From: Brian H <bridudebri at yahoo dot com>
Subject: RE: results pending problem
Date: Aug 2 1999 6:01PM

Hey David,

Thanks for the response.  I am calling dbnextrow in a while loop as
follows :

while( $dbproc->dbresults != NO_MORE_RESULTS) {
           $dbproc->dbnextrow;
}

How else do you recommend that I call dbnextrow ??

Thanks,
Brian

--- "WORENKLEIN, David, GCM"  wrote:
> Call dbnextrow in a loop.
> 
> -----Original Message-----
> From: Brian H [mailto:bridudebri@yahoo.com]
> Sent: Monday, August 02, 1999 12:29 PM
> To: SybPerl Discussion List
> Subject: results pending problem
> 
> 
> 
> 
> The following sybperl code is giving me a error
> message 
>       DB-Library error:
>       Attempt to initiate a new SQL Server operation
> with results 
>       pending.
> 
>         
>         $dbproc->dbcmd("MyStordProc $arg1_int,
> "$arg2_text\"");
> 	$dbproc->dbsqlexec;
> 	while( $dbproc->dbresults != NO_MORE_RESULTS) {
> 		$dbproc->dbnextrow;
> 	}
> 	$sp_status = $dbproc->dbretstatus;
>         if ( $sp_status == 0 ) {        # execute
> sql
>         # SQL OK
>         } else {
>         # SQL Failed
>         }
>         
>         } # IF THEN ELSE
> 
> I am running perl 5.004_05 for sun4_solaris and
> sybperl 2.10.
> 
> Any thought or ideas to solve this problem would be
> great !!!
> Thanks,
> Brian
> _____________________________________________________________
> Do You Yahoo!?
> Free instant messaging and more at
> http://messenger.yahoo.com
> 
> 


_____________________________________________________________
Do You Yahoo!?
Free instant messaging and more at http://messenger.yahoo.com