
DATA gv_char1 TYPE char128 VALUE 'TEST1'.
DATA gv_2 TYPE i.
TRY.
gv_2 = gv_char1. "can be catched
CATCH cx_sy_conversion_no_number .
WRITE: / 'ERROR'.
ENDTRY.
DATA gv_char1 TYPE char128 VALUE 'TEST1'.
DATA gv_2 TYPE i.
TRY.
IF gv_char1 = 0. WRITE: 'is 0'. ENDIF."dumps
CATCH cx_sy_conversion_no_number .
WRITE: / 'ERROR1'.
ENDTRY.
CLASS lcl_app DEFINITION.
PUBLIC SECTION.
DATA gv_char1 TYPE char128 VALUE 'TEST0'.
DATA gv_2 TYPE i.
METHODS test.
ENDCLASS.
CLASS lcl_app IMPLEMENTATION.
METHOD test.
gv_2 = gv_char1.
ENDMETHOD.
ENDCLASS.
TRY.
NEW lcl_app( )->test( )."dumps
CATCH cx_sy_conversion_no_number .
WRITE: / 'ERROR'.
ENDTRY.
CLASS lcl_app DEFINITION.
PUBLIC SECTION.
DATA gv_char1 TYPE char128 VALUE 'TEST0'.
DATA gv_2 TYPE i.
METHODS test2 RAISING cx_sy_conversion_no_number.
ENDCLASS.
CLASS lcl_app IMPLEMENTATION.
METHOD test2.
gv_2 = gv_char1.
ENDMETHOD.
ENDCLASS.
TRY.
NEW lcl_app( )->test2( )."catch
CATCH cx_sy_conversion_no_number .
WRITE: / 'ERROR'.
ENDTRY.
TRY.
CALL FUNCTION 'Z_CONV_NO_NUMBER'.
CATCH cx_sy_conversion_no_number .
WRITE: / 'ERROR1'.
ENDTRY. .
FUNCTION Z_CONV_NO_NUMBER.
*"----------------------------------------------------------------------
*"*"Local Interface:
*"----------------------------------------------------------------------
DATA lv_char1 TYPE char128 VALUE 'TEST1'.
DATA lv_2 TYPE i.
lv_2 = lv_char1.
ENDFUNCTION.
TRY.
PERFORM conv_no_number IN PROGRAM z_conv_no_number.
CATCH cx_sy_conversion_no_number .
WRITE: / 'ERROR1'.
ENDTRY.
REPORT z_conv_no_number.
FORM conv_no_number.
DATA lv_char1 TYPE char128 VALUE 'TEST1'.
DATA lv_2 TYPE i.
lv_2 = lv_char1.
ENDFORM.
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.
User | Count |
---|---|
3 | |
1 | |
1 | |
1 | |
1 | |
1 | |
1 | |
1 |