Sie zeigen eine alte Version dieser Seite an. Zeigen Sie die aktuelle Version an.
Unterschiede anzeigen Seitenhistorie anzeigen
« Vorherige Version anzeigen Version 5 Nächste Version anzeigen »
Liest den nächsten Datensatz aus einem mit SQL_CDecl erzeugten Cursor.
SQL_CFetch( id )
--[[ Alle Mitarbeiter aus dem Personalstamm lesen und in einer alphabetisch sortierten Liste ausgeben --]] -- SELECT-Statement vorbereiten local query = "SELECT * FROM gpktab WHERE finr = " .. SysLogFinr .. " ORDER BY nname, vname" -- Cursor erzeugen SQL_CDecl( "gpktab_curs", query ) local gpktab = SQL_CFetch( "gpktab_curs" ) -- ersten Datensatz lesen -- Ausgabe Titel SY_Msg( "Alphabetische Mitarbeiterliste:" ) while gpktab do -- solange Datensätze vorhanden sind (gpktab ~= nil) -- Ausgabe Mitarbeiter SY_Msg( gpktab.nname .. ", " .. gpktab.vname ) gpktab = SQL_CFetch( "gpktab_curs" ) -- nächsten Datensatz lesen end -- Speicher freigeben SQL_CFree( "gpktab_curs" )