*&---------------------------------------------------------------------*
*& Report Z14_10
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT Z14_10.


PARAMETERS : p_a TYPE i,
             p_b TYPE i.

CLASS lcl_calculator DEFINITION.
  PUBLIC SECTION.
    METHODS: div_numbers IMPORTING a TYPE i b TYPE i
                           RETURNING VALUE(result) TYPE i
                           RAISING cx_sy_zerodivide.

ENDCLASS.

CLASS lcl_calculator IMPLEMENTATION.
  METHOD div_numbers.
    IF b = 0.
      RAISE EXCEPTION TYPE cx_sy_zerodivide.

    ENDIF.

    result = a / b.
  ENDMETHOD.
ENDCLASS.

START-OF-SELECTION.
  DATA: lo_calculator TYPE REF TO lcl_calculator.

  CREATE OBJECT lo_calculator.

  TRY.
      DATA(gv_result) = lo_calculator->div_numbers( a = p_a b = p_b ).

      WRITE: / 'Result:', gv_result.

    CATCH cx_sy_zerodivide INTO DATA(lx_exception).
      WRITE: / '0으로 나눌수 없습니다.'.

  ENDTRY.