ENQU: clear fields #1110

This commit is contained in:
Domi Bigl 2018-08-30 20:39:43 +02:00 committed by Lars Hvam
parent 491cb6d1e7
commit 1a6f3623b3

View File

@ -157,6 +157,7 @@ CLASS ZCL_ABAPGIT_OBJECT_ENQU IMPLEMENTATION.
lt_dd26e TYPE TABLE OF dd26e,
lt_dd27p TYPE TABLE OF dd27p.
FIELD-SYMBOLS: <ls_dd27p> LIKE LINE OF lt_dd27p.
lv_name = ms_item-obj_name.
@ -184,6 +185,22 @@ CLASS ZCL_ABAPGIT_OBJECT_ENQU IMPLEMENTATION.
ls_dd25v-as4date,
ls_dd25v-as4time.
LOOP AT lt_dd27p ASSIGNING <ls_dd27p>.
"taken from table
CLEAR <ls_dd27p>-headlen.
CLEAR <ls_dd27p>-scrlen1.
CLEAR <ls_dd27p>-scrlen2.
CLEAR <ls_dd27p>-scrlen3.
CLEAR <ls_dd27p>-intlen.
CLEAR <ls_dd27p>-outputlen.
CLEAR <ls_dd27p>-flength.
CLEAR <ls_dd27p>-ddtext.
CLEAR <ls_dd27p>-reptext.
CLEAR <ls_dd27p>-scrtext_s.
CLEAR <ls_dd27p>-scrtext_m.
CLEAR <ls_dd27p>-scrtext_l.
ENDLOOP.
io_xml->add( iv_name = 'DD25V'
ig_data = ls_dd25v ).
io_xml->add( ig_data = lt_dd26e