便携计算器

 1  DATA: x_value(15) TYPE c.
 2 
 3 CALL FUNCTION 'FITRV_CALCULATOR'
 4 * EXPORTING
 5 *   INPUT_VALUE                = p_i
 6 *   CURRENCY                   =
 7 *   START_COLUMN               = '10'
 8 *   START_ROW                  = '10'
 9   IMPORTING
10     output_value               = x_value
11   EXCEPTIONS
12     invalid_input              = 1
13     calculation_canceled       = 2
14     OTHERS                     = 3.
15 
16 IF sy-subrc = 0.
17   WRITE:/ 'Output Value ', x_value.
18 ENDIF.