BeUserName()

BeUserName() – Benutzername

Die Funktion gibt den Benutzernamen zu einer Benutzer-Nummer zurück.

Hinweis
Ist kein Benutzername hinterlegt oder wird der Benutzer nicht gefunden, ist die Rückgabe immer "---".

Parameter	Beschreibung
aUserNo:U	Benutzernummer (numerisch oder alphanumerisch)

Rückgabewert

Alphanumerisch – Benutzername

Beispiel

CODE

//******************************************************************************
// Benutzernamen und Benutzer-Kurzname alle be-User anzeigen
//******************************************************************************
| oDabFil, cUserNo |

oDabFil := BeOpen(waDABFIL, 'DABFIL'),
startseq
   oDabFil.Filter   := "DATEI = 999 AND CONTAINS(FELD,'_<em>USR</em>_*')",
   oDabFil.Filtered := True,

   DbGoTop(oDabFil),
   while not Eof(oDabFil) do
      cUserNo := Right(oDabFil:FELD, 3),

      writeln(cUserNo, BeUserName(cUserNo), BeUserShortName(cUserNo)),

      DbSkip(1, oDabFil),
   end,
always
   BeClose(oDabFil),
stopseq,

Weitere Verknüpfungen

BeUserShortName()