*--------------------------------------------------------------------
*类CL_RANDOM_NUMBER(生成随机数)
*--------------------------------------------------------------------
DATA: LO_RANDOM TYPE REF TO CL_RANDOM_NUMBER.
DATA: M TYPE I.
CREATE OBJECT LO_RANDOM.
CALL METHOD LO_RANDOM->IF_RANDOM_NUMBER~INIT ."初始化
CALL METHOD LO_RANDOM->IF_RANDOM_NUMBER~GET_RANDOM_INT"生成INT类型的随机数
EXPORTING
I_LIMIT = 9999 "随机数峰值
RECEIVING
R_RANDOM = M.
WRITE M.
WRITE:'/'.
ABAP-CL_RANDOM_NUMBER(生成随机数)
猜你喜欢
转载自blog.csdn.net/Sundam/article/details/88815799
今日推荐
周排行