DEFINE CLASS Logger AS Custom PROCEDURE Log(tcMessage) STRTOFILE(DTOC(DATE()) + " " + TIME() + " " + tcMessage + CHR(13), "app.log", 1) ENDPROC ENDDEFINE