Index: AXimpl/Dynamics/InventoryOut/EventHandler/ReceptieAfmelden.cls.xml
===================================================================
diff -u -r58093 -r58105
--- AXimpl/Dynamics/InventoryOut/EventHandler/ReceptieAfmelden.cls.xml	(.../ReceptieAfmelden.cls.xml)	(revision 58093)
+++ AXimpl/Dynamics/InventoryOut/EventHandler/ReceptieAfmelden.cls.xml	(.../ReceptieAfmelden.cls.xml)	(revision 58105)
@@ -47,29 +47,10 @@
 				Set ReceptieAfmeldenInputDto.ToeleveringLijnCode = ProductToelevLijnEvent.Data.GeefToeleveringLijnCode()
 				Set Request = ##class(AXimpl.Request).%New("Inventory/ReceptieAfmelden",ProductToelevLijnEvent.Data.GeefToeleveringID()_"_"_ProductToelevLijnEvent.Data.GeefToeleveringLijnCode(), ReceptieAfmeldenInputDto)
 				
-				If ((ProductToelevLijnEvent.%IsA("DOM.AKP.event.Cache05GeproduceerdEvent")) && (SpaceTowerAfhandelaar.IsLadeVanSpaceTowerProduct(ProductId))) {
-					Set OrderId = ProductToelevLijnEvent.Data.GeefOrderId() // STAAT ENKEL OP Cache05GeproduceerdEvent
-					Set OrderLijnId = ProductToelevLijnEvent.Data.GeefOrderLijnId() // STAAT ENKEL OP Cache05GeproduceerdEvent
-					
-					Do SpaceTowerAfhandelaar.VerwerkSpaceTowerKindProduct(ProductId, AxInventTransId, OrderId, OrderLijnId, Aantal)
-					
-					If SpaceTowerAfhandelaar.IsSpaceTowerCompleet(AxInventTransId, OrderId, OrderLijnId) {
-						Set ReceptieAfmeldenInputDto.ProductID = SpaceTowerAfhandelaar.GeefProductIdVanSpaceTower(OrderId, OrderLijnId)
-						Set ReceptieAfmeldenInputDto.Aantal = 1
-						Do SpaceTowerAfhandelaar.KillDataVanCompleteSpaceTower(AxInventTransId, OrderId, OrderLijnId)
-					} Else {
-						Set MagRequestGenereren = $$$False
-					}
-				} ElseIf (ProductToelevLijnEvent.%IsA("DOM.AKP.event.Cache05GeproduceerdEvent")) {
-					#dim MoederProductService As AXimpl.Dynamics.InventoryOut.EventHandler.ReceptieAfmelden.MoederProductService = ##class(AXimpl.Dynamics.InventoryOut.EventHandler.ReceptieAfmelden.MoederProductService).%New()
-					Set OrderId = ProductToelevLijnEvent.Data.GeefOrderId() // STAAT ENKEL OP Cache05GeproduceerdEvent
-					Set OrderLijnId = ProductToelevLijnEvent.Data.GeefOrderLijnId() // STAAT ENKEL OP Cache05GeproduceerdEvent
-					
-					If ($$$Not(ProductId = MoederProductService.GeefProductIdVanProductOpOrderLijn(OrderId, OrderLijnId))) {
-						If (MoederProductService.IsEenMoederProductMetStockOverKinderen(OrderId, OrderLijnId)) {
-							Set MagRequestGenereren = $$$False
-						}
-					}
+				If (ProductToelevLijnEvent.%IsA("DOM.AKP.event.Cache05GeproduceerdEvent")) {
+					#dim Cache05GeproduceerdEventService As AXimpl.Dynamics.InventoryOut.EventHandler.ReceptieAfmelden.Cache05GeproduceerdEventService = ##class(AXimpl.Dynamics.InventoryOut.EventHandler.ReceptieAfmelden.Cache05GeproduceerdEventService).%New()	
+					Do Cache05GeproduceerdEventService.VerwerkSamengesteldProductIndienNodig(ProductToelevLijnEvent, ReceptieAfmeldenInputDto)
+					Set MagRequestGenereren = Cache05GeproduceerdEventService.GeefMagRequestGenereren()
 				}
 			} Else {
 				Set Request = ##class(AXimpl.Request).%New("Inventory/Update",ProductToelevLijnEvent.Data.GeefProductID())
Index: AXimpl/Dynamics/InventoryOut/EventHandler/ReceptieAfmelden/Cache05GeproduceerdEventService.cls.xml
===================================================================
diff -u
--- AXimpl/Dynamics/InventoryOut/EventHandler/ReceptieAfmelden/Cache05GeproduceerdEventService.cls.xml	(revision 0)
+++ AXimpl/Dynamics/InventoryOut/EventHandler/ReceptieAfmelden/Cache05GeproduceerdEventService.cls.xml	(revision 58105)
@@ -0,0 +1,52 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="AXimpl.Dynamics.InventoryOut.EventHandler.ReceptieAfmelden.Cache05GeproduceerdEventService">
+<Super>TECH.RegisteredObject</Super>
+
+<Property name="MagRequestGenereren">
+<Type>%Boolean</Type>
+<InitialExpression>1</InitialExpression>
+<Private>1</Private>
+</Property>
+
+<Method name="VerwerkSamengesteldProductIndienNodig">
+<FormalSpec>ProductToelevLijnEvent:TECH.PubSub.Event,ReceptieAfmeldenInputDto:AXimpl.Dynamics.InventoryOut.Converter.dto.ReceptieAfmeldenInput</FormalSpec>
+<Implementation><![CDATA[
+	#dim SpaceTowerAfhandelaar As AXimpl.Dynamics.InventoryOut.EventHandler.ReceptieAfmelden.SpaceTowerAfhandelaar = ##class(AXimpl.Dynamics.InventoryOut.EventHandler.ReceptieAfmelden.SpaceTowerAfhandelaar).%New()
+	#dim ProductId As %String = ProductToelevLijnEvent.Data.GeefProductID()
+	#dim AxInventTransId As %String = ProductToelevLijnEvent.Data.GeefAxInventTransId()
+	#dim Aantal As %Integer = ProductToelevLijnEvent.Data.GeefAantal()
+	#dim OrderId As %String = ProductToelevLijnEvent.Data.GeefOrderId() // STAAT ENKEL OP Cache05GeproduceerdEvent
+	#dim OrderLijnId As %String = ProductToelevLijnEvent.Data.GeefOrderLijnId() // STAAT ENKEL OP Cache05GeproduceerdEvent
+	
+	If (SpaceTowerAfhandelaar.IsLadeVanSpaceTowerProduct(ProductId)) {
+		Do SpaceTowerAfhandelaar.VerwerkSpaceTowerKindProduct(ProductId, AxInventTransId, OrderId, OrderLijnId, Aantal)
+		
+		If SpaceTowerAfhandelaar.IsSpaceTowerCompleet(AxInventTransId, OrderId, OrderLijnId) {
+			Set ReceptieAfmeldenInputDto.ProductID = SpaceTowerAfhandelaar.GeefProductIdVanSpaceTower(OrderId, OrderLijnId)
+			Set ReceptieAfmeldenInputDto.Aantal = 1
+			Do SpaceTowerAfhandelaar.KillDataVanCompleteSpaceTower(AxInventTransId, OrderId, OrderLijnId)
+		} Else {
+			Set ..MagRequestGenereren = $$$False
+		}
+	} Else {
+		#dim MoederProductService As AXimpl.Dynamics.InventoryOut.EventHandler.ReceptieAfmelden.MoederProductService = ##class(AXimpl.Dynamics.InventoryOut.EventHandler.ReceptieAfmelden.MoederProductService).%New()
+		
+		If ($$$Not(ProductId = MoederProductService.GeefProductIdVanProductOpOrderLijn(OrderId, OrderLijnId))) {
+			If (MoederProductService.IsEenMoederProductMetStockOverKinderen(OrderId, OrderLijnId)) {
+				Set ..MagRequestGenereren = $$$False
+			}
+		}
+	}
+]]></Implementation>
+</Method>
+
+<Method name="GeefMagRequestGenereren">
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit ..MagRequestGenereren
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>