|
Catching division by 0 error! |
|
|
|
|
Written by Kevin Wilson
|
|
Wednesday, 30 May 2007 |
Yes, you can catch a division by zero error... How???
DATA: result TYPE p DECIMALS 2,
number TYPE i VALUE 9.
CATCH SYSTEM-EXCEPTIONS arithmetic_errors = 5.
DO.
number = number - 1.
result = 1 / number.
WRITE: / number, result.
ENDDO.
ENDCATCH.
SKIP.
IF sy-subrc = 5.
WRITE / 'Division by zero!'.
ENDIF.
Related Items:
|
