Динамические структуры

Igor Moskvin

Вот встал вопрос, необходимо создать отчет/ALV Grid, в который в зависимости от данных селективного экрана динамическое число столбцов, т.е. отчет за 2 месяца - 2 столбца, за год - 12 столбцов и т.д. Конечное число стобцов неизвестно. Как проще организовать структуру для хранения таких данных?

EHOT

ну самое простое это создать структуру с максимально возможным числом столбцов

Ich Will

В зависмости от того скока месяцев передали формировать филд каталог

ВН

Ich Will написал:

В зависмости от того скока месяцев передали формировать филд каталог

наиболее верный вариант

Igor Moskvin

Ich Will написал:

В зависмости от того скока месяцев передали формировать филд каталог

Филд каталог формировать не проблема, но вот вот как прописать, откуда брать данные для столбцов ALV Grid'а? В field_cat все равно надо указывать поле структуры

Igor Moskvin

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

ну самое простое это создать структуру с максимально возможным числом столбцов

Это чего, описать полей этак 120 что-ли?

А красивее как-то можно?

111

Igor Moskvin написал:

Это чего, описать полей этак 120 что-ли? :)
А красивее как-то можно?

Если действительно количество стобцов неизвестно, то можно попробовать (сам я не пробовал) использовать CL_ABAP_STRUCTDESCR (как раз я тему поднимал недавно), и с помощью него формировать динамический тип.
Хотя, конечно, это довольно извратно получится.

slash

Igor Moskvin написал:

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

ну самое простое это создать структуру с максимально возможным числом столбцов

Это чего, описать полей этак 120 что-ли?

А красивее как-то можно?

можно в лупе инкрементить к-нить переменную и составлять из неё имя поля.

Сергей Королев

Igor Moskvin написал:

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

ну самое простое это создать структуру с максимально возможным числом столбцов

Это чего, описать полей этак 120 что-ли?

А красивее как-то можно?

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

Stenj_90

Динамическое создание внутренних таблиц:
CALL METHOD cl_alv_table_create=>create_dynamic_table
EXPORTING it_fieldcatalog = lt_fieldcat
IMPORTING ep_table = gt_outtab.

Code:

*
* Копирайт не мой, благодарности автору отдельно :) !!! Но для примера более чем достаточно:
*
REPORT ZZZ1 .
data: lt_fieldcat type LVC_T_FCAT,
      gt_outtab   type ref to data,
      gf_line     type ref to data,
      fcat_line   like line of lt_fieldcat
.
field-symbols: <tab> type table,
               <line>,
               <field>.

refresh lt_fieldcat.

clear fcat_line.
fcat_line-FIELDNAME = 'FIRST'.
fcat_line-OUTPUTLEN = 10.
fcat_line-INTTYPE = 'C'.
append fcat_line to lt_fieldcat.

clear fcat_line.
fcat_line-FIELDNAME = 'SECOND'.
fcat_line-OUTPUTLEN = 20.
fcat_line-INTTYPE = 'C'.
append fcat_line to lt_fieldcat.

CALL METHOD cl_alv_table_create=>create_dynamic_table
           EXPORTING it_fieldcatalog = lt_fieldcat
           IMPORTING ep_table        = gt_outtab.

ASSIGN gt_outtab->* TO <tab>.
create data gf_line like line of <tab>.
ASSIGN gf_line->* TO <line>.

assign component 'FIRST'  of structure <line> to <field>.
<field> = 'ОДЫН'.
assign component 'SECOND' of structure <line> to <field>.
<field> = 'ДВА'.
append <line> to <tab>.

assign component 'FIRST'  of structure <line> to <field>.
<field> = 'ЫЩО ОДЫН'.
assign component 'SECOND' of structure <line> to <field>.
<field> = 'ИЩО ДВА'.
append <line> to <tab>.

loop at <tab> assigning <line>.
  write / <line>.
endloop. 

akag

TYPE-POOLS
: slis
.
DATA
: longrow(1023) TYPE c
, sum TYPE dmbtr
, l TYPE i
, i TYPE i
, n(3) TYPE n
, fcat TYPE slis_t_fieldcat_alv WITH HEADER LINE
, fnam TYPE slis_fieldname
.
FIELD-SYMBOLS
: <f> TYPE dmbtr
.
DESCRIBE FIELD sum LENGTH l.
DO 12 TIMES.
i = ( sy-index - 1 ) * l.
sum = sy-index.
n = sy-index.
ASSIGN longrow+i(l) TO <f> CASTING.
<f> = sum.
CLEAR fcat.
CONCATENATE 'SUM' n INTO fnam.
fcat-fieldname = fnam.
* Как нибудь заполнить fcat
APPEND fcat.
ENDDO.

111

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

Динамическое создание внутренних таблиц:
CALL METHOD cl_alv_table_create=>create_dynamic_table
EXPORTING it_fieldcatalog = lt_fieldcat
IMPORTING ep_table = gt_outtab.

А кто-нибудь смотрел, как реализован этот шедевр?
Через generate subroutine pool :-)

.

Igor Moskvin

Забавно, сейчас что-нидь попробую :idea:

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

Динамические структуры

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