RPG / QFileSvr.400

[Schorsch]

Hallo,

ich habe da mal eine Frage in Richtung IFS.
Wie kann ich ein File in einem RPG-Pgm nutzen, welches
auf einer zweiten AS/400 liegt? Die Maschinen
sind über das IFS verbunden.

Danke schon mal im voraus.

Schorsch

[BenderD]

Hallo Schorsch,

wenn dir QFileServer schon ein Begriff ist, dann brauchst du nur auf der Maschine, auf der du das Streamfile verarbeiten willst, ein Verzeichnis mit dem Netzwerknamen der entfernten Maschine anzulegen, um deren IFS zu mappen. Die Verarbeitung des Streamfiles erfolgt dann im RPG mit C-APIs. Da gab es kürzlich Artikel im Midrange Magazin von mir. Den Code findest du auch auf meiner OpenSource Seite.

Dieter Bender

Hallo,

ich habe da mal eine Frage in Richtung IFS.
Wie kann ich ein File in einem RPG-Pgm nutzen, welches
auf einer zweiten AS/400 liegt? Die Maschinen
sind über das IFS verbunden.

Danke schon mal im voraus.

Schorsch

[Schorsch]

Danke für die schnelle Antwort.

Ich dachte aber weniger an Streamfiles als an
"normale" Files in einer Bibliothek. Ist der Zugriff
möglich?

Welche Ausgabe vom Midrange Magazin enthält
die erwähnte Veröffentlichung?

Schorsch

[BenderD]

Hallo Schorsch,

dann war die Frage etwas unscharf formuliert. Für Datenbanfiles ist das mit embedded SQL ohne Probleme möglich. Ebenfalls ginge auch noch SQL Call Level Interface, das ist aber etwas komplexer und hat kaum Vorteile, die das kompensieren würden.
Vom noch einfacheren Weg DDM Files, würde ich eher abraten, da gibt es doch wesentliche Einschränkungen.
Wann die Artikel genau waren, habe ich nicht parat, es war aber dieses Jahr.

mfg

Dieter Bender

Danke für die schnelle Antwort.

Ich dachte aber weniger an Streamfiles als an
"normale" Files in einer Bibliothek. Ist der Zugriff
möglich?

Welche Ausgabe vom Midrange Magazin enthält
die erwähnte Veröffentlichung?

Schorsch

[Schorsch]

Hallo Schorsch,

dann war die Frage etwas unscharf formuliert. Für Datenbanfiles ist das mit embedded SQL ohne Probleme möglich. Ebenfalls ginge auch noch SQL Call Level Interface, das ist aber etwas komplexer und hat kaum Vorteile, die das kompensieren würden.
Vom noch einfacheren Weg DDM Files, würde ich eher abraten, da gibt es doch wesentliche Einschränkungen.
Wann die Artikel genau waren, habe ich nicht parat, es war aber dieses Jahr.

mfg

Dieter Bender

Hallo Dieter.

sorry für die ungenaue Frage. Man setzt manchmal
Hintergrundwissen voraus, das andere nicht haben können.

Das mit dem eingebetteten SQL klingt gut - aber wie sieht
die Syntax (speziell die Referenz auf die "ferne" Datei) aus?

Schorsch

[Fuerchau]

Die Syntax ist identisch zum normalen SQL.
Du benötigst nur zusätzlich einen CONNECT.
Die Datenbank des Zielsystems muss auch über WRKRDBDIRE eingetragen sein, sonst klappt die Verbindung nicht.
Testen kannst du das per STRSQL und prompten des CONNECT.
Die SQL's sind dann identisch zum lokalen SQL. Du solltest allerdings die Tabellen/Dateien per Libname qualifizieren.

Wenn das Programm dann umgewandelt ist, benötigst du noch ein CRTSQLPKG, damit deine SQL's auf dem Zielsystem auch vorhanden sind.

[Schorsch]

Die Syntax ist identisch zum normalen SQL.
Du benötigst nur zusätzlich einen CONNECT.
Die Datenbank des Zielsystems muss auch über WRKRDBDIRE eingetragen sein, sonst klappt die Verbindung nicht.
Testen kannst du das per STRSQL und prompten des CONNECT.
Die SQL's sind dann identisch zum lokalen SQL. Du solltest allerdings die Tabellen/Dateien per Libname qualifizieren.

Wenn das Programm dann umgewandelt ist, benötigst du noch ein CRTSQLPKG, damit deine SQL's auf dem Zielsystem auch vorhanden sind.

Hallo Fuerchau,

danke für die Hilfestellung. Konnte ein Connect durchführen.
Nun aber eine weiter Frage: Brauche ich für diese Funktionalität überhaupt
eine Verbindung mittels QFileSvr.400?

MfG
Schorsch

[Fuerchau]

Nein. Hierfür muss nur der DRDA bzw DDM-Dienst gestartet sein um mit jeder DB/2 Daten auszutauschen.

QFileSvr.400 dient weitestgehend dem einfachen Austausch kompletter Objekte bzw. das Nutzen gemeinsamer IFS-Resourcen.