CALL FUNCTION 'QF05_RANDOM_INTEGER'
EXPORTING
RAN_INT_MAX = 100
RAN_INT_MIN = 1
IMPORTING
RAN_INT = number
EXCEPTIONS
INVALID_INPUT = 1
OTHERS = 2 .
IF sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ps:
使用此 Function Module 所产生的 第一个数字 !!! 在同一时间段内是不变的 !?
所以, 使用时, 去掉第一个数字, 从第二个数字开始正常使用 ^^!
P.S. 另一个 Random Function 'RANDOM_AMOUNT'(货币) 也存在同样的问题.