Index: vhTest/Utils/APPS/EDI/common/dto/LadeTBX.cls.xml
===================================================================
diff -u -r39328 -r67098
--- vhTest/Utils/APPS/EDI/common/dto/LadeTBX.cls.xml	(.../LadeTBX.cls.xml)	(revision 39328)
+++ vhTest/Utils/APPS/EDI/common/dto/LadeTBX.cls.xml	(.../LadeTBX.cls.xml)	(revision 67098)
@@ -12,6 +12,7 @@
 	Set Resultaat.AantalDwarsverdelingen = ##class(DOM.PM.enu.TBXDwarsverdeling).Zonder()
 	Set Resultaat.BodemKleur = ##class(DOM.PM.enu.TBXBodemKleur).Wit()
 	Set Resultaat.CorpusBreedte = 600
+	Set Resultaat.DesignCode = ##class(DOM.PM.enu.TBXDesigncode).Antaro()
 	Set Resultaat.Draagkracht = ##class(DOM.PM.enu.TBXDraagkracht).Draagkracht30()
 	Set Resultaat.FrontBevestiging = ##class(DOM.PM.enu.TBXFrontBevestiging).Inserta()
 	Set Resultaat.FrontOndersteuningAantal = ""
@@ -26,12 +27,16 @@
 	Set Resultaat.IsBinnenbreedte = $$$True
 	Set Resultaat.IsBinnenlade = $$$False
 	Set Resultaat.Klasse = "L"
-	Set Resultaat.LadeDiepte = 400
+	Set Resultaat.LadeDiepte = 500
 	Set Resultaat.LadeHoogte = ##class(DOM.PM.enu.TBXLadehoogte).M()
 	Set Resultaat.LadeKleur = ##class(DOM.PM.enu.TBXLadeKleur).SW()
 	Set Resultaat.MatKleur = ""
 	Set Resultaat.MatMateriaal = ""
+	Set Resultaat.MinTolerantieOpIB = 0
+	Set Resultaat.PlaatMateriaal = "HS"
+	Set Resultaat.ProductieWijze = ##class(DOM.PM.enu.TBXProductieWijze).Volledig()
 	Set Resultaat.RugHoogte = ##class(DOM.PM.enu.TBXRugHoogte).M()
+	Set Resultaat.RugwandMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Hout()
 	Set Resultaat.Type = "TBX"
 	Set Resultaat.VerpakkingType = ##class(DOM.PM.enu.TBXVerpakkingType).V1()
 	Set Resultaat.ZijkantHoogte = ##class(DOM.PM.enu.TBXZijkantHoogte).M()
@@ -41,15 +46,26 @@
 ]]></Implementation>
 </Method>
 
-<Method name="DMZLade">
+<Method name="BinnenLade">
 <ClassMethod>1</ClassMethod>
 <ReturnType>APPS.EDI.common.dto.v001.LadeTBX</ReturnType>
 <Implementation><![CDATA[
 	#dim Resultaat As APPS.EDI.common.dto.v001.LadeTBX = ..StandaardLade()
 	
-	Set Resultaat.GreepEnMeenemer = "No"
 	Set Resultaat.IsBinnenlade = $$$True
 	Set Resultaat.FrontBevestiging = ##class(DOM.PM.enu.TBXFrontBevestiging).Zonder()
+	Set Resultaat.GreepEnMeenemer = "No"
+	
+	Quit Resultaat
+]]></Implementation>
+</Method>
+
+<Method name="DMZLade">
+<ClassMethod>1</ClassMethod>
+<ReturnType>APPS.EDI.common.dto.v001.LadeTBX</ReturnType>
+<Implementation><![CDATA[
+	#dim Resultaat As APPS.EDI.common.dto.v001.LadeTBX = ..BinnenLade()
+	
 	Set Resultaat.LadeHoogte = ##class(DOM.PM.enu.TBXLadehoogte).D()
 	Set Resultaat.RugHoogte = ##class(DOM.PM.enu.TBXRugHoogte).D()
 	Set Resultaat.ZijkantHoogte = ##class(DOM.PM.enu.TBXZijkantHoogte).M()
@@ -59,6 +75,32 @@
 ]]></Implementation>
 </Method>
 
+<Method name="DZLadeInMengvormADesign">
+<ClassMethod>1</ClassMethod>
+<ReturnType>APPS.EDI.common.dto.v001.LadeTBX</ReturnType>
+<Implementation><![CDATA[
+	#dim Resultaat As APPS.EDI.common.dto.v001.LadeTBX = ..DMZLade()
+
+	Set Resultaat.DesignCode = ##class(DOM.PM.enu.TBXDesigncode).MengvormADesign()
+	Set Resultaat.LadeKleur = "MG"
+	
+	Quit Resultaat
+]]></Implementation>
+</Method>
+
+<Method name="LadeMetStalenRug">
+<ClassMethod>1</ClassMethod>
+<ReturnType>APPS.EDI.common.dto.v001.LadeTBX</ReturnType>
+<Implementation><![CDATA[
+	#dim Resultaat As APPS.EDI.common.dto.v001.LadeTBX = ..StandaardLade()
+	
+	Set Resultaat.CorpusBreedte = 563
+	Set Resultaat.RugwandMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
+	
+	Quit Resultaat
+]]></Implementation>
+</Method>
+
 <Method name="SpoelbakLade">
 <ClassMethod>1</ClassMethod>
 <ReturnType>APPS.EDI.common.dto.v001.LadeTBX</ReturnType>
@@ -70,6 +112,7 @@
 	Set Resultaat.UitsparingDataBreedteX = 147
 	Set Resultaat.UitsparingDataBreedteY = 147
 	Set Resultaat.UitsparingDataBreedteZ1 = 306
+	Set Resultaat.RugwandMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Hout()
 	
 	Quit Resultaat
 ]]></Implementation>
@@ -81,11 +124,13 @@
 <Implementation><![CDATA[
 	#dim Resultaat As APPS.EDI.common.dto.v001.LadeTBX = ..StandaardLade()
 	
-	Set Resultaat.Klasse = "SY2"
+	Set Resultaat.Klasse = "SY3"
 	Set Resultaat.UitsparingDataAantalUitsparingen = 1
 	Set Resultaat.UitsparingDataBreedteX = 225
-	Set Resultaat.UitsparingDataBreedteY = 225
-	Set Resultaat.UitsparingDataBreedteZ1 = 150
+	Set Resultaat.UitsparingDataBreedteY = 215
+	Set Resultaat.UitsparingDataBreedteZ1 = 160
+	Set Resultaat.RugwandMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Hout()
+	Set Resultaat.TussenrugMateriaal = ""
 	
 	Quit Resultaat
 ]]></Implementation>
@@ -97,13 +142,16 @@
 <Implementation><![CDATA[
 	#dim Resultaat As APPS.EDI.common.dto.v001.LadeTBX = ..StandaardLade()
 	
-	Set Resultaat.Klasse = "SY2"
+	Set Resultaat.Klasse = "SY3"
+	Set Resultaat.CorpusBreedte = 900
 	Set Resultaat.UitsparingDataAantalUitsparingen = 2
-	Set Resultaat.UitsparingDataBreedteM = 60
-	Set Resultaat.UitsparingDataBreedteX = 120
-	Set Resultaat.UitsparingDataBreedteY = 120
-	Set Resultaat.UitsparingDataBreedteZ1 = 150
-	Set Resultaat.UitsparingDataBreedteZ2 = 150
+	Set Resultaat.UitsparingDataBreedteM = 150
+	Set Resultaat.UitsparingDataBreedteX = 220
+	Set Resultaat.UitsparingDataBreedteY = 210
+	Set Resultaat.UitsparingDataBreedteZ1 = 160
+	Set Resultaat.UitsparingDataBreedteZ2 = 160
+	Set Resultaat.RugwandMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Hout()
+	Set Resultaat.TussenrugMateriaal = ""
 	
 	Quit Resultaat
 ]]></Implementation>
@@ -129,11 +177,12 @@
 	Set Resultaat.LadeHoogte = ##class(DOM.PM.enu.TBXLadehoogte).C()
 	Set Resultaat.MatKleur = ##class(DOM.PM.enu.MATKleur).AntiSlipFiberWit()
 	Set Resultaat.MatMateriaal = ##class(DOM.PM.enu.MATMateriaal).AntislipFiber()
+	Set Resultaat.MinTolerantieOpIB = 1
 	Set Resultaat.OpvullijstKleur = ##class(DOM.PM.enu.TBXOpvullijstKleur).Wit()
 	Set Resultaat.RugHoogte = ##class(DOM.PM.enu.TBXRugHoogte).C()
 	Set Resultaat.ZijkantHoogte = ##class(DOM.PM.enu.TBXZijkantHoogte).M()
-	Set Resultaat.ZijwandVerhogingKleur = ##class(DOM.PM.enu.TBXZijwandVerhogingKleur).ZijdeWit()
-	Set Resultaat.ZijwandVerhogingMateriaal = ##class(DOM.PM.enu.TBXZijwandVerhogingMateriaal).Aluminium()
+	Set Resultaat.ZijwandVerhogingKleur = ##class(DOM.PM.enu.TBXZijwandVerhogingKleur).FloatGezuurd8mm()
+	Set Resultaat.ZijwandVerhogingMateriaal = ##class(DOM.PM.enu.TBXZijwandVerhogingMateriaal).Glas()
 	Set Resultaat.ZijwandVerhogingType = "DesignElement"
 	
 	Quit Resultaat