Makros im ABAP

*--------------------------------------------------------------*
*Makrodefinition
*--------------------------------------------------------------*
DEFINE anzeigen.
  "Man kann bis zu neuen Platzhalter benutzen
  write:/ 'Text im Makro', &1, &2, &3, &4, &5, &6, &7, &8, &9.
END-OF-DEFINITION.

*--------------------------------------------------------------*
*Start-of-selection
*--------------------------------------------------------------*

WRITE:/ 'Text ohne Makro'.
"Text mit Makro
anzeigen 'START' 'Macro' 'Test' '&4' '&5' '&6' '&7' '&8' '&9'.

*--------------------------------------------------------------*
*Makrodefinition
*--------------------------------------------------------------*
DEFINE rechnen.
  add 1 to &1.";1.
END-OF-DEFINITION.

DATA: number TYPE i VALUE 1.

*--------------------------------------------------------------*
*Start-of-selection
*--------------------------------------------------------------*

write: 'Vor Makro:', number.
write /.

RECHNEN NUMBER.

write: 'Nach Marko:', number.
write /.

RECHNEN NUMBER.

write: 'Nach Marko2:', number.
write /.