Index: vhUnitTest/DOM/PM/Maatwerk/LadeInfo/impl/LosseComponent/GeefKleuren/TestTAX.cls.xml
===================================================================
diff -u -r36986 -r58568
--- vhUnitTest/DOM/PM/Maatwerk/LadeInfo/impl/LosseComponent/GeefKleuren/TestTAX.cls.xml	(.../TestTAX.cls.xml)	(revision 36986)
+++ vhUnitTest/DOM/PM/Maatwerk/LadeInfo/impl/LosseComponent/GeefKleuren/TestTAX.cls.xml	(.../TestTAX.cls.xml)	(revision 58568)
@@ -116,8 +116,8 @@
 	#dim VerwachteLijst As %ListOfDataTypes = ##class(%ListOfDataTypes).%New()
 	
 	do VerwachteLijst.Insert(..Enum.LadeKleur.NatuurNotenhout)
-	do VerwachteLijst.Insert("")
 	do VerwachteLijst.Insert(..Enum.LadeKleur.NatuurNotenhout)
+	do VerwachteLijst.Insert(..Enum.LadeKleur.NatuurNotenhout)
 
 	do ..AssertKleuren(..Enum.LosseComponent.Rug, VerwachteLijst)
 ]]></Implementation>
@@ -132,7 +132,7 @@
 	#dim VerwachteLijst As %ListOfDataTypes = ##class(%ListOfDataTypes).%New()
 	
 	do VerwachteLijst.Insert(..Enum.LadeKleur.NatuurEikenhout)
-	do VerwachteLijst.Insert("")
+	do VerwachteLijst.Insert(..Enum.LadeKleur.NatuurNotenhout)
 	do VerwachteLijst.Insert(..Enum.LadeKleur.Wit)
 
 	do ..AssertKleuren(..Enum.LosseComponent.Rug, VerwachteLijst)
Index: vhUnitTest/DOM/PM/Maatwerk/TAX/impl/KorttekstBepaler/BepaalKorttekst/TestLosseComponenten.cls.xml
===================================================================
diff -u -r56066 -r58568
--- vhUnitTest/DOM/PM/Maatwerk/TAX/impl/KorttekstBepaler/BepaalKorttekst/TestLosseComponenten.cls.xml	(.../TestLosseComponenten.cls.xml)	(revision 56066)
+++ vhUnitTest/DOM/PM/Maatwerk/TAX/impl/KorttekstBepaler/BepaalKorttekst/TestLosseComponenten.cls.xml	(.../TestLosseComponenten.cls.xml)	(revision 58568)
@@ -3,10 +3,6 @@
 <Class name="vhUnitTest.DOM.PM.Maatwerk.TAX.impl.KorttekstBepaler.BepaalKorttekst.TestLosseComponenten">
 <Super>vhUnitTest.DOM.PM.Maatwerk.TAX.impl.KorttekstBepaler.TestBase,vhTest.DOM.PM.Maatwerk.TAX.BaseLosseComponent</Super>
 
