SetBookMarkEx()

SetBookMarkEx() - Zustand einer Tabelle auf zuvor gespeicherten Zustand setzen

Die Funktion setzt den Zustand einer Tabelle (keine MemTable) auf einen zuvor mit GetBookMarkEx() ermittelten Zustand zurück. Gesetzt werden Index, Scope und Filter.

Hinweis

Das übergebene Tabellen-Objekt muss sich im Status dsbrowse befinden, da SetBookMarkEx() einen evtl. gesetzten Editmodus verwerfen würde.

Hinweis

Die Funktion sollte ab Version 6.1 nicht mehr verwendet werden. Dafür stehen nun direkte Funktionen der Tabellen (TBeStandardTable, TBeRightsTable, TBeAdsQuery oder TBeMemTable) zur Verfügung.
oTable.CbGoToBookmark()

Parameter	Beschreibung
oDataSet:O	Tabellen-Objekt
oBookMarkEx:O	TBookMarkEx-Objekt
lFreeBookmark:L	TBookMarkEx-Objekt nach dem Setzen freigeben Default = true

Rückgabewert

keiner

Beispiel

CODE

| oTable, oDM, oBookMark |

startseq,
   oDM              := CreateoBject('TBeDbGet'),
   oTable           := DBGetTable(oDM, waDAB010),
   oTable.IndexName := 'DAB011',

   // Filter + Scope setzen
   DBFilter("ARTNR >= 'A' and ARTNR <= 'B'", oTable),
   DBScope({'A'}, {'B'}, oTable),

   // aktuelle Einstellungen merken
   oBookMark := GetBookMarkEx(oTable),
   WriteLn('aktueller Filter: ' + oTable.Filter),

   // Filter + Scope verändern
   DBFilter("ARTNR >= 'F' and ARTNR <= 'G'", oTable),
   DBScope({'F'}, {'G'}, oTable),
   WriteLn('aktueller Filter: ' + oTable.Filter),

   // Einstellungen zurücksetzen
   // soll der übergebene oBookMark später noch vewendet werden,
   // muss der Parameter lFreeBookmark = true gesetzt werden,
   // da sonst das Objekt zerstört wird.
   SetBookMarkEx(oTable, oBookMark),
   WriteLn('aktueller Filter: ' + oTable.Filter),
onerror,
   WriteLn(GetErrorText()),
stopseq,
DestroyObject(oDM),

oBookMark

Weitere Verknüpfungen

GetBookMarkEx()