Beschreibung Benutzer

[jojoschluckfirma]

Vielen Dank für die Bereitschaft mir zu helfen.

So ich habe jetzt das Cl kopiert womit ich den USR auslesen wollte.


PGM PARM(&QUSER &QTEXT)

DCL VAR(&QUSER) TYPE(*CHAR) LEN(10)
DCL VAR(&QTEXT) TYPE(*CHAR) LEN(50)

RTVUSRPRF USRPRF(&QUSER) TEXT(&QTEXT)

und hier ist die Benutzerbeschreibung

Benutzerprofil anzeigen - Basis

Benutzerprofil . . . . . . . . . . . . . . : VKVK12

Startprogramm . . . . . . . . . . . . . . : STARTVK1
Bibliothek . . . . . . . . . . . . . . . : QGPL
Anfangsmenü . . . . . . . . . . . . . . . : MAIN
Bibliothek . . . . . . . . . . . . . . . : *LIBL
Möglichkeiten einschränken . . . . . . . . : *YES
Text . . . . . . . . . . . . . . . . . . . : BS VKVK12 Verkauf


Es müßte doch jetzt im Parameter TEXT dieser Wert stehen "BS VKVK12 Verkauf"


Gruss Jojo

[Frank Hildebrandt]

Ich würde jetzt einen Debug aufsetzen und auf dem Statement mit dem RTVUSRPRF, sowie direkt nach dem Statement mit dem RTVUSRPRF einen Breakpoint setzen. Sobald das Programm auf dem ersten Breakpoint stoppt den Wert im Feld QUSER prüfen und beim zweiten Breakpoint den Wert im Feld QTEXT prüfen. Die Statements, die Du gepostet hast sind OK.

[jajonowak]

hast du mal das cl mittels debug überprüft!
oder bekommt du den schrott nur in das aufrufende programm?

lg
hans-joachim