Интерпретация параметра extensionin extensionout при вызове BAPI

Osm

Коллеги, покажите пример корректной работы с дополнительными полями при вызовах BAPI.
Например есть такой BAPI - BAPI_FIXEDASSET_GETLIST, у него на выходе таблица EXTENSIONOUT.
После вызова эта таблица означивается так: в одном поле имя структуры, а в других содержимое виде 4-х текстовых полей по 240 символов в каждом.
Как мне эти данные нормально в программе привести к нужному типу (по имени структуры)?
Ну и в обратную сторону - если мне надо вызвать аналогичный bapi с таким входным параметром, то как этот параметр построить?

Удав

Так посмотрите в коде этого ФМ - там достаточно ясный код.

Code:

         IF NOT v_reqtabx-extensionout IS INITIAL AND
            gd_return IS INITIAL.
* <<<<<<<<<<<<<<< Begin of insertion note 756334 >>>>>>>>>>>>>>>>>>>>>>
*          Kontante fќr Lфnge eines Byte im System
*          (Unicode <> Non-Unicode)
            CLASS cl_abap_char_utilities DEFINITION LOAD.
            CONSTANTS:
              lc_byte TYPE i VALUE cl_abap_char_utilities=>charsize.
            DATA:
              ld_offset_anlu  TYPE i VALUE 250.
            FIELD-SYMBOLS:
              <lfs_anlu>      TYPE x,
              <lfs_extension> TYPE x.
* <<<<<<<<<<<<<<<< End of insertion note 756334 >>>>>>>>>>>>>>>>>>>>>>>
            MOVE-CORRESPONDING lt_anlaz TO ls_bapi_anlu.
            MOVE lt_anlaz-bukrs TO  ls_bapi_anlu-comp_code.
            MOVE lt_anlaz-anln1 TO  ls_bapi_anlu-assetmaino.
            MOVE lt_anlaz-anln2 TO  ls_bapi_anlu-assetsubno.
* <<<<<<<<<<<<<<< Begin of change note 756334 >>>>>>>>>>>>>>>>>>>>>>>>>>
            DESCRIBE FIELD ut_extenout-structure LENGTH ld_offset_anlu
                     IN CHARACTER MODE. "Unicode
            ld_offset_anlu = ld_offset_anlu * lc_byte.
*           Wegen Unicode und Strukturerw.:
*           Hex-Feldsymbole! (RAW, Packed Dec etc)
            ASSIGN ls_bapi_anlu TO <lfs_anlu>       CASTING.
            ASSIGN ut_extenout  TO <lfs_extension>  CASTING.
            MOVE <lfs_anlu>     TO <lfs_extension>+ld_offset_anlu.
* <<<<<<<<<<<<<<<<<< End of change note 756334 >>>>>>>>>>>>>>>>>>>>>>>>>
            MOVE 'BAPI_TE_ANLU' TO  ut_extenout-structure.
            APPEND ut_extenout.
         ENDIF.

Osm

спасибо.

PK

Удав написал(а):

Code:

MOVE <lfs_anlu> TO <lfs_extension>+ld_offset_anlu. ENDIF.

А на этот момент разве ругаться не будет? Была какая-то ошибка связанная с юникодом и присваиванием со смещением?

__Gennady

Будет ругаться при наличии чисел\количеств.
Лучше сразу использовать cl_abap_container_utilities=>FILL_CONTAINER_C, cl_abap_container_utilities=>read_container_c

Osm

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

Будет ругаться при наличии чисел\количеств.
Лучше сразу использовать cl_abap_container_utilities=>FILL_CONTAINER_C, cl_abap_container_utilities=>read_container_c

+1
я так и сделал

Удав

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

Будет ругаться при наличии чисел\количеств.

Не будет. Field-symbol типа x :wink:

__Gennady

Удав написал(а):

Не будет. Field-symbol типа x :wink:

Согласен, не будет... весь код не прочитал...

PK

Удав написал(а):

Не будет. Field-symbol типа x :wink:

Я тоже не обратил внимания

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

Интерпретация параметра extensionin extensionout при вызове BAPI

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