SAP提供了很多随机数生成的函数,可以在SE37中查到。
下面介绍其中三个.
1, CACS_RANDOM_I4
CACS_RANDOM_I4能生成正整数随机数。
DATA g_rnd TYPE int4.
DO 10 TIMES.
CALL FUNCTION 'CACS_RANDOM_I4'
EXPORTING
rnd_min = 0
rnd_max = 35
IMPORTING
rnd_value = g_rnd.
WRITE:/ g_rnd.
ENDDO.
2, QF05_RANDOM_INTEGER
QF05_RANDOM_INTEGER能生成整数的随机数,包括负数。
DATA g_int TYPE int4.
DO 10 TIMES.
CALL FUNCTION 'QF05_RANDOM_INTEGER'
EXPORTING
ran_int_max = 100
ran_int_min = -100
IMPORTING
ran_int = g_int.
WRITE:/ g_int.
ENDDO.
3, QF05_RANDOM
QF05_RANDOM能生成0-1之间的浮点类型的随机数。
DATA g_f TYPE f.
DO 10 TIMES.
CALL FUNCTION 'QF05_RANDOM'
IMPORTING
ran_number = g_f.
WRITE:/ g_f.
ENDDO.
以上。