Index: DOM/PM/Maatwerk/Calc/Common/impl/TAORKenmerken.cls.xml
===================================================================
diff -u -r30127 -r30303
--- DOM/PM/Maatwerk/Calc/Common/impl/TAORKenmerken.cls.xml	(.../TAORKenmerken.cls.xml)	(revision 30127)
+++ DOM/PM/Maatwerk/Calc/Common/impl/TAORKenmerken.cls.xml	(.../TAORKenmerken.cls.xml)	(revision 30303)
@@ -5,42 +5,48 @@
 <ProcedureBlock>1</ProcedureBlock>
 <Super>DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</Super>
 
-<Property name="Draagkracht">
-<Type>DOM.PM.enu.TAORDraagkracht</Type>
+<Property name="AfdekkapBovenKleur">
+<Type>DOM.PM.enu.TAORAfdekkapBovenKleur</Type>
 </Property>
 
-<Property name="LadeKleur">
-<Type>DOM.PM.enu.TAORLadeKleur</Type>
+<Property name="BodemKleur">
+<Type>DOM.PM.enu.TAORBodemKleur</Type>
 </Property>
 
-<Property name="LadeHoogte">
-<Type>DOM.PM.enu.TAORLadeHoogte</Type>
+<Property name="Concept">
+<Type>DOM.PM.enu.TAORConcept</Type>
+<Transient>1</Transient>
 </Property>
 
 <Property name="CorpusBinnenbreedte">
 <Type>TECH.Numeric</Type>
 <Parameter name="SCALE" value="1"/>
 </Property>
 
-<Property name="IsBinnenlade">
-<Type>%Boolean</Type>
+<Property name="Draagkracht">
+<Type>DOM.PM.enu.TAORDraagkracht</Type>
 </Property>
 
-<Property name="InterneBreedte">
-<Type>TECH.Numeric</Type>
-<Calculated>1</Calculated>
-<Transient>1</Transient>
-<Parameter name="SCALE" value="1"/>
-</Property>
-
 <Property name="FrontBevestiging">
 <Type>DOM.PM.enu.TAORFrontBevestiging</Type>
 </Property>
 
-<Property name="LadeDiepte">
-<Type>DOM.PM.enu.TAORLadeDiepte</Type>
+<Property name="FrontEindkapKleur">
+<Type>DOM.PM.enu.TAORFrontEindkapKleur</Type>
 </Property>
 
+<Property name="GlijderType">
+<Type>DOM.PM.enu.TAORGlijderType</Type>
+</Property>
+
+<Property name="GUIKenmerken">
+<Type>DOM.PM.Maatwerk.Calc.Common.impl.TAORGUIKenmerken</Type>
+</Property>
+
+<Property name="HeeftDiepteVerstelling">
+<Type>%Boolean</Type>
+</Property>
+
 <Property name="HeeftOpvullijstLinks">
 <Type>%Boolean</Type>
 </Property>
@@ -57,51 +63,45 @@
 <Type>%Boolean</Type>
 </Property>
 
-<Property name="HeeftDiepteVerstelling">
-<Type>%Boolean</Type>
+<Property name="InterneBreedte">
+<Type>TECH.Numeric</Type>
+<Calculated>1</Calculated>
+<Transient>1</Transient>
+<Parameter name="SCALE" value="1"/>
 </Property>
 
-<Property name="GlijderType">
-<Type>DOM.PM.enu.TAORGlijderType</Type>
+<Property name="IsBinnenlade">
+<Type>%Boolean</Type>
 </Property>
 
-<Property name="Uittrekbaarheid">
-<Type>DOM.PM.enu.TAORUittrekbaarheid</Type>
+<Property name="KoppelingType">
+<Type>DOM.PM.enu.TAORKoppelingType</Type>
 </Property>
 
-<Property name="VerpakkingType">
-<Type>DOM.PM.enu.TAORVerpakkingType</Type>
+<Property name="LadeDiepte">
+<Type>DOM.PM.enu.TAORLadeDiepte</Type>
 </Property>
 
-<Property name="OpvullijstKleur">
-<Type>DOM.PM.enu.TAOROpvullijstKleur</Type>
+<Property name="LadeHoogte">
+<Type>DOM.PM.enu.TAORLadeHoogte</Type>
 </Property>
 
-<Property name="GUIKenmerken">
-<Type>DOM.PM.Maatwerk.Calc.Common.impl.TAORGUIKenmerken</Type>
+<Property name="LadeKleur">
+<Type>DOM.PM.enu.TAORLadeKleur</Type>
 </Property>
 
-<Property name="FrontEindkapKleur">
-<Type>DOM.PM.enu.TAORFrontEindkapKleur</Type>
+<Property name="OpvullijstKleur">
+<Type>DOM.PM.enu.TAOROpvullijstKleur</Type>
 </Property>
 
-<Property name="BodemKleur">
-<Type>DOM.PM.enu.TAORBodemKleur</Type>
+<Property name="Uittrekbaarheid">
+<Type>DOM.PM.enu.TAORUittrekbaarheid</Type>
 </Property>
 
-<Property name="Concept">
-<Type>DOM.PM.enu.TAORConcept</Type>
-<Transient>1</Transient>
+<Property name="VerpakkingType">
+<Type>DOM.PM.enu.TAORVerpakkingType</Type>
 </Property>
 
-<Property name="KoppelingType">
-<Type>DOM.PM.enu.TAORKoppelingType</Type>
-</Property>
-
-<Property name="AfdekkapBovenKleur">
-<Type>DOM.PM.enu.TAORAfdekkapBovenKleur</Type>
-</Property>
-
 <Method name="ConceptGet">
 <ReturnType>DOM.PM.enu.TAORConcept</ReturnType>
 <Implementation><![CDATA[
@@ -110,54 +110,56 @@
 ]]></Implementation>
 </Method>
 
-<Method name="GeefVersieNr">
-<ReturnType>%Integer</ReturnType>
-<Implementation><![CDATA[	Quit 0
+<Method name="InterneBreedteGet">
+<ReturnType>%Double</ReturnType>
+<Implementation><![CDATA[	quit ..CorpusBinnenbreedte - (..HeeftOpvullijstLinks * 25) - (..HeeftOpvullijstRechts * 25)
 ]]></Implementation>
 </Method>
 
+<Method name="InterneBreedteSet">
+<FormalSpec>InterneBreedte:%Double</FormalSpec>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[	quit $$$OK
+]]></Implementation>
+</Method>
+
 <Method name="Accept">
 <FormalSpec>Visitor:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerkenVisitor</FormalSpec>
-<Implementation><![CDATA[	Do Visitor.VerwerkTAORKenmerken(##this)
+<Implementation><![CDATA[	do Visitor.VerwerkTAORKenmerken(##this)
 ]]></Implementation>
 </Method>
 
+<Method name="GeefLadeCode">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim LadeCode As %String = ..LadeHoogte
+	
+	if (..IsBinnenlade) {
+		set LadeCode = LadeCode _ "/Z"
+	}
+	
+	quit LadeCode
+]]></Implementation>
+</Method>
+
 <Method name="GeefFamilie">
 <ReturnType>DOM.PM.enu.Familie</ReturnType>
-<Implementation><![CDATA[	Quit ##class(DOM.PM.enu.Familie).Lade()
+<Implementation><![CDATA[	quit ##class(DOM.PM.enu.Familie).Lade()
 ]]></Implementation>
 </Method>
 
 <Method name="GeefVariant">
 <ReturnType>DOM.PM.enu.Variant</ReturnType>
-<Implementation><![CDATA[	Quit ##class(DOM.PM.enu.LadeVariant).TAOR()
+<Implementation><![CDATA[	quit ##class(DOM.PM.enu.LadeVariant).TAOR()
 ]]></Implementation>
 </Method>
 
-<Method name="InterneBreedteGet">
-<ReturnType>%Double</ReturnType>
-<Implementation><![CDATA[	Quit ..CorpusBinnenbreedte - (..HeeftOpvullijstLinks*25) - (..HeeftOpvullijstRechts*25)
+<Method name="GeefVersieNr">
+<ReturnType>%Integer</ReturnType>
+<Implementation><![CDATA[	quit 0
 ]]></Implementation>
 </Method>
 
-<Method name="InterneBreedteSet">
-<FormalSpec>InterneBreedte:%Double</FormalSpec>
-<ReturnType>%Status</ReturnType>
-<Implementation><![CDATA[	Quit $$$OK
-]]></Implementation>
-</Method>
-
-<Method name="GeefLadeCode">
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[
-	#dim LadeCode As %String = ..LadeHoogte
-	If ..IsBinnenlade {
-		Set LadeCode = LadeCode_"/Z"
-	}
-	Quit LadeCode
-]]></Implementation>
-</Method>
-
 <Storage name="Default">
 <Type>%Library.CacheStorage</Type>
 <DefaultData>TAORKenmerkenDefaultData</DefaultData>