Skip to content

Latest commit

 

History

History
84 lines (65 loc) · 1.78 KB

File metadata and controls

84 lines (65 loc) · 1.78 KB

update, delete

DATA:

      gt_book TYPE STANDARD TABLE OF z18fai_book,
      gs_book TYPE z18fai_book.



*-----------------------------------*
* MAIN LOGIC

* 1. UPDATE záznamu v db tabulce
UPDATE z18fai_book
  SET title = 'title hodnota'
      author = 'author hodnota'
  WHERE isbn = 12.

IF sy-subrc = 0.
  WRITE: / 'update OK'.
ELSE.
  WRITE: / 'něco se pokazilo'.
ENDIF.

* 2. UPDATE pomocí struktury
" připravit jednotlivé hodnoty
gs_book-isbn = 14.
gs_book-title = 'title gs'.
gs_book-author = 'author gs'.
gs_book-genre = 'drama'.

" provést UPDATE
UPDATE z18fai_book FROM gs_book.

IF sy-subrc = 0.
  WRITE: / 'update gs OK'.
ELSE.
  WRITE: / 'gs - něco se pokazilo'.
ENDIF.

* 3. UPDATE Z INTERNÍ TABULKY (běkolik záznamů najednou
" deklarace interní tabulky gt_book + strukturu gs_book
" pokud bychom měli záznamy v interní tabulce -> vyklírovat
CLEAR gt_book.

" připravit záznamy
gs_book-isbn = 1.
gs_book-title = 'title gt1'.
gs_book-author = 'author gt1'.
gs_book-genre = 'drama'.
APPEND gs_book TO gt_book.    " vložení záznamu do intermí tabulky!!!

gs_book-isbn = 2.
gs_book-title = 'title gt2'.
gs_book-author = 'author gt2'.
gs_book-genre = 'drama'.
APPEND gs_book TO gt_book.

gs_book-isbn = 3.
gs_book-title = 'title gt3'.
gs_book-author = 'author gt3'.
gs_book-genre = 'drama'.
APPEND gs_book TO gt_book.

" aktualizace záznamů
UPDATE z18fai_book FROM TABLE gt_book.

*====================================================
* DELETE
" 1. DELETE - preferovaný způsob - pomocí podmínky

DELETE FROM z18fai_book WHERE isbn = 251.
IF sy-subrc = 0.
  WRITE: / 'Záznam byl úspěšné smazán.'.
ENDIF.

" 2. DELETE ze struktury - NEDOPORUČUJE SE, NEVÍM PŘESNĚ, CO MAŽEME

" vyklírovat strukturu
CLEAR gs_book.
gs_book-isbn = 3.
DELETE z18fai_book FROM gs_book.