Index: TECH/PubSub/WachtendeEventVerwerker.cls.xml =================================================================== diff -u -r119 -r204 --- TECH/PubSub/WachtendeEventVerwerker.cls.xml (.../WachtendeEventVerwerker.cls.xml) (revision 119) +++ TECH/PubSub/WachtendeEventVerwerker.cls.xml (.../WachtendeEventVerwerker.cls.xml) (revision 204) @@ -43,7 +43,13 @@ If (RaiseEvent) { + #dim PRNr As %String = $G(@"PRNr") Do ##class(TECH.PubSub.OrchestrationContext).GetEventRaiser().RaiseEventAsync(WachtendEvent.Event) + #dim NieuwPRNr As %String = $G(@"PRNr") + If PRNr '= NieuwPRNr + { + Do ##class(vhLib.Logger).%New("OV").InfoMail("NieuwMaatwerkProduct","PRNr na "_WachtendEvent.Event.%ClassName(1)_" gewijzigd") + } } #dim Status As %Status = WachtendEvent.%DeleteId(WachtendEvent.%Id()) If ($$$ISERR(Status)) $$$ThrowStatus(Status)