Dennis, Dan, Buddy, Razzak
Thanks for all the ideas. I know the PDFs sub on Y:\ exists because I
initially set it up that way. I have write permits to Y:\and all the
subs. I will try the &vFileName option tommorrow. There is probably a
single letter I am missing. Looking at the EEP long enough and the
details slide by. I have a 100+ samples of this working on C:\ every
time, so I know the basic idea works. Since the filenames go the right
places on the network there has to be something blocking the creation of
the text part of the file. Time to step away for awhile.
Tom Frederick
On 2/5/2010 5:04 PM, A. Razzak Memon wrote:
At 05:38 PM 2/5/2010, Tom Frederick wrote:
What works on C:\RBTI is:
SET VAR vCurrDir TEXT = ((CVAL('CurrDir'))+'\PDFs\')
SET VAR vRep TEXT = 'MHA'
SET VAR vRepTitle TEXT = +
((CTXT(.vZID))+'_'+.vRep+'_'+.vStDate+'_'+.vStTime+'.PDF')
SET VAR vFileName TEXT = (.vCurrDir + .vRepTitle)
PRINT Mental_Health_Assemment WHERE ZID = (.vZID) +
OPTION PDF +
|FILENAME .vFileName +
edited 20 lines out
|OPEN OFF
Once the PDF is done the user can review it, decide to keep
it, print and send to storage. Under HIPPA rules I have to
limit who has access and who can write reports.
Is there a PDF folder under the current directory on the network?
If not, try the following code to assure the existence of PDF
folder under the current directory, before printing the report
as PDF with FILENAME parameter.
IF vReportOutPut = 'PDF' THEN
-- Verify the existance of PDF Sub-Directory
SET VAR vChkFile INTEGER = NULL
SET VAR vChkFile = (CHKFILE('PDF'))
IF vChkFile <> 1 THEN
MD PDF
ENDIF
ENDIF
Very Best R:egards,
Razzak.
