FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexActive topicsAll discussionsLogin (GitHub)
Board index FiveWin para Harbour/xHarbour xBrowse FW16.06 (Solucionado)
nageswaragunupudi
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM

Re: xBrowse FW16.06

Posted: Wed Sep 14, 2016 04:54 PM
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 (fw): Select all Collapse
   lRet  := ( oQry:Seek( c, cSortOrder, nStart - 1, oQry:LastRec(), .T., .T. ) != 0 )

Please replace this line with
Code (fw): Select all Collapse
   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?
Regards



G. N. Rao.

Hyderabad, India
cmsoft
Posts: 1344
Joined: Wed Nov 16, 2005 09:14 PM

Re: xBrowse FW16.06

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

por esta
Code (fw): Select all Collapse
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 (fw): Select all Collapse
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
Salu2
Cesar Gomez
https://www.bcnsoft.com.ar
https://www.pedidosbcn.com
cnavarro
Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM

Re: xBrowse FW16.06 (Solucionado)

Posted: Thu Sep 15, 2016 11:39 AM

César, han quedado solucionados todos los problemas que tenías?

Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo

El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
cmsoft
Posts: 1344
Joined: Wed Nov 16, 2005 09:14 PM

Re: xBrowse FW16.06 (Solucionado)

Posted: Thu Sep 15, 2016 01:20 PM

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

Salu2
Cesar Gomez
https://www.bcnsoft.com.ar
https://www.pedidosbcn.com

Continue the discussion

Static archive · New replies & topics via GitHub Discussions