Index: vhMAIL5.mac.rou
===================================================================
diff -u -r1047 -r4104
--- vhMAIL5.mac.rou	(.../vhMAIL5.mac.rou)	(revision 1047)
+++ vhMAIL5.mac.rou	(.../vhMAIL5.mac.rou)	(revision 4104)
@@ -13,7 +13,9 @@
  .Do NIEUW^vhScherm("MAILS")
  Else  Do EDIT^vhScherm("MAILS")
  Set R=$P($S('UserId:"",1:^vhMAIL("D",MailId,"N",UserId)),D,5)
- If $L(XLater),$L(R)!%SC New R Xecute XLater
+ If $L(XLater),$L(R)!%SC Do
+ . New R
+ . Xecute XLater
  Do REFRESH^vhTERMINA()
  Quit $S(%SC:Date_","_Time,$L(R):R,1:"")
  ;