Ссылка на таблицу

Yanvladimirovich

Так, вопрос по синтаксису, глупый, но ответ найти не могу.

Если я получил ссылку на таблицу

Code:

STATICS: lt_conditions       LIKE ZKY_CONDITIONS OCCURS 1000000 WITH HEADER LINE.
DATA rf_conditions    LIKE REF TO lt_conditions.

GET REFERENCE OF lt_conditions    INTO rf_conditions.

То как прочитать теперь данные из этой таблицы? HELP подсказывает ->*, но такой код

Цитата:

READ TABLE rf_conditions->*
WITH KEY KSCHL = lr_kf.

"RF_CONDITIONS->*" is neither specified under "TABLES" nor is it defined as an internal table.

abap.develop

Добрый день.
Так не пойдет?

Code:

TYPES : typ_table TYPE TABLE OF ZKY_CONDITIONS.

FIELD-SYMBOLS : <fs_table> TYPE typ_table.

ASSIGN rf_conditions->* TO <fs_table>.
READ TABLE <fs_table> INTO ... WITH KEY KSCHL = ....
.........

Дмитрий

Code:

READ TABLE lt_conditions REFERENCE INTO rf_conditions WITH KEY KSCHL = lr_kf.

Yanvladimirovich

Спасибо!

P.S. Да, а все в курсе, что название этого форума не "abap", а "авар", русскими буквами? Интересно, зачем так сделано.

Yanvladimirovich

Так, стоп. Бред, простите.

Во варианте "REFERENCE INTO" читается ссылка на найденную строчку.
Вариант с <FS_CONDITIONS> не работает.

Code:

"<FS_CONDITIONS>" is neither specified under "TABLES" nor is it defined

abap.develop

А какая задача стоит?

abap.develop

Yanvladimirovich написал(а):

Вариант с <FS_CONDITIONS> не работает.

Подправил свой пост. Сейчас там рабочий вариант.

Кодер

Code:

STATICS: lt_conditions       LIKE ZKY_CONDITIONS OCCURS 1000000 WITH HEADER LINE.
DATA rf_conditions    LIKE REF TO lt_conditions.

field-symbols: <lt_conditions>   type table,
<ls_conditions>    type any.


GET REFERENCE OF lt_conditions    INTO rf_conditions.
ASSIGN rf_conditions->* to <lt_conditions>.
read table <lt_conditions> index 1 assigning <ls_conditions>.

типы указаны обощенные. При желании можно использовать конкретные

Yanvladimirovich

Цитата:

типы указаны обощенные. При желании можно использовать конкретные

На этом - "ZKY_CONDITIONS" and "<FS_CONDITIONS>" are type-incompatible.

Цитата:

А какая задача стоит?

Задача - есть две внутренних таблицы с идентичной структурой. Нужно сделать несколько запросов из первой, если не найдены данные - несколько таких же запросов из второй.

Yanvladimirovich

Хм...

Похоже штука кроется - в "WITH HEADER LINE". Не выйдет создать field symbol на таблицу с header line, вот в этом всё дело.

sy-uname

Yanvladimirovich написал(а):

Хм...

Похоже штука кроется - в "WITH HEADER LINE". Не выйдет создать field symbol на таблицу с header line, вот в этом всё дело.

для таких случаев в ABAP предусмотрено []

Yanvladimirovich

Цитата:

для таких случаев в ABAP предусмотрено []

А пример явно работающего кода - можно?

ghost

может так

Code:

    TYPES: BEGIN OF ts_main,
           idx TYPE sytabix,
           txt TYPE string,
         END OF ts_main,
         tt_main TYPE TABLE OF ts_main.

  DATA: lt_main TYPE tt_main WITH HEADER LINE.

  DATA: lref_t_main LIKE REF TO lt_main[],
        lref_s_smain LIKE REF TO lt_main.

  DO 5 TIMES.
    lt_main-idx = sy-index.
    lt_main-txt = sy-index.
    APPEND lt_main.
  ENDDO.

  GET REFERENCE OF lt_main[] INTO lref_t_main.

  READ TABLE lref_t_main->*
    WITH KEY idx = 1
    REFERENCE INTO lref_s_smain.

  IF  sy-subrc EQ 0
    AND NOT lref_s_smain IS INITIAL.

    WRITE: lref_s_smain->idx,
           lref_s_smain->txt.
  ENDIF.

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

Ссылка на таблицу

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