mirror of
https://github.com/abapGit/abapGit.git
synced 2025-05-02 13:03:01 +08:00
Deserializing of textpool
This commit delivers the fixes and fine-tuning to the deserializing of textpools for a program.
This commit is contained in:
parent
1e8257420c
commit
b4f2912a04
|
@ -203,25 +203,19 @@ CLASS lcl_object_prog IMPLEMENTATION.
|
|||
ENDMETHOD. "serialize_texts
|
||||
|
||||
METHOD deserialize_texts.
|
||||
DATA:
|
||||
lt_tpool_i18n TYPE tt_tpool_i18n,
|
||||
ls_tpool_i18n LIKE LINE OF lt_tpool_i18n,
|
||||
lt_langs_i18n TYPE STANDARD TABLE OF langu.
|
||||
|
||||
FIELD-SYMBOLS: <lang> LIKE LINE OF lt_langs_i18n.
|
||||
|
||||
io_xml->read( EXPORTING iv_name = 'I18N_LANGS'
|
||||
CHANGING cg_data = lt_langs_i18n ).
|
||||
DATA lt_tpool_i18n TYPE tt_tpool_i18n.
|
||||
FIELD-SYMBOLS <tpool> LIKE LINE OF lt_tpool_i18n.
|
||||
|
||||
io_xml->read( EXPORTING iv_name = 'I18N_TPOOL'
|
||||
CHANGING cg_data = lt_tpool_i18n ).
|
||||
|
||||
LOOP AT lt_langs_i18n ASSIGNING <lang>.
|
||||
READ TABLE lt_tpool_i18n INTO ls_tpool_i18n WITH KEY langu = <lang>.
|
||||
LOOP AT lt_tpool_i18n ASSIGNING <tpool>.
|
||||
deserialize_textpool( iv_program = ms_item-obj_name
|
||||
iv_language = <lang>
|
||||
it_tpool = ls_tpool_i18n-textpool ).
|
||||
iv_language = <tpool>-langu
|
||||
it_tpool = <tpool>-textpool ).
|
||||
ENDLOOP.
|
||||
|
||||
ENDMETHOD. "deserialize_texts
|
||||
|
||||
ENDCLASS. "lcl_object_prog IMPLEMENTATION
|
||||
|
|
|
@ -1426,8 +1426,7 @@ CLASS lcl_objects_program IMPLEMENTATION.
|
|||
|
||||
INSERT TEXTPOOL iv_program
|
||||
FROM it_tpool
|
||||
LANGUAGE lv_language
|
||||
STATE 'I'.
|
||||
LANGUAGE lv_language.
|
||||
IF sy-subrc <> 0.
|
||||
lcx_exception=>raise( 'error from INSERT TEXTPOOL' ).
|
||||
ENDIF.
|
||||
|
|
Loading…
Reference in New Issue
Block a user