Index: vhDeploy/D20171116xEventSubsWijziging.cls.xml
===================================================================
diff -u
--- vhDeploy/D20171116xEventSubsWijziging.cls.xml	(revision 0)
+++ vhDeploy/D20171116xEventSubsWijziging.cls.xml	(revision 47634)
@@ -0,0 +1,22 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.D20171116xEventSubsWijziging">
+<Super>vhDeploy.Deploy</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>Andere eventsubscripties voor toelevering en orders ifv ax sync</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	Do ##class(TECH.Context).Instance().GeefPubSubAPI().RemoveSubscription("AXimpl.Dynamics.InventoryOut.EventHandler.ReceptieAfmelden","StartVerwerking")
+	
+	Do ##class(AXimpl.Dynamics.InventoryOut.EventHandler.ReceptieAfmelden).Install()
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: AXimpl/Dynamics/InventoryOut/EventHandler/ReceptieAfmelden.cls.xml
===================================================================
diff -u -r45613 -r47634
--- AXimpl/Dynamics/InventoryOut/EventHandler/ReceptieAfmelden.cls.xml	(.../ReceptieAfmelden.cls.xml)	(revision 45613)
+++ AXimpl/Dynamics/InventoryOut/EventHandler/ReceptieAfmelden.cls.xml	(.../ReceptieAfmelden.cls.xml)	(revision 47634)
@@ -5,16 +5,16 @@
 
 <Method name="StartVerwerking">
 <ClassMethod>1</ClassMethod>
-<FormalSpec>ProductToelevLijnIngeboektEvent:DOM.AKP.event.ProductToelevLijnIngeboekt</FormalSpec>
+<FormalSpec>ProductToelevLijnVerwijderdEvent:DOM.AKP.event.ProductToelevLijnVerwijderd</FormalSpec>
 <Implementation><![CDATA[
 	Quit:##class(TECH.Config.ConfigMgr).Instance().GeefString("AX_Runmode")=""
 	
 	Set Generator = ##class(AXimpl.Generator).%New()
 	
-	If ProductToelevLijnIngeboektEvent.Data.GeefLeverancierID() = ##class(DOM.AKP.enu.Leverancier).Halux() {
-		Set Request = ##class(AXimpl.Request).%New("Inventory/ReceptieAfmelden",ProductToelevLijnIngeboektEvent.Data.GeefToeleveringID()_"_"_ProductToelevLijnIngeboektEvent.Data.GeefToeleveringLijnCode())
+	If ProductToelevLijnVerwijderdEvent.Data.GeefLeverancierID() = ##class(DOM.AKP.enu.Leverancier).Halux() {
+		Set Request = ##class(AXimpl.Request).%New("Inventory/ReceptieAfmelden",ProductToelevLijnVerwijderdEvent.Data.GeefToeleveringID()_"_"_ProductToelevLijnVerwijderdEvent.Data.GeefToeleveringLijnCode())
 	} Else {
-		Set Request = ##class(AXimpl.Request).%New("Inventory/Update",ProductToelevLijnIngeboektEvent.Data.GeefProductID())
+		Set Request = ##class(AXimpl.Request).%New("Inventory/Update",ProductToelevLijnVerwijderdEvent.Data.GeefProductID())
 	}
 	
 	Do Generator.Generate(Request)
Index: EWTOE.mac.rou
===================================================================
diff -u -r46411 -r47634
--- EWTOE.mac.rou	(.../EWTOE.mac.rou)	(revision 46411)
+++ EWTOE.mac.rou	(.../EWTOE.mac.rou)	(revision 47634)
@@ -164,15 +164,18 @@
  Set CifPPL=$$CifPPL(PRNr)
  Do HIST(LEVNr,TOENr,TLUNr,PRNr,AantWMS,RCPODate,HistRef,.WMS,,,OverKind)
  Do ##class(BL.Legacy.EWRCPS2).RegistreerReceptieTijdstipIndienGelinktInOrder(TOENr, TLUNr)
- Do ProductToeleveringLijnIngeboekt^EWRCPS2(LEVNr,TOENr,TLNr)
  Do KWNODE^FLOWTOE(LEVNr,TOENr,TLNr)
+ Do ProductToeleveringLijnIngeboekt^EWRCPS2(LEVNr,TOENr,TLNr)
  For  Do ADD^vhLock("^KSPW(PRNr)") Quit:%TC  Hang 1
  Set Decimals=$$MUNT^vhRtn1(,4),R=TOENr
  For  Quit:'$D(^KSPW(PRNr,LevTW,R))  Set R=R+.1
  Set ^KSPW(PRNr,LevTW,R)=AantWMS_D_$J(CifPPL*AantWMS,0,Decimals)_D_LevTB_D_LevTA_D_$E(LevTW,3,4)_"/"_$E(LevTW,5,6)_D_''ORDNr_D
  Do REMOVE^vhLock("^KSPW(PRNr)"),COPY(TOENr,TLNr,Rec,AantWMS)
  Do ##class(Flow.Toelevering).RecuPak(PRNr,AantWMS,TOENr,TLUNr,HistRef,.BLKLNr,.BLFactuurNr,.BLFactuurDatum)
- If 'AantBo Do KILL(TOENr,TLNr)
+ If 'AantBo 
+ .Set ToeleveringLijnCode=$$GeefToeleveringLijnCode^FLOWTOE(LeverancierNummer,ToeleveringID,ToeleveringLijnID)
+ .Do KILL(TOENr,TLNr)
+ .Do ProductToeleveringLijnVerwijderd(LEVNr,ToeleveringID,ToeleveringLijnCode,PRNr,$P(Rec,D,30),Besteld,$P(Rec,D,56),$P(Rec,D,55),$P(Rec,D,57))
  If AantBo Do
  .Set Rec=^KTO(LEVNr,TOENr,TLNr) Set:'$P(Rec,D,23) $P(Rec,D,23)=$P(Rec,D,3)
  .Set $P(Rec,D,9)=$J(($P(Rec,D,9)/$P(Rec,D,3)*AantBo),0,##class(APPS.VKP.OrderlijnPrijsBepaler).GeefAantalDecimalen())
@@ -236,6 +239,15 @@
  Do REMOVE^vhLock("^KTO(LEVNr,TOENr)")
  Quit
  
+ProductToeleveringLijnVerwijderd(LeverancierNummer, ToeleveringID, ToeleveringLijnCode, ProductID, ReceptieTijdstip, Aantal, AxConfigId, AxInventTransId, AxMaatwerkGenerischItemId)
+ New ProductID,ToeleveringLijnCode,ProductToeleveringLijnEventData,ProductToeleveringLijnIngeboekt
+ If ProductID{	 
+	 #dim LeverancierID As DOM.common.PartijID = ##class(DOM.DomeinContext).Instance().GeefLegacyPartijAPI().GeefLeverancierPartijID(LeverancierNummer)
+	 Set ProductToeleveringLijnVerwijderEventData = ##class(DOM.AKP.event.ProductToelevLijnVerwijderEventData).%New(ToeleveringID, ToeleveringLijnCode, ProductID, LeverancierID, ReceptieTijdstip, Aantal, AxConfigId, AxInventTransId, AxMaatwerkGenerischItemId)
+	 Set ProductToeleveringLijnVerwijderdEvent = ##class(DOM.AKP.event.ProductToelevLijnVerwijderd).%New(ProductToeleveringLijnVerwijderEventData)
+	 Do ##class(TECH.Context).Instance().GeefPubSubAPI().GeefEventRaiser().RaiseEventAsync(ProductToeleveringLijnVerwijderdEvent)
+ }
+ 
  ; Om KOM-links op niveau van een kind van het product uit het order-lijn te ondersteunen...
 WijzigAantalIndienKind(AantalInToelevering,PRNrUitToelevering,PRNrUitOrder)
 	&SQL(SELECT KindBSKey INTO :Sleutel