ZBlog学习笔记

  DATA: lv_random_string TYPE string,
        lv_char_pool     TYPE string,
        lv_random_index  TYPE i,
        lv_counter       TYPE i.

  " 字符池：A-Z, 0-9, 特殊符号
  lv_char_pool = 'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789!@#$%^&*()_+-=[]{}|;:,.<>?'.

  CLEAR lv_random_string.
  DO 8 TIMES.
    CALL FUNCTION 'QF05_RANDOM_INTEGER'
      EXPORTING
        ran_int_max = strlen( lv_char_pool ) - 1
        ran_int_min = 0
      IMPORTING
        ran_int     = lv_random_index.

    lv_random_string = lv_random_string && lv_char_pool+lv_random_index(1).
  ENDDO.

  WRITE: / '随机字符串：', lv_random_string.