Guardar errores de la aplicacion

[noe aburto]

Saludos.

Tengo un problema para controlar los errores producidos durante la ejecucion de una aplicacion, varios usuarios me indican de un error, pero cada vez que se genera uno me actualiza el archivo error.log, que puedo hacer para que cada vez que marque uno, lo pueda guardar en un solo archivo y se le agreque el nuevo error, u otra forma de controlarlo?

Gracias.

Fwh 8.11, xH 1.1, bcc 5.5

[FiveWiDi]

Saludos.

Tengo un problema para controlar los errores producidos durante la ejecucion de una aplicacion, varios usuarios me indican de un error, pero cada vez que se genera uno me actualiza el archivo error.log, que puedo hacer para que cada vez que marque uno, lo pueda guardar en un solo archivo y se le agreque el nuevo error, u otra forma de controlarlo?

Gracias.

Fwh 8.11, xH 1.1, bcc 5.5

Desde la versión "August 2010" está:
* Enhancement: Error System in source\function\errsysw.prg
New function SetErrorPath( cPath )
Set path to save error.log file, without argument return current path else
return last path selected

Yo la uso así:
SetErrorPath( cfilepath( Arg( 0 ) ) + "\" + DToS( Date() ) + "_" + Left(StrTran( Time(), ":" ), 6) + "_" )

Si estás usando una versión de FiveWin anterior a "August 2010", puedes modificar ERRSYSW.prg; de manera que donde veas:
"Error.log"
lo sustituyes por:
cfilepath( Arg( 0 ) ) + "\" + DToS( Date() ) + "_" + Left(StrTran( Time(), ":" ), 6) + "_Error.log"

y donde esté:
WinExec( "Notepad.exe error.log" )
lo sustituyes por:
WinExec( "Notepad.exe " + Arg( 0 ) ) + "\" + DToS( Date() ) + "_" + Left(StrTran( Time(), ":" ), 6) + "_error.log" )

Despues lincas errsysw.prg en tu aplicación y creo que ya está.

[noe aburto]

Perfecto, lo vaoy a checar. Solo una duda: el nombre del archivo contiene más de 8 caracteres, no hay problema con nombres largos?

[FiveWiDi]

Perfecto, lo vaoy a checar. Solo una duda: el nombre del archivo contiene más de 8 caracteres, no hay problema con nombres largos?

Yo no he tenido problemas con los nombres largos.

CUIDADO, en mi post anterior me he equivocado al hacer copiar/pegar:

ERROR -> WinExec( "Notepad.exe " + Arg( 0 ) ) + "\" + DToS( Date() ) + "_" + Left(StrTran( Time(), ":" ), 6) + "_error.log" )
CORRECTO-> WinExec( "Notepad.exe " + cfilepath( Arg( 0 ) ) + "\" + DToS( Date() ) + "_" + Left(StrTran( Time(), ":" ), 6) + "_error.log" )