Listing 7.16  ZPTB00_OBJ_BTA_MARK_AS_BOOKED  Geschftsvorflle als gebucht markieren
FUNCTION zptb00_obj_bta_mark_as_booked.
*"----------------------------------------------------
*"*"Lokale Schnittstelle:
*"       IMPORTING
*"             REFERENCE(I_TAB_BTA) TYPE  
*"               ZPTB00_TTY_BTA
*"       EXCEPTIONS
*"              FAILED
*"----------------------------------------------------
  FIELD-SYMBOLS:
    <l_str_bta> TYPE zptb00_str_bta.

  LOOP AT i_tab_bta ASSIGNING <l_str_bta>.
    UPDATE zptb00_btaheader SET booked = '2'
    WHERE id = <l_str_bta>-id.
  ENDLOOP.

ENDFUNCTION.