*&---------------------------------------------------------------------*
*& Report  ZGL156C4
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
REPORT  ZGL156C4.


*DO  10 TIMES.
*  if sy-index = 4.
*  continue.
*  endif.
*  write: / 'hello', sy-index.
*  if sy-index = 7.
*    exit.
*  endif.
*ENDDO.




* continue sari la conditia din loop
* exit iesi din loop


* sy-index salveaza iteratia ( a cata oara esti in bucla )

* parametrul se citeste. se introduce valoarea de la tastatura
*PARAMETERS p_varsta TYPE i.
*
*
*
*
*WHILE p_varsta < 20.
*    write: / 'Varsta este de ', p_varsta.
*    ADD 1 TO p_varsta.
*ENDWHILE.

TYPES:  BEGIN OF ty_st_tab,
  cheie TYPE c length 3,
  valoare TYPE i,
END OF ty_st_tab.

TYPES:  ty_tb_tab TYPE STANDARD TABLE OF ty_st_tab.

DATA: gt_tab TYPE ty_tb_tab,
      gs_tab TYPE ty_st_tab.


gs_tab-cheie = 'ACA'.
gs_tab-valoare = 9.
APPEND gs_tab TO gt_tab.



gs_tab-cheie = 'AAA'.
gs_tab-valoare = 3.
APPEND gs_tab TO gt_tab.


gs_tab-cheie = 'EEA'.
gs_tab-valoare = 5.
APPEND gs_tab TO gt_tab.

gs_tab-cheie = 'LAS'.
gs_tab-valoare = 5.
INSERT gs_tab INTO gt_tab INDEX 1.


LOOP AT gt_tab INTO gs_tab.


  if gs_tab-cheie = 'BBB'.
    gs_tab-valoare = 10.
    MODIFY gt_tab FROM gs_tab.
  endif.

  WRITE: / gs_tab-cheie,
  gs_tab-valoare,
  sy-tabix.
ENDLOOP.