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()
 	}