>#DEFINE CRLF CHR(13)+CHR(10) >DECLARE INTEGER ShellExecute ; >IN SHELL32.DLL ; >INTEGER nWinHandle,; >STRING cOperation,; >STRING cFileName,; >STRING cParameters,; >STRING cDirectory,; >INTEGER nShowWindow > >lcEmailAddress = ALLTRIM(fcsecure.sc_email) >lcSubject = "Ticker item question" >lcMessageBody = "(...comments, question, corrections here...)" + CRLF + ; >" Project name: "+ALLTRIM(jobs.jc_name) + CRLF + ; >" Project number: "+ALLTRIM(jobs.jc_task) + CRLF + ; >" Item description: "+ALLTRIM(v_ticklerpk.t_desc) + CRLF + ; >" Due Date: "+DTOC(v_ticklerpk.t_date) + CRLF + ; >" Copies: " +ALLTRIM(STR(v_ticklerpk.t_copies)) > >ShellExecute(0, "", "mailto:" + lcEmailAddress + "?Subject=" + lcSubject + ; > "&body=" + lcMessageBody, "", "", 1)>