Login
Templates, Tools and Utilities
for Clarion Developers
Templates, Tools and Utilities
|
||
|
|
|
Add a comment to an Icetips ArticlePlease add your comments to this article.
Please note that you must provide both a name and a valid email address in order
for us to publish your comment. Comments are moderated and are not visible until they have been approved. Spam is never approved!
Back to article list Search Articles Add Comment Printer friendly Direct link Par2: Interfacing to WinFax Pro using DDE 1999-07-07 -- Richard Rose Obviously you need to include prnprop.clw to specify Winfax as the default printer.
Variables required.
Channel Long
FaxExpression (C)String 150
Somewhere like a Splash screen:
channel = DDEclient('FAXMNG32','CONTROL')
Button calling the Single report from a browse:
Faxexpression = 'recipient('& chr(34) & COM:Fax & chr(34) & ',,,' & chr(34)
& COM:Contact & |
chr(34) &',' & chr(34) & COM:CompanyName & chr(34) & ',' & chr(34)&
'Auto-Fax Copy Invoice ' & chr(34) & ',,,)'
On the report in question (for single reports):
Progressmanager.Init Priority 5001
channel = DDEclient('FAXMNG32','TRANSMIT')
DDEpoke(channel,'sendfax',Faxexpression)
For multiple reports to multiple destinations.
Call a process which calls the report (conditions optional ie filters etc.)
In the Report make the field(s) you use in your faxexpression hotfields in the case below
MAC:MeterFaxNo & MAC:CompanyName.
Report
Thiswindow.Init priority 5001
channel = DDEclient('FAXMNG32','TRANSMIT')
FaxExpression = 'recipient('& chr(34) & MAC:MeterFaxNo & chr(34) &
',"18:30:00",,,' & chr(34) & LEFT(MAC:CompanyName,40) & chr(34) & ',' &
chr(34)& 'Auto-Meter Reading Request' & chr(34) & ',,,)'
DDEPOKE(channel,'sendfax',Faxexpression)
(same) Report
WindowEvents.CloseWindow Priority 5000
DDEExecute(channel,'GoActive')
Today is May 6, 2024, 11:12 am This article has been viewed 35116 times.
|
|