Index: BL/Legacy/EWBON.cls.xml =================================================================== diff -u -r44879 -r45188 --- BL/Legacy/EWBON.cls.xml (.../EWBON.cls.xml) (revision 44879) +++ BL/Legacy/EWBON.cls.xml (.../EWBON.cls.xml) (revision 45188) @@ -106,24 +106,13 @@ { Set CONSNr = Iterator.Next() #dim OpbonGelukt = $$BON^EWBON(CONSNr,.NoAsk) - Do ..RaisePickingCompleetEvent(CONSNr) + Do ##class(DOM.MAG.event.EventRaiser).RaisePickingCompleetEvent(CONSNr) Do:(DoePrintFax)&&(OpbonGelukt) ..PrintFaxBon(CONSNr) } Do:'$Get(NoAsk) REWRITE^EWORDST(1) ]]> - -1 -CONSNr:%String -1 - - - Deze wordt best in een aparte thread opgeroepen. Zie BON^EWBON() Index: DOM/MAG/event/EventRaiser.cls.xml =================================================================== diff -u -r45015 -r45188 --- DOM/MAG/event/EventRaiser.cls.xml (.../EventRaiser.cls.xml) (revision 45015) +++ DOM/MAG/event/EventRaiser.cls.xml (.../EventRaiser.cls.xml) (revision 45188) @@ -11,6 +11,15 @@ Do ##class(TECH.Context).Instance().GeefPubSubAPI().GeefEventRaiser().RaiseEventAsync(StockGewijzigdEvent) ]]> + + +Id:%String + + Index: DOM/MAG/event/PickingCompleetEvent.cls.xml =================================================================== diff -u --- DOM/MAG/event/PickingCompleetEvent.cls.xml (revision 0) +++ DOM/MAG/event/PickingCompleetEvent.cls.xml (revision 45188) @@ -0,0 +1,12 @@ + + + +TECH.PubSub.Event + + +%Library.CacheSerialState + + + + +