Index: APPS/EDI/common/impl/LegacyConverter/LegacyNaarEdi.cls.xml
===================================================================
diff -u -r39068 -r39192
--- APPS/EDI/common/impl/LegacyConverter/LegacyNaarEdi.cls.xml (.../LegacyNaarEdi.cls.xml) (revision 39068)
+++ APPS/EDI/common/impl/LegacyConverter/LegacyNaarEdi.cls.xml (.../LegacyNaarEdi.cls.xml) (revision 39192)
@@ -23,7 +23,7 @@
1
-
+
%String
1
@@ -56,12 +56,9 @@
Do ..ConvertCorpusWandDikte(Product,TBXProduct)
Do ..ConvertLadeType(Product,TBXProduct)
Do ..ConvertMat(Product,TBXProduct)
-
- /*Do ..ConvertDesignEnKleuren(Product,TBXProduct)
-
Do ..ConvertGreepEnMeenemer(Product,TBXProduct)
+ Do ..ConvertVerlaagdeRug(Product,TBXProduct)
Do ..ConvertUitsparingen(Product,TBXProduct)
- Do ..ConvertVerlaagdeRug(Product,TBXProduct)*/
Quit TBXProduct
]]>
@@ -165,7 +162,7 @@
@@ -191,7 +188,7 @@
Set TBXProduct.HeeftMat = $$$True
}
If Product.ItemASM = "G" {
- Set TBXProduct.MatKleur = ##class(DOM.PM.enu.MATKleur).ParelGrijs()
+ Set TBXProduct.MatKleur = ##class(DOM.PM.enu.MATKleur).Antraciet()
Set TBXProduct.MatMateriaal = ##class(DOM.PM.enu.MATMateriaal).Antislip()
Set TBXProduct.HeeftMat = $$$True
}
@@ -203,6 +200,58 @@
]]>
+
+
+1
+
+
+
+
+
+1
+
+
+
+
+
+1
+
+
+
1
TECH.ObjectUtils.ObjectConvertData
@@ -237,7 +286,7 @@
Set ..Klasse = arKenm("TBKlasse")
Set ..LadeType = arKenm("TBLadeType")
Set ..Zijkant = arKenm("TBZijwand")
- Set ..Rughoogte = arKenm("TBRugHoogte")
+ Set ..Ladehoogte = arKenm("TBRugHoogte")
]]>