SAP中数字计算时溢出捕获详解编程语言

 1 CLEAR:g_vol. 
 2   CATCH SYSTEM-EXCEPTIONS arithmetic_errors = 4 
 3                                    OTHERS = 8. 
 4     g_vol = gwa_input-laeng * gwa_input-breit * gwa_input-hoehe. 
 5  
 6     g_vol = g_vol / 1000. 
 7   ENDCATCH. 
 8   IF sy-subrc <> 0. 
 9     p_subrc = 1. 
10     p_msg = '金额溢出'. 
11     RETURN. 
12   ENDIF.