DATA: cl_random TYPE REF TO cl_random_number,
m 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:'/'.