Index: KTWTN.mac.rou
===================================================================
diff -u -r919 -r948
--- KTWTN.mac.rou	(.../KTWTN.mac.rou)	(revision 919)
+++ KTWTN.mac.rou	(.../KTWTN.mac.rou)	(revision 948)
@@ -26,16 +26,7 @@
 25 K @("^"_Q_UG1_"(TR)"),@("^"_Q_UGB_"(TR)"),@("^"_Q_UG2_"(LC,TR)"),@("^"_Q_UGL_"(LC,TR)")
 27 S (TR,TLNr)=TRN,K="-",FP=$P(U2,U,5)*100+$P(U2,U,6) W @F,$J("",$P(U2,U,9)),$J("",$P(U2,D,13)),@F,TR
 29 S @%Q1=1
-YZ 
- Set ToeleveringDeletedEventData = ##class(TECH.Events.ToeleveringDeletedEventData).%New(TR)
- Set ToeleveringDeletedEvent = ##class(TECH.Events.ToeleveringDeletedEvent).%New(ToeleveringDeletedEventData)
- Do ##class(TECH.PubSub.OrchestrationContext).GetEventRaiser().RaiseEventAsync(ToeleveringDeletedEvent)
- 
- Set Toelevering = ##class(DOM.DomeinContext).Instance().GeefToeleveringAPI().GeefToelevering(TRN)
- Set ToeleveringCreatedEventData = ##class(TECH.Events.ToeleveringCreatedEventData).%New(Toelevering)
- Set ToeleveringCreatedEvent = ##class(TECH.Events.ToeleveringCreatedEvent).%New(ToeleveringCreatedEventData)
- Do ##class(TECH.PubSub.OrchestrationContext).GetEventRaiser().RaiseEventAsync(ToeleveringCreatedEvent)
- 
+YZ  
  K TRN,KC,UR,UZ,UU2,UOD,X,PR L @("^"_Q_UGL_"(LC,TR)") Q
  ;
 Z X ^cZ Q