Advertisement
Guest User

Untitled

a guest
Jan 15th, 2020
133
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
ABAP 0.94 KB | None | 0 0
  1. function zibc_if_log_msg.
  2. *"----------------------------------------------------------------------
  3. *"*"Lokalny interfejs:
  4. *"  TABLES
  5. *"      LOG_TAB TYPE  ZIBC_IF_EDI_SDATA_T
  6. *"----------------------------------------------------------------------
  7.  
  8.   data:
  9.         log type zibc_mm_inv_log,
  10.         log_line type  line of zibc_if_edi_sdata_t,
  11.         lt_log type table of zibc_mm_inv_log,
  12.         lv_guid type guid_22.
  13.  
  14.  
  15.   call function 'GUID_CREATE'
  16.   importing
  17. *           EV_GUID_16       =
  18.       ev_guid_22       = lv_guid
  19. *           EV_GUID_32       =
  20.             .
  21.  
  22.   loop at log_tab into log_line.
  23.  
  24.     log-guid = lv_guid.
  25.     log-segnum = sy-tabix.
  26.     log-name = log_line-name.
  27.     log-sdata = log_line-sdata.
  28.     log-dtint2 = '1000'.
  29.  
  30.     log-uname = sy-uname.
  31.     log-date_crea = sy-datum.
  32.     log-uzeit_crea = sy-uzeit.
  33.  
  34.     append log to lt_log.
  35.   endloop.
  36.  
  37.   insert zibc_mm_inv_log from table lt_log.
  38.  
  39. endfunction.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement