ABAP生成随机数

  DATAcl_random TYPE REF TO cl_random_number,
      TYPE i.
  CREATE OBJECT cl_random.
  CALL METHOD cl_random->if_random_number~init  .

  CALL METHOD cl_random->if_random_number~get_random_int
    EXPORTING
      i_limit  9999999
    RECEIVING
      r_random m.
  WRITE m.
  write:'/'.

posted on 2012-03-02 09:06  魏绰  阅读(2131)  评论(0编辑  收藏  举报

导航