Aus einem meiner Programme:
CALL'PGMNAME'USING WAP-RTNCDE
WAP-RTNMSG

WAP-GESNR

WAP-PARTNER-NR

WAP-LFD-NR