home *** CD-ROM | disk | FTP | other *** search
Text File | 1993-07-27 | 43.3 KB | 1,061 lines |
- ╔╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╗
- ╠╬╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╬╣
- ╠╣ ╠╣
- ╠╣ █ █▀▀▀▀█▄ █▀▀▀▀█▄ ▄█▀▀▀▀█▄ █ █ ╠╣
- ╠╣ █ █ ▀█ █ ▀█ █ █ █ █ ╠╣
- ╠╣ █ █ █ █ █ █ █ █ █ ╠╣
- ╠╣ █ █ █ █ █ █ █ █ █ ╠╣
- ╠╣ █ █ ▄█▀ █ ▄█▀ █ █ █ █ ╠╣
- ╠╣ ▄▀▀▀▀▀█ █▀▀▀▀█▄ █▀▀▀▀█▄ █ █ ▄▀▄ ╠╣
- ╠╣ █ █ █ ▀█ █ ▀█ █ █ ▄▀ ▀▄ ╠╣
- ╠╣ █ █ █ █ █ █ █ █ ▄▀ ▀▄ ╠╣
- ╠╣ █ █ █ █ █ █ █ █ ▄▀ ▀▄ ╠╣
- ╠╣ █ █ █ ▄█ █ ▄█ █ █ ▄▀ ▀▄ ╠╣
- ╠╣ ▀▄▄▄▄▄█ █▄▄▄▄█▀ ▄▄▄▄▄ █▄▄▄▄█▀ ▀█▄▄▄▄█▀ ▄▀ ▀▄ ╠╣
- ╠╣ ╠╣
- ╠╬╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╦╬╣
- ╚╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╩╝
-
-
- File 'REFERENZ.DOC'
-
-
- ╔══════════════════════════════════════════════════════════════╗
- ║ Programm: dB_BOX LIZENZ-VERSION ║
- ║ ║
- ║ Version: 1.1 (Juni 1992) ║
- ║ ║
- ║ Autor: Dipl.-Ing. Helmut Klüber ║
- ║ Bergkieferweg 15 ║
- ║ W - 8011 Kirchheim b. München ║
- ╚══════════════════════════════════════════════════════════════╝
-
-
-
- Alphabetisches Verzeichnis der Variablen, Funktionen und
- ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀
- Prozeduren:
- ▀▀▀▀▀▀▀▀▀▀▀
-
- 1. globale Variablen: Überblick
-
- 2. Variablen des Objekts dB: Überblick
-
- 3. Objektorientierte Interface-Funktionen: Überblick
-
- 4. Objektorientierte Interface-Prozeduren: Überblick
-
- 5. Weitere nicht objektorientierte Funktionen: Überblick
-
- 6. globale Variablen: Beschreibung
-
- 7. Variablen des Objekts dB: (nur Abfrage) Beschreibung
-
- 8. Objektorientierte Interface-Routinen: Beschreibung
-
- 9. Weitere nicht objektorientierte Routinen: Beschreibung
-
-
-
- 1. Globale Variablen: (änderbar) Überblick
- ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀
-
- CarryOn: Boolean
- DeletedOn: Boolean
- Error: Integer
- ExactOn: Boolean
-
-
-
- 2. Variablen des Objekts dB: (nur Abfrage) Überblick
- ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀
-
- ContainsMemo: Boolean
- dB3: Boolean
- dB4: Boolean
- Deleted: Boolean
- MaxFieldNo: Byte
-
-
-
- 3. Objektorientierte Interface-Funktionen: Überblick
- ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀
-
- FUNCTION BoF
- FUNCTION Count
- FUNCTION DbF
- FUNCTION EoF
- FUNCTION FieldNo
- FUNCTION FieldName
- FUNCTION FileSize
- FUNCTION Get
- FUNCTION GetbyNr
- FUNCTION Locate
- FUNCTION RecCount
- FUNCTION RecNo
- FUNCTION RecSize
- FUNCTION Sum
-
-
-
- 4. Objektorientierte Interface-Prozeduren: Überblick
- ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀
-
- PROCEDURE AddField
- PROCEDURE AppendBlank
- PROCEDURE CloseDbf
- PROCEDURE CopybyNDX
- PROCEDURE CopybyNTX
- PROCEDURE CopyStruExteTo
- PROCEDURE CopyStruTo
- PROCEDURE CopyTo
- PROCEDURE Create
- PROCEDURE Delete
- PROCEDURE FieldInform
- PROCEDURE Flush
- PROCEDURE GetbyNrT
- PROCEDURE GetT
- PROCEDURE Go
- PROCEDURE GoBottom
- PROCEDURE GoTop
- PROCEDURE Inform
- PROCEDURE Next
- PROCEDURE Pack
- PROCEDURE Prev
- PROCEDURE Recall
- PROCEDURE RecallAll
- PROCEDURE Replace
- PROCEDURE ReplacebyNr
- PROCEDURE ReplacebyNrT
- PROCEDURE ReplaceT
- PROCEDURE Skip
- PROCEDURE Use
- PROCEDURE Zap
-
-
-
- 5. Weitere nicht objektorientierte Routinen: Überblick
- ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀
-
- FUNCTION ErrorText
- FUNCTION Exists
- FUNCTION IIF
- FUNCTION GetBuf
- FUNCTION GetKeyNDX
- FUNCTION GetKeyNTX
- FUNCTION Left
- FUNCTION Len
- FUNCTION Log
- FUNCTION LTrim
- FUNCTION Right
- FUNCTION RTrim
- FUNCTION Space
- PROCEDURE SetBuf
- FUNCTION Trim
-
-
-
- 6. globale Variablen: Beschreibung
- ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀
-
- ═════════════════════════════════════════════════════════════════
- CarryOn: Boolean; Voreinstellung=FALSE
- ═════════════════════════════════════════════════════════════════
-
- Diese Variable legt die Funktionsweise der Prozedur
- "AppendBlank" fest.
-
- CarryOn:= TRUE; >>>>>>>> Der Inhalt des letzten Daten-
- satzes wird in den neu hinzuge-
- fügten Datensatz automatisch
- übernommen.
-
- CarryOn:= FALSE >>>>>>>> Der neu hinzugefügte Datensatz
- wird automatisch mit Leerzeichen
- gefüllt.
-
-
- ═════════════════════════════════════════════════════════════════
- DeletedOn: Boolean; Voreinstellung=FALSE
- ═════════════════════════════════════════════════════════════════
-
- Diese Variable legt fest wie bei Satzzeigermanipulationen
- (durch Prozeduren wie z.B. Next, Prev, GoTop, GoBottom)
- als gelöscht markierte Sätze behandelt werden.
-
- Außerdem wird durch diese Variable festgelegt, wie bei Such-
- operationen (z.B. mit der Funktion Locate) als gelöscht mar-
- kierte Sätze behandelt werden.
-
- Auch bei Kopiervorgängen (mit der Prozedur "CopyTo") entschei-
- det diese Variable, ob als gelöscht markierte Sätze kopiert
- werden oder nicht.
-
- DeletedOn:= TRUE; >>>>>>>> Als gelöscht markierte Daten-
- sätze werden übergangen.
-
- DeletedOn:= FALSE; >>>>>>>> Auch als gelöscht markierte
- Datensätze werden berücksichtigt.
-
-
- ═════════════════════════════════════════════════════════════════
- Error: Integer;
- ═════════════════════════════════════════════════════════════════
-
- Diese Variable liefert einen Fehlercode zurück, der angibt ob
- bei der letzten Operation ein Fehler aufgetreten ist.
-
- Error = dBok >>>>>>>> kein Fehler (dBok=0)
-
- Error < 0 >>>>>>>> interner Fehler, durch falsche
- Parameter
-
- Error > 0 >>>>>>>> DOS Ein-/Ausgabefehler
-
- siehe auch: Funktion "ErrorText"
-
-
- ═════════════════════════════════════════════════════════════════
- ExactOn: Boolean; Voreinstellung=FALSE
- ═════════════════════════════════════════════════════════════════
-
- Diese Variable legt die Funktionsweise der Suchprozeduren
- (z.B. Locate) in Bezug auf Zeichenfelder (Typ 'C') fest.
-
- ExactOn:= TRUE; >>>>>>>> Nur bei exakter Übereinstimmung
- von Suchbegriff und Datenfeld
- wird der Datensatz gefunden.
-
- ExactOn:= FALSE >>>>>>>> Wenn der Suchbegriff mit dem
- Anfang des Datenfeldes überein-
- stimmt, wird der Datensatz ge-
- funden.
-
-
- 7. Variablen des Objekts dB: (nur Abfrage) Beschreibung
- ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀
-
- ═════════════════════════════════════════════════════════════════
- ContainsMemo: Boolean
- ═════════════════════════════════════════════════════════════════
-
- ContainsMemo=TRUE >>>>>>>> Die Datei enthält Memofelder, d.h.
- eine zugehörige *.DBT-Datei sollte
- vorhanden sein.
-
- ContainsMemo=FALSE >>>>>>>> Die Datei enthält keine Memofelder,
- d.h. eine *.DBT-Datei ist nicht
- erforderlich.
-
-
- ═════════════════════════════════════════════════════════════════
- dB3: Boolean
- ═════════════════════════════════════════════════════════════════
-
- dB3=TRUE >>>>>>>> Die Datenbank kann von dBase-III+
- gelesen werden.
-
- dB3=FALSE >>>>>>>> Die Datenbank kann nicht von
- dBase-III+ gelesen werden.
-
-
-
- ═════════════════════════════════════════════════════════════════
- dB4: Boolean
- ═════════════════════════════════════════════════════════════════
-
- dB4=TRUE >>>>>>>> Die Datenbank kann von dBase-IV
- gelesen werden.
-
- dB4=FALSE >>>>>>>> Die Datenbank kann nicht von
- dBase-IV gelesen werden.
-
-
- ═════════════════════════════════════════════════════════════════
- Deleted: Boolean
- ═════════════════════════════════════════════════════════════════
-
- Deleted=TRUE >>>>>>>> Der aktuelle Datensatz ist als ge-
- löscht markiert.
-
- Deleted=FALSE >>>>>>>> Der aktuelle Datensatz ist nicht
- als gelöscht markiert.
-
-
- ═════════════════════════════════════════════════════════════════
- MaxFieldNo: Byte
- ═════════════════════════════════════════════════════════════════
-
- Diese Variable informiert über die Anzahl der Datenfelder in
- der Datenbank.
-
-
-
- 8. Objektorientierte Interface-Routinen: Beschreibung
- ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀
-
- ═════════════════════════════════════════════════════════════════
- PROCEDURE AddField (FName: String; FTyp: Char; FLen,
- FDec: Byte);
- ═════════════════════════════════════════════════════════════════
-
- Diese Prozedur erweitert eine mit "Create" erzeugte Datenbank
- um ein weiteres Datenfeld.
-
- FName: Name des hinzuzufügenden Datenfeldes
- (max. 10 gültige Zeichen)
-
- FTyp: Typ des hinzuzufügenden Datatenfeldes
- ('C' - Zeichen, 'N' - Numerisch, 'F' - Gleitkomma,
- 'M' - Memo, 'L' -Logisch, 'D' - Datum)
-
- FLen: Länge des hinzuzufügenden Datenfeldes
-
- Beispiel: AddField('Nachname', 'C', 20, 0);
-
- siehe auch: Prozedur "Create"
-
- Voraussetzung: Die Datenbank enthält noch keine Datensätze.
-
-
- ═════════════════════════════════════════════════════════════════
- PROCEDURE AppendBlank;
- ═════════════════════════════════════════════════════════════════
-
- Diese Prozedur fügt am Ende der Datenbank einen neuen Datensatz
- an und stellt den Datensatzzeiger auf diesen Datensatz ein.
-
- siehe auch: Variable "CarryOn"
-
-
- ═════════════════════════════════════════════════════════════════
- FUNCTION BoF: Boolean;
- ═════════════════════════════════════════════════════════════════
-
- Diese Funktion liefert genau dann TRUE, wenn versucht wird den
- Datensatzzeiger vor den ersten Datensatz zu positionieren.
-
- siehe auch: Prozedur "EoF"
-
-
- ═════════════════════════════════════════════════════════════════
- PROCEDURE CloseDbf;
- ═════════════════════════════════════════════════════════════════
-
- Diese Prozedur schließt eine mit "Create" oder "Use" geöffnete
- Datenbank und gibt den dabei angeforderten Speicher auf dem
- Heap frei. Das Datenbankobjekt bleibt jedoch vollständig er-
- halten und läßt ein erneutes Create oder Use zu.
-
-
- ═════════════════════════════════════════════════════════════════
- PROCEDURE CopyStruExteTo (DName: PathStr);
-
- ═════════════════════════════════════════════════════════════════
-
- Diese Prozedur legt wie die dBase-Funktion "Copy Structure
- Extended" eine Datenbank zur Beschreibung des Datenbankaufbaues
- der gerade geöffneten Datei an und erstellt für jedes Datenfeld
- einen entsprechenden Datensatz.
-
- DName: Name der neu anzulegenden Datei mit der Strukturinfor-
- mation.
-
-
- ═════════════════════════════════════════════════════════════════
- PROCEDURE CopybyNDX (NDXName, ToName: PathStr);
- ═════════════════════════════════════════════════════════════════
-
- Diese Prozedur kopiert den Inhalt der gerade geöffneten Daten-
- bank in eine neue Datenbank unter Berücksichtigung der Sortier-
- reihenfolge, die aus der dBase-Index-Datei ermittelt wird.
-
- NDXName: Name der dBase-Index-Datei
-
- ToName: Name der neuen Datenbank, in die kopiert werden soll.
-
- siehe auch: Variable "DeletedOn"
-
-
- ═════════════════════════════════════════════════════════════════
- PROCEDURE CopybyNTX (NTXName, ToName: PathStr);
- ═════════════════════════════════════════════════════════════════
-
- Diese Prozedur kopiert den Inhalt der gerade geöffneten Daten-
- bank in eine neue Datenbank unter Berücksichtigung der Sortier-
- reihenfolge, die aus der Clipper-Index-Datei ermittelt wird.
-
- NTXName: Name der Clipper-Index-Datei
-
- ToName: Name der neuen Datenbank, in die kopiert werden soll.
-
- siehe auch: Variable "DeletedOn"
-
-
- ═════════════════════════════════════════════════════════════════
- PROCEDURE CopyStruTo (DName: PathStr);
- ═════════════════════════════════════════════════════════════════
-
- Diese Prozedur erstellt eine leere Datenbank mit dem gleichen
- Aufbau wie die gerade geöffnete Datenbank. Die neue Datenbank
- bleibt aber leer.
-
- DName: Name der neu anzulegenden Datenbank
-
-
- ═════════════════════════════════════════════════════════════════
- PROCEDURE CopyTo (DName: PathStr);
- ═════════════════════════════════════════════════════════════════
-
- Diese Prozedur kopiert den Inhalt der gerade geöffneten Daten-
- bank in eine neue Datenbank.
-
- DName: Name der neuen Datenbank, in die kopiert werden soll.
-
- siehe auch: Variable "DeletedOn"
-
-
- ═════════════════════════════════════════════════════════════════
- FUNCTION Count: LongInt;
- ═════════════════════════════════════════════════════════════════
-
- Diese Funktion zählt die nicht gelöschten Datensätze in der
- gerade geöffneten Datenbank, wenn "DeletedOn=FALSE", sonst
- alle Datensätze einschließlich der als gelöscht markierten.
-
- siehe auch: Variable "DeletedOn"
-
-
- ═════════════════════════════════════════════════════════════════
- PROCEDURE Create (DName: PathStr);
- ═════════════════════════════════════════════════════════════════
-
- Diese Prozedur legt eine neue Datenbank an, die aber weder
- Datenfelder noch Datensätze enthält. Datenfelder können danach
- mit "AddField" hinzugefügt werden. Datensätze können dann an-
- schließend mit "AppendBlank" hinzugefügt werden.
-
- DName: Name der neuen Datenbank, in die kopiert werden soll.
-
- siehe auch: Prozeduren "AddField" und AppendBlank"
-
-
- ═════════════════════════════════════════════════════════════════
- FUNCTION DbF: PathStr;
- ═════════════════════════════════════════════════════════════════
-
- Diese Funktion ermittelt den Dateinamen der gerade geöffneten
- Datenbank.
-
-
- ═════════════════════════════════════════════════════════════════
- PROCEDURE Delete;
- ═════════════════════════════════════════════════════════════════
-
- Diese Prozedur markiert den aktuellen Datensatz als gelöscht.
-
- siehe auch: Variable "Deleted"
-
-
- ═════════════════════════════════════════════════════════════════
- FUNCTION EoF: Boolean;
- ═════════════════════════════════════════════════════════════════
-
- Diese Funktion liefert genau dann TRUE, wenn versucht wird, den
- Datensatzzeiger hinter den letzten Datensatz der Datenbank zu
- positionieren.
-
- siehe auch: Prozedur "BoF"
-
-
- ═════════════════════════════════════════════════════════════════
- PROCEDURE FieldInform (FeldName: String; VAR LfdNr: Byte;
- VAR FTyp: Char; VAR Laenge,
- Stellen: Byte);
- ═════════════════════════════════════════════════════════════════
-
- Diese Prozedur liefert Informationen über ein Datenfeld der
- gerade geöffneten Datenbank.
-
- FeldName: Name des auszuwertenden Datenfeldes
-
- LfdNr: Position des Datenfeldes "Feldname" innerhalb eines
- Datensatzes
-
- FTyp: Typ des auszuwertenden Datenfeldes
- ('C' - Zeichen, 'N' - Numerisch, 'F' - Gleitkomma,
- 'M' - Memo, 'L' -Logisch, 'D' - Datum)
-
- Laenge: Länge des auszuwertenden Datatenfeldes incl. Nach-
- kommastellen
-
- Stellen: Anzahl der Nachkommastellen
-
-
- ═════════════════════════════════════════════════════════════════
- FUNCTION FieldNo (Name:String): Byte;
- ═════════════════════════════════════════════════════════════════
-
- Diese Funktion ermittelt die Position des Datenfeldes "Name"
- innerhalb eines Datensatzes
-
- Name: Name des auszuwertenden Datenfeldes
-
- siehe auch: Funktion "FieldName"
-
-
- ═════════════════════════════════════════════════════════════════
- FUNCTION FieldName (Nr: Byte): String10;
- ═════════════════════════════════════════════════════════════════
-
- Diese Funktion ermittelt den Namen des Datenfeldes mit der
- Position "Nr" innerhalb eines Datensatzes.
-
- siehe auch: Funktion "FieldNo"
-
-
- ═════════════════════════════════════════════════════════════════
- FUNCTION FileSize: LongInt;
- ═════════════════════════════════════════════════════════════════
-
- Diese Funktion bestimmt die Anzahl der Datensätze innerhalb der
- gerade geöffneten Datei.
-
-
- ═════════════════════════════════════════════════════════════════
- PROCEDURE Flush;
- ═════════════════════════════════════════════════════════════════
-
- Diese Prozedur schreibt den Inhalt des internen Ein-/Ausgabe-
- puffers in die gerade geöffnete Datei. Die Datensicherung er-
- folgt vollautomatisch. Deshalb ist der Aufruf dieser Prozedur
- nur ausnahmsweise bei sehr lange laufenden Programmen sinnvoll,
- um durch Zwischenspeicherung einen erhöhten Schutz gegen Strom-
- ausfall zu gewährleisten.
-
-
- ═════════════════════════════════════════════════════════════════
- FUNCTION Get (Name: String): String;
- ═════════════════════════════════════════════════════════════════
-
- Diese Funktion ermittelt den Inhalt des Datenfeldes mit dem
- Namen "Name" innerhalb des aktuellen Datensatzes als String,
- d.h. so, wie er in der Datenbank gespeichert ist.
-
- siehe auch: Prozedur "GetT"
-
-
- ═════════════════════════════════════════════════════════════════
- FUNCTION GetbyNr (Nr: Byte): String;
- ═════════════════════════════════════════════════════════════════
-
- Diese Funktion ermittelt den Inhalt des Datenfeldes mit der
- Position "Nr" innerhalb des aktuellen Datensatzes als String,
- d.h. so, wie er in der Datenbank gespeichert ist.
-
- siehe auch: Prozedur "GetbyNrT"
-
-
- ═════════════════════════════════════════════════════════════════
- PROCEDURE GetbyNrT (Nr: Byte; Var x);
- ═════════════════════════════════════════════════════════════════
-
- Diese Funktion ermittelt den Inhalt des Datenfeldes mit der
- Position "Nr" innerhalb des aktuellen Datensatzes im Turbo-
- Pascal-Format.
-
- FeldTyp 'C', 'M', 'D' >>>>>>>> x: String
-
- FeldTyp 'N', 'F' >>>>>>>> x: Real
-
- FeldTyp 'L' >>>>>>>> x: Boolean
-
- siehe auch: Prozedur "GetbyNrT"
-
-
- ═════════════════════════════════════════════════════════════════
- PROCEDURE GetT (Name: String; Var x);
- ═════════════════════════════════════════════════════════════════
-
- Diese Funktion ermittelt den Inhalt des Datenfeldes mit dem
- Namen "Name" innerhalb des aktuellen Datensatzes im Turbo-
- Pascal-Format.
-
- FeldTyp 'C', 'M', 'D' >>>>>>>> x: String
-
- FeldTyp 'N', 'F' >>>>>>>> x: Real
-
- FeldTyp 'L' >>>>>>>> x: Boolean
-
- siehe auch: Prozedur "GetT"
-
-
- ═════════════════════════════════════════════════════════════════
- PROCEDURE Go (RecNr:LongInt);
- ═════════════════════════════════════════════════════════════════
-
- Diese Prozedur setzt den Datensatzzeiger auf den Datensatz mit
- der Nummer "RecNr" unabhängig von der Variable "DeletedOn".
-
- RecNr: Nummer des gewünschten Datensatzes in der gerade
- geöffneten Datenbank
-
- siehe auch: Variable "DeletedOn"
-
-
- ═════════════════════════════════════════════════════════════════
- PROCEDURE GoBottom;
- ═════════════════════════════════════════════════════════════════
-
- Diese Prozedur setzt den Datensatzzeiger auf den letzten Daten-
- satz innerhalb der gerade geöffneten Datenbank unter Berück-
- sichtigung der Variable "DeletedOn".
-
- siehe auch: Variable "DeletedOn"
-
-
- ═════════════════════════════════════════════════════════════════
- PROCEDURE GoTop;
- ═════════════════════════════════════════════════════════════════
-
- Diese Prozedur setzt den Datensatzzeiger auf den ersten Daten-
- satz innerhalb der gerade geöffneten Datenbank unter Berück-
- sichtigung der Variable "DeletedOn".
-
- siehe auch: Variable "DeletedOn"
-
-
- ═════════════════════════════════════════════════════════════════
- PROCEDURE Inform (VAR FileName: PathStr; VAR MaxFieldNo: Byte;
- VAR SatzLaenge: Word; VAR Datum: String);
- ═════════════════════════════════════════════════════════════════
-
- Diese Prozedur informiert über den Aufbau der gerade geöffneten
- Datenbank.
-
- FileName: Name der gerade geöffneten Datenbank
-
- MaxFieldNo: Anzahl der Datenfelder innerhalb eines Datensatzes
-
- Satzlaenge: Länge eines Datensatzes
-
- Datum: Datum der letzten Änderung an der Datenbank
-
-
- ═════════════════════════════════════════════════════════════════
- FUNCTION Locate (FeldName: String; VAR Schluessel): Boolean;
- ═════════════════════════════════════════════════════════════════
-
- Diese Funktion sucht in der gerade geöffneten Datenbank ab dem
- aktuellen Datensatz (einschließlich) bis ein Datensatz gefunden
- wird, bei dem der Inhalt des Datenfeldes "FeldName" mit der
- Variable "Schlüssel" übereinstimmt. Wenn das Ende der Datenbank
- erreicht ist, wird die Suche abgebrochen, dann liefert "Locate"
- den Wert FALSE, sonst wegen erfolgreicher Suche TRUE.
-
- Der Suchbegriff "Schlüssel" wird in Abhängigkeit vom FeldTyp
- passend umgewandelt.
-
- Nachgestellte Leerzeichen im Suchbegriff "Schlüssel" werden
- bei der Suche ignoriert.
-
- Die Variable "ExactOn" entscheidet, ob ein Datensatz auch dann
- gefunden werden soll, wenn nur der Anfang des Datenfeldes mit
- dem Suchbegriff übereinstimmt.
-
- Die Variable "DeletedOn" entscheidet, ob auch als gelöscht
- markierte Datensätze gefunden werden sollen.
-
- FeldName: Name des Datenfeldes, das durchsucht werden soll
-
- Schlüssel: Suchbegriff
-
- FeldTyp 'C', 'M', 'D' >>>>>>>> Schlüssel: String
-
- FeldTyp 'N', 'F' >>>>>>>> Schlüssel: Real
-
- FeldTyp 'L' >>>>>>>> Schlüssel: Boolean
-
- siehe auch: Variablen "ExactOn" und "DeletedOn"
-
-
- ═════════════════════════════════════════════════════════════════
- PROCEDURE Next;
- ═════════════════════════════════════════════════════════════════
-
- Diese Prozedur setzt den Datensatzzeiger auf den nächsten
- Datensatz unter Berücksichtigung der Variable "DeletedOn".
-
- siehe auch: Variable "DeletedOn" und
- Prozedur "Prev"
-
-
- ═════════════════════════════════════════════════════════════════
- PROCEDURE Pack;
- ═════════════════════════════════════════════════════════════════
-
- Diese Prozedur entfernt aus der gerade geöffneten Datei alle
- Datensätze die als gelöscht markiert sind.
-
- siehe auch: Variable "Deleted"
-
-
- ═════════════════════════════════════════════════════════════════
- PROCEDURE Prev;
- ═════════════════════════════════════════════════════════════════
-
- Diese Prozedur setzt den Datensatzzeiger auf den vorhergehenden
- Datensatz unter Berücksichtigung der Variable "DeletedOn".
-
- siehe auch: Variable "DeletedOn" und
- Prozedur "Next"
-
-
- ═════════════════════════════════════════════════════════════════
- PROCEDURE Recall;
- ═════════════════════════════════════════════════════════════════
-
- Diese Prozedur macht das Setzen der Löschmarkierung beim
- aktuellen Datensatz rückgängig.
-
- siehe auch: Variable "Deleted"
-
-
- ═════════════════════════════════════════════════════════════════
- PROCEDURE RecallAll;
- ═════════════════════════════════════════════════════════════════
-
- Diese Prozedur macht das Setzen der Löschmarkierung bei allen
- Datensätzen der gerade geöffneten Datenbank rückgängig.
-
- siehe auch: Variable "Deleted"
-
-
- ═════════════════════════════════════════════════════════════════
- FUNCTION RecCount: LongInt;
- ═════════════════════════════════════════════════════════════════
-
- Diese Funktion ermittelt die Anzahl der Datensätze in der ge-
- rade geöffneten Datenbank einschließlich der als gelöscht mar-
- kierten Datensätze.
-
- siehe auch: Funktion "Count"
-
-
- ═════════════════════════════════════════════════════════════════
- FUNCTION RecNo: LongInt;
- ═════════════════════════════════════════════════════════════════
-
- Diese Funktion liefert die Nummer des aktuellen Datensatzes.
-
-
- ═════════════════════════════════════════════════════════════════
- FUNCTION RecSize: LongInt;
- ═════════════════════════════════════════════════════════════════
-
- Diese Funktion ermittelt die Länge eines Datensatzes, incl.
- Löschkennzeichen.
-
-
- ═════════════════════════════════════════════════════════════════
- PROCEDURE Replace(Name: String; Eingabe: String);
- ═════════════════════════════════════════════════════════════════
-
- Diese Prozedur ersetzt den Inhalt des Datenfeldes "Name" durch
- den String "Eingabe".
-
- Name: Name des Datenfeldes, dessen Inhalt geändert werden
- soll
-
- Eingabe: String, der das Datenfeld überschreiben soll
-
- siehe auch: Prozeduren "ReplaceT", "ReplacebyNr" und
- "ReplacebyNrT"
-
-
- ═════════════════════════════════════════════════════════════════
- PROCEDURE ReplacebyNr (Nr: Byte; Eingabe: String);
- ═════════════════════════════════════════════════════════════════
-
- Diese Prozedur ersetzt den Inhalt des Datenfeldes mit der
- Position "Nr" inerhalb des Datensatzes durch den String
- "Eingabe".
-
- Nr: Position des Datenfeldes, dessen Inhalt geändert wer-
- den soll
-
- Eingabe: String, der das Datenfeld überschreiben soll
-
- siehe auch: Prozeduren "Replace", "ReplaceT" und
- "ReplacebyNrT"
-
-
- ═════════════════════════════════════════════════════════════════
- PROCEDURE ReplacebyNrT (Nr: Byte; VAR Eingabe);
- ═════════════════════════════════════════════════════════════════
-
- Diese Prozedur ersetzt den Inhalt des Datenfeldes mit der
- Position "Nr" inerhalb des Datensatzes durch "Eingabe".
-
- Die Variable "Eingabe" wird dabei passend zum Typ des Daten-
- feldes gewandelt.
-
- Nr: Position des Datenfeldes, dessen Inhalt geändert wer-
- den soll
-
- Eingabe: String, der das Datenfeld überschreiben soll
-
- FeldTyp 'C', 'M', 'D' >>>>>>>> Eingabe: String
-
- FeldTyp 'N', 'F' >>>>>>>> Eingabe: Real
-
- FeldTyp 'L' >>>>>>>> Eingabe: Boolean
-
- siehe auch: Prozeduren "Replace", "ReplaceT" und
- "ReplacebyNr"
-
-
- ═════════════════════════════════════════════════════════════════
- PROCEDURE ReplaceT (Name: String; VAR Eingabe);
- ═════════════════════════════════════════════════════════════════
-
- Diese Prozedur ersetzt den Inhalt des Datenfeldes "Name" durch
- den String "Eingabe".
-
- Die Variable "Eingabe" wird dabei passend zum Typ des Daten-
- feldes gewandelt.
-
- Name: Name des Datenfeldes, dessen Inhalt geändert werden
- soll
-
- Eingabe: String, der das Datenfeld überschreiben soll
-
- FeldTyp 'C', 'M', 'D' >>>>>>>> Eingabe: String
-
- FeldTyp 'N', 'F' >>>>>>>> Eingabe: Real
-
- FeldTyp 'L' >>>>>>>> Eingabe: Boolean
-
- siehe auch: Prozeduren "Replace", "ReplacebyNr" und
- "ReplacebyNrT"
-
-
- ═════════════════════════════════════════════════════════════════
- PROCEDURE Skip (Anzahl: LongInt);
- ═════════════════════════════════════════════════════════════════
-
- Diese Prozedur ändert den Datensatzzeiger um "Anzahl" Daten-
- sätze.
-
- Als gelöscht markierte Datensätze werden in Abhängigkeit von
- der Variablen "DeletedOn" übergangen.
-
- Anzahl: Anzahl der Datensätze um die weitergegangen werden
- soll.
-
- Anzahl > 0 >>>>>>>> um "Anzahl" Datensätze in Richtung
- auf das Datenbankende weitergehen
-
- Anzahl < 0 >>>>>>>> um " - Anzahl" Datensätze in
- Richtung auf den Datenbankanfang
- weitergehen
-
- siehe auch: Variable "DeletedOn"
-
-
- ═════════════════════════════════════════════════════════════════
- FUNCTION Sum (FNr: Byte): Real;
- ═════════════════════════════════════════════════════════════════
-
- Diese Funktion ermittelt die Summe für ein Datenfeld von allen
- Sätzen der gerade geöffneten Datenbank.
-
-
- ═════════════════════════════════════════════════════════════════
- PROCEDURE Use (DName: PathStr);
- ═════════════════════════════════════════════════════════════════
-
- Diese Prozedur öffnet eine Datenbank mit dem Namen "DName".
-
- DName: Name der zu öffnenden, aber bereits existierenden
- Datenbank
-
-
- ═════════════════════════════════════════════════════════════════
- PROCEDURE Zap;
- ═════════════════════════════════════════════════════════════════
-
- Diese Prozedur löscht alle Datensätze der gerade geöffneten
- Datei.
-
-
-
- 9. Weitere nicht objektorientierte Routinen: Beschreibung
- ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀
-
- ═════════════════════════════════════════════════════════════════
- FUNCTION ErrorText: String;
- ═════════════════════════════════════════════════════════════════
-
- Diese Funktion ermittelt den zur letzten Datenbankoperation
- gehörenden Fehlertext.
-
- siehe auch: Variable "Error"
-
-
- ═════════════════════════════════════════════════════════════════
- FUNCTION Exists (DateiName : PathStr) : Boolean;
- ═════════════════════════════════════════════════════════════════
-
- Diese Funktion ermittelt, ob eine Datei mit dem Namen
- "DateiName" existiert.
-
- DateiName: Name der zu suchenden Datei
-
-
- ═════════════════════════════════════════════════════════════════
- FUNCTION GetBuf: Word;
- ═════════════════════════════════════════════════════════════════
-
- Diese Funktion ermittelt die Größe des internen Ein-/Ausgabe-
- puffers in Byte.
-
- siehe auch: Prozedur "SetBuf"
-
-
- ═════════════════════════════════════════════════════════════════
- FUNCTION GetKeyNDX (NDXName : PathStr) : String;
- ═════════════════════════════════════════════════════════════════
-
- Diese Funktion gibt den Indexschlüssel zurück, der unter dBase
- mit INDEX ON ... angelegt wurde.
-
- NDXName: Name der dBase-Index-Datei
-
-
- ═════════════════════════════════════════════════════════════════
- FUNCTION GetKeyNTX (NTXName : PathStr) : String;
- ═════════════════════════════════════════════════════════════════
-
- Diese Funktion gibt den Indexschlüssel zurück, der unter
- Clipper mit INDEX ON ... angelegt wurde.
-
- NTXName: Name der Clipper-Index-Datei
-
-
- ═════════════════════════════════════════════════════════════════
- FUNCTION IIF (Ausdruck: Boolean; Stri1, Stri2: String)
- : String;
- ═════════════════════════════════════════════════════════════════
-
- In Abhängigkeit von der Steuervariablen "Ausdruck" liefert
- "IIF" entweder den String "Stri1" oder den String "Stri2".
-
- Ausdruck: Steuervariable
-
- Ausdruck = TRUE >>>>>>>> IIF:= Stri1;
-
- Ausdruck = FALSE >>>>>>>> IIF:= Stri2;
-
- Stri1 : zur Auswahl stehender String
-
- Stri2 : zur Auswahl stehender String
-
-
- ═══════════════════════════════════════════════════════════════
- FUNCTION Left (s: String; N: Integer): String;
- ═════════════════════════════════════════════════════════════════
-
- Diese Funktion ermittelt den Teilstring der ersten "N" Zeichen
- des Eingabestrings "s".
-
- s: Eingabestring
-
- N: Anzahl der Zeichen, die von links beginnend aus dem String
- entnommen werden sollen
-
-
- ═════════════════════════════════════════════════════════════════
- FUNCTION Len (s: String): Integer;
- ═════════════════════════════════════════════════════════════════
-
- Diese Funktion ermittelt die Länge des Eingabestrings "s".
-
- s: Eingabestring
-
-
- ═════════════════════════════════════════════════════════════════
- FUNCTION Log (x: Real): Real;
- ═════════════════════════════════════════════════════════════════
-
- Diese Funktion ermittelt Ln(x). Sie wurde nur implementiert
- wegen der abweichenden dBase-Bezeichnung.
-
-
- ═════════════════════════════════════════════════════════════════
- FUNCTION LTrim (s: String): String;
- ═════════════════════════════════════════════════════════════════
-
- Diese Funktion entfernt führende Leerzeichen aus einem String.
-
- s: Eingabestring
-
-
- ═════════════════════════════════════════════════════════════════
- FUNCTION Right (s: String; N: Integer): String;
- ═════════════════════════════════════════════════════════════════
-
- Diese Funktion ermittelt den Teilstring der letzten "N" Zeichen
- des Eingabestrings "s".
-
- s: Eingabestring
-
- N: Anzahl der Zeichen, die von rechts beginnend aus dem String
- entnommen werden sollen
-
-
-
- ═════════════════════════════════════════════════════════════════
- FUNCTION RTrim (s: String): String;
- ═════════════════════════════════════════════════════════════════
-
- Diese Funktion entfernt folgende Leerzeichen aus einem String.
-
- s: Eingabestring
-
- siehe auch: Funktion "Trim" (identische Funktion,
- wie bei dBase)
-
-
- ═════════════════════════════════════════════════════════════════
- PROCEDURE SetBuf (Size: Word);
- ═════════════════════════════════════════════════════════════════
-
- Diese Prozedur setzt die Größe des internen Ein-/Ausgabepuffers
- (0 bis $FFFF Byte).
-
- siehe auch: Prozedur "GetBuf"
-
-
- ═════════════════════════════════════════════════════════════════
- FUNCTION Space (N: Byte): String;
- ═════════════════════════════════════════════════════════════════
-
- Diese Funktion erzeugt einen String bestehend aus "N" Leer-
- zeichen.
-
- N: Anzahl der zum String zu verbindenden Leerzeichen.
-
-
- ═════════════════════════════════════════════════════════════════
- FUNCTION Trim (s: String): String;
- ═════════════════════════════════════════════════════════════════
-
- Diese Funktion entfernt folgende Leerzeichen aus einem String.
-
- s: Eingabestring
-
- siehe auch: Funktion "RTrim" (identische Funktion,
- wie bei dBase)
-