INT _handle ; handle to database
INT _retCode ; return code
TEXT _name ; product name
TEXT _type ; product type
SQL_CONNECT MyDatabase, _handle, _retCode
SQL_PREPARE _handle, _retCode, _sqlNpar BIND _name, _type
DO_LOOP
SQL_FETCH _handle, _retCode
EXIT_LOOP _retCode # _ERR_NO_ERROR
; data processing goes here
END_LOOP
SQL_FREE _handle
SQL_DISCONNECT _handle
0 komentárov