sap 判断字串是不是为数字

判断字串是否为数字并输出补零

　　FM：NUMERIC_CHECK

　　两种输出结果：NUMC 、CHAR

　　L_SAKNR = I_FICHERO-LINEA+L_POS(10).

　　CALL FUNCTION 'NUMERIC_CHECK'

　　EXPORTING

　　STRING_IN = L_SAKNR

　　IMPORTING

　　HTYPE     = L_TIPO.

　　IF L_SAKNR > '0000000000' AND L_SAKNR <= '9999999999'

　　AND L_TIPO = 'NUMC'.

　　V_SAKNR = L_SAKNR.

　　补获系统异常方法：

　　REPORT  ZSDR014.
DATA:A TYPE I,
     B TYPE C LENGTH 20,
     ERROR TYPE REF TO CX_ROOT,
     MESSAGE TYPE STRING.
B = '8.050'.

TRY .
    A = B.
    MESSAGE '无异常情况' TYPE 'E'.
  CATCH CX_SY_CONVERSION_NO_NUMBER INTO ERROR.

MESSAGE = ERROR->GET_LONGTEXT( ).
 MESSAGE MESSAGE TYPE 'E'.
ENDTRY.