документация к REUSE_ALV_GRID*

author

Чтобы fieldcatalog сформировался по внутр таблице, нужно чтобы поля были типизированы через LIKE, а не TYPE

Eugene

READ TABLE lct_fieldcat INTO ls_fcat WITH KEY fieldname = 'Z_NAM_PP'.
IF sy-subrc EQ 0.
ls_fcat-seltext_l = 'Номер по порядку'. " long key word
ls_fcat-seltext_m = 'Номер по порядку'. " middle key word
ls_fcat-seltext_s = '№ п/п'. " short key word
APPEND ls_fcat TO lct_fieldcat.
ENDIF.

У вас что 2 номера по порядку?

flipper

возможно каталог полей пуст...
а таблица как описана? ФМ REUSE_ALV_FIELDCATALOG_MERGE будет работать если она описана так:

Code:

DATA :
       BEGIN OF itab OCCURS 0,
        .. LIKE ..,
       END OF itab
     .

Mike1

В itab надо type на like заменить.
И еще один подводный камень, начиная с 4,7 если исходник имеет длину больше 72 знаков REUSE_ALV_FIELDCATALOG_MERGE падает в дамп.
А в остальном Сергей Королев как всегда прав.

Eugene

не знаю я и явно типы задавал
TYPE I или TYPE С например и
структуры добавлял INCLUDE STRUCTURE

работает

flipper

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

не знаю я и явно типы задавал
TYPE I или TYPE С например и
структуры добавлял INCLUDE STRUCTURE

работает

да все верно
TYPE работает если это предопределенный тип АБАПа(I,C,...)
INCLUDE STRUCTURE - если структура из словаря

author

Чтобы fieldcatalog сформировался по внутр таблице, нужно чтобы поля были типизированы через LIKE, а не TYPE

Eugene

вот теперь согласен с flipper

Он

а зачем вы i_structure_name = 'ZMM_110_01' пишете?

AnnaEremenko

author и flipper, спасибо за LIKE, в понедельник попробую. Хотя программист из МСК, который приезжал нам помогать, сказал, что LIKE - отмирающий оператор... А мне он нравится

Eugene, нет это длинное, среднее и короткое название для поля Z_NAM_PP.

Он, в примерчике, который я выложила на форуме, эта строка закомментирована, поскольку я пытаюсь использовать филдкаталог. В реальной же жизни я филдкаталог комментирую (поскольку с ним у меня нифига не выходит), а использую внешнюю структурку (из словаря), которую создала сама.

John Doe

Попробуйте в коде заменить append на modify с нужным идексом.

Code:

CLEAR ls_fcat.
  READ TABLE lct_fieldcat INTO ls_fcat WITH KEY fieldname = 'Z_NAM_PP'.
  IF sy-subrc EQ 0.
    ls_fcat-seltext_l = 'Номер по порядку'. " long key word
    ls_fcat-seltext_m = 'Номер по порядку'. " middle key word
    ls_fcat-seltext_s = '№ п/п'.            " short key word
    APPEND ls_fcat TO lct_fieldcat.
  ENDIF. 

А то кажется append добавит вам уже существующую строку с fieldname 'Z_NAM_PP' в конец внутренней таблицы lct_fieldcat.

:oops:

to Eugene: извиняюсь пропустил ваш коммент

AnnaEremenko

Я не могу сейчас выложить весь код, но в процедуре я таблицу филдкаталога обнуляю, т.е. делаю REFRESH. Поэтому повторение мне не грозит. А даже если бы и так, то я прыгала бы от счастья, т.к. она вообще не заполняется

John Doe

Вы делает вызов функции 'REUSE_ALV_FIELDCATALOG_MERGE' с параметром i_internal_tabname = 'ITAB' для построения филдкаталога и у вас объявлена внутрення структура ITAB.
Но вызов следующей функции 'REUSE_ALV_GRID_DISPLAY' у вас также происходит с параметром t_outtab = itab[], что не верно, так как должна быть указана внутренняя таблица, а не внутрення структура.
Поясню:

Code:

 DATA: begin of itab,
                     .....,
                     end of itab.  "объявлена внутренняя структура

но

Code:

 DATA itab like itab occurs 0 with header line. "объявление внутренней таблицы

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

AnnaEremenko

а в хелпе написано, что объявление вот таким макаром делает внутреннюю таблицу:

Code:

DATA: BEGIN OF itab OCCURS 10,
        z_num_pp(4),
        z_matnr   LIKE eban-matnr,
        z_maktx   LIKE makt-maktx,
        z_mseht   LIKE t006a-mseht,
        z_preis   LIKE eban-preis,
        z_menng   LIKE eban-bsmng,
        z_gswrt   LIKE eban-zzgswrt,
        z_lfdat(8),
        z_banfn   LIKE eban-banfn,
        z_bnfpo   LIKE eban-bnfpo,
        z_werks   LIKE eban-werks,
        z_lgort   LIKE eban-lgort,
        z_prim(10),
      END OF itab.

т.е. у меня изначально таблица, а не структура.
Вот сейчас проверяю все с LIKE. Попозже скажу результат

AnnaEremenko

Первое: мои глубочайшие извинения перед Eugene и John Doe. Вы были правы, а я слепа как пень. Действительно, получается по два поля из-за этого APPEND'а. :oops:

Мне очень стыдно. Из-за проблем с фидкаталогом просто не обращала внимание на что-то другое.
Второе: с LIKE РАБОТАЕТ!Я ИДИЁТ, УБЕЙТЕ МИНЯ КТО-НИБУДЬ! Спасибо!Спасибо!Спасибо!Спасибо!

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

документация к REUSE_ALV_GRID*

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