Index: MRPSTOCK.mac.rou
===================================================================
diff -u -r29059 -r48084
--- MRPSTOCK.mac.rou	(.../MRPSTOCK.mac.rou)	(revision 29059)
+++ MRPSTOCK.mac.rou	(.../MRPSTOCK.mac.rou)	(revision 48084)
@@ -306,6 +306,7 @@
  If TimeOut Lock +^PRSTOCK("D",PRNr):TimeOut Else  Quit 0
  Else  Lock +^PRSTOCK("D",PRNr)
  Set $P(^PRSTOCK("D",PRNr),D,Piece)=$S($G(IsSet):0,1:$P($G(^PRSTOCK("D",PRNr)),D,Piece))+QtyWV
+ D ##class(DOM.MAG.event.EventRaiser).%New().RaiseStockGewijzigdEvent(PRNr)
  Lock -^PRSTOCK("D",PRNr)
  Quit:TimeOut 1
  Quit