PC Toledo

Olá pessoal!
Estou migrando do Clipper 5.2e com ADS utilizando DBFCDXAX para o harbour mas aconteceu o seguinte:
Compilei meu sistema com as seguintes linhas no PRG principal:
REQUEST ADS
RddRegister("ADS",1)
AdsSetFileType(2)
RddSetDefault("ADSCDX")
AdsSetServerType( ADS_REMOTE_SERVER )

e criei os índices normalmente, porém, tenho campos com conteúdo String minúsculos e maiúsculos e os índices invertem a ordem ASC dos caracteres colocando os minúsculos antes do maiúsculo.
Por exemplo: Antes um registro com STATUS='AA' viria antes do STATUS='aA', agora isso se inverteu ocasionando a quebra de vários processamentos.
Seria o caso de alguma configuração que desconheço?
Ficarei imensamente grato se alguém apresentar uma solução.

Abrçs,
SeijiKim

Veja se ajuda:

Código: Selecionar todos

#Include "ads.ch"

REQUEST ADSKEYCOUNT, ADSGETRELKEYPOS, ADSSETRELKEYPOS, ADSKEYNO

FUNCTION Main()

   RddRegister( "ADS", 1 )
   AdsSetServerType( ADS_LOCAL_SERVER )
   RDDSetDefault( "ADSCDX" )

   USE CUSTOMER NEW ALIAS CUST VIA "ADSCDX" SHARED

   BROWSE()

RETURN NIL

SeijiKim escreveu:Por exemplo: Antes um registro com STATUS='AA' viria antes do STATUS='aA', agora isso se inverteu ocasionando a quebra de vários processamentos.

Não está parecendo problema de codepage.
Por acaso existe alguma função no ADS pra ignorar maiúsculas e minúsculas? Neste caso misturaria e não inverteria a ordem.
Como o ADS aceita trabalhar por comando SQL, imagino que poderia ser normal existir essa opção de ignorar maiúscula/minúscula, e explicaria caso esteja ativada por default para o Harbour.

Caríssimos,
Obrigado pela atenção mas continuo com o dilema.
Sigo na minha peleja e se conseguir contornar posto o resultado aqui.

Alterando o padrão de caracteres para OEM até o momento manteve a compatibilidade e tem resolvido meu problema.
AdsSetCharType( ADS_OEM )

:)Pos

PC Toledo

Problemas com índices ADSCDX (clipper para harbour)

Problemas com índices ADSCDX (clipper para harbour)

Problemas com índices ADSCDX (clipper para harbour)

Problemas com índices ADSCDX (clipper para harbour)

Problemas com índices ADSCDX (clipper para harbour)

Problemas com índices ADSCDX (clipper para harbour)