Incompatibilidade no CDX entre versões do xHarbour

[oribeiro]

Pessoal,

Existe alguma incompatibilidade interna na manipulação de índices CDX entre as versões do xHarbour?

Pergunto isso porque tenho uma aplicação compilada em xHarbour build 1.0.0 Intl. (SimpLex) e outra em xHarbour 1.2.3 Intl. (SimpLex) (Build 20130903) que compartilham os mesmos arquivos e vez por outra está ocorrendo problema nos índices.

Em ambas, eu utilizo esse mesmo RDDINIT()

#include "ORD.CH" // Para uso dos recursos COMIX

REQUEST DBFNTX // para manter a compatibilidade com indices NTX

REQUEST DBFCDX

RDDSetDefault( "DBFCDX" )

SET AUTOPEN ON

SET AUTORDER TO 1

DBCLOSEALL()

// DEFINICAO DO IDIOMA //

REQUEST HB_LANG_PT // Linguagem Default (Portugues Brasil)

HB_LANGSELECT("PT") // Linguagem Default (Portugues Brasil)

REQUEST HB_CODEPAGE_PT850 // Caracteres pt850

HB_SETCODEPAGE('PT850') // Caracteres pt850

Existe incompatibilidade entre essas versões do xHarbour?

Aguardo, obrigado.

[joaosolution]

Oscar

Bom dia

Sim existe, quando migrei de versão do xHarbour tive que reorganizar todos os arquivos para a nova versão.

Att

João Bosco

[kapiaba]

Não concordo, já passei por quase todas as versões do xHarbour, e em nenhum momento vi alguma mudança na biblioteca DBFCDX.LIB que pudesser causar incompatibilidade, você deveria era postar a mensagem de erro da biblioteca.

ANNOUNCE RDDSYS

REQUEST DBFCDX, DBFFPT


REQUEST OrdKeyNo, OrdKeyCount, OrdCreate, OrdKeyGoto


REQUEST HB_LANG_PT

REQUEST HB_CODEPAGE_PT850


FUNCTION Main()


    RDDSETDEFAULT( "DBFCDX" )     // CARREGA RDD DEFINIDO NO CASO, *.CDX

    SET CENTURY ON                // 4 DIGITOS PARA O ANO

    SET DATE BRITISH              // FORMATO DD/MM/AAAA

    SET EPOCH TO YEAR( DATE() ) - 30

    SET SOFTSEEK OFF              // PARA REALIZAR UMA BUSCA APROXIMADA

    SET WRAP ON                   //-Set( 35, "ON" ) // PARA MENUS

    SETCANCEL( .F. )              // INUTILIZA ALT + C PARA ABORTAR PROGRAMA

    SET CONFIRM OFF               // CURSOR NAO PODE DESLOCAR-SE AUTOMATICAMENTE

    SET DELETED ON                // ON IMPEDIR VER REGISTROS MARCADOS PARA APAGAR

    SET ESCAPE ON                 // TECLA ESC LIGADA, POSSO ESCAPAR.

    SET EXCLUSIVE OFF             // REDE NETUSE LIGADA

    SET MULTIPLE OFF              // PROGRAMA EM REDE

    SET OPTIMIZE     ON

    SET FIXED        ON


// fluxo