Index: APPS/Halux/Docs/EtiketBuilder.cls.xml
===================================================================
diff -u -r51302 -r51308
--- APPS/Halux/Docs/EtiketBuilder.cls.xml	(.../EtiketBuilder.cls.xml)	(revision 51302)
+++ APPS/Halux/Docs/EtiketBuilder.cls.xml	(.../EtiketBuilder.cls.xml)	(revision 51308)
@@ -8,13 +8,33 @@
 <Private>1</Private>
 </Property>
 
+<Property name="OrderApi">
+<Type>DOM.VKP.OrderAPI</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="PartijApi">
+<Type>DOM.PARTIJ.PartijAPI</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="ToeleveringApi">
+<Type>DOM.AKP.ToeleveringAPI</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Set ..EtiketPrinterBepaler = ##class(APPS.Halux.Docs.EtiketPrinterBepaler).%New()
+	
+	Set ..OrderApi = ##class(DOM.DomeinContext).Instance().GeefOrderAPI()
+	Set ..PartijApi = ##class(DOM.DomeinContext).Instance().GeefPartijAPI()
+	Set ..ToeleveringApi = ##class(DOM.DomeinContext).Instance().GeefToeleveringAPI()
+	
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -23,10 +43,10 @@
 <FormalSpec>OrderID:%String,OrderLijnVolgummer:%String,Aantal:%Integer,VoorkeurPrinter:%String=""</FormalSpec>
 <ReturnType>BL.Etiket.LadeKlantEtiket</ReturnType>
 <Implementation><![CDATA[
-	#dim Order As DOM.VKP.Order = ##class(DOM.DomeinContext).Instance().GeefOrderAPI().GeefOrder(OrderID)
+	#dim Order As DOM.VKP.Order = ..OrderApi.GeefOrder(OrderID)
 	#dim ProductOrderLijn As DOM.VKP.ProductOrderlijn = Order.GeefOrderLijnViaVolgnummer(OrderLijnVolgummer)
 	#dim ProductID As DOM.common.ProductID = ProductOrderLijn.GeefProductID()
-	#dim Partij As DOM.PARTIJ.Partij = ##class(DOM.DomeinContext).Instance().GeefPartijAPI().GeefPartij(Order.GeefKlantID())
+	#dim Partij As DOM.PARTIJ.Partij = ..PartijApi.GeefPartij(Order.GeefKlantID())
 	
 	Set MPEtiketBuilder = ##class(APPS.Halux.Docs.impl.LadeKlantEtiketBuilder).%New()	
 	#dim Etiket As BL.Etiket.LadeKlantEtiket = MPEtiketBuilder.MaakBasisMaatwerkProductEtiket(ProductID,Partij,Aantal)		
@@ -45,7 +65,7 @@
 	#dim Toelevering As DOM.AKP.Toelevering = ##class(DOM.DomeinContext).Instance().GeefToeleveringAPI().GeefToelevering(ToeleveringID)
 	#dim ToeleveringLijn As DOM.AKP.ProductToeleveringLijn = Toelevering.GeefToeleveringLijn(ToeleveringLijnID)
 	#dim ProductID As %String = ToeleveringLijn.GeefProductID()
-	#dim Partij As DOM.PARTIJ.Partij = ##class(DOM.DomeinContext).Instance().GeefPartijAPI().GeefPartij(Toelevering.GeefKlantID())
+	#dim Partij As DOM.PARTIJ.Partij = ..PartijApi.GeefPartij(Toelevering.GeefKlantID())
 	
 	Set MPEtiketBuilder = ##class(APPS.Halux.Docs.impl.LadeKlantEtiketBuilder).%New()	
 	#dim Etiket As BL.Etiket.LadeKlantEtiket = MPEtiketBuilder.MaakBasisMaatwerkProductEtiket(ProductID,Partij,Aantal)	
@@ -60,7 +80,7 @@
 <FormalSpec>ToeleveringID:%String,ToeleveringLijnVolgNr:%String,Aantal:%Integer,VoorkeurPrinter:%String=""</FormalSpec>
 <ReturnType>BL.Etiket.LadeKlantEtiket</ReturnType>
 <Implementation><![CDATA[
-	#dim Toelevering As DOM.AKP.Toelevering = ##class(DOM.DomeinContext).Instance().GeefToeleveringAPI().GeefToelevering(ToeleveringID)
+	#dim Toelevering As DOM.AKP.Toelevering = ..ToeleveringApi.GeefToelevering(ToeleveringID)
 	#dim ToeleveringLijnID As DOM.AKP.ProductToeleveringLijn = Toelevering.GeefToeleveringLijnViaVolgNr(ToeleveringLijnVolgNr).GeefID()
 	Quit ..MaakMaatwerkProductViaToeleveringEnLijnID(ToeleveringID,ToeleveringLijnID,Aantal,VoorkeurPrinter)
 ]]></Implementation>
@@ -70,13 +90,13 @@
 <FormalSpec>ToeleveringID:%String,ToeleveringLijnID:%String,Aantal:%Integer,BatchID:%String,WPVerpak:DS.PPS.TBX.sub.emWPVerpak,VoorkeurPrinter:%String=""</FormalSpec>
 <ReturnType>BL.Etiket.LadeKlantEtiket</ReturnType>
 <Implementation><![CDATA[
-	#dim Toelevering As DOM.AKP.Toelevering = ##class(DOM.DomeinContext).Instance().GeefToeleveringAPI().GeefToelevering(ToeleveringID)
+	#dim Toelevering As DOM.AKP.Toelevering = ..ToeleveringApi.GeefToelevering(ToeleveringID)
 	#dim ToeleveringLijn As DOM.AKP.ProductToeleveringLijn = Toelevering.GeefToeleveringLijn(ToeleveringLijnID)
 	#dim ProductID As %String = ToeleveringLijn.GeefProductID()
-	#dim Partij As DOM.PARTIJ.Partij = ##class(DOM.DomeinContext).Instance().GeefPartijAPI().GeefPartij(Toelevering.GeefKlantID())
-	If $$$HasLength(##class(DOM.DomeinContext).Instance().GeefOrderAPI().GeefOrder(Toelevering.GeefOrderID()).GeefOorsprongKetting()) {
-		#dim Order As DOM.VKP.Order = ##class(DOM.DomeinContext).Instance().GeefOrderAPI().GeefOrder(Toelevering.GeefOrderID())
-		Set Partij = ##class(DOM.DomeinContext).Instance().GeefPartijAPI().GeefPartij(Order.GeefEindPersonality().GeefKlantID())
+	#dim Partij As DOM.PARTIJ.Partij = ..PartijApi.GeefPartij(Toelevering.GeefKlantID())
+	If $$$HasLength(..OrderApi.GeefOrder(Toelevering.GeefOrderID()).GeefOorsprongKetting()) {
+		#dim Order As DOM.VKP.Order = ..OrderApi.GeefOrder(Toelevering.GeefOrderID())
+		Set Partij = ..PartijApi.GeefPartij(Order.GeefEindPersonality().GeefKlantID())
 	}
 	
 	Set MPEtiketBuilder = ##class(APPS.Halux.Docs.impl.LadeKlantEtiketBuilder).%New()	
@@ -103,10 +123,10 @@
 <FormalSpec>VHossItem:APPS.Halux.PPS.Activiteit.impl.common.dto.KlantEtiketUitvoeringInfo</FormalSpec>
 <ReturnType>APPS.common.Print.AbstractLabel</ReturnType>
 <Implementation><![CDATA[
-	#dim Toelevering As DOM.AKP.Toelevering = ##class(DOM.DomeinContext).Instance().GeefToeleveringAPI().GeefToelevering(VHossItem.ToeleveringID)
+	#dim Toelevering As DOM.AKP.Toelevering = ..ToeleveringApi.GeefToelevering(VHossItem.ToeleveringID)
 	#dim ToeleveringLijn As DOM.AKP.ProductToeleveringLijn = Toelevering.GeefToeleveringLijn(VHossItem.ToeleveringLijnID)
 	#dim ProductID As %String = ToeleveringLijn.GeefProductID()
-	#dim Partij As DOM.PARTIJ.Partij = ##class(DOM.DomeinContext).Instance().GeefPartijAPI().GeefPartij(Toelevering.GeefKlantID())
+	#dim Partij As DOM.PARTIJ.Partij = ..PartijApi.GeefPartij(Toelevering.GeefKlantID())
 	
 	Set MPEtiketBuilder = ##class(APPS.Halux.Docs.impl.LadeKlantEtiketBuilder).%New()	
 	#dim Etiket As BL.Etiket.LadeKlantEtiketVHoss = MPEtiketBuilder.MaakMaatwerkProductInVHossEtiket(ProductID,Partij,1)