Coggle requires JavaScript to display documents.
FORM name [parameter]. ... ENDFORM.
PERFORM { {name | (name)} [TABLES itab1 itab2 ...] [USING a1 a2 ...] [CHANGING a1 a2 ...] }.
PERFORM { {form IN PROGRAM [programm] [IF FOUND]} | {form(prog) [IF FOUND]} ... }.
* Erstes Programm REPORT zmein_programm. PERFORM andere_form(zmein_anderes_programm). * Zweites Programm REPORT zmein_anderes_program. FORM andere_form. ENDFORM.
PERFORM meine_form USING iv_zahl1 iv_zahl2 CHANGING ev_ergebnis. FORM meine_form USING value(pv_zahl1) value (pv_zahl2) CHANGING pv_ergebnis.
FORM mein_form USING value(pv_zahl1) TYPE i value(pv_zahl2) TYPE i CHANGING ev_ergebnis TYPE p DECIMALS 2.
... pt_name LIKE interne_Tabelle. ... pt_name TYPE Tabellentyp. ... pt_name TYPE any table.
DATA lt_mara TYPE TABLE OF mara. FORM materialausgabe CHANGING pt_mara LIKE lt_mara. DATA ls_mara LIKE LINE OF pt_mara. ENDFORM.
TYPES tt_mara TYPE TABLE OF mara. FORM materialausgabe CHANGING pt_mara TYPE tt_mara. DATA ls_mara LIKE LINE OF pt_mara. ENDFORM.
DEFINE macro_name. [Anweisung] END-OF-DEFINITION.
DEFINE mein_macro. write: / &1, &2. END-OF-DEFINITION.
macro_name [param1 param2 [...]].
mein_macro 'Altes' 'ABAP'.
INCLUDE include_name.
INCLUDE zmein_report_xxx.
CALL FUNCTION funktionsname [IN UPDATE TASK] [EXPORTING p1=a1 p2=a2 ...] [IMPORTING p1=a1 p2=a2 ...] [TABLES t1=itab1 t2=itab2 ...] [CHANGING p1=a1 p2=a2 ...] [EXCEPTIONS [exc1=n1 exc2=n2 ...] [error_message=n_error] [OTHERS=n_others]].
EXCEPTIONS NOT_FOUND = 10. IF sy-subrc = 10. ''dann wurde nichts gefunden ENDIF.
TRY. CALL FUNCTION 'ZFUBA' EXPORTING iv_para1= lv_para1 iv_para2=lv_para2 IMPORTING ev_ergebnis=lv_ergebnis. CATCH zcx_ausnahmeklasse. ''Behandlung der Ausnahme ENDTRY.
CALL FUNCTION ... IN UPDATE TASK
PERFORM ... ON COMMIT
COMMIT WORK [AND WAIT]
ROLLBAK WORK