DATA
: str1
TYPE
c LENGTH
12
VALUE
'zxcv'
,
str2 TYPE c LENGTH 32 ,
str3 TYPE c LENGTH 32 .
CALL FUNCTION 'MD5_CALCULATE_HASH_FOR_CHAR'
EXPORTING
data = str1
length = 0
* VERSION = 1
IMPORTING
hash = str2 .
WRITE : / '原来:' , str1 .
str2 TYPE c LENGTH 32 ,
str3 TYPE c LENGTH 32 .
CALL FUNCTION 'MD5_CALCULATE_HASH_FOR_CHAR'
EXPORTING
data = str1
length = 0
* VERSION = 1
IMPORTING
hash = str2 .
WRITE : / '原来:' , str1 .
WRITE: / '修改:', str2.