Index: APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductValidator.cls.xml
===================================================================
diff -u -r35893 -r35921
--- APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductValidator.cls.xml (.../ProductValidator.cls.xml) (revision 35893)
+++ APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductValidator.cls.xml (.../ProductValidator.cls.xml) (revision 35921)
@@ -49,8 +49,9 @@
Set ..GreepEnMeenemerValidator = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.Validator.GreepEnMeenemerValidator).%New(..Product)
Set ..InschuifElementValidator = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.Validator.InschuifElementValidator).%New(..Product)
Set ..MatValidator = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.Validator.MatValidator).%New(..Product)
+ Set ..DwarsverdelingValidator = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.Validator.DwarsverdelingValidator).%New(..Product)
- Quit ..CorpusWandDikteValidator.IsValid() && ..OpvullijstValidator.IsValid() && ..FrontOndersteuningValidator.IsValid() && ..GreepEnMeenemerValidator.IsValid() && ..InschuifElementValidator.IsValid() && ..MatValidator.IsValid()
+ Quit ..CorpusWandDikteValidator.IsValid() && ..OpvullijstValidator.IsValid() && ..FrontOndersteuningValidator.IsValid() && ..GreepEnMeenemerValidator.IsValid() && ..InschuifElementValidator.IsValid() && ..MatValidator.IsValid() && ..DwarsverdelingValidator.IsValid()
]]>
Index: APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter.cls.xml
===================================================================
diff -u -r35920 -r35921
--- APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter.cls.xml (.../ProductConverter.cls.xml) (revision 35920)
+++ APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter.cls.xml (.../ProductConverter.cls.xml) (revision 35921)
@@ -47,6 +47,7 @@
Do ..ConvertInschuifElement(Product,WebOrderLijn)
Do ..ConvertMat(Product,WebOrderLijn)
Do ..ConvertLadeCodeKenmerken(Product,WebOrderLijn)
+ Do ..ConvertDwarsverdelingen(Product,WebOrderLijn)
Quit WebOrderLijn
]]>
@@ -171,6 +172,18 @@
]]>
+
+
+1
+
+
+
1
TECH.ObjectUtils.ObjectConvertData
@@ -180,7 +193,6 @@
Do ConvertData.Add("BodemKleur","ItemKB")
Do ConvertData.Add("CorpusBreedte","ItemCB")
Do ConvertData.Add("FrontBevestiging","ItemFB")
- Do ConvertData.Add("Dwarsverdeling","ItemDWV")
Do ConvertData.Add("ZijwandVerhogingType","ItemBX", "Set Output = $Case(Input, ""Reling"":""ER"", """":""ZR"", ""Zonder"":""ZR"", ""InschuifElement"":""INSCHF"", :Input)")
Do ConvertData.Add("Draagkracht","ItemDK")
Do ConvertData.Add("HeeftZijstabilisering","ItemSB")
Index: vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter/ConverteerProduct/Test.cls.xml
===================================================================
diff -u -r35920 -r35921
--- vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter/ConverteerProduct/Test.cls.xml (.../Test.cls.xml) (revision 35920)
+++ vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter/ConverteerProduct/Test.cls.xml (.../Test.cls.xml) (revision 35921)
@@ -68,7 +68,8 @@
#dim TeConverterenProduct = ..GeefTeConverterenProduct()
Set TeConverterenProduct.BodemKleur = ##class(DOM.PM.enu.TBXZijkantKleur).WI()
Set TeConverterenProduct.LadeDiepte = "400"
- Set TeConverterenProduct.Dwarsverdeling = ##class(DOM.PM.enu.TBXDwarsverdeling).Een()
+ Set TeConverterenProduct.HeeftDwarsverdeling = $$$True
+ Set TeConverterenProduct.AantalDwarsverdelingen = ##class(DOM.PM.enu.TBXDwarsverdeling).Een()
Set TeConverterenProduct.Draagkracht = ##class(DOM.PM.enu.TBXDraagkracht).Draagkracht50()
Set TeConverterenProduct.HeeftZijstabilisering = $$$False
Set TeConverterenProduct.VerpakkingType = ##class(DOM.PM.enu.TBXVerpakking).StukMetOnderdelen()
@@ -367,12 +368,39 @@
]]>
+
+
+
+
+
+
+
+
+
+
+TECH.RegisteredObject,TECH.Validator.Validator
+
+
+APPS.EDI.common.dto.v001.LadeTBX
+1
+
+
+
+Product:APPS.EDI.common.dto.v001.LadeTBX
+1
+%Status
+
+
+
+
+%Boolean
+
+
+
+
+
+
Index: vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/DwarsverdelingValidator/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/DwarsverdelingValidator/Test.cls.xml (revision 0)
+++ vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/DwarsverdelingValidator/Test.cls.xml (revision 35921)
@@ -0,0 +1,54 @@
+
+
+
+vhUnitTest.TestCase
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+