PERFORM in_die_hose USING 'hello'.
*... da sind viele Coding-Zeilen dazwischen
* und die FORM muss ans Ende des Programms
* gestellt werden, damit das Hauptprogramm
* und der Aufruf mit PERFORM vor den
* Definitionen der Unterprogramme
* ausgeführt werden.
FORM in_die_hose USING value(id_wert).
DATA: ld_ergebnis TYPE i.
ld_ergebnis = id_wert.
ENDFORM.