Index: APPS/EDI/common/impl/LegacyConverter/LegacyNaarEdi.cls.xml
===================================================================
diff -u -r39033 -r39067
--- APPS/EDI/common/impl/LegacyConverter/LegacyNaarEdi.cls.xml (.../LegacyNaarEdi.cls.xml) (revision 39033)
+++ APPS/EDI/common/impl/LegacyConverter/LegacyNaarEdi.cls.xml (.../LegacyNaarEdi.cls.xml) (revision 39067)
@@ -18,7 +18,7 @@
1
-
+
%String
1
@@ -56,12 +56,11 @@
Do ..ConvertInschuifElement(Product,TBXProduct)
Do ..ConvertCorpusWandDikte(Product,TBXProduct)
Do ..ConvertLadeType(Product,TBXProduct)
+ Do ..ConvertMat(Product,TBXProduct)
/*Do ..ConvertDesignEnKleuren(Product,TBXProduct)
Do ..ConvertGreepEnMeenemer(Product,TBXProduct)
- Do ..ConvertMat(Product,TBXProduct)
- Do ..ConvertLadeCodeKenmerken(Product,TBXProduct)
Do ..ConvertUitsparingen(Product,TBXProduct)
Do ..ConvertVerlaagdeRug(Product,TBXProduct)*/
@@ -169,9 +168,42 @@
Set TBXProduct.Type = "TBX"
Set TBXProduct.RugHoogte = ..Rughoogte
Set TBXProduct.IsBinnenlade = (..LadeType = "B")
+ Set TBXProduct.ZijkantHoogte = ..Zijkant
]]>
+
+
+1
+
+
+
1
TECH.ObjectUtils.ObjectConvertData
@@ -205,7 +237,7 @@
Set ..Klasse = arKenm("TBKlasse")
Set ..LadeType = arKenm("TBLadeType")
- Set ..Zijwand = arKenm("TBZijwand")
+ Set ..Zijkant = arKenm("TBZijwand")
Set ..Rughoogte = arKenm("TBRugHoogte")
]]>