Повторяющиеся структуры

Сашок

как прочитать понятно

Code:

  do 32 times varying lgaxx from p0008-LGA01 next p0008-LGA02
     varying betxx from p0008-BET01 next p0008-BET02
     varying anzxx from p0008-ANZ01 next p0008-ANZ02.
     ...  
     enddo.

непонятно как в такую структуру записать, чтобы избавить себя от

Code:

p0008-BET01 = ..
p0008-BET02 = ..

может у кого кусочек кода есть?

sy-uname

Сашок написал(а):

как прочитать понятно

Code:

  do 32 times varying lgaxx from p0008-LGA01 next p0008-LGA02
     varying betxx from p0008-BET01 next p0008-BET02
     varying anzxx from p0008-ANZ01 next p0008-ANZ02.
     ...  
     enddo.

непонятно как в такую структуру записать, чтобы избавить себя от

Code:

p0008-BET01 = ..
p0008-BET02 = ..

может у кого кусочек кода есть?

А что, help полностью прочитать на предмет внимательного изучения конструкции:

Цитата:

DO [n TIMES]
[VARYING dobj FROM dobj1 NEXT dobj2 [RANGE range]].
[statement_block]
ENDDO.

очень сложно?

Сашок

дочитал. поясню.

Code:

LOOP AT G_ATABLE_ITAB INTO G_ATABLE_WA.
 inc = sy-index  - 1.
 ASSIGN s_table_line-addon1 INCREMENT inc TO <faddon> RANGE s_table_line.
 <FADDON>  = G_ATABLE_WA-ADDON.
 ....
endloop.

Таблицу G_ATABLE_ITAB мне надо "развернуть" в s_table_line.
В <FADDON> значение присваивается, но мне надо получить это значение в s_table_line-addon1, а там пусто (. Скажите мне чего я не понимаю.

Сашок

не присваивало значение потому что
в Do: sy-index инкрементитсо
в Loop: sy-index не меняетсо (
Вот так заработало:

Code:

  DATA aline type i.
  aline = 1.
LOOP AT G_ATABLE_ITAB INTO G_ATABLE_WA.
    inc = aline  - 1.
    ASSIGN s_table_line-addon1 INCREMENT inc TO <faddon> RANGE s_table_line.
    <FADDON>  = G_ATABLE_WA-ADDON.
    aline = aline + 1.
ENDLOOP.

Спасибо за ссылку на хелп )

sibrin

Сашок написал(а):

в Loop: sy-index не меняетсо (

Тут меняется sy-tabix.

Правила форума

Повторяющиеся структуры

Кто сейчас на конференции