Index: FaxMail2.mac.rou
===================================================================
diff -u -r948 -r1047
--- FaxMail2.mac.rou	(.../FaxMail2.mac.rou)	(revision 948)
+++ FaxMail2.mac.rou	(.../FaxMail2.mac.rou)	(revision 1047)
@@ -34,6 +34,7 @@
  New %J,I,R,LEVNr,Data,MTData,OPData,Taal,Tav,Document,DocNum,zb,ToDev
  Set Data("Via")="TOE",(Document,Data("Document"))="T"
  Merge DocNum=TOENr,Data("DocNum")=TOENr,OPData=Data
+ If 'TOENr Merge ^cw("FaxMail2",$H,"DocNum")=DocNum,^cw("FaxMail2",$H,"Data")=Data,^cw("FaxMail2",$H,"OPData")=OPData
  Set R=^KTO1(TOENr),LEVNr=$P(R,D)
  Set TextId=$G(TextId) Set:TextId="" TextId=$$TSELECT^DCFAX()
  Do:$L(TextId)