Untitled

mail@pastecode.io avatarunknown
plain_text
2 months ago
245 B
3
Indexable
Never
CALL FUNCTION 'QF05_RANDOM_INTEGER'
  EXPORTING
    ran_int_max = 1
    ran_int_min = 100
  IMPORTING
    ran_int = data(lv_random)
  EXCEPTIONS
    invalid_input = 1
    OTHERS = 2.

write : 'Rastgele üretilen sayı : ' ,lv_random.