SAP 产生随机数函数

函数:QF05_RANDOM_INTEGER


DATA:v_ranresult LIKE qf00-ran_int.
DATA:v_small LIKE qf00-ran_int VALUE 1.
DATA:v_larg LIKE qf00-ran_int VALUE '190'.
CLEAR v_ranresult.
DO 3 TIMES.
  CALL FUNCTION 'QF05_RANDOM_INTEGER'
    EXPORTING
      ran_int_max   = v_larg
      ran_int_min   = v_small
    IMPORTING
      ran_int       = v_ranresult
    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.
ENDDO.
WRITE:/ 'The Number is = ' , v_ranresult. `

“生成1~190在内的随机

「点点赞赏,手留余香」

    还没有人赞赏,快来当第一个赞赏的人吧!
2 条回复 A 作者 M 管理员
  1. 这个不是真随机,是基于系统日期和时间算的一个随机数,还是一个伪随机。真随机数发生器(TRNGs)使用物理方法来生成数字(如大气噪声),而伪随机数发生器(PRNGs)则是利用数学算法来生成数字(完全由电脑生成的)。

欢迎您,新朋友,感谢参与互动!欢迎您 {{author}},您在本站有{{commentsCount}}条评论