Динамическое обращение к полям внутр.таблицы

Pavel.Lozhka

Здравствуйте ,

Меня интересует вопрос можно ли организовать цыкл по полям внутренней таблицы заранее не зная по какому полю ставить ограничение .

Примерно так :

do 3 times.
$1 = sy-index.
loop at it_tab where level($1) = $var.
"""
endloop.
enddo.

и так пробежатся по полю level1 , level2 , level3 ???

holocron

Pavel.Lozhka написал(а):

Здравствуйте ,

Меня интересует вопрос можно ли организовать цыкл по полям внутренней таблицы заранее не зная по какому полю ставить ограничение .

Примерно так :

do 3 times.
$1 = sy-index.
loop at it_tab where level($1) = $var.
"""
endloop.
enddo.

и так пробежатся по полю level1 , level2 , level3 ???

посмотри help на assign

РМщик

возможно поможет этот пример

Code:

REPORT ZTEST.

DATA: BEGIN OF ITAB OCCURS 0,
        LEVEL1(10),
        LEVEL2(10),
        LEVEL3(10),
      END OF ITAB,
      TABIX TYPE I,
      FNAME(15).
FIELD-SYMBOLS: <F> LIKE ITAB-LEVEL1.


ITAB-LEVEL1 = 'Один'.
ITAB-LEVEL2 = 'Два'.
ITAB-LEVEL3 = 'Три'.
APPEND ITAB.

TABIX = 0.

DO 3 TIMES.
  TABIX = TABIX + 1.
  LOOP AT ITAB.
    FNAME = TABIX.
    CONDENSE: FNAME.
    CONCATENATE 'ITAB-LEVEL' FNAME INTO FNAME.
    ASSIGN (FNAME) TO <F>.
    WRITE:/ <F>.
  ENDLOOP.
ENDDO.

sy-uname

Pavel.Lozhka написал(а):

Здравствуйте ,

Меня интересует вопрос можно ли организовать цыкл по полям внутренней таблицы заранее не зная по какому полю ставить ограничение .

Примерно так :

do 3 times.
$1 = sy-index.
loop at it_tab where level($1) = $var.
"""
endloop.
enddo.

и так пробежатся по полю level1 , level2 , level3 ???

Так сложно нажать F1?
Where для внутренних таблиц не поддерживает динамическое задание ограничений.
Как вариант:
loop at tab into wa.
fname = 'wa-level01'.
assign (fname) to <fs>.
check <fs> eq var.
...
endloop.

И пользуйтесь поиском.

Pavel.Lozhka

sy-uname написал(а):

Pavel.Lozhka написал(а):

Здравствуйте ,

Меня интересует вопрос можно ли организовать цыкл по полям внутренней таблицы заранее не зная по какому полю ставить ограничение .

Примерно так :

do 3 times.
$1 = sy-index.
loop at it_tab where level($1) = $var.
"""
endloop.
enddo.

и так пробежатся по полю level1 , level2 , level3 ???

Так сложно нажать F1?
Where для внутренних таблиц не поддерживает динамическое задание ограничений.
Как вариант:
loop at tab into wa.
fname = 'wa-level01'.
assign (fname) to <fs>.
check <fs> eq var.
...
endloop.

И пользуйтесь поиском.

Спасибо всем,
Открыли глаза .

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

Динамическое обращение к полям внутр.таблицы

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