From e1e06b3b70a407bdcfcd75ee5dc5be278ac36292 Mon Sep 17 00:00:00 2001
From: larshp <larshp@hotmail.com>
Date: Sat, 8 Oct 2016 08:41:06 +0000
Subject: [PATCH] DTEL   TABL: clear additional fields

---
 src/zabapgit_object_dtel.prog.abap | 12 ++++++++++++
 src/zabapgit_object_tabl.prog.abap |  1 +
 2 files changed, 13 insertions(+)

diff --git a/src/zabapgit_object_dtel.prog.abap b/src/zabapgit_object_dtel.prog.abap
index 59fea7d48..37bd08de5 100644
--- a/src/zabapgit_object_dtel.prog.abap
+++ b/src/zabapgit_object_dtel.prog.abap
@@ -127,6 +127,18 @@ CLASS lcl_object_dtel IMPLEMENTATION.
            ls_dd04v-as4date,
            ls_dd04v-as4time.
 
+    IF ls_dd04v-refkind = 'D'.
+* clear values inherited from domain
+      CLEAR: ls_dd04v-datatype,
+             ls_dd04v-leng,
+             ls_dd04v-decimals,
+             ls_dd04v-outputlen,
+             ls_dd04v-lowercase,
+             ls_dd04v-signflag,
+             ls_dd04v-convexit,
+             ls_dd04v-entitytab.
+    ENDIF.
+
     io_xml->add( iv_name = 'DD04V'
                  ig_data = ls_dd04v ).
     io_xml->add( iv_name = 'TPARA'
diff --git a/src/zabapgit_object_tabl.prog.abap b/src/zabapgit_object_tabl.prog.abap
index 9ae20dbc9..fa6928d44 100644
--- a/src/zabapgit_object_tabl.prog.abap
+++ b/src/zabapgit_object_tabl.prog.abap
@@ -201,6 +201,7 @@ CLASS lcl_object_tabl IMPLEMENTATION.
           <ls_dd03p>-leng,
           <ls_dd03p>-outputlen,
           <ls_dd03p>-deffdname,
+          <ls_dd03p>-convexit,
           <ls_dd03p>-entitytab,
           <ls_dd03p>-dommaster,
           <ls_dd03p>-domname3l.