anmeldungscode

anmeldungscode

hallo zusammen,

Ich habe ein Problem bei ABAP programmierung in minisap system. ich wollte ein anmeldungsfenster erstellen und zwar mit folgende code in Eventhandler:
ich weiss nicht ob ich auch ein Tabelle usr21 und adrp selbst in Dictionery anlegen muss oder in System schon vorhanden!

---------------------------------
DATA: lv_persnumber TYPE ad_persnum,
lv_name_first TYPE ad_namefir,
lv_name_last TYPE ad_namelas.

* ermittle Personalnummer aus dem Anmeldenamen
select single persnumber
from usr21
into lv_persnumber
where bname=sy-uname.

if sy-subrc = 0.
* ermittle vollständigen Benutzernamen, d.h. Vor- und Nachname
select single name_first name_last
from adrp
into (lv_name_first, lv_name_last)
where persnumber = lv_persnumber.

if sy-subrc = 0.
* Zusammensetzen des Namens
concatenate lv_name_first lv_name_last into name separated by space.
else.
name = sy-uname.
endif.

else.
name = sy-uname.
endif.

Hallo nochmal.

Die Tabellen existieren (WebAS 6.40 SR1). Siehe auch die Screenshots.

mfg M.L.