Index: DOM/PM/Maatwerk/TAX/impl/LosseComponentKorttekstBepaler.cls.xml
===================================================================
diff -u -r30156 -r30190
--- DOM/PM/Maatwerk/TAX/impl/LosseComponentKorttekstBepaler.cls.xml	(.../LosseComponentKorttekstBepaler.cls.xml)	(revision 30156)
+++ DOM/PM/Maatwerk/TAX/impl/LosseComponentKorttekstBepaler.cls.xml	(.../LosseComponentKorttekstBepaler.cls.xml)	(revision 30190)
@@ -99,9 +99,8 @@
 	
 	#dim LosseComponent As DOM.PM.Maatwerk.LadeInfo.LadeOnderdeel = ..LadeInfoAPI.GeefLosseComponent(HalffabItemsBoom, TAORKenmerken, ..ProductieWijzeNaarLosseComponentConverter.Convert(TAORKenmerken.ProductieWijze))
 	set $extract(Korttekst, 22, 23) = LosseComponent.GeefKleuren().GetAt(2)
+	set $extract(Korttekst, 24, 25) = LosseComponent.GeefKleuren().GetAt(1) 
 	
-	set $extract(Korttekst, 24, 25) = LosseComponent.GeefKleuren().GetAt(1)
-	
 	quit Korttekst
 ]]></Implementation>
 </Method>
Index: vhUnitTest/DOM/PM/Maatwerk/TAX/impl/KorttekstBepaler/BepaalKorttekst/TestLosseComponenten.cls.xml
===================================================================
diff -u -r30156 -r30190
--- vhUnitTest/DOM/PM/Maatwerk/TAX/impl/KorttekstBepaler/BepaalKorttekst/TestLosseComponenten.cls.xml	(.../TestLosseComponenten.cls.xml)	(revision 30156)
+++ vhUnitTest/DOM/PM/Maatwerk/TAX/impl/KorttekstBepaler/BepaalKorttekst/TestLosseComponenten.cls.xml	(.../TestLosseComponenten.cls.xml)	(revision 30190)
@@ -208,25 +208,32 @@
 ]]></Implementation>
 </Method>
 
-<UDLText name="T">
-<Content><![CDATA[
-/*
-Method "Test: Positie 22-23: Bodem, Front, Rug - Spaties"()
-{
+<Method name="Test: Positie 22-23: Bodem, Front, Rug - Spaties">
+<Implementation><![CDATA[
 	#dim ProductieWijze As DOM.PM.enu.TAORProductieWijze
 	
 	for ProductieWijze = ..Enum.ProductieWijze.Bodem, ..Enum.ProductieWijze.Front, ..Enum.ProductieWijze.Rug {
 		do ..AssertPositie("22-23", ..Enum.KenmerkNaam.ProductieWijze, ProductieWijze, "  ")
 	}
-}
+]]></Implementation>
+</Method>
 
-Method "Test: Positie 24-25: Binnenkantkleur"()
-{
-}
+<Method name="Test: Positie 24-25: Binnenkantkleur">
+<Implementation><![CDATA[
+	set ..TAORKenmerken.LadeKleur = ..Enum.LadeKleur.NatuurNotenhout
+	set ..TAORKenmerken.BodemKleur = ..Enum.BodemKleur.BardolinoEik
 
-*/
-]]></Content>
-</UDLText>
+	#dim ProductieWijze As DOM.PM.enu.TAORProductieWijze
+	
+	for ProductieWijze = ..Enum.ProductieWijze.ZijkantLinks, ..Enum.ProductieWijze.ZijkantRechts, ..Enum.ProductieWijze.Front, ..Enum.ProductieWijze.Rug {
+		do ..AssertPositie("24-25", ..Enum.KenmerkNaam.ProductieWijze, ProductieWijze, "NN")
+	}	
+	
+	for ProductieWijze = ..Enum.ProductieWijze.Bodem {
+		do ..AssertPositie("24-25", ..Enum.KenmerkNaam.ProductieWijze, ProductieWijze, "E1")
+	}
+]]></Implementation>
+</Method>
 
 <Method name="AssertPositie">
 <FormalSpec>Positie:%String,KenmerkNaam:%String,KenmerkWaarde:%String,VerwachteWaarde:%String</FormalSpec>