Página 1 de 1

Tem como usar CDX sem tag e nao gera idx?

Enviado: 03 Jan 2006 07:56
por edmarfrazao
Estou tentando converter o meu sitema de clipper para xharbour , mais esbarrei no problema que o clipper quando nao se usar tag com cdx e gerado indices idx e no xharbour C

se usar o sixcdx no clipper todos os indices sao gerados com extençao idx.

se usar o dbfcdx alguns indices sao gerados com extensao cdx e outros com idx

como posso resolver sem usar tag, para continuar com clipper e xharbour?

Re: Tem como usar CDX sem tag e nao gera idx?

Enviado: 03 Jan 2006 11:44
por Antonio
edmarfrazao escreveu:Estou tentando converter o meu sitema de clipper para xharbour , mais esbarrei no problema que o clipper quando nao se usar tag com cdx e gerado indices idx e no xharbour C

se usar o sixcdx no clipper todos os indices sao gerados com extençao idx.

se usar o dbfcdx alguns indices sao gerados com extensao cdx e outros com idx

como posso resolver sem usar tag, para continuar com clipper e xharbour?

Código: Selecionar todos

If select("empre") == 0 
   
   Use (tabelas)+ "empresas.dbf" Alias empre Shared New
   select('empre')
   
   If !file ((tabelas) + "empresas.cdx")

   DbCreateindex('empresas.cdx', 'idapelempr' ,{||idapelempr})
   DbCreateindex('empresas.cdx', 'idcnpjempr' ,{||idcnpjempr})
   DbCreateindex('empresas.cdx', 'idrazaoemp',{||idrazaoemp})


   Endif

   DbSetIndex("empresas.cdx")
   empre->(DbSetOrder(1))

Endif

Re: Tem como usar CDX sem tag e nao gera idx?

Enviado: 04 Jan 2006 15:25
por edmarfrazao
resolvi.

nos comandos

set index to

passei
para set index tag xx to ...


ou seja vou ter varios indices individuais com todos tendo uma tag.

Funcionou beleza , tinha uma rotina generica que criavas os indices dos 05 sistemas.

Esta funciona com clipper 5.2 dbfcdx e delphi apollo fox(cdx)

Agora vou passar para o xharbour e ver no que da.

Nos testes preliminares funcionau beleza o trio (clipper,delphi,xharbour)