In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.

Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.

Error TDBBrowseMod en version de Xailer 7.0.10

Foro de Xailer profesional en español
Responder
mcastabaron
Mensajes: 137
Registrado: Vie Mar 14, 2008 7:25 am
Ubicación: Almería

Error TDBBrowseMod en version de Xailer 7.0.10

Mensaje por mcastabaron »

Buenas tardes,

***************************** Registro de errores *****************************

Exe: C:\Xailer\Samples\Modern\Browses\DBBrowse\dbbrowse.exe
Version: 1.0.0.0
User name: SERVIDOR
Computer name: SERVIDOR
Fecha: 06/02/21
Hora: 18:16:18
Memoria libre: 2097151
Area actual: 1

------------------------- Información del compilador --------------------------

Versión Xailer: Xailer 7.0.10
Compilador: Harbour 3.2.0dev (r1912031042)
Compilador C/C++: MinGW GNU C 7.3 (32-bit)
Plataforma: Windows 10 10.0

----------------------- Información detallada del error -----------------------

Subsistema: BASE
Código de error: 1132
Estado: .F.
Descripción: Bound error
Operación: array access
Argumentos: [ 1] = Tipo: A Valor: [ 2] = Tipo: N Valor: 0
Fichero:
Código error SO: 0

Pila de llamadas:
TDBBROWSEMOD:UPDATERECNO (300)
TBRWMODGRID:SETINDEX (3752)
TLISTBOXMOD:CREATE (192)
TBRWMODGRID:CREATE (2962)
TBROWSEMOD:CREATE (408)
TDBBROWSEMOD:CREATE (65)
TFORM1:CREATEFORM (173)
TFORM1:NEW (204)
MAIN (14)

Saludos.
Miguel C.
Avatar de Usuario
ignacio
Site Admin
Mensajes: 8843
Registrado: Lun Abr 06, 2015 8:00 pm
Ubicación: Madrid, Spain
Contactar:

Re: Error TDBBrowseMod en version de Xailer 7.0.10

Mensaje por ignacio »

Buenos días,

Muchas gracias por la notificación y disculpe las molestias. El error se ha producido por un pequeño cambio que permite que nIndex pueda valer cero cuando la matriz de datos está vacía.

Le adjunto el código que corrige el problema:

Código: Seleccionar todo

METHOD UpdateRecno( nRecno ) CLASS XDbBrowseMod

   ::Super:UpdateRecno( nRecno )

   IF !Empty( nRecno ) .AND. ::oDataSet != NIL
      WITH OBJECT ::oDataSet
         IF nRecno <= Len( ::oDataGrid:aWork )
            :GoTo( ::oDataGrid:aWork[ nRecno ], .f. )
         ENDIF
         AEval( :aLinkedControls, {|v| v:Refresh( ) } )
      END WITH
   ENDIF

RETURN nil
Si fuera tan amable de probarlo antes de publicar una nueva versión se lo agradezco. Sólo para cerciorarnos de que no haya ningún problema adicional.

Un saludo
Ignacio Ortiz de Zúñiga
[Equipo de Xailer / Xailer team]
https://www.xailer.com
mcastabaron
Mensajes: 137
Registrado: Vie Mar 14, 2008 7:25 am
Ubicación: Almería

Re: Error TDBBrowseMod en version de Xailer 7.0.10

Mensaje por mcastabaron »

Buenos días,
Añadido fichero DbBrowseMod.prg con la modificación de código al proyecto y funciona correctamente.
Saludos.
Miguel.
Responder