** Use CAST instead of temp file lcStr = CAST(custfile AS Blob) * COPY TO temp FIELDS custfile NEXT 1 * lcPdfFileName = "cust_hist.pdf" * lcStr = FILETOSTR("temp.fpt") lnStartPos = AT( "%PDF", lcStr) lnEndPos = RAT( "%%EOF", lcStr) + 5 lcPdfStr = SUBS(lcStr, lnStartPos, lnEndPos - lnStartPos + 1 ) STRTOFILE(lcPdfStr, lcPdfFileName)