Index: EWRCPF.mac.rou
===================================================================
diff -u -r66956 -r69824
--- EWRCPF.mac.rou	(.../EWRCPF.mac.rou)	(revision 66956)
+++ EWRCPF.mac.rou	(.../EWRCPF.mac.rou)	(revision 69824)
@@ -278,10 +278,10 @@
  ...Set:$L(KlNaam) LCount=LCount+1,Link(LCount)="KL\"_KLNr_"\R\O"
  ...Set LCount=LCount+1,Link(LCount)="ORD\"_ORDNr_"\R"
  ...Set KlNaam=""
- .Set Text(1)="Volgend" Set:OCount>1 Text(1)=Text(1)_"e"
- .Set Text(1)=Text(1)_" order" Set:OCount>1 Text(1)=Text(1)_"s"
- .Set Text(1)=Text(1)_$S(OCount=1:" is",1:" zijn")_" klaar:~"
- .Set MailId=$$SYSTEM^vhMAIL("","Order"_$S(OCount=1:"",1:"s"),"Halux.","HALORDOK",.Text,.Link,"U","A")
+ .;Set Text(1)="Volgend" Set:OCount>1 Text(1)=Text(1)_"e"
+ .;Set Text(1)=Text(1)_" order" Set:OCount>1 Text(1)=Text(1)_"s"
+ .;Set Text(1)=Text(1)_$S(OCount=1:" is",1:" zijn")_" klaar:~"
+ .;Set MailId=$$SYSTEM^vhMAIL("","Order"_$S(OCount=1:"",1:"s"),"Halux.","HALORDOK",.Text,.Link,"U","A")
  Do:$D(Mail("E"))  ; Foutieve recepties
  .Kill Text,Link
  .Set TCount=1,(LCount,RCount)=0,RCPNr=""