|  | 
 | ||||
|        | |||||
|  | ||||||
| Related Syntax | Related Concepts | Other Library Functions | ||||
| function | db.advance-recordset | 
| Library: Database access (OMDB) Import: omdb.xmd | Return type: Switch Returns: Return TRUE if there is another result set or FALSE otherwise | 
define external switch function db.advance-recordset
      modifiable db.field  record
Argument definitions
Use db.advance-recordset to see if there is another result set, and to move to it if so.
The database connection represented by db.database must be open (else external exception OMDB104).
This procedure is useful when stored procedures produce mulitple result sets.
The outermost tests for multiple result sets.
  db.execute proc
       result rset
  repeat
       output "<result-set>%n"
       repeat
           exit unless db.record-exists rset
           output "%n<record "
           repeat over rset
               output "%n%t" || key of rset || '= "' ||
                   db.reader of rset || '"'
           again
           output "/>%n"
           db.move-record rset
       again
       exit unless db.advance-recordset rset
       output "</result-set>%n"
  again
Copyright © Stilo International plc, 1988-2008.