PDA

View Full Version : Open List of Spooled Files (QGYOLSPL) API, OSPL0100 Extention



Seiten : [1] 2

wilfried
11-08-17, 09:13
Hallo,
ich möchte mittels RPG auf die Spoolfiles zugreifen.
Dazu hab ich das bewährte API "Open List of Spooled Files (QGYOLSPL)" mit der Receiver-Variablen OSPL0100 im RPG eingesetzt.

Frage:
Wie bekomme ich die Extension des Format OSPL0100 beim API-Aufruf zurück?
Dort stehen nämlich das Datum und die Zeit des Öffnens der Spoolfiles.

Der Offset steht auf 0 ?

THX

andreaspr@aon.at
11-08-17, 09:44
Hi Wilfried,

Falls du nicht unter IBM i 7.1 bist, kannst du auch die View QSYS2.OUTPUT_QUEUE_ENTRIES verwenden um dir die Spooled Files auflisten zu lassen.
Dann brauchst du dich nicht mit dem API herumschlagen.

lg Andreas

Fuerchau
11-08-17, 09:45
Zusätzlich benötigst du auch die USRSPC-API's.

wilfried
11-08-17, 09:58
Ja, ich bin unter 7.1 ..... ;-)

Ja, da brauchts ein paar APIs rundherum:
zuerst QGYOLSPL, dann QGYGTLE zum Lesen jedes einzelnen entrys ....

Aber zurück zu meiner Frage: wie bekomme ich die extension des OSPL0100 zurück bei diesem Aufruf:

// api-aufruf: get list entries
GetLstEnt( OSPL0100
: %Size( OSPL0100 )
: ListInf.Handle
: ListInf
: 1
: RtnRcdNbr
: ERRC0100
);


Mhm ???

Fuerchau
11-08-17, 10:35
Da ich deine Prozedurdeklaration nicht kenne, ob der Eintrag als Return kommt oder per Parameter als Reference übergeben wird, kann ich jetzt nicht bestimmen, ob dein Wrapperaufruf zum API passt.
Und was ist bitte schön "extension des OSPL0100"?
Das Format SPL0100 ist doch im API beschrieben...

BenderD
11-08-17, 11:25
Hallo,
ich möchte mittels RPG auf die Spoolfiles zugreifen.
Dazu hab ich das bewährte API "Open List of Spooled Files (QGYOLSPL)" mit der Receiver-Variablen OSPL0100 im RPG eingesetzt.

Frage:
Wie bekomme ich die Extension des Format OSPL0100 beim API-Aufruf zurück?
Dort stehen nämlich das Datum und die Zeit des Öffnens der Spoolfiles.

Der Offset steht auf 0 ?

THX

... die hängen hinten dran, wo genau sagt das Feld
148 94 BINARY(4) Offset to OSPL0100 extension
die Länge aus dem nächsten Feld

D*B

Fuerchau
11-08-17, 11:48
OK, wenn das Offset auf 0 steht, wird es keine Extension geben.
Auch glaube ich nicht, dass du dann mit dem GetListEnt an den Inhalt kommst, denn dies wird ggf. als relativ zum Anfang des USRSPC's angegeben.

B.Hauser
11-08-17, 15:05
Falls du nicht unter IBM i 7.1 bist, kannst du auch die View QSYS2.OUTPUT_QUEUE_ENTRIES verwenden um dir die Spooled Files auflisten zu lassen.

Kleine Korrektur: OUTPUT_QUEUE_ENTRIES wird auch unter Release 7.1 unterstützt (vorausgesetzt, man ist auf dem aktuellen PTF-Stand).

... es gibt übrigens die Tabelle SERVICES_INFO in Bibliothek QSYS2, in der alle DB2- und IBM i Services aufgelistet sind. In dieser Tabelle ist u.a. auch hinterlegt, ab welchem Release ein Service unterstützt werden.

Birgitta

andreaspr@aon.at
12-08-17, 13:32
Kleine Korrektur: OUTPUT_QUEUE_ENTRIES wird auch unter Release 7.1 unterstützt (vorausgesetzt, man ist auf dem aktuellen PTF-Stand).

... es gibt übrigens die Tabelle SERVICE_INFO in Bibliothek QSYS2, in der alle DB2- und IBM i Services aufgelistet sind. In dieser Tabelle ist u.a. auch hinterlegt, ab welchem Release ein Service unterstützt werden.

Ich hatte mich da etwas schlecht ausgedrückt. Ich meinte wenn man nicht mit einem Release kleiner als 7.1 arbeitet (also mit 6.1 oder 5.4).

Die Tabelle ist ein guter Hinweis. Es fehlt nur das "S" --> SERVICES_INFO.

lg Andreas

B.Hauser
12-08-17, 17:14
Ich hatte mich da etwas schlecht ausgedrückt. Ich meinte wenn man nicht mit einem Release kleiner als 7.1 arbeitet (also mit 6.1 oder 5.4).

Die Tabelle ist ein guter Hinweis. Es fehlt nur das "S" --> SERVICES_INFO.

lg Andreas

Kann passieren im Halbschlaf mit dicken Fingern ;)

Birgitta