Page 2 of 2

Re: xBrowse FW16.06

PostPosted: Wed Sep 14, 2016 4:54 pm
by nageswaragunupudi
I see.

Please try this modification in xbrowse and test.

In xbrowse, please locate
static function DolphinSeek
Towards the end of this function you locate this line:
Code: Select all  Expand view
  lRet  := ( oQry:Seek( c, cSortOrder, nStart - 1, oQry:LastRec(), .T., .T. ) != 0 )
 

Please replace this line with
Code: Select all  Expand view

   if oQry:FieldType( cSortorder  ) == 'N' .and. !ISDIGIT( Right( c, 1 ) )
      return .f.
   endif

   lRet  := ( oQry:Seek( c, cSortOrder, Max( 1, nStart - 1 ), oQry:LastRec(), .T., .T. ) != 0 )


Can you please test with this change in xbrowse?

Re: xBrowse FW16.06

PostPosted: Wed Sep 14, 2016 11:51 pm
by cmsoft
Estimado Mr Rao:
El error dejo de ocurrir.
Igualmente, reemplace la linea
Code: Select all  Expand view
  lRet  := ( oQry:Seek( c, cSortOrder, Max( 1, nStart - 1 ), oQry:LastRec(), .T., .T. ) != 0 )

por esta
Code: Select all  Expand view
lRet := ( oQry:Seek( c, cSortOrder, nStart - 1, oQry:LastRec(),!oQry:FieldType( cSortorder  )=='N', .T. ) != 0 )

Esa sugerencia me la habia pasado Cristobal, puesto que sino cuando tenia en la tabla los valores 13,130,1300 por ejemplo, cuando presionaba 13 se iba a 1300
El cambio quedo asi:
Code: Select all  Expand view
if oQry:FieldType( cSortorder  ) == 'N' .and. !ISDIGIT( Right( c, 1 ) )
      return .f.
   endif

   lRet := ( oQry:Seek( c, cSortOrder, nStart - 1, oQry:LastRec(),!oQry:FieldType( cSortorder  )=='N', .T. ) != 0 )

Muchisimas gracias por su tiempo

Re: xBrowse FW16.06 (Solucionado)

PostPosted: Thu Sep 15, 2016 11:39 am
by cnavarro
César, han quedado solucionados todos los problemas que tenías?

Re: xBrowse FW16.06 (Solucionado)

PostPosted: Thu Sep 15, 2016 1:20 pm
by cmsoft
Hola Cristobal
Ahora se me cuelga cuando pongo un numero en los campos alfanumericos.
Y no he resuelto el tema de la Ñ
Gracias por preguntar
Saludos