retrieving outq info for a writer

[Guest.Visitor]

When I do a WRKWTR I can see what outq the writer is connected to. How can I bring that information into a CL program? Thanks for your time, Bryan

[michaelr@railcarmgt.com]

If you have the TAA Productivity Tools you could use the RTVWTRSTS command.

[daly.michael@verizon.net]

Try this:

 DCL VAR(&RCVVAR) TYPE(*CHAR) LEN(289) DCL VAR(&OUTQ) TYPE(*CHAR) LEN(10) CHGVAR VAR(&RCVVAR) VALUE(X'0000000000000121') CALL PGM(QSPRWTRI) PARM(&RCVVAR X'00000121' + 'WTRI0100' '{your printer name here}' X'00000000') CHGVAR VAR(&OUTQ) VALUE(%SST(&RCVVAR 87 10)) 

Michael

[Guest.Visitor]

Thank you very much for your time Michael. I will try that out As soon as possible.

[daly.michael@verizon.net]

No probs.