* Der Anredetext als globale Variable
DATA: gd_title_text TYPE ad_titletx.
* Einsprungspunkt
START-OF-SELECTION.
* Aufrufen
PERFORM ich_bin_ein_unterprogramm.
*&---------------------------------------------------------*
* Das ist ein ziemlich einfaches Unterprogramm
*----------------------------------------------------------*
FORM ich_bin_ein_unterprogramm.
* Der Anredetext als lokale Variable
DATA: gd_title_text TYPE ad_titletx.

gd_title_text = 'Herr und Frau'.

ENDFORM.