Многоразовое использование одного FIELD-SYMBOLS для разных типов

Razum

Добрый день.
Подскажите, можно ли использовать FIELD-SYMBOLS несколько раз в программе, присваивая ему разные типы данных?

Code:

 
data:
  i_mk type string,
  i_mkpf like mkpf.

FIELD-SYMBOLS <imk> TYPE ANY.
...
CONCATENATE 'I_MKPF-' columns-pole into i_mk.
...
ASSIGN (i_mk) TO <imk>.
CHECK <imk> IS ASSIGNED.
...
UNASSIGN <imk>.

i_mk = I_MKPF-BUDAT при 1-ом проходе
при втором проходе
i_mk = I_MKPF-LGORT
и при попытке присвоить это значение, ничего не происходит, sy-subrc = 4.

Почему не происходит переприсвоение и как в данном случае работает оператор UNASSIGN.

zsap

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

Добрый день.
Подскажите, можно ли использовать FIELD-SYMBOLS несколько раз в программе, присваивая ему разные типы данных?

Можно, UNASSIGN не требуется

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

Почему не происходит переприсвоение и как в данном случае работает оператор UNASSIGN.

Потому что в MKPF нет поля LGORT, оно в MSEG

Razum

здесь я немного ошибся, у меня идет проверка сначала в таблице MKPF, а затем в MSEG. Я заранее не знаю какое поле мне необходимо проверять, если BUDAT, то в MKPF, иначе все остальные мне нужные в MSEG.
Если вы говорите можно, то как это сделать, ведь когда я присвоил i_mk = I_MKPF-BUDAT символ <i_mk> стал типа дата, когда я присваиваю ему значение I_MKPF-LGORT присваинвание не происходит, ибо тип не соответствует.

LAT

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

здесь я немного ошибся, у меня идет проверка сначала в таблице MKPF, а затем в MSEG. Я заранее не знаю какое поле мне необходимо проверять, если BUDAT, то в MKPF, иначе все остальные мне нужные в MSEG.
Если вы говорите можно, то как это сделать, ведь когда я присвоил i_mk = I_MKPF-BUDAT символ <i_mk> стал типа дата, когда я присваиваю ему значение I_MKPF-LGORT присваинвание не происходит, ибо тип не соответствует.

"когда я присваиваю ему значение I_MKPF-LGORT присваинвание не происходит, ибо" этого не достаточно, чтобы в I_MKPF like mkpf добавилось поле LGORT.

LinevskiySV

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

Code:

 
FIELD-SYMBOLS <imk> TYPE ANY.
...
CONCATENATE 'I_MKPF-' columns-pole into i_mk.
...
ASSIGN (i_mk) TO <imk>.
CHECK <imk> IS ASSIGNED.
...
UNASSIGN <imk>.

Я тоже по началу так эссайнил значение какого-то поля структуры, но есть более удобная и правильная запись:

Code:

Assign component columns-pole of structure _ваша структура_ into <imk>.

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

"когда я присваиваю ему значение I_MKPF-LGORT присваинвание не происходит, ибо" этого не достаточно, чтобы в I_MKPF like mkpf добавилось поле LGORT.

Razum

помогите разобраться
определил тип

Code:

TYPES: begin of all_tabs,
        budat LIKE mkpf-budat,
        include type mseg,
       end of all_tabs.

field-symbols: <fs1> type all_tabs.
data: dref1 type ref to data.

create data dref1 type all_tabs.
assign dref1->* to <fs1>.

дальше не получается
код
Assign component columns-pole of structure all_tabs to <fs1>.
здесь не подходит.
как ему дать понять что я хочу взять таблицу I_MKPF и columns-pole не понимаю, посоветуйте.

Konstantin Anikeev

Code:

Assign component (pole) of structure all_tabs to <fs1>

LAT

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

помогите разобраться

Code:

TYPES: begin of all_tabs,
        budat LIKE mkpf-budat,
        include type mseg,
       end of all_tabs.

Таким образом создается тип, содержащий поля budat и include соответствующих типов. Если создать переменную такого типа, в отладчике это хорошо видно. Чтобы просто включить все поля mseg в all_tabs (я так подозреваю, Вы именно этого добиваетесь), нужно:

Code:

TYPES: BEGIN OF all_tabs,
        budat TYPE mkpf-budat.
        INCLUDE TYPE mseg.
TYPES: END OF all_tabs.

Razum

ребята, а как я ему объясню чтонадо братьс таблицы i_mkpf, выборку из которой я делаю ранее?

Code:

select single * from mkpf into i_mkpf where mblnr = result-mblnr and mjahr = result-mjahr.

и если я пишу

Code:

Assign component (pole) of structure all_tabs to <fs1>

то он ругается на all_tabs, что нет такого поля all_tabs

LAT

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

и если я пишу

Code:

Assign component (pole) of structure all_tabs to <fs1>

то он ругается на all_tabs, что нет такого поля all_tabs

Code:

DATA: a TYPE all_tabs.
FIELD-SYMBOLS: <fs> TYPE any.

DATA: name TYPE string VALUE 'LGORT'.         " регистр важен!
ASSIGN COMPONENT name of structure a to <fs>.

Или же делайте assign, как Вы планировали в своем 1-м посте.

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

Многоразовое использование одного FIELD-SYMBOLS для разных типов

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