-<Property name="CUT">
-<Type>DOM.PM.Maatwerk.TAX.impl.LosseComponentKorttekstBepaler</Type>
-</Property>
-
 <Method name="OnBeforeOneTest">
 <FormalSpec>TestName:%String</FormalSpec>
 <Implementation><![CDATA[
Index: DOM/PM/Maatwerk/TAX/impl/LosseComponentKorttekstBepaler.cls.xml
===================================================================
diff -u -r56066 -r58568
--- DOM/PM/Maatwerk/TAX/impl/LosseComponentKorttekstBepaler.cls.xml	(.../LosseComponentKorttekstBepaler.cls.xml)	(revision 56066)
+++ DOM/PM/Maatwerk/TAX/impl/LosseComponentKorttekstBepaler.cls.xml	(.../LosseComponentKorttekstBepaler.cls.xml)	(revision 58568)
@@ -109,7 +109,13 @@
 	
 	Set $Extract(Korttekst, 19, 21) = "V" _ ..BestelService.GeefBestelEenheid(TAORKenmerken)
 	
-	Set $Extract(Korttekst, 22, 23) = ##class(TECH.StringUtils).AlignRight(LosseComponent.GeefKleuren().GetAt(..Const.Buitenkant), " ", 2)
+	#dim Positie22Tot23 As %String = "  "
+	
+	If (##class(TECH.StringUtils).Equals(TAORKenmerken.ProductieWijze, ..Enum.ProductieWijze.ZijkantLinks, ..Enum.ProductieWijze.ZijkantRechts)) {
+		Set Positie22Tot23 = ##class(TECH.StringUtils).AlignRight(LosseComponent.GeefKleuren().GetAt(..Const.Buitenkant), " ", 2)
+	} 
+	
+	Set $Extract(Korttekst, 22, 23) = Positie22Tot23
 	Set $Extract(Korttekst, 24, 25) = ##class(TECH.StringUtils).AlignRight(LosseComponent.GeefKleuren().GetAt(..Const.Binnenkant), " ", 2)
 	
 	Quit Korttekst
Index: DOM/PM/Maatwerk/TAX/impl/KorttekstBepaler.cls.xml
===================================================================
diff -u -r54595 -r58568
--- DOM/PM/Maatwerk/TAX/impl/KorttekstBepaler.cls.xml	(.../KorttekstBepaler.cls.xml)	(revision 54595)
+++ DOM/PM/Maatwerk/TAX/impl/KorttekstBepaler.cls.xml	(.../KorttekstBepaler.cls.xml)	(revision 58568)
@@ -3,7 +3,7 @@
 <Class name="DOM.PM.Maatwerk.TAX.impl.KorttekstBepaler">
 <Super>TECH.RegisteredObject,DOM.PM.Maatwerk.Lade.KorttekstBepaler</Super>
 
-<Property name="LadeInfoAPI">
+<Property name="LadeInfoApi">
 <Type>DOM.PM.Maatwerk.LadeInfoAPI</Type>
 <Private>1</Private>
 </Property>
@@ -14,28 +14,28 @@
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>LadeInfoAPI:DOM.PM.Maatwerk.LadeInfoAPI,BestelService:DOM.VKP.Maatwerk.BestelService</FormalSpec>
+<FormalSpec>LadeInfoApi:DOM.PM.Maatwerk.LadeInfoAPI="",BestelService:DOM.VKP.Maatwerk.BestelService=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
-	set ..LadeInfoAPI = $$$Implementation(LadeInfoAPI, ##class(DOM.PM.Maatwerk.impl.LadeInfoAPI).%New())
-	set ..BestelService = $$$Implementation(BestelService, ##class(DOM.VKP.Maatwerk.impl.BestelService).%New())
+	Set ..LadeInfoApi = $$$Implementation(LadeInfoApi, ##class(DOM.PM.Maatwerk.impl.LadeInfoAPI).%New())
+	Set ..BestelService = $$$Implementation(BestelService, ##class(DOM.VKP.Maatwerk.impl.BestelService).%New())
 	
-	quit $$$OK
+	Quit $$$OK
 ]]></Implementation>
 </Method>
 
 <Method name="BepaalKorttekst">
 <FormalSpec>DossierNummer:TECH.String,TAORKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken,HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom</FormalSpec>
 <ReturnType>TECH.String</ReturnType>
 <Implementation><![CDATA[
-	#Dim KorttekstBepaler As DOM.PM.Maatwerk.Lade.KorttekstBepaler
+	#dim KorttekstBepaler As DOM.PM.Maatwerk.Lade.KorttekstBepaler
 	
 	If (TAORKenmerken.VerpakkingType = ##class(DOM.PM.enu.TAORVerpakkingType).LosseComponentenInBulk()) && $$$Not(TAORKenmerken.ProductieWijze = ##class(DOM.PM.enu.TAORProductieWijze).Volledig()) {
-		Set KorttekstBepaler = ##class(DOM.PM.Maatwerk.TAX.impl.LosseComponentKorttekstBepaler).%New(..LadeInfoAPI,..BestelService)
-	} else {
+		Set KorttekstBepaler = ##class(DOM.PM.Maatwerk.TAX.impl.LosseComponentKorttekstBepaler).%New(..LadeInfoApi, ..BestelService)
+	} Else {
 		Set KorttekstBepaler = ##class(DOM.PM.Maatwerk.TAX.impl.StandaardKorttekstBepaler).%New()
 	}