PRTDEV

[philsturm]

Guten Morgen!

Habe ich in (free) RPGLE die Möglichkeit, die Druckerbezeichnung des aktuellen Benutzers auszulesen?

Besten Dank!

[LSMD]

Sie könnten bei den APIs nachschauen ob sie Zugriff auf die Information erhalten


API Description (http://publib.boulder.ibm.com/html/as400/v4r5/ic2962/info/apis/desc.htm)

[Pikachu]

Retrieve User Information (QSYRUSRI) API (http://publib.boulder.ibm.com/html/as400/v4r5/ic2962/info/apis/qsyrusri.htm)

Format: USRI0300 / Feld: Print device

[Fuerchau]

Dies muss ggf. mehrstufig erfolgen:

RTVJOBA PRTDEV(&PRTDEV)
OUTQ(&OUTQ)
OUTQLIB(&OUTQLIB)


&PRTDEV kann folgende Werte enthalten:
einen Namen => dieser Drucker
*USRPRF => RTVUSRPRF PRTDEV
*SYSVAL => RTVSYSVAL QPRTDEV
*WRKSTN => API für Devicedescription

Im USRPRF kann wiederum stehen:
eine Name
*SYSVAL => s.o.
*WRKSTN => s.o.

Um die OUTQ harauszufinden kann in &OUTQ stehen:
Ein Name
*DEV => Verweis auf PRTDEV
*USRPRF => RTVUSRPRF OUTQ(..) OTQLIB(...)

Und zu guter letzt kann auch noch ein OVRPRTF aktiv sein.