REPORT YDELAY.
* This program delays n seconds
* In newer versions the function module
* enque_sleep can do the job as well

DATA: TIM LIKE SY-UZEIT, N TYPE I VALUE 30.

TIM = SY-UZEIT.
TIM = TIM + N.
DO.
  GET TIME.
  IF TIM