dbRecordSetMove

function

Library: Database access (OMDB legacy)
Include: omdb.xin

Returns:

Declaration

define external switch function dbRecordSetMove
      modifiable dbField  record

Argument definitions

record: is a dbField shelf.

Purpose

Use dbRecordSetMove to see if there is another result set.

Requirements

You must include the following line at the beginning of your OmniMark program:

  include "omdb.xin"

The database connection represented by dbDatabase must be open (else external exception OMDB104).

Usage Notes

This procedure is useful when stored procedures produce mulitple result sets.

Example

The outermost tests for multiple result sets.

  dbProcedureExecute proc
       result rset
  repeat
       output "<result-set>%n"
       repeat
           exit unless dbRecordExists rset
           output "%n<record "
           repeat over rset
               output "%n%t" || key of rset || '= "' ||
                   dbFieldValue rset || '"'
           again
           output "/>%n"
           dbRecordMove rset
       again
       exit unless dbRecordSetMove rset
       output "</result-set>%n"
  again