Index: AXimpl/Dynamics/SalesLineStatusOut/EventHandler/SalesLineStatusUpdate.cls.xml
===================================================================
diff -u -r49623 -r49625
--- AXimpl/Dynamics/SalesLineStatusOut/EventHandler/SalesLineStatusUpdate.cls.xml	(.../SalesLineStatusUpdate.cls.xml)	(revision 49623)
+++ AXimpl/Dynamics/SalesLineStatusOut/EventHandler/SalesLineStatusUpdate.cls.xml	(.../SalesLineStatusUpdate.cls.xml)	(revision 49625)
@@ -52,6 +52,8 @@
 			Set Request = ..VerwerkProductToeleveringLijnKlaargezetVoorProductieEvent(Event)
 		} ElseIf Event.%IsA("DOM.MAG.event.PickingAnnulatieEvent"){
 			Set Request = ..VerwerkPickingAnnulatie(Event)
+		} ElseIf Event.%IsA("TECH.Events.LadeGeproduceerdEvent"){
+			Set Request = ..VerwerkLadeGeproduceerd(Event)
 		}
 		Do Generator.Generate(Request)
 	} Else {
@@ -75,7 +77,8 @@
 <Private>1</Private>
 <ReturnType>AXimpl.Request</ReturnType>
 <Implementation><![CDATA[
-	#dim ToeleveringLijn As DOM.AKP.ToeleveringLijn = ##class(DOM.AKP.impl.DataM.DataMToeleveringAPI).%New().GeefToeleveringLijn($Piece(Event.Data.OrderLijnId,"_",1),$Piece(Event.Data.OrderLijnId,"_",2))
+	Set ToeleveringAPI = ##class(DOM.AKP.impl.DataM.DataMToeleveringAPI).%New()
+	#dim ToeleveringLijn As DOM.AKP.ToeleveringLijn = ToeleveringAPI.GeefToeleveringLijn($Piece(Event.Data.OrderLijnId,"_",1),$Piece(Event.Data.OrderLijnId,"_",2))
 	
 	Quit ##class(AXimpl.Request).%New("SalesLineStatus/Update",ToeleveringLijn.GeefOrderID()_"_"_ToeleveringLijn.GeefOrderLijnID(),Event.Data.Status)
 ]]></Implementation>
@@ -89,6 +92,19 @@
 <Implementation><![CDATA[	Quit ##class(AXimpl.Request).%New("SalesLineStatus/Update",Event.Data.OrderID_"_"_Event.Data.OrderLijnCode,..#Geannuleerd)
 ]]></Implementation>
 </Method>
+
+<Method name="VerwerkLadeGeproduceerd">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>Event:TECH.Events.LadeGeproduceerdEvent</FormalSpec>
+<Private>1</Private>
+<ReturnType>AXimpl.Request</ReturnType>
+<Implementation><![CDATA[
+	Set ToeleveringAPI = ##class(DOM.AKP.impl.DataM.DataMToeleveringAPI).%New()
+	#dim ToeleveringLijn As DOM.AKP.ToeleveringLijn = ToeleveringAPI.GeefToeleveringLijn(Event.Data.Toelevering, Event.Data.ToeleveringsLijn)
+	
+	Quit ##class(AXimpl.Request).%New("SalesLineStatus/Update",ToeleveringLijn.GeefOrderID()_"_"_ToeleveringLijn.GeefOrderLijnID(),..#Geproduceerd)
+]]></Implementation>
+</Method>
 </Class>