Re: Windows 7 & pdfFactory

Posted by Grant Foraker on September 29, 2011 at 10:48:11:

In Reply to: Re: Windows 7 & pdfFactory posted by Brian Levantine on September 28, 2011 at 13:12:27:

here's my logic ...

CopyTheDocument:
     CLOSE (1)                                              ! RELEASE PRINTER
     INPUT (#) FROMPATH$                                    ! GET pdfFactory name
	
	LET FROMPATH$ = STRIP(FROMPATH$)
	LET ARCFILE$ = WBBILL$ + '.PDF'
	LET TOPATH$ = STRIP(ZPDFPATH$) + 'FY' + PDFFY$ + '\' + PDFSRCE$ + '\' + STRIP(ARCFILE$)
	LET COPYFLAGS = 0 + 2048 + 4096                        ! LOCAL, OVERWRITE, CREATE DIRECTORY
	
	Print (CopyFile = FROMPATH$, TOPATH$, COPYFLAGS)
	GOSUB CopyGetResult
     IF FuncError NE 1
     	LET MBMSG$ = 'Local Copy Error:' + STR(FuncError) + '/' + STR(FileError)
          MSGBOX(MBMSG$)
          OPEN (51) 'LAF'
		PRINT (51) 'Local Copy error'
		LET MESSAGE$ = STR(FuncError)
		PRINT (51) 'Func: ';MESSAGE$
		LET MESSAGE$ = STR(FileError)
		PRINT (51) 'File: ';MESSAGE$
		PRINT (51) 'From: ';FROMPATH$
		PRINT (51) 'To:   ';TOPATH$
		CLOSE (51)
     ENDIF
	RETURN

If the overwrite is on, what causes the 22/183 "Already Exists" error. Only one user can be creating PDF's in the target folder. I have a *PDF record that's locked at the beginning of the print process.

Follow Ups:

Post a Followup

Each file can be a maximum of 1MB in length Uploaded files will be purged from the server on a regular basis.