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.