Index: AXimpl/Dynamics/SalesLineStatusOut/EventHandler/SalesLineStatusUpdate.cls.xml
===================================================================
diff -u -r73299 -r74968
--- AXimpl/Dynamics/SalesLineStatusOut/EventHandler/SalesLineStatusUpdate.cls.xml	(.../SalesLineStatusUpdate.cls.xml)	(revision 73299)
+++ AXimpl/Dynamics/SalesLineStatusOut/EventHandler/SalesLineStatusUpdate.cls.xml	(.../SalesLineStatusUpdate.cls.xml)	(revision 74968)
@@ -86,9 +86,20 @@
 	try {
 		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))
-		Set Request = ##class(AXimpl.Request).%New("SalesLineStatus/Update",ToeleveringLijn.GeefOrderID()_"_"_ToeleveringLijn.GeefOrderLijnID(),Event.Data.Status)
+		
+		If (Event.Data.Status = "Klaargezet") {
+			If $$$Not($D(^SalesLineStatusUpdateLog($Piece(Event.Data.OrderLijnId,"_",1),$Piece(Event.Data.OrderLijnId,"_",2)))) {
+				Set ^SalesLineStatusUpdateLog($Piece(Event.Data.OrderLijnId,"_",1),$Piece(Event.Data.OrderLijnId,"_",2)) = "Sent"
+				Set Request = ##class(AXimpl.Request).%New("SalesLineStatus/Update",ToeleveringLijn.GeefOrderID()_"_"_ToeleveringLijn.GeefOrderLijnID(),Event.Data.Status)
+				Hang 2
+				Kill ^SalesLineStatusUpdateLog($Piece(Event.Data.OrderLijnId,"_",1),$Piece(Event.Data.OrderLijnId,"_",2))
+			}
+		} Else {
+			Set Request = ##class(AXimpl.Request).%New("SalesLineStatus/Update",ToeleveringLijn.GeefOrderID()_"_"_ToeleveringLijn.GeefOrderLijnID(),Event.Data.Status)
+		}
 	} catch {
-		#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()		
+		#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
+		Kill ^SalesLineStatusUpdateLog($Piece(Event.Data.OrderLijnId,"_",1),$Piece(Event.Data.OrderLijnId,"_",2))		
 		Do ##class(vhLib.Logger).%New().Warning("AXimpl.Dynamics.InventoryOut.EventHandler.SalesLineStatusUpdate", "Toelevering '" _Event.Data.OrderLijnId _"' bestaat niet meer dus er wordt geen status naar AX doorgegeven. " _Exception.ToString())
 	}
 	Quit Request