Всем доброго время суток!

Задача следующая: есть таблица TYPE ANY TABLE, нужно передать эту таблицу в память чтобы потом считать при выполнении другой программы.

Что пробовал:
1. Делать через IMPORT/EXPORT. Не получается, т.к. при импорте надо знать тип данных который мы импортируем;
2. Добавлять передачу в памяти филдкаталога, чтобы при IMPORT сначала импортировать филдкаталог, затем создавать create_dynamic_table. Не получилось в связи с тем, что неправильно обрабатываются flat structure поля при формировании филдкаталога;
3. Создал класс Shared Memory. Реализацию смотрел здесь http://pavelgk.pbworks.com/f/shared_memory_abap.pdf. Там есть на 6ой странице сохранение данных во внутреннюю ссылку dref. То есть это возможно. Всё бы хорошо, да только там пример для полностью типизированной ссылки. А при объявлении ссылки TYPE REF TO DATA, при CREATE DATA надо ещё указывать тип. Типа в словаре данных естественно нет. А если я указываю тип через LIKE, тогда он падает в дамп "Тип \TYPE=%_T00003S00000155O0000006324 на данный момент не может быть создан в памяти совместно используемых объектов." Аналогичный дамп и при использовании созданного типа через generic types. Т.е. Shared Memory должна быть полностью инкапсулирована и не использовать никаких внешних ссылок. А как тогда задать типизацию?

В общем, я думаю SHM самый правильный путь, и вроде я где-то близко.. Но пока безуспешно.

Резюмируя пост можно сформулировать мой вопрос одним предложением: как передать через Shared Memory объект типа TYPE ANY TABLE?

parameters: pi_tbl(5) type c obligatory. "The table name - input from the user. can be jibberish.

data: gr_tabref type ref to data.
field-symbols:<gfs_tab> type any table.

form create_dynamic_gr_tabref .
data: lo_struct type ref to cl_abap_structdescr,
lo_tabref type ref to cl_abap_tabledescr.
lo_struct ?= cl_abap_typedescr=>describe_by_name( pi_tbl ).
try.
call method cl_abap_tabledescr=>create
exporting
p_line_type = lo_struct
receiving
p_result = lo_tabref
.
catch cx_sy_table_creation .
message 'Couldn''t create the table description. Quitting' type 'E'.
endtry.
create data gr_tabref type handle lo_tabref.

assign gr_tabref->* to <gfs_tab>.

select * from (pi_tbl) into table <gfs_tab> up to 200 rows.
data: lv_memory_id(30) type c.
lv_memory_id = 'MYMEMORYID'.

export itab from <gfs_tab> to memory id lv_memory_id.

endform. " CREATE_DYNAMIC_GR_TABREF

Helper, вы не совсем поняли вопрос.
Как создать ссылку на таблицу, приассайнить её к fs и экспортировать в память я понимаю.
Вопрос в другом.
Как таблицу произвольного типа (не сгенерированную на основе типа из АВАР словаря, а именно произвольную, т.е. я заранее не знаю какой набор полей эта таблица будет содержать) передать в память, а потом считать оттуда?

если я правильно понял вопрос, то вместо памяти может быть и таблица с кластерными полями, например INDX ?
тогда напрашивается пара переменных, одна для содержимого другая для структуры.

Попробуйте сериализовать вашу переменную в xml, передать xml с типом xstring, а потом десериализовать обратно.
Сериализация:

Десериализация:

Ничего не мешает сделать
lo_struct ?= cl_abap_typedescr=>describe_by_name( <YOUR_TABLE_OR_STRU> ).
где <YOUR_TABLE_OR_STRU> - ваша табл или структура.

Добрый день.

Смотрите в сторону EXPORT .. to data buffer.
Передать туда можете 1 - дескрипшен вашей таблицы
2 - саму таблицу
Правда, в Вашем случае, можете обойтись и без передачи, дескрипшена, я думаю.

P.S. Хотя нет, прогнал. Если у Вас действительно динамическая таблица, то дескрипшен, конечно, нужен, чтобы таблицу создать.

Уточнение: сколько аппл. серверов в системе? Почти все предлагаемые методы будут работать только в случае запуска на одном аппл. сервере.

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

При работе в рамках одной программы предлагаемые методы и будут выполняться на одном сервере приложений. Если не использовать параллельный запуск ФМ и фоновые задания.

??? вроде работаетИли речь о том, что 2-я программа не знает, с таблицей какого типа она работает? Что Вы тогда собираетесь делать с таблицей во 2-й программе?

Всем спасибо.
Реализовал просто через EXPORT/IMPORT передавая fieldcatalog и саму таблицу.
В программе отправителе: формирую филдкаталог, делаю экспорт в память таблицы с данными и филдкаталога.
В программе получателе: сначала читаю из памяти филдкаталог, затем создаю динамический тип, затем читаю из памяти таблицу данных.

А вот у меня так не получается((
Говорит что TYPE MISSMATCH , хотя и там и там таблица по 64 поля

Код приведите.

Рассматривал эту тему очень подробно: на основе отчетов моделирования амортизации, а именно пытался передавать в память динамическую таблицу из отчета RASIMU02.

По итогу помог только Shared Memory Object (SHMA) и элементы RTTS.
В сам класс обертку я передавал объект типа Type Ref To DATA, а не саму таблицу (точнее FS на нее).

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

Обычный импорт/экспорт Вам не поможет, если рассмотрите их принципы более подробно поймете почему