Index: APPS/PM/Maatwerk/impl/KenmerkNaarDtoVisitor.cls.xml
===================================================================
diff -u -r1968 -r2010
--- APPS/PM/Maatwerk/impl/KenmerkNaarDtoVisitor.cls.xml	(.../KenmerkNaarDtoVisitor.cls.xml)	(revision 1968)
+++ APPS/PM/Maatwerk/impl/KenmerkNaarDtoVisitor.cls.xml	(.../KenmerkNaarDtoVisitor.cls.xml)	(revision 2010)
@@ -22,9 +22,16 @@
 <Implementation><![CDATA[
 	Set ..IngegevenKenmerken = ##class(APPS.PM.Maatwerk.dto.TAOOKenmerken).%New()
 	
-	// Todo: Wanneer de dto gegevens worden bewaard nagaan of er werd ingevuld met binnenbreedte of niet (anders wanddikte bijtellen)
-	Set ..IngegevenKenmerken.CorpusBreedte = TAOOKenmerken.CorpusBinnenbreedte
-	Set ..IngegevenKenmerken.IsBinnenbreedte = 1
+	If (TAOOKenmerken.GUIKenmerken.IsBinnenbreedte)
+	{
+		Set ..IngegevenKenmerken.CorpusBreedte = TAOOKenmerken.CorpusBinnenbreedte
+	}
+	Else
+	{
+		Set ..IngegevenKenmerken.CorpusBreedte = TAOOKenmerken.CorpusBinnenbreedte + ( 2 * TAOOKenmerken.GUIKenmerken.WandDikte )
+	}
+	Set ..IngegevenKenmerken.IsBinnenbreedte = TAOOKenmerken.GUIKenmerken.IsBinnenbreedte
+	Set ..IngegevenKenmerken.CorpusWandDikte = TAOOKenmerken.GUIKenmerken.WandDikte
 	Set ..IngegevenKenmerken.Draagkracht = TAOOKenmerken.Draagkracht
 	Set ..IngegevenKenmerken.IsBinnenlade = TAOOKenmerken.IsBinnenlade
 	Set ..IngegevenKenmerken.LadeDiepte = TAOOKenmerken.LadeDiepte