PEPPLER.ORG
Michael Peppler
Sybase Consulting
Menu
Home
Sybase on Linux
Install Guide for Sybase on Linux
General Sybase Resources
General Perl Resources
Freeware
Sybperl
Sybase::Simple
DBD::Sybase
BCP Tool
Bug Tracker
Mailing List Archive
Downloads Directory
FAQs
Sybase on Linux FAQ
Sybperl FAQ
Personal
Michael Peppler's resume

sybperl-l Archive

Up    Prev    Next    

From: "Ronan O'Ciosoig" <ronanoc at mac dot com>
Subject: Re: more results pending
Date: Aug 1 2002 4:51PM

Bingo! Everything running smoothly. Thanks.

On Thursday, August 1, 2002, at 02:13 PM, Michael Peppler wrote:

> On Thu, 2002-08-01 at 04:52, Ronan O'Ciosoig wrote:
>> After running this code below.....
>>
>>         $dbh->dbcmd($sql_command);
>>         $dbh->dbsqlexec;
>>         while($dbh->dbresults != NO_MORE_RESULTS) {
>>             $status = $dbh->dbresults;
>>             print "Status: $status\n";
>>           while(@updates = $dbh->dbnextrow) {
>>           print "Zone Update: @updates\n";
>>           }
>>         } # end while
>
>
> The problem is the second call to dbresults() in your loop.
>
> Change this to:
>
> while(($status = $dbh->dbresults) != NO_MORE_RESULTS) {
> ....
> }
>
> and you should be OK.
>
> Michael
> --
> Michael Peppler / mpeppler@peppler.org / http://www.mbay.net/~mpeppler
> mpeppler@zetatools.com / ZetaTools, Inc / http://www.zetatools.com
> ZetaTools: Call perl functions as Sybase stored procedures!
>