Before I dive into the next project I need to know if this is possible:

I have written some software which creates a letter to a referring physician
about a patient admitted to the hospital. It prints a fax cover sheet and
the appropriate letter. It works very well and the 2 pages are printed as 2
jobs and then faxed by an administrative support person. The program is
being used so much that the administrative support person is getting behind.

They have asked me if can I make it print to WinFax Pro (or some other fax
software).
2 questions:
1) Is that possible and how automatic is it for the user?
a) Can I get Paradox to give the fax software the phone # so they don't
have to punch it into the machine?
2) Can I get the cover sheet and the letter (2 separate reports) to fax at
the same time?

(Most of these physicans do not recieve business e-mail at this time to be
able to do this electronically).

Thanks and I hope all of you (to whom it applies) had a Merry Christmas and
everyone has a happy, healthy, prosporous and safe New Year!

Craig

There have been a few posts over the years on using WinFax's OLEAuto
control for faxing. It can be 100% automated if you have a modem
connected - no need for a fax machine.

The other option would be an email server which includes a faxing option
(Exchange and GroupWise have these) where you email
<faxnumber>@domain.com and it sends the email as a fax to the specified
number...

Also, you could try using a faxing app which does import / export (but
these are usually ugly as the fax is a text file). I've got a system at
work that does this with a version of HotFax Share.

I found this, as an example of OLE, on one of the old Corel groups:

....you could make one report where the first page is the cover letter
and the remaining pages are the fax.

FWIW,

Liz


Craig Futterman wrote:

Craig,

Our solution is simple, robust and versatile.

We use Paradox together with ActFax to do all of the things you want, and
more. For example, you can tell ActFax to send the fax via modem or email
(with the fax as a pdf attachment). ActFax can also receive and print
faxes. We send/receive on average 70 faxes per day with virtually total
reliability. Have been doing so for several years.

What's more, no oleauto required. Just use Paradox to generate a simple
command string either in a text file or imbedded in the document, and ActFax
will do as requested. We prefer the text file approach for 100%
reliability. You can also attach data files to ActFax emails, though we
currently have no need for this feature.

Next to Paradox, ActFax is the finest software application I've ever seen.

If you want to implement ActFax, I'll be happy to help out.

Jean



"Craig Futterman" <craig.futterman (AT) nospam (DOT) comcast.net> wrote

Craig Futterman wrote:

If they have a fax modem and phone line on their computer, you can do it
with Windows only.

I assume you can send this to the job through the prnReportInfo object but
I've never tried. The Windows fax is just another printer you can pick and
set options for.

Not unless you also intercept the job control with the Win32 job functions,
which is really really messy.

Granted, the info you are currently sending in your custom cover page could
possibly just be pushed to one of the default pages.

--
Larry DiGiovanni
Digico, Inc.
IT Consulting and Staffing Solutions
www.digicoinc.com
Check out www.thedbcommunity.com for Paradox resources.

Jean Friedberg wrote:


I dont find clear, can you give an example of some code which does not
require to fill manually a fax number, please?

"marco" <n_sp_hum_marco.foglia (AT) tucsoft (DOT) com> wrote


Glad to:

SWITCH
CASE ptrname="activefax" :
intSetResolution= 2
intPrintFromApp = 1
intSetUseCover = 0
intSetHold = 1
intSetPriority = 25
STsetHold = strval(intSetHold)
faxSubject = xxSubject+" / ["+mylib.getuserid()+"]"
faxTo =
iif(Supp_contact.isblank()=false,suppid+"/"+supp_contact,suppid+"/"+name1)
faxNumber = phoneNum ; from form or table lookup
faxSetPriority = strval(intSetPriority)

; make ActFax command string
STdatafield=""
STdatafield="@F5010@"
STdatafield=STdatafield+"@F311"+mylib.getusername( )+"@" ; User name
STdatafield=STdatafield+"@F201"+faxTo+"@" ; Fax to
STdatafield=STdatafield+"@F315"+userID+"@" ; Userid
STdatafield=STdatafield+"@F308"+faxCompany+"@" ; Fax company
STdatafield=STdatafield+"@F307"+faxSubject+"@" ; Fax subject
STdatafield=STdatafield+"@F314"+STsetHold+"@" ; Hold (True=1)
STdatafield=STdatafield+"@F301"+faxSetPriority+"@" ; Priority (H=25/N=50)
STdatafield=STdatafield+"@F3132@" ; Resolution
STdatafield=STdatafield+"@F211"+faxNumber+"@"

; set printer options
repPrintinfo.paneloptions=printcliptowidth
repPrintInfo.nCopies = 1
repPrintInfo.Orient = 1

; write command string to hard drive and use to control print options
success=false
if mylib.makeFieldsDat0(STdatafield)
then sleep()
if POrpt.print(repPrintinfo) ; ActFax automatically looks for command
string in specified location on hard drive
then sleep()
success=true
if porpt.close() then sleep() endif
endif
endif
OTHERWISE :
ENDSWITCH

Jean

Salut Jean,

"@F..." are not very evocative commands...
Your code does not show how command STdatafield is sent to actfax, maybe
it is inside makeFieldsDat0()?

thanks
marco

"marco" <n_sp_hum_marco.foglia (AT) tucsoft (DOT) com> wrote

What's your point? Those are ActFax codes, and with the codes the user has
a complete command set that avoids the necessity of oleauto programming.

Yes it does:

; write command string to text file on hard drive and use to control print
options
success=false
if mylib.makeFieldsDat0(STdatafield) ; this library function writes the
command string to a text file on the hard drive
then sleep()
if POrpt.print(repPrintinfo) ; on the command to print, ActFax
automatically finds the command string and prints the report
; as a fax
endif