Display log message

    data: lv_rfcdest type ssm_rfc-rfcdest,
          mssg_ret_ls type mssg_ret,
          mssg_ret_lt type standard table of mssg_ret
...
    select single paramval into lv_rfcdest from zconstex where paramid eq 'L01_ERP'. "L01CLNT100"
...
    call function 'Z_LAGER_AU' destination lv_rfcdest
    tables
      ie_outpo = it_outpo.
 
    loop at it_outpo into hl_outpo.
      mssg_ret_ls-msgid = 'Z_S'.
      mssg_ret_ls-msgno = '024'.
      mssg_ret_ls-msgty = 'E'.
      mssg_ret_ls-msgv1 = hl_outpo-transmeans_id.
      append mssg_ret_ls TO mssg_ret_lt.
      delete jitodiaco_ct where outpo eq hl_outpo-transmeans_id.
      delete jitodiait_ct where outpo eq hl_outpo-transmeans_id.
    endloop.
    call function 'JIT03_SHOW_APPLICATION_LOG'
    exporting
      text_iv     = 'Message'
      title_iv    = 'Please read carefully'
    tables
      messages_it = mssg_ret_lt
    exceptions
      system_error = 1
      others       = 2.