PMFJI, but shouldn't:

lcattach = .icdocpath+alltrim(qmdocnm)

be:

lcattach = .icdocpath+alltrim(spoolQue.qmdocnm)


>*fax document
>local lcsubject lcattach
>with thisform
> .lbldoc.caption = "Faxing "+alltrim(spoolque.qmdocnm)
> lcattach = .icdocpath+alltrim(qmdocnm)
> lcsubject = alltrim(spoolque.qmsubject)
> lcbody = ""
> lcaddress = "[Fax:"+alltrim(spoolque.qmmaddr)+"]"
> lnerr = .cusmail.sendmail("","",lcaddress,lcsubject,lcbody,lcattach)
> select spoolque
> if lnerr > 0
> replace qmstatus with 'F'
> replace qmfault with "Failed"
> tableupdate(.t.)
> return .f.
> else
> replace qmstatus with 'C'
> replace qmfault with 'Done'
> tableupdate(.t.)
> return .t.
> endif
>endwith
>