Index: FLOWTOE2.mac.rou =================================================================== diff -u -r921 -r948 --- FLOWTOE2.mac.rou (.../FLOWTOE2.mac.rou) (revision 921) +++ FLOWTOE2.mac.rou (.../FLOWTOE2.mac.rou) (revision 948) @@ -35,12 +35,6 @@ .Do SWNODE(LEVNr,TLNr,TLLNr) .If $D(UL),$D(UD),UL'>$P(UD,D,2) Set UL=UL+1 .If Show Do NIEUWV^PROC3(TLLNr) - - Set Toelevering = ##class(DOM.DomeinContext).Instance().GeefToeleveringAPI().GeefToelevering(TLNr) - Set ToeleveringModifiedEventData = ##class(TECH.Events.ToeleveringModifiedEventData).%New(Toelevering) - Set ToeleveringModifiedEvent = ##class(TECH.Events.ToeleveringModifiedEvent).%New(ToeleveringModifiedEventData) - Do ##class(TECH.PubSub.OrchestrationContext).GetEventRaiser().RaiseEventAsync(ToeleveringModifiedEvent) - Quit ; ; Insert produkt @@ -193,12 +187,6 @@ .Do REMOVE^vhLock("^KOD(KLNr,""F"",ORDNr)") Do REMOVE^vhLock("^KPR(OPRNr)") Do REMOVE^vhLock("^KPR(NPRNr)") - - Set Toelevering = ##class(DOM.DomeinContext).Instance().GeefToeleveringAPI().GeefToelevering(TLNr) - Set ToeleveringModifiedEventData = ##class(TECH.Events.ToeleveringModifiedEventData).%New(Toelevering) - Set ToeleveringModifiedEvent = ##class(TECH.Events.ToeleveringModifiedEvent).%New(ToeleveringModifiedEventData) - Do ##class(TECH.PubSub.OrchestrationContext).GetEventRaiser().RaiseEventAsync(ToeleveringModifiedEvent) - Quit ; GWNODE(LEVNr,TLNr,TLLNr)