Index: APPS/Halux/PPS/Activiteit/impl/MVX/MVXLadePersen.cls.xml
===================================================================
diff -u -r64193 -r64251
--- APPS/Halux/PPS/Activiteit/impl/MVX/MVXLadePersen.cls.xml	(.../MVXLadePersen.cls.xml)	(revision 64193)
+++ APPS/Halux/PPS/Activiteit/impl/MVX/MVXLadePersen.cls.xml	(.../MVXLadePersen.cls.xml)	(revision 64251)
@@ -55,15 +55,14 @@
 	
 	#dim UitvoeringInfo As APPS.Halux.PPS.Activiteit.impl.common.dto.LadePersUitvoeringInfo = WerklijstItem.UitvoeringInfo
 
-	#dim DomeinContext As DOM.DomeinContext = ##class(DOM.DomeinContext).Instance()
-	#dim MaatwerkCalcAPI As DOM.PM.MaatwerkCalcAPI = DomeinContext.GeefMaatwerkCalcAPI()
+	#dim MaatwerkCalcAPI As DOM.PM.impl.MaatwerkCalcAPI = ##class(DOM.PM.impl.MaatwerkCalcAPI).%New()
 	#dim RugUtils As DOM.PM.Maatwerk.Lade.RugUtils = MaatwerkCalcAPI.GeefLadeRugUtils(##class(DOM.PM.enu.LadeVariant).MVX())
 	#dim HeeftStalenRug As %Boolean = RugUtils.HeeftStalenRug(HalffabItemsBoom)
-	#dim AftrekDiepte = $S(HeeftStalenRug: 22, 1: 26)
+	#dim AftrekDiepte = $Select(HeeftStalenRug: 22, 1: 26)
 	#dim RHmm As %Decimal = RugUtils.GeefRugHoogteInMm(IngegevenKenmerken.RugHoogte)
 
 	Set UitvoeringInfo.UniqueID = 0				// Nul als default, bedoeld om herkenbaar zijn als niet geldige ID
-	Set UitvoeringInfo.Omschrijving = Item.BatchID_"."_$E(UitvoeringInfo.ToeleveringID,4,6)_"."_UitvoeringInfo.DossierCode_" ("_(UitvoeringInfo.DeelAantal)_"/"_UitvoeringInfo.TotaalAantal_")"
+	Set UitvoeringInfo.Omschrijving = Item.BatchID_"."_$Extract(UitvoeringInfo.ToeleveringID,4,6)_"."_UitvoeringInfo.DossierCode_" ("_(UitvoeringInfo.DeelAantal)_"/"_UitvoeringInfo.TotaalAantal_")"
 	Set UitvoeringInfo.Breedte = ##class(TECH.Math).Round((IngegevenKenmerken.InterneBreedte - 51) * 10, 1)
 	Set UitvoeringInfo.Diepte = (IngegevenKenmerken.LadeDiepte - AftrekDiepte) * 10
 	Set UitvoeringInfo.RugHoogte = (RHmm * 10)
@@ -82,13 +81,14 @@
 	Set UitvoeringInfo.Info2 = InfoBepaler.GeefInfo2(Item)
 
 	
-	#dim IngegevenKenmerkenTypeAPI As DOM.PM.Maatwerk.IngegevenKenmerkenTypeAPI = DomeinContext.GeefIngegevenKenmerkenTypeAPI()
-	If IngegevenKenmerkenTypeAPI.IsSpoelbaklade(IngegevenKenmerken) || IngegevenKenmerkenTypeAPI.IsSifonlade(IngegevenKenmerken) || IngegevenKenmerkenTypeAPI.IsSmalleLade(IngegevenKenmerken) {
-		Set UitvoeringInfo.Breedte = ##class(APPS.ApplicatieContext).Instance().GeefProductieAPI().GeefNietTePersenBreedteBepaler().BepaalNietTePersenBreedte()*10
+	#dim IngegevenKenmerkenTypeAPI As DOM.PM.Maatwerk.IngegevenKenmerkenTypeAPI = ##class(DOM.PM.Maatwerk.impl.IngegevenKenmerkenTypeAPI).%New()
+	If (IngegevenKenmerkenTypeAPI.IsSpoelbaklade(IngegevenKenmerken) || IngegevenKenmerkenTypeAPI.IsSifonlade(IngegevenKenmerken) || IngegevenKenmerkenTypeAPI.IsSmalleLade(IngegevenKenmerken)) {
+		Set UitvoeringInfo.Breedte = ##class(APPS.Halux.impl.ProductieAPI).GeefNietTePersenBreedteBepaler().BepaalNietTePersenBreedte()*10
 		Set UitvoeringInfo.GeperstStatus = ##class(APPS.Halux.PPS.Activiteit.impl.common.enu.LadePersStatus).NietTePersen()
 	}
 
-	do Resultaat.SetAt(WerklijstItem, ..#InformatieID)
+	Do Resultaat.SetAt(WerklijstItem, ..#InformatieID)
+	
 	Quit Resultaat
 ]]></Implementation>
 </Method>