FUNCTION GENTOFIL( lcFieldname,lcFilename ) lcTempfile=SYS(3) && Assign temporary file name COPY TO (lcTempfile) FIELDS (lcFieldname) NEXT 1 && Copy General field data to it liHandlein=FOPEN(lcTempfile+".FPT") && Open its .FPT *--Examine .FPT contents to determine type of embedded document FSEEK(liHandlein, ??? ) liEndOffset= ??? liSize=FSIZE(lcTempfile+".FPT")-liEndOffset && Determine data size liHandleout=FCREATE(lcFilename+"."+lcExtension) && Create output file FWRITE(liHandleout,FREAD(liHandlein,liSize)) && Copy data to it FCLOSE(liHandlein) && Close the temporary .FPT.. FCLOSE(liHandleout) && ...and the output file ERASE (m.lcTempfile)>Hi All,
>APPEND GENERAL c_grph.olegrph >>