Привет.
Подскажите, пожалуйста, возможно ли подсовывать сетке (cl_gui_alv_grid) данные в виде таблицы объектов (type table of ref to Object), а не структур. Если возможно, то каким образом нужно построить описатель полей (lvc_t_fcat)?
В качестве примера простой класс _Data с одним числовым (type i) полем filed.
Цитата:
class _Data definition.
public section.
data field type i.
methods:
constructor importing _field type i.
class-methods:
getFieldCatalog returning value(result) type lvc_t_fcat.
endclass.
class _Data implementation.
* Конструктор
method constructor.
field = _field.
endmethod.
* Получить описатель для сетки
method getFieldCatalog.
data field type lvc_s_fcat.
field-fieldname = 'field'. "видимо так делать некорректно
field-inttype = 'I'.
field-outputlen = '3'.
field-coltext = 'Поле'.
field-seltext = 'Поле'.
append field to result.
endmethod.
endclass.
Ну и собственно заполнение сетки:
Цитата:
data:
_data type ref to _Data,
_datas type table of ref to _Data.
create object _data exporting _field = 0.
append _data to _datas.
create object _data exporting _field = 1.
append _data to _datas.
data catalog type lvc_t_fcat.
call method _Data=>getFieldCatalog receiving result = catalog.
call method grid->set_table_for_first_display
changing
it_outtab = _datas
it_fieldcatalog = catalog.
В итоге прерывание внутри сетки при чтении описания:
Цитата:
000350 ***********************************************************************
000360 * find out the component numbers and names
000370 ***********************************************************************
000380 assign local copy of initial line of it_data to <l_workarea>.
> l_struc_descr ?= cl_abap_typedescr=>describe_by_data( <l_workarea> ).
Ни в документации, ни на форумах решения не нашел. Как-то вцелом реализация ООП в ABAP/4 расстраивает.
Заранее благодарен за ответы.
Вход
Регистрация
FAQ пользователя
Поиск
