- Code: [Select all] [Expand/Collapse] [Download] (Untitled.txt)
- REPORT zea_tmpca001.
- DATA:
- h_string TYPE string,
- ref_exc TYPE REF TO zcx_mvk.
- *
- PARAMETER: pa_test TYPE xtest DEFAULT 'X'.
- *
- AT SELECTION-SCREEN.
- *
- TRY.
- *
- *--* Prüfung 1 *-------------------------------------------------------*
- *
- *
- *--* Prüfung 2 *-------------------------------------------------------*
- *
- *
- *--* Prüfung 3 *-------------------------------------------------------*
- *
- *
- *
- *
- *
- *&---------------------------------------------------------------------*
- *& Form DO_CHECK
- *&---------------------------------------------------------------------*
- *
- RAISING resumable(zcx_mvk).
- *
- TRY.
- CASE pi_zahl.
- h_string = 'Meldung Prüfung 1'.
- h_string = 'Prüfung 2 angestoßen'.
- h_string = 'jetzt kommt Prüfung 3'.
- *
- EXPORTING
- textid = zcx_mvk=>msgtext
- h_string = h_string.
- *
- GeSHi ©
Wenn ich es ausführe bekomme ich die erste Meldung als Warning wie es sein soll, aber dann sofort die Ausnahme CX_SY_ILLEGAL_HANDLER, obwohl im Feld ref_exc->is_resumable ein 'X' steht. Laut Dump ist die IF-Abfrage schon der Auslöser. Was mache ich falsch?