Среда выполнения SAP ABAP: создайте универсальный тип по имени таблицы, затем добавьте столбец в созданный универсальный тип
Я пытаюсь написать класс, который может принимать имя таблицы, добавлять пару дополнительных столбцов для целей приема данных, а затем создавать CSV. У меня он работает для таблицы, отправляя имя таблицы в качестве параметра:
" Get the data dictionary object for the table
table_type ?= cl_abap_typedescr=>describe_by_name( table ).
" Create a table description object with the line type
table_descr = cl_abap_tabledescr=>create( p_line_type = table_type ).
" Declare the internal table using the generic type
create data gt_data type handle table_descr.
Этот общий код возвращает меня домой, чтобы затем создать вызов SQL через cl_sql_statement и заполнить объект gt_data. Мой вопрос:
Могу ли я добавить столбец к универсальному типу? Я хотел добавить столбец временной метки перед объектом, когда я извлек данные из системы.
Я также могу запускать запросы с JOIN, где мне может понадобиться одно поле из другой таблицы, которое не обрабатывает общий тип, поэтому мне может потребоваться добавить один дополнительный столбец. Как это может быть сделано?
Ответы 1
Ты уже довольно близок к решению.
Использование классов RTTS.
В вашей системе ABAP есть пример, который делает то, что вы ищете.
См. ABAP demo_create_data_via_handleДокумент также охватывает этот процесс.
Вот фрагмент из программы.
METHOD main.
DATA: struct_type TYPE REF TO cl_abap_structdescr,
dref TYPE REF TO data,
oref TYPE REF TO cx_sy_struct_creation.
DATA column1 TYPE c LENGTH 30.
DATA column2 TYPE c LENGTH 30.
FIELD-SYMBOLS: <struc> TYPE any,
<comp1> TYPE any,
<comp2> TYPE any.
cl_demo_input=>add_field( CHANGING field = column1 ).
cl_demo_input=>add_field( CHANGING field = column2 ).
cl_demo_input=>request( ).
column1 = to_upper( column1 ).
column2 = to_upper( column2 ).
TRY.
struct_type = cl_abap_structdescr=>get(
VALUE #(
( name = column1 type = cl_abap_elemdescr=>get_c( 40 ) )
( name = column2 type = cl_abap_elemdescr=>get_i( ) )
)
).
CREATE DATA dref TYPE HANDLE struct_type.
CATCH cx_sy_struct_creation INTO oref.
cl_demo_output=>display( oref->get_text( ) ).
RETURN.
ENDTRY.
ASSIGN dref->* TO <struc>.
ASSIGN COMPONENT column1 OF STRUCTURE <struc> TO <comp1>.
<comp1> = 'Amount'.
ASSIGN dref->* TO <struc>.
ASSIGN COMPONENT column2 OF STRUCTURE <struc> TO <comp2>.
<comp2> = 11.
cl_demo_output=>display( |{ column1 WIDTH = 32 } { <comp1> }\n| &
|{ column2 WIDTH = 32 } { <comp2> }| ).
ENDMETHOD.
Вы можете использовать метод
CREATE_DYNAMIC_TABLEклассаCL_ALV_TABLE_CREATE. Он берет каталог полей и создает для вас справочник данных.