Index: vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter/ConverteerProduct/Test.cls.xml
===================================================================
diff -u -r35905 -r35912
--- vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter/ConverteerProduct/Test.cls.xml (.../Test.cls.xml) (revision 35905)
+++ vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter/ConverteerProduct/Test.cls.xml (.../Test.cls.xml) (revision 35912)
@@ -80,8 +80,9 @@
Set TeConverterenProduct.ZijwandVerhogingType = ##class(DOM.PM.enu.TBXZijwandVerhogingType).InschuifElement()
Set TeConverterenProduct.GeleiderTechnologie = ##class(DOM.PM.enu.TBXGeleiderTechnologie).TIPONBLUMOTION()
Set TeConverterenProduct.HeeftMat = $$$True
- Set TeConverterenProduct.MatKleur = ##class(DOM.PM.enu.TBXAntislipmat).Zwart()
+ Set TeConverterenProduct.MatKleur = ##class(DOM.PM.enu.MATKleur).Antraciet()
Set TeConverterenProduct.LadeKleur = ##class(DOM.PM.enu.TBXZijkantKleur).BZ()
+ Set TeConverterenProduct.LadeHoogte = ##class(DOM.PM.enu.TBXZijkantHoogte).M()
#dim ProductConverter = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.ProductConverter).%New()
#dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.Convert(TeConverterenProduct)
@@ -96,7 +97,7 @@
Do $$$AssertEquals(WebOrderLijn.ItemFB,"D")
Do $$$AssertEquals(WebOrderLijn.ItemBX,"INSCHF")
Do $$$AssertEquals(WebOrderLijn.ItemBM,"TOB")
- Do $$$AssertEquals(WebOrderLijn.ItemASM,"Z")
+ Do $$$AssertEquals(WebOrderLijn.ItemASM,"G")
Do $$$AssertEquals(WebOrderLijn.ItemKL,"BZ")
]]>
@@ -358,12 +359,12 @@
@@ -407,6 +408,7 @@
Set TeConverterenProduct.HeeftGreepEnMeenemer = $$$False
Set TeConverterenProduct.IsBinnenlade = $$$False
Set TeConverterenProduct.LadeKleur = ##class(DOM.PM.enu.TBXZijkantKleur).MG()
+ Set TeConverterenProduct.LadeHoogte = ##class(DOM.PM.enu.TBXZijkantHoogte).K()
Quit TeConverterenProduct
]]>
Index: APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter.cls.xml
===================================================================
diff -u -r35905 -r35912
--- APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter.cls.xml (.../ProductConverter.cls.xml) (revision 35905)
+++ APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter.cls.xml (.../ProductConverter.cls.xml) (revision 35912)
@@ -156,7 +156,12 @@
1
-
@@ -186,8 +191,9 @@
Do ConvertData.Add("HeeftZijstabilisering","ItemSB")
Do ConvertData.Add("VerpakkingType","ItemVPK")
Do ConvertData.Add("GeleiderTechnologie","ItemBM", "Set Output = $Select(Input = ""B"" : ""I"", 1:Input)")
- Do ConvertData.Add("LadeKleur","ItemKL", "Set Output = $Select(Input = ""TS"" : ""BZ"", 1:Input)")
+ Do ConvertData.Add("LadeKleur","ItemKL", "Set Output = $Select(Input = ""TS"" : ""BZ"", 1:Input)")
+
Quit ConvertData
]]>