FATS - Fast Access Tree System Inhaltsverzeichnis Programmierschnittstellen MS-Pascal für OS/2

MS-Pascal für OS/2

---

 
OS/2 Bibliotheken FATS_O16.DLL bzw. FATSXO16.DLL

Im Lieferumfang der FATS-Version für OS/2 befinden sich die Dynamischen Bibliotheken FATS_O16.DLL (Basisversion) bzw. FATSXO16.DLL (Erweiterte Version), die Sie in das Systemverzeichnis von OS/2 kopieren müssen:

COPY FATS?O16.DLL \OS2\DLL

Die Bibliotheken exportieren folgende Funktionen:

type FATSDLLPASSTR = lstring(255);

function FATSLibInit(uDatasize: word; uSign: word): integer4; external;

function FATSLibExit(lpFatsdata: integer4): integer4; external;

function FATSLibCall(vars szCmnd: FATSDLLPASSTR;vars nErrorcode: word;vars szFatsKey: FATSDLLPASSTR;lpFatsdata: integer4) : integer4; external;

Auf der Diskette finden Sie im Verzeichnis OS2_16I die Importbibliotheken FATS_O16.LIB (Basisversion) bzw. FATSXO16.LIB (Erweiterte Version), die Sie zu Ihren Programmen linken können.

Bevor Sie die FATS-Befehle aus Ihrem MS-Pascal Programm verwenden können, müssen Sie FATS einen Datenbereich zuweisen:

lpFatsdata := FATSLibInit(0, 1);

Der erste Parameter bestimmt die Größe des FATS-Datenbereichs. Wenn Sie hier eine Null angeben, dann wird der minimal benötigte Speicherplatz reserviert (ca. 18-20 KB). Der zweite Parameter bestimmt die eingesetzte Programmiersprache, für Pascal Programme muß dieser Wert gleich 1 sein. Die Adresse des Datenbereichs wird in der Variable lpFatsdata zurückgegeben.

Vor dem Beenden des Anwendungsprogrammes sollten Sie den mit der Funktion FATSLibInit reservierten Speicherbereich wieder freigeben. Dafür steht die Funktion FATSLibExit zur Verfügung:

lpFatsdata := FATSLibExit(lpFatsdata );

Obwohl der Speicherbereich notfalls auch vom Betriebssystem automatisch freigegeben würde, ist dieser Befehl nützlich, da er sämtliche noch geöffneten FATS-Dateien ordnungsgemäß schließt.

 
Aufruf von FATS

FATS-Befehle werden mit der Funktion FATSLibCall ausgeführt:

dwRecno := FATSLibCall(szCmnd, nErrorcode, szFatsKey, lpFatsdata);

Bedeutung der verwendeten Parameter:

szCmnd	Befehlsstring
nErrorcode	Fehlercode von FATS
szFatsKey	Schlüsselstring von FATS
lpFatsdata	Adresse des FATS-Datenbereichs
Rückgabe:	Datensatznummer

 
Testprogramme

Auf der FATS-Diskette für OS/2 befinden sich im Verzeichnis OS2_16I\PASCAL\MS Testprogramme, anhand derer Sie die Verwendung von FATS studieren können:

tst0_ger.pas	MS-Pascal (verwendet FBSPAS)
tst1_ger.pas	MS-Pascal (verwendet FATSCALL)
rebldger.pas	Wiederherstellung einer Indexdatei ('BK', 'DL')

Bei der erweiterten Version von FATS befinden sich zusätzlich die folgenden Testprogramme im Verzeichnis:

tst2_ger.pas	Matchcode-Suche im Kundenstamm
mcsort.pas	Anwendung des Key-Flags beim Kommando 'MC'
reindger.pas	Schnelle Re-Indizierung (Befehl 'XB')

 
Kompatible Schnittstellen

Alternativ zu der oben beschriebenen Schnittstelle können auch weiterhin die FABS-Plus Schnittstellen verwendet werden. Bitte beachten Sie dabei die Hinweise auf den Seiten  4-109, 9-7, 9-9 und 9-11.

Folgende FABS-Schnittstellen sind vorhanden:

FBSPAS	Einsprungpunkt in FATS.OBJ
FBPAS1	"
FBPAS2	"

© 2008  GCS Software, Udo Gertz