Open List of Spooled Files (QGYOLSPL) API, OSPL0100 Extention

[wilfried]

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]

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]

Zusätzlich benötigst du auch die USRSPC-API's.

[wilfried]

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]

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]

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]

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]

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]

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]

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

[wilfried]

THX , guter Hinweis!

[BenderD]

... vor allem prima, wenn man nach Laufzeit der Programme bezahlt wird.

D*B