Index: FaxMail.mac.rou
===================================================================
diff -u -r1298 -r2126
--- FaxMail.mac.rou	(.../FaxMail.mac.rou)	(revision 1298)
+++ FaxMail.mac.rou	(.../FaxMail.mac.rou)	(revision 2126)
@@ -643,7 +643,7 @@
  . Set:em="" Optie("VWBEPERK")="AK2",R=$$SELECT^PERSS("K",KLNr,.Optie),em=$S($G(zb)="CANC":"",1:R)
  . Set:em="" Optie("VWBEPERK")="AK3",R=$$SELECT^PERSS("K",KLNr,.Optie),em=$S($G(zb)="CANC":"",1:R)
  . Set:em="" Optie("VWBEPERK")="AB1",R=$$SELECT^PERSS("K",KLNr,.Optie),em=$S($G(zb)="CANC":"",1:R)
- Set:em="" em=$P(^KKL(^KK1(KLNr),2),D,19)
+ If em="" Set em=$P(^KKL(^KK1(KLNr),2),D,19) Set:$E(em)="#" $E(em)="" Set:$E(em)="~" $E(em)=""
  Set:'Multi em=$P(em,";")
  Quit em
  ;