TurboPL Referenz

GetMarks Prozedur

Syntax

GetMarks(Tabelle: Integer; var Markierungen: Integer[])

Kategorie

Datenbank-Befehl

Erklärung

Speichert die Satznummern der aktuellen internen Markierungen in einem Integer-Array. Interne Markierungen entstehen durch Kennzeichnen mit einem Sternchen an der Oberfläche und anschließendem Ansicht/Nur markiert Datensätze bzw. durch die Tabellen-Funktion SetMark.

Erster gültiger Index des Arrays ist 0, letzter ist NMarks(Tabelle) - 1.

Falls das Array zu klein ist, um alle Markierungen aufzunehmen, wird die Größe entsprechend angepasst, dabei wird ein mehrdimensionales Array gegebenenfalls zu einen eindimensionalen Array gemacht.

Beispiel

Das folgende Makro löscht alle markierten Datensätze:

procedure MarkierteLöschen
       vardef Markierungen: Integer[0]
       vardef i, n: Integer
       if n := NMarks(FileNo)
               GetMarks(FileNo, Markierungen)
               NLoop(i, n - 1, DelRec(FileNo, Markierungen[i]))
       end
endproc

Siehe auch

AndMarks, DelMark, DelMarks, IsMark, NMarks, NotMarks, PutMarks, SetMark, SortMark