mirror of
https://github.com/abap2xlsx/abap2xlsx.git
synced 2025-05-05 05:04:11 +08:00
Fix issue #119
git-svn-id: https://subversion.assembla.com/svn/abap2xlsx/trunk@223 b7d68dce-7c3c-4a99-8ce0-9ea847f5d049
This commit is contained in:
parent
358ecc4dc9
commit
f4107fa169
|
@ -322,6 +322,7 @@ endmethod.</source>
|
|||
lo_elemdescr TYPE REF TO cl_abap_elemdescr,
|
||||
lt_dfies TYPE ddfields,
|
||||
ls_dfies TYPE dfies,
|
||||
lv_sytabix TYPE sytabix,
|
||||
ls_fieldcatalog TYPE zexcel_s_fieldcatalog,
|
||||
lt_components TYPE abap_component_tab,
|
||||
ls_component LIKE LINE OF lt_components.
|
||||
|
@ -343,6 +344,7 @@ endmethod.</source>
|
|||
"if structure is not DDIC check components
|
||||
lt_components = lo_structdescr->get_components( ).
|
||||
LOOP AT lt_components INTO ls_component.
|
||||
lv_sytabix = sy-tabix.
|
||||
CLEAR ls_fieldcatalog.
|
||||
lo_elemdescr ?= ls_component-type.
|
||||
"component is DDIC
|
||||
|
@ -356,7 +358,7 @@ endmethod.</source>
|
|||
ls_fieldcatalog-dynpfld = abap_true.
|
||||
ls_fieldcatalog-scrtext_m = ls_component-name.
|
||||
ENDIF.
|
||||
ls_fieldcatalog-position = sy-tabix. " Fix issue #119
|
||||
ls_fieldcatalog-position = lv_sytabix.
|
||||
APPEND ls_fieldcatalog TO ep_fieldcatalog.
|
||||
ENDLOOP.
|
||||
ENDIF.
|
||||
|
|
Loading…
Reference in New Issue
Block a user