Index: vhTest/Utils/DOM/PM/Maatwerk/Calc/Common/impl/TBXKenmerken.cls.xml
===================================================================
diff -u -r67438 -r67492
--- vhTest/Utils/DOM/PM/Maatwerk/Calc/Common/impl/TBXKenmerken.cls.xml	(.../TBXKenmerken.cls.xml)	(revision 67438)
+++ vhTest/Utils/DOM/PM/Maatwerk/Calc/Common/impl/TBXKenmerken.cls.xml	(.../TBXKenmerken.cls.xml)	(revision 67492)
@@ -784,6 +784,52 @@
 	Quit TBXKenmerken
 ]]></Implementation>
 </Method>
+
+<Method name="LadeMetDwarsverdeling">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	#dim TBXKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken = ..LegeKenmerken()
+	
+	Set TBXKenmerken.BodemKleur						= "LG"
+	Set TBXKenmerken.CorpusBinnenbreedte			= 1033
+	Set TBXKenmerken.Draagkracht					= 30
+	Set TBXKenmerken.DwarsverdelingAantal			= 3
+	Set TBXKenmerken.FrontBevestiging				= "S"
+	Set TBXKenmerken.FrontOndersteuningAantal		= 0
+	Set TBXKenmerken.FrontOndersteuningType			= "A"
+	Set TBXKenmerken.GeleiderTechnologie			= "B"
+	Set TBXKenmerken.HeeftOpvullijstLinks			= $$$False
+	Set TBXKenmerken.HeeftOpvullijstRechts			= $$$False
+	Set TBXKenmerken.HeeftZijstabilisering			= $$$False
+	Set TBXKenmerken.InterneBreedte					= 1033
+	Set TBXKenmerken.IsBinnenlade					= $$$False
+	Set TBXKenmerken.LadeDiepte						= 600
+	Set TBXKenmerken.LadeHoogte						= "D"
+	Set TBXKenmerken.LadeKleur						= "MG"
+	Set TBXKenmerken.LadeVariant					= "TBX_Antaro"
+	Set TBXKenmerken.OpvullijstKleur				= ""
+	Set TBXKenmerken.PlaatMateriaal					= "HS"
+	Set TBXKenmerken.ProductieWijze					= ""
+	Set TBXKenmerken.RugHoogte						= "D"
+	Set TBXKenmerken.RugwandMateriaal				= "Hout"
+	Set TBXKenmerken.SpoelbakBinnenzijwandHoogte	= ""
+	Set TBXKenmerken.Toepassing						= "L"
+	Set TBXKenmerken.TussenrugMateriaal				= ""
+	Set TBXKenmerken.UitsparingBreedte1				= ""
+	Set TBXKenmerken.UitsparingBreedte2				= ""
+	Set TBXKenmerken.UitsparingDiepte				= ""
+	Set TBXKenmerken.UitsparingPositie1				= ""
+	Set TBXKenmerken.UitsparingPositie2				= ""
+	Set TBXKenmerken.VerpakkingType					= "S"
+	Set TBXKenmerken.VoorwandVerhogingType			= "Geen"
+	Set TBXKenmerken.ZijkantHoogte					= "M"
+	Set TBXKenmerken.ZijwandVerhogingType			= "Reling"
+	Set TBXKenmerken.ZijwandVerhogingKleur			= ""
+	
+	Set TBXKenmerken.LegacyKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy).LadeMetDwarsverdeling()
+	Quit TBXKenmerken
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhTest/Utils/DOM/PM/Maatwerk/Calc/Common/impl/TBXKenmerkenLegacy.cls.xml
===================================================================
diff -u -r67438 -r67492
--- vhTest/Utils/DOM/PM/Maatwerk/Calc/Common/impl/TBXKenmerkenLegacy.cls.xml	(.../TBXKenmerkenLegacy.cls.xml)	(revision 67438)
+++ vhTest/Utils/DOM/PM/Maatwerk/Calc/Common/impl/TBXKenmerkenLegacy.cls.xml	(.../TBXKenmerkenLegacy.cls.xml)	(revision 67492)
@@ -690,6 +690,38 @@
 	Quit Kenmerken
 ]]></Implementation>
 </Method>
+
+<Method name="LadeMetDwarsverdeling">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	#dim Kenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy = ..LegeKenmerken()
+	
+	Set Kenmerken.ItemBGRP = "X"
+	Set Kenmerken.ItemBM = "I"
+	Set Kenmerken.ItemBX = "ER"
+	Set Kenmerken.ItemCB = 1033
+	Set Kenmerken.ItemDC = "A"
+	Set Kenmerken.ItemDK = 30
+	Set Kenmerken.ItemDS = "GA"
+	Set Kenmerken.ItemDWV = 3
+	Set Kenmerken.ItemFB = "S"
+	Set Kenmerken.ItemFS = "A"
+	Set Kenmerken.ItemKB = "LG"
+	Set Kenmerken.ItemKL = "MG"
+	Set Kenmerken.ItemLD = 600
+	Set Kenmerken.ItemLT = "DM"
+	Set Kenmerken.ItemOPVL = ""
+	Set Kenmerken.ItemKLROPVL = ""
+	Set Kenmerken.ItemRK = "MG"
+	Set Kenmerken.ItemRugwandMateriaal = "Hout"
+	Set Kenmerken.ItemSB = 0
+	Set Kenmerken.ItemVPK = "S"
+	Set Kenmerken.ItemWD = "B"
+	Set Kenmerken.ItemSPZK = ""
+	
+	Quit Kenmerken
+]]></Implementation>
+</Method>
 </Class>