FiveTech Support Forums

no devuelve la línea de error,
sólo devuelve el msj => Too many recursive

Estoy tratando de usar la versión anterior de errsysw(1303) no exito

alguien sabe resolver?
gracias

Por favor copia aqui el contenido de error.log gracias

Usa esto:

ErrorBlock( { | oError | MsgInfo( oError:Description ) } )

So the errorsys of FWH is not used and you will get the description of the error

Antonio,

Es buena cosa grabar en un archivo, de forma "temprana" una sencilla descripcion, con lo mas basico del error: la descripcion y la pila de llamadas.
Se podria hacer que si el error "normal" se "logra" construir, entonces borrar el primero grabado. El archivo se podria llamar fwout.log o algo asi.

Esto por qué. Pues porque algunas veces, al recoger tanta informacion el gestor de errores, puede ocurrir que se produzca un error recurrente que termina... bueno... ya lo sabes tu mejor que nadie.

Solo era una idea

Paco (hmpaquito)

Si, tienes razón es una buena idea para resolver los errores recurrentes.

No habia caido en esa solución, gracias

Antonio

ErrorBlock( { | oError | MsgInfo( oError:Description ) } ) <= sólo muestra "variavel nao existe" y luego in otro dlg muestra "erro na recuperacao do erro"

ErrorBlock( { | oError | MsgInfo( oError:Description ), MsgInfo( ProcLine( 3 ), ProcName( 3 ) ) } )

Tal vez tengas que usar 4 en vez de 3 para obtener el número de línea correcto y el nombre de la función.

proc ErrorSys()
ErrorBlock( { | oError | MsgStop( "Description: "+OemToAnsi(ErrorMessage( oError ))+CRLF+"File: " + ProcFile( 3 )+CRLF+"ProcName: " + Trim( ProcName( 3 ) ) + "( " + LTrim(Str(ProcLine( 3 ))) + " )", "Error") } ) <= me sirvió en parte
// ErrorBlock( { | e | ErrorDialog( e ) } )
return

Alguien tiene uno errosys.prg que se ejecuta en FWH1308 ?

gracias

Prueba a mostrar el valor de oError:SubSystem tambien

Antonio
utilizando el famoso método de eliminación => / /

eliminando el código abajo:
/
for j = 1 to 8
if ! Empty( ( nTarget := ( Alias( n ) )->( DbRSelect( j ) ) ) )
cErrorLog += Space( 8 ) + Str( j ) + ": " + ;
"TO " + ( Alias( n ) )->( DbRelation( j ) ) + ;
" INTO " + Alias( nTarget ) + CRLF
// uValue = ( Alias( n ) )->( DbRelation( j ) )
// cErrorLog += cValToChar( &( uValue ) ) + CRLF
endif
next
/
o dialog é exibido

nota: uso sqlrdd (no sé si tiene algo a ver)

Ahora queda claro que el problema viene de SQLRDD, posiblemente de alguna función de esas que usa FWH errorsys y que SQLRDD no soporta