FiveTech Software tech support forums

Buenos dias. Tengo una DBF que muestro con un xBrowse. la DBF tiene 2 indices, uno de los cuales es combinado de NOMBRE+DESCEND(dtos(FECHAPAGO)) . El problema es que con el primer indice muestra perfecto los datos y me puedo mover por ellos sin problemas, pero cuando paso al indice ...

... the method Insert and get back to you. Don't hurry, I've a workaround BTW: I missed [<lFindLast>] in ::Seek() :( have to torture myself with DESCEND and LIMIT :roll:

A workaroud that seems to work fine: #include "Fivewin.ch"REQUEST HB_CODEPAGE_ITWIN#xtranslate DESCEND( STR( <nVal>[, <nLen>][, <nDec>] ) ) => Str( 999999999999999 - <nVal> )#xtranslate DESCEND( ...

karinha wrote:

Code: Select all  Expand view  RUN

MEMOWRIT( "ENRICO.txt", "àèéìòù" )

It doesn't work with this:

Code: Select all  Expand view  RUN

MEMOWRIT( "àèéìòù.txt", "àèéìòù" )

cnavarro wrote:For me run OK

Code: Select all  Expand view  RUN

#include "Fivewin.ch"


FUNCTION MAIN()

    HB_SETCODEPAGE( "UTF8" )

    ? HB_MEMOWRIT( "àèéìòù.txt", "àèéìòù" )

    RETURN NIL

Result: .F., and no file written.

#include "Fivewin.ch"REQUEST HB_LANG_ITREQUEST HB_CODEPAGE_ITWIN, HB_CODEPAGE_IT850FUNCTION MAIN()   LOCAL cFile   HB_CDPSELECT( "IT850" )   HB_LANGSELECT( "IT" )   HB_SETTERMCP( "ITWIN", &qu...

For me run OK

Sorry, it doesn't work:

Code: Select all  Expand view  RUN

? hb_MemoWrit( "àèéìòù.txt", "àèéìòù" )

Result:

Code: Select all  Expand view  RUN

.F.

The problem is: without any codepage settings (ie. EN codepage) Descend() is fine but accented chars from filesystem are wrong. With ITWIN (or other codepages I tried) the accented chars from filesystem are right but Descend() is not working. Any solutions ...

The problem is: without any codepage settings (ie. EN codepage) Descend() is fine but accented chars from filesystem are wrong. With ITWIN (or other codepages I tried) the accented chars from filesystem are right but Descend() is not working.

Any solutions will make me happy.

... MEMOWRIT( "àèéìòù.txt", "àèéìòù" )    RETURN NIL Sorry Enrico, but the example you put now has nothing to do with the Descend() function Has the example I posted worked? I will look at the new example you propose and I will answer you

It doesn't work, it creates a file with the wrong name. Please try this: #include "Fivewin.ch"REQUEST HB_LANG_ITREQUEST HB_CODEPAGE_ITWIN, HB_CODEPAGE_IT850FUNCTION MAIN()    HB_CDPSELECT( "IT850" )    HB_LANGSELECT( "IT" )&nb...

From Harbour-users group DESCEND() function is designed to operate on binary (BYTE) sorting and gives reverted collation order only for codepages which use such collation. Because DESCEND() converts numbers to characters which have special ...

Thank you. It is not a real solution but better than nothing: DESCEND( STR( nVal ) ) => STR( 999999999999999 - nVal )DESCEND( DTOS( dVal ) ) => STR( DESCEND( dVal ) ) Let's hope that Harbour ...

OK. Look this, please:

http://www.pctoledo.com.br/forum/viewtopic.php?f=4&t=17321&p=107630&hilit=descend

Regards, saludos.