Index: BLVWIMP.mac.rou
===================================================================
diff -u -r37042 -r37433
--- BLVWIMP.mac.rou	(.../BLVWIMP.mac.rou)	(revision 37042)
+++ BLVWIMP.mac.rou	(.../BLVWIMP.mac.rou)	(revision 37433)
@@ -207,7 +207,7 @@
  . . If '$D(^KPR2(PRIDNO_" ")) Set Body=Body_"   onbekend bij VH"
  Do:$L(Body)
  . Set From=##class(TECH.Context.RuntimeContext).Instance().GeefServerNaam()_"@VANHOECKE.BE"
- . Set To=$$USERNAME^vhUSER("JDR;PVH","@",1)
+ . Set To=$$USERNAME^vhUSER("JB;PVH","@",1)
  . Set Subject=$S($D(NewProd):"nieuwe",1:"")
  . If $D(NewProd),$D(ModProd) Set Subject=Subject_"- en "
  . Set Subject=Subject_$S($D(ModProd):"gewijzigde",1:"")
@@ -222,3 +222,4 @@
 
 
 
+