abap
-
ABAP判断字串是不是为数字
通过abap函数NUMERIC_CHECK判断字符串是否为数字
12345678910111213141516171819202122232425262728判断字串是否为数字并输出补零FM：NUMERIC_CHECK两种输出结果：NUMC 、CHARL_SAKNR = I_FICHERO-LINEA+L_POS(10).CALL FUNCTION 'NUMERIC_CHECK'EXPORTINGSTRING_IN = L_SAKNRIMPORTINGHTYPE = 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. -
给内表中的行生成有规律不重复的唯一编号
123456789101112131415161718DATA ZKEY_TMP(25) TYPE C. "数据库表唯一主键DATA ZKEY(25) TYPE C. "数据库表唯一主键DATA ZCOUNT(6) TYPE N. "6位流水号ZKEY = ''."ZKEY = 工号(5) + 当前日期和时间(14) + 6位流水号CONCATENATE SY-UNAME SY-DATUM SY-UZEIT INTO ZKEY_TMP .LOOP AT GT_SNAPSHOT.ZCOUNT = ZCOUNT + 1.CONCATENATE ZKEY_TMP ZCOUNT INTO ZKEY.GT_SNAPSHOT-ZKEY = ZKEY.modify GT_SNAPSHOT.CLEAR GT_SNAPSHOT .ENDLOOP.REFRESH GT_SNAPSHOT[].ZCOUNT = ''. -
ABAP Tips and Tricks
ABAP Tips and Tricks Retrieving the deleted program I recently deleted a custom program (w…
