Index: MRPRES.mac.rou
===================================================================
diff -u -r46903 -r48084
--- MRPRES.mac.rou	(.../MRPRES.mac.rou)	(revision 46903)
+++ MRPRES.mac.rou	(.../MRPRES.mac.rou)	(revision 48084)
@@ -440,6 +440,7 @@
  If QtyWVRes>0 Do
  .Do MODWVRES^MRPSTOCK(HFPRNr,QtyWVRes)
  Do SETHFAR(FabKey,HFCode,HFPRNr,HFStatus,QtyRes,QtyWVRes,QtyReq,QtyWVReq)
+ D ##class(DOM.MAG.event.EventRaiser).%New().RaiseStockGewijzigdEvent(HFPRNr)
  Lock -^PRSTOCK(HFPRNr)
  Set:QtyHF QtyRes=QtyRes\QtyHF ; aantal eindproducten
  
@@ -513,4 +514,3 @@
  . Set ^HADPR("F",FabKey,"AR",HFCode)=HFRec
  Quit
 
-