Index: vhConsistency/Checks/Events/ControleOrderLijnen.cls.xml =================================================================== diff -u -r30252 -r45989 --- vhConsistency/Checks/Events/ControleOrderLijnen.cls.xml (.../ControleOrderLijnen.cls.xml) (revision 30252) +++ vhConsistency/Checks/Events/ControleOrderLijnen.cls.xml (.../ControleOrderLijnen.cls.xml) (revision 45989) @@ -195,13 +195,14 @@ Set IsWachtendOpPicking = (ConsolidatieID > 0) If (Lijn.IsWachtendOpPicking() '= IsWachtendOpPicking) { + #dim ExtraMeldingInfo As %String = " , want ConsolidatieID = '"_ConsolidatieID_"' en Lijn Picking = '"_Lijn.IsWachtendOpPicking()_"'" If (IsWachtendOpPicking) { Set WachtendOpPickingEventData = ##class(DOM.MAG.event.WachtendOpPickingEventData).%New(OrderID, OrderLijnCode, ConsolidatieID) Set WachtendOpPickingEvent = ##class(DOM.MAG.event.WachtendOpPickingEvent).%New(WachtendOpPickingEventData) Do ##class(TECH.Context).Instance().GeefPubSubAPI().GeefEventRaiser().RaiseEventAsync(WachtendOpPickingEvent) - Do ..VoegMeldingToe("Productorderlijn naar wachtend op picking gewijzigd ("_OrderID_", "_OrderLijnCode_")") + Do ..VoegMeldingToe("Productorderlijn naar wachtend op picking gewijzigd ("_OrderID_", "_OrderLijnCode_")"_ExtraMeldingInfo) } Else { @@ -210,7 +211,7 @@ Set PickingAnnulatieEvent = ##class(DOM.MAG.event.PickingAnnulatieEvent).%New(PickingAnnulatieEventData) Do ##class(TECH.Context).Instance().GeefPubSubAPI().GeefEventRaiser().RaiseEventAsync(PickingAnnulatieEvent) - Do ..VoegMeldingToe("Productorderlijn naar geannuleerd voor picking ("_OrderID_", "_OrderLijnCode_")") + Do ..VoegMeldingToe("Productorderlijn naar geannuleerd voor picking ("_OrderID_", "_OrderLijnCode_")"_ExtraMeldingInfo) } } ]]>