Compute Programm erzeugt DUMP

Compute Programm erzeugt DUMP

Einen schönen guten Tag.

hab mich gerade hier im Forum angemeldet. Bin selber gerade in
einer Fortbildung zu ABAP Entwickler und wäre gerade sehr dankbar darüber
wenn mir jemand bei meinem Code eine Hilfestellung geben könnte.

Es handelt sich um ein einfaches Rechnerprogramm.
Vermieden werden soll lediglich das man nicht durch null teilen darf und im
Feld pa_op kein anderes Zeichen als die anderen Operanten angegeben werden.
Setze ich im feld pa int2 die zahl auf null bekomme ich das message Feld angezeigt- bestätigt man das Feld
wird danach ein Dump ausgelöst. weiss irgend jemand warum?

Ich hoffe mein Code ist nicht zu trivial.. bin noch ganz am Anfang.
Über Hilfe wäre ich dankbar.

Hier der Code.
*******************************************************************************

PARAMETERS pa_int1 TYPE i.
PARAMETERS pa_op TYPE c LENGTH 1.
PARAMETERS pa_int2 TYPE i.

DATA gv_result TYPE p LENGTH 16 DECIMALS 2.

IF pa_op = '/' and pa_int2 = 0.
MESSAGE 'nicht durch null teilbar' TYPE 'I'.
ENDIF.

CASE pa_op.
WHEN '+'.
gv_result = pa_int1 + pa_int2.
WHEN '-'.
gv_result = pa_int1 - pa_int2.
WHEN '*'.
gv_result = pa_int1 * pa_int2.
WHEN '/'.
gv_result = pa_int1 / pa_int2.
WHEN OTHERS.
MESSAGE 'Falscher Operant' TYPE 'I'.
ENDCASE.

WRITE gv_result.

Re: Compute Programm erzeugt DUMP

manchmal sieht man den wald vor lauter bäumen nicht.
Vielen dank!