Große binäre Objekte

Für Datenbanksysteme besteht die Anforderung, neben der Speicherung von Daten in atomaren Datentypen wie String, Float, Integer etc. auch unstrukturierte Daten ablegen zu können. Hierzu zählen zum Beispiel Dokumente, Multimedia- und Audiodaten.

Für diese Daten bieten die Systeme in aller Regel den Datentyp Blob (Binary Large Object) an. Ein Blob ist in der Lage, beliebige Binärdaten zu speichern. Diese werden vom System nicht weiter interpretiert. Das heißt, es spielt keine Rolle, ob sich in dem Blob ein XML-Dokument oder eine Rastergrafik befindet.

In CONZEPT 16 ist das Verarbeiten von Blob-Daten ebenfalls möglich. Die binären Daten werden in der Datenbank in einer Verzeichnisstruktur, vergleichbar mit einem Dateisystem, gespeichert. Voraussetzung für das Ablegen von Daten als Blobs ist das Vorhandensein mindestens eines Verzeichnisses.

Zum Verarbeiten der Verzeichnisse und binärer Daten stellt CONZEPT 16 eine Reihe von Befehlen zur Verfügung. Im Nachfolgenden werde ich auf einige Funktionen eingehen.

Anlegen Verzeichnisstruktur

// Verzeichnis "Dokumente" erzeugen
tDirHdl    # BinDirOpen(0,'Dokumente',_BinCreate);

// Unterverzeichnis "PDF" erzeugen
tSubDirHdl # BinDirOpen(tDirHdl,'PDF',_BinCreate);

// Handles schließen
tDirHdl   ->BinClose();
tSubDirHdl->BinClose();

Im obigen Beispiel wird in der Root das Verzeichnis mit dem Namen "Dokumente" erzeugt. Unterhalb von "Dokumente" das Verzeichnis "PDF". Der nächste Schritt besteht aus dem Anlegen eines binären Objekts und dem Einlesen eines extern vorliegenden Dokumentes.

Anlegen eines binären Objekts und füllen mit Daten

define
{
  mDocument : _Sys->spPathMyDocuments + '\MyDocument.pdf'
}

// Öffnen Verzeichnis "PDF"
tDirHdl # BinDirOpen(0,'Dokumente\PDF');

// Binäres Objekt anlegen
tBinHdl # tDirHdl->BinOpen(FsiSplitName(mDocument,_FsiNameNE),_BinCreate | _BinLock);

// Externe Datei "MyDocument.pdf" als Blob einlesen
tBinHdl->BinImport(mDocument);

// Handles schließen
tBinHdl->BinClose();
tDirHdl->BinClose();

Exportieren des Inhalts binärer Objekte

Je nach Anwendungsfall kann es erforderlich sein, den Inhalt wieder aus der Datenbank zu exportieren. Hierfür steht uns die Funktion BinExport() zur Verfügung:

define
{
  mDocument : _Sys->spPathMyDocuments + '\MyDocument.pdf'
}

// Öffnen Verzeichnis "PDF"
tDirHdl # BinDirOpen(0,'Dokumente\PDF');

// Binäres Objekt öffnen
tBinHdl # tDirHdl->BinOpen(FsiSplitName(mDocument,_FsiNameNE));

// Inhalt exportieren
tBinHdl->BinExport(mDocument);

// Handles schließen
tBinHdl->BinClose();
tDirHdl->BinClose();

Verwendung von binären Objekten innerhalb der Anwendung

In Abhängigkeit des Dateityps können die Inhalte binärer Objekte direkt aus der Datenbank in verschiedenen Oberflächen- und Druck-Objekten für die Ausgabe verwendet werden. Dazu wird in der entsprechenden Eigenschaft der Name und Pfad des binären Objekts angegeben:

// Anzeige binäres Objekt in einem DocView-Objekt
tDocView->wpFileName # '>0\Dokumente\PDF\MyDocument.pdf';

Weiterführende Informationen zu den binären Objekten finden sich in der Dokumentation im Kapitel "Binäre Objekte".