ABAP创建MD5签名加密

原创已于 2026-01-23 09:46:32 修改 · 911 阅读

本内容遵循CC 4.0 BY-SA版权协议

于 2023-05-16 10:24:59 首次发布

该代码段定义了一个名为FUNCTIONZJR_GETFBT_SIGN的本地接口，用于根据输入的JSON数据和时间戳生成签名。它首先检查系统Mandt字段的值，然后使用MD5算法对特定格式的字符串（包含时间戳、JSON数据和签名密钥）进行加密，生成签名。签名的计算涉及到字符串连接和调用CALCULATE_HASH_FOR_CHAR函数来计算MD5哈希。

FUNCTION ZJR_GETFBT_SIGN.
*"----------------------------------------------------------------------
*"*"本地接口：
*" IMPORTING
*" VALUE(I_JSONDATA) TYPE STRING
*" VALUE(I_TIMESTAMP) TYPE STRING
*" EXPORTING
*" REFERENCE(E_SIGN) TYPE STRING
*"----------------------------------------------------------------------
DATA STRINGA TYPE STRING.
DATA STRINGAX TYPE HASH160.
DATA LV_TSTMP1 TYPE P.
DATA LV_TSTMP2 TYPE P.
DATA LV_SECS TYPE TIMESTAMP.
DATA:I_SIGNKEY TYPE STRING."企业开通后提供的sign_key
IF SY-MANDT = '310' OR SY-MANDT = '200' OR SY-MANDT = '400'.
I_SIGNKEY = ''."企业开通后提供的sign_key(分贝通提提供的)
ELSE.
I_SIGNKEY = ''."企业开通后提供的sign_key(分贝通提提供的)
ENDIF.

" MD5 的加密算法（规则）
"String signStr = StrUtils.formatString("timestamp={0}&data={1}&sign_key={2}", timestamp, jsonData, signKey);

STRINGA = 'timestamp=' && I_TIMESTAMP && '&data=' && I_JSONDATA && '&sign_key=' && I_SIGNKEY.
CALL FUNCTION 'CALCULATE_HASH_FOR_CHAR'
EXPORTING
ALG = 'MD5'
DATA = STRINGA
* LENGTH = 500
IMPORTING
HASH = STRINGAX
* HASHLEN =
* HASHX =
* HASHXLEN =
* HASHSTRING =
* HASHXSTRING =
* HASHB64STRING =
EXCEPTIONS
UNKNOWN_ALG = 1
PARAM_ERROR = 2
INTERNAL_ERROR = 3
OTHERS = 4.
IF SY-SUBRC = 0.
E_SIGN = STRINGAX.
ENDIF.