PDA

View Full Version : WRKOUTQD als *OUTFILE


didipom
23-03-11, 09:05
Hallo

Ich habe alle OUTQs in einer Datei stehen und möchte nun für jede OUTQ die Daten vom Befehl WRKOUTQD wie z.b. RMTSYS, RMTPRTQ, IP-Adresse, Model usw. ermitteln. Der Befehl WRKOUTQD gibt jedoch nur einen spool aus. Ich bräuchte aber die Ausgabe in einer *OUTFILE. Wie kann ich an die Infos kommen.
Danke im Vorraus
camouflage
23-03-11, 10:34
Q&D

Printfile erstellen, CPYSPLF und kleines Programm um die entsprechenden Daten auszulesen. Fertig.
Fuerchau
23-03-11, 11:58
Da gibts mal wieder ein API:
Retrieve Output Queue Information (QSPROUTQ) API (http://publib.boulder.ibm.com/infocenter/iseries/v7r1m0/topic/apis/QSPROUTQ.htm)
didipom
24-03-11, 13:15
Hallo

vielen Dank für den Tipp. Habe das API QSPROUTQ in ein CL eingebaut. Jetzt habe ich das Problem, daß die Variable &RCVINF nur 256 Character gefüllt sind von 1200 char.
Fuerchau
25-03-11, 08:40
Hast du den Parameter 2 auch korrekt mit %bin(1200) gefüllt ?

DCL &LEN *CHAR 4

CHGVAR &LEN %BIN(1200)
didipom
25-03-11, 13:56
danke für den tipp, jetzt funktioniert es.
vielen Dank