Index: APPS/Halux/common/impl/ProductieAansturingService.cls.xml
===================================================================
diff -u -r33132 -r37962
--- APPS/Halux/common/impl/ProductieAansturingService.cls.xml	(.../ProductieAansturingService.cls.xml)	(revision 33132)
+++ APPS/Halux/common/impl/ProductieAansturingService.cls.xml	(.../ProductieAansturingService.cls.xml)	(revision 37962)
@@ -1,7 +1,7 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="APPS.Halux.common.impl.ProductieAansturingService">
-<Super>TECH.RegisteredObject</Super>
+<Super>TECH.Mockable</Super>
 
 <Property name="BatchService">
 <Type>APPS.Halux.common.BatchService</Type>
@@ -13,6 +13,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="LadeInfoApi">
+<Type>DOM.PM.Maatwerk.LadeInfoAPI</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="IngegevenKenmerkenBepaler">
 <Type>APPS.Halux.common.impl.ProductieAansturingIngegevenKenmerkenBepaler</Type>
 <Private>1</Private>
@@ -24,16 +29,18 @@
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>BatchService:APPS.Halux.common.BatchService,ProductAPI:DOM.PM.ProductAPI,IngegevenKenmerkenBepaler:APPS.Halux.common.impl.ProductieAansturingIngegevenKenmerkenBepaler</FormalSpec>
+<FormalSpec>BatchService:APPS.Halux.common.BatchService,BerekeningService:APPS.PM.Maatwerk.impl.BerekeningServiceIngegevenKenmerken="",IngegevenKenmerkenBepaler:APPS.Halux.common.impl.ProductieAansturingIngegevenKenmerkenBepaler="",ProductAPI:DOM.PM.ProductAPI="",LadeInfoApi:DOM.PM.Maatwerk.LadeInfoAPI=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
-	set ..BatchService = $$$Implementation(BatchService,##class(APPS.Halux.common.impl.BatchService).%New())
+	set ..BatchService = $$$Implementation(BatchService, ##class(APPS.ApplicatieContext).Instance().GeefProductieAPI().GeefBatchService())
 	set ..ProductAPI = $$$Implementation(ProductAPI,##class(DOM.DomeinContext).Instance().GeefProductAPI())
 	set ..IngegevenKenmerkenBepaler = $$$Implementation(IngegevenKenmerkenBepaler,##class(APPS.Halux.common.impl.ProductieAansturingIngegevenKenmerkenBepaler).%New())
-	Set ..BerekeningService = ##class(APPS.PM.Maatwerk.impl.BerekeningServiceIngegevenKenmerken).%New()
+	Set ..LadeInfoApi = $$$Inject(LadeInfoApi, ##class(DOM.DomeinContext).Instance().GeefLadeInfoAPI())
+	Set ..BerekeningService = $$$Inject(BerekeningService, ##class(APPS.PM.Maatwerk.impl.BerekeningServiceIngegevenKenmerken).%New())
+	
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -63,6 +70,13 @@
 	quit ..IngegevenKenmerkenBepaler.BepaalIngegevenKenmerken(Batch,Product.GeefIngegevenKenmerken())
 ]]></Implementation>
 </Method>
+
+<Method name="GeefLade">
+<FormalSpec>BatchId:%String,ProductId:%String</FormalSpec>
+<ReturnType>DOM.PM.Maatwerk.LadeInfo.Lade</ReturnType>
+<Implementation><![CDATA[	Quit ..LadeInfoApi.GeefLade(..GeefHalffabItemsBoom(BatchId, ProductId), ..GeefIngegevenKenmerken(BatchId, ProductId))
+]]></Implementation>
+</Method>
 </Class>