Downloads a file in the users browser

Downloads a file in the users browser

@param FILEPATH Filepath of the file to be downloaded

Local Char FILEPATH(250) FILEPATH="D:\SageX3\X3TST\folders\khadda\YNFI\[M:YKH]YKH.txt" Subprog DOWNLOAD_FILE(FILEPATH) Value Char FILEPATH Local Char TMPPATH(250) Local Integer STAT : STAT = 0 TMPPATH = filpath("TMP", "tmp_" + uuid$, func GET_FILE_EXTENSION(FILEPATH)) Call MOVE(FILEPATH, TMPPATH, STAT) From ORDSYS # change file name to a temporary one to avoid download error Call COPCLI(TMPPATH, FILEPATH, STAT) From ORDSYS # change back to original file name while downloading Call MOVE(TMPPATH, FILEPATH, STAT) From ORDSYS If STAT Errbox("Could not download file") Titled "Download error" Endif End