Daniel,
Esto es el encabezado de error.log:
Time from start: 6 hours 3 mins 7 secs
Error occurred at: 16/01/2012, 04:21:48
Error MYSQL/9039
Stack Calls
Called from: tdolpsrv.prg => DOLPHIN_DEFERROR(2435)
Called from: tdolpsrv.prg => TDOLPHINSRV:CHECKERROR(686)
Called from: tdolpqry.prg => (b)TDOLPHINQRY:TDOLPHINQRY(133)
Called from: => TDOLPHINQRY:CHECKERROR(0)
Called from: tdolpqry.prg => TDOLPHINQRY:GETROW(984)
Called from: tdolpqry.prg => TDOLPHINQRY:SKIP(1502)
Called from: i_OnLine.prg => IONLINE(721)
Parte del código:
// crea recordset
TRY
oRs := oServer:query(cSql)
CATCH oError
// CLOSEMYSQL ALL
VALERT ( "Error query.",,,"X",,.t.)
RETURN 0
END
IF oRs = nil .OR. oRs:nRecCount = 0
IF lOnline
// No hay datos online
VALERT ( cM[79], {cM[2]}, cM[4], "X",,.t.,,{"aceptar"})
ELSE
// No hay datos entre esas fechas.
VALERT ( cM[63], {cM[2]}, cM[4], "X",,.t.,,{"aceptar"})
ENDIF
RETURN 0
ENDIF
WHILE .T.
. . . . . .
. . . . . .
. . . . . . mucho codigo pero ningun oRs:End()
oRs:Skip() // en esta linea da el error que he "imbuido" ahora en un TRY
if oRs:EOF()
EXIT
endif
ENDD
Muchas gracias