Arquivo de Indice

frkiko · November 4, 2008

Descobri a pouco tempo em um cliente.

Acontece que quando incluo um novo registro o indece cdx, fica doido.

Por exemplo:

1- A ordem de Data passa a iniciar 06/10/2008 sendo que antes era de 19/07/2008.

2- A ordemm de NÃºmero desaparece o intervalo de 0032555 atÃ© 0033432, sem explicaÃ§Ã£o, quando procuro por data por exemplo estes nÃºmeros estÃ£o lÃ¡.

NÃ£o sei se outros indices estÃ£o tb com problemas. E claro quando recrio o indice, volta tudo ao normal.

FaÃ§o assim:

orderAnt:=IndexOrd()

DbSetOrder(0)

DbAppend()

lanos->nro:=cNro

.

DbCommit()

DbUnlock()

DbSetOrder(orderAnt)

JÃ¡ tem um mÃªs que procuro e nÃ£o encontro um motivo, se alguem jÃ¡ passou por isso, fico no aguardo.

Obrigado

Francisco J S Barbosa

Belo Horizonte - MG

MSN: francisco@ponteware.com.br

FiveWin for Harbour 2.4 - Workshop

frkiko · November 4, 2008

Descobri a pouco tempo em um cliente.

Acontece que quando incluo um novo registro o indece cdx, fica doido.

Por exemplo:

1- A ordem de Data passa a iniciar 06/10/2008 sendo que antes era de 19/07/2008.

2- A ordemm de NÃºmero desaparece o intervalo de 0032555 atÃ© 0033432, sem explicaÃ§Ã£o, quando procuro por data por exemplo estes nÃºmeros estÃ£o lÃ¡.

NÃ£o sei se outros indices estÃ£o tb com problemas. E claro quando recrio o indice, volta tudo ao normal.

FaÃ§o assim:

orderAnt:=IndexOrd()

DbSetOrder(0)

DbAppend()

lanos->nro:=cNro

.

DbCommit()

DbUnlock()

DbSetOrder(orderAnt)

JÃ¡ tem um mÃªs que procuro e nÃ£o encontro um motivo, se alguem jÃ¡ passou por isso, fico no aguardo.

Obrigado

Francisco J S Barbosa

Belo Horizonte - MG

MSN: francisco@ponteware.com.br

FiveWin for Harbour 2.4 - Workshop

kapiaba · November 4, 2008

DbSetOrder(0)

//-> Partindo do seu ponto de vista, que nÃ£o Ã© o meu, EXPLIQUE: DbSetOrder(0)-> EM QUE INDICE O TAG DO CDX estÃ¡??

QUANDO QUE O TAG Ã‰ 0(ZERO)??? CRIASTES UM TAG 0(ZERO)???

SE DIGO:

SET ORDER TO 0 //-> NO INDEX ON... QUEM Ã‰ ESTE TAG

SET ORDER TO 1 //-> E ESTE??

SET ORDER TO 2 //-> E ESTE??

SET ORDER TO 3 //-> E ESTE??

SUPONDO, E AHI PERGUNTO EU: SE VOCE DIZ QUE UM TAG Ã‰ ZERO, O QUE O INDICE TEM QUE RETORNAR??? QUAL Ã‰ O INDICE, EU TE PERGUNTO.

TESTE, DIZENDO PARA O INDICE, QUAL Ã‰ O TAG QUE VOCE CRIOU NO INDEXADOR:

USE ARQUIVO INDEX ARQUIVO ALIAS ARQUIVO

SET ORDER TO NUMERODOTAG //-> CORRETO.

GO TOP

BROWSE()

ADICIONE...

DEPOIS COM TAG ZERO...

BROWSE()

ADICIONE...

AbraÃ§os.

JoÃ£o Santos - SÃ£o Paulo.

kmt_karinha@pop.com.br

kapiaba@brfree.com.br

Fone: (11) 3106-2832

FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe

frkiko · November 4, 2008

JoÃ£o, olha isso:

orderAnt:=IndexOrd() // armazenar a ordem ativa

lockfile() // travar arquivo

DbSetOrder(0) // retirar o "foco" de qualquer Ãndice, embora continuem abertos

DbAppend() // Novo Registro

...

DbCommit() // gravar fisicamente antes de liberar

DbUnlock() // destravar registro

DbSetOrder(orderAnt) // retornar para a ordem que estava antes

Francisco J S Barbosa

Belo Horizonte - MG

MSN: francisco@ponteware.com.br

FiveWin for Harbour 2.4 - Workshop

Editado por - frkiko on 04/11/2008 14:29:57

aferra · November 4, 2008

OlÃ¡ Francisco.

Eu faÃ§o nesta ordem e nÃ£o tenho problemas.

orderAnt:=IndexOrd() // armazenar a ordem ativa

DbSetOrder(0) // retirar o "foco" de qualquer Ãndice, embora continuem abertos

DbAppend() // Novo Registro

lockfile() // travar arquivo ...

.....

DbUnlock() // destravar registro

DbCommit() // gravar fisicamente antes de liberar

DbSetOrder(orderAnt) // retornar para a ordem que estava antes

Veja se resolve.

Alessandroid=blue>

FW20d+CL53b+Blk7+@Say+CDX

"NÃ³s nos transformamos naquilo que praticamos com freqÃ¼Ãªncia.

A perfeiÃ§Ã£o, portanto, nÃ£o Ã© um ato isolado e sim um hÃ¡bito".

id=red>

kapiaba · November 4, 2008

DbSetOrder(0) // retirar o "foco" de qualquer Ãndice, embora continuem aber

POR QUE?????id=size5>

Quem te disse ISTO pelo amor de JESUS CRISTO??? Em que livro de CLIPPER isto estÃ¡ DOCUMENTADO?? Les-te de algum lugar, e colocastes no teu codigo, achando que Ã© era Â´bonitinhoÂ´??? kkkkkkkkkkkkkkkk.

AbraÃ§os.

JoÃ£o Santos - SÃ£o Paulo.

kmt_karinha@pop.com.br

kapiaba@brfree.com.br

Fone: (11) 3106-2832

FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe

Editado por - kapiaba on 04/11/2008 15:02:06

frkiko · November 4, 2008

citaÃ§Ã£o:
OlÃ¡ Francisco.

Eu faÃ§o nesta ordem e nÃ£o tenho problemas.

orderAnt:=IndexOrd() // armazenar a ordem ativa

DbSetOrder(0) // retirar o "foco" de qualquer Ãndice, embora continuem abertos

DbAppend() // Novo Registro

lockfile() // travar arquivo ...

.....

DbUnlock() // destravar registro

DbCommit() // gravar fisicamente antes de liberar

DbSetOrder(orderAnt) // retornar para a ordem que estava antes

Veja se resolve.

Alessandroid=blue>

FW20d+CL53b+Blk7+@Say+CDX

"NÃ³s nos transformamos naquilo que praticamos com freqÃ¼Ãªncia.

A perfeiÃ§Ã£o, portanto, nÃ£o Ã© um ato isolado e sim um hÃ¡bito".

id=red>

id=quote>id=quote>

Pois Ã© Alessando nada...

Francisco J S Barbosa

Belo Horizonte - MG

MSN: francisco@ponteware.com.br

FiveWin for Harbour 2.4 - Workshop

frkiko · November 4, 2008

JoÃ£o aqui no forun mesmo.

Francisco J S Barbosa

Belo Horizonte - MG

MSN: francisco@ponteware.com.br

FiveWin for Harbour 2.4 - Workshop

frkiko · November 4, 2008

E o pior Ã© que tentei tudo, recriar o arquivo, renomear, mudar a sequencia, manter o indice ativo e nada, nem sei mais oque fazer.

E tenho outros aquivos que faÃ§o desta forma e acredito que nÃ£o tenha este problema, pelo que testei nÃ£o. Agora porque este arquivo, e era assim deste o inicio, ou sÃ³ apresentou o problema agora e os outros arquivos ????

Francisco J S Barbosa

Belo Horizonte - MG

MSN: francisco@ponteware.com.br

FiveWin for Harbour 2.4 - Workshop

kapiaba · November 4, 2008

citaÃ§Ã£o:
JoÃ£o aqui no forun mesmo.

Francisco J S Barbosa

Belo Horizonte - MG

MSN: francisco@ponteware.com.br

FiveWin for Harbour 2.4 - Workshop

id=quote>id=quote>

EU DIGO QUE ESTÃ ERRADO.

VOCE MATA OS INDICES, ANTES DE CRIA-LOS??

JoÃ£o Santos - SÃ£o Paulo.

kmt_karinha@pop.com.br

kapiaba@brfree.com.br

Fone: (11) 3106-2832

FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe

frkiko · November 4, 2008

JoÃ£o nÃ£o Ã© na criaÃ§Ã£o dos arquivos e sim na incluÃ§Ã£o de dados.

Francisco J S Barbosa

Belo Horizonte - MG

MSN: francisco@ponteware.com.br

FiveWin for Harbour 2.4 - Workshop

aferra · November 4, 2008

Neste caso Francisco, mostre como estÃ¡ a inclusÃ£o de dados para darmos uma olhada, quem sabe se encontra o problema.... sÃ£o vÃ¡rios olhos, rsrrsrsrsrs

Alessandroid=blue>

FW20d+CL53b+Blk7+@Say+CDX

"NÃ³s nos transformamos naquilo que praticamos com freqÃ¼Ãªncia.

A perfeiÃ§Ã£o, portanto, nÃ£o Ã© um ato isolado e sim um hÃ¡bito".

id=red>

frkiko · November 4, 2008

STATIC FUNCTION fGrava(cOpcao,oFld)

Sele lanos

orderAnt:=IndexOrd()

IF cOpcao=="I"

lockfile() // bloqueia arquivo

DbSetOrder(0)

DbAppend()

lanos->nro:=cNro

ELSE

lockrec() // bloqueia registro

DbSetOrder(0)

ENDIF

lanos->dtemi:=dDtemi;lanos->nrocli:=cNrocli;lanos->nomcli:=cNomcli;lanos->hoemi:=cHoemi

lanos->orca:=cOrca;lanos->contato:=cContato;lanos->fone:=cFone;lanos->email:=cEmail

lanos->atdg:=iif(lAtdg=.t.,"S","N");lanos->rat:=cRat;lanos->ctgr:=Str(cCtgr,1,0)

lanos->motivo:=cMotivo;lanos->dtter:=dDtter;lanos->hoini:=cHoini;lanos->hoter:=cHoter

lanos->nrotec:=cNrotec;lanos->nomtec:=cNomtec;lanos->obs:=cObs;lanos->obs2:=cObs2

lanos->retorno:=iif(lRetorno==.t.,"S","N")+cRetos+cRettec+cRetnom

lanos->defaca:=cNroDef+cNomDef+cNroAca+cNomAca

lanos->condpg:=cCondpg;lanos->vlrfinal:=nVlrfinal;lanos->dtpag:=dDtpag

DbCommit()

DbUnlock()

DbSetOrder(orderAnt)

IF cOpcao=="I"

Sele ipdos

ipdos->(OrdScope(0,cNro))

ipdos->(OrdScope(1,cNro))

DbGotop()

Sele isvos

isvos->(OrdScope(0,cNro))

isvos->(OrdScope(1,cNro))

DbGotop()

Sele icsos

icsos->(OrdScope(0,cNro))

icsos->(OrdScope(1,cNro))

DbGotop()

Sele lanos

cOpcao:="A"

oSay3:SetText(cNro)

oFld:aEnable:={.t.,.t.,.t.,.t.}

oBton:SetFocus()

ENDIF

RETURN Nil

id=code>id=code>

Francisco J S Barbosa

Belo Horizonte - MG

MSN: francisco@ponteware.com.br

FiveWin for Harbour 2.4 - Workshop

Editado por - frkiko on 04/11/2008 15:38:02

gibaf · November 4, 2008

eu aprendi q o dbSetOrder(0), ficava pela order do recno().

mas tambem nunca usei dbSetOrder(0) nos programas q quiz ate hoje - heheheh !

att

Gilberto Frohlich - Toledo/PR

giba_f@hotmail.com

giba_f@yahoo.com.br

xHarbour xBuild+Fivewin 2.7+PellesC+(Postgres+DB2)

kapiaba · November 4, 2008

citaÃ§Ã£o:
JoÃ£o nÃ£o Ã© na criaÃ§Ã£o dos arquivos e sim na incluÃ§Ã£o de dados.

Francisco J S Barbosa

Belo Horizonte - MG

MSN: francisco@ponteware.com.br

FiveWin for Harbour 2.4 - Workshop

id=quote>id=quote>

EU SEI MEU QUERIDO, RESPONDA A PERGUNTA:

VOCE AO CRIAR SEUS INDICES, DESTROI OS ANTERIORES ANTES??

ASSIM:

AEVAL(DIRECTORY( "TEMP*.*" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "CADETIQ.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "CADFORNE.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "AGENDA.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "CODUSER.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "CONSULTA.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "DEVEDOR.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "FITAS.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "FITASTMP.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "FP_PROV.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( XARQPED+".cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "PROVIS.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "MENUALT.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "NTICKET.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "PEDCPROV.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "PED_CLI.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "PESSOAL.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "PORTA.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "REDE.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "TABPROD.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "VENDEDOR.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "ENTREGAD.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "GARCONS.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "MESAS.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

//-> Imobiliaria

AEVAL(DIRECTORY( "REGIOES.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "CAPTADOR.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "TIPO.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "ZONA.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "OPERACAO.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "IMOVEIS.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "FIADORES.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "INQUILIN.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "PROPRIET.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

//-> Petshop

AEVAL(DIRECTORY( "MEDICOS.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "ESPECIES.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "ANIMAIS.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

//-> Estacionamentos

AEVAL(DIRECTORY( "FUNCION.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "SERVICOS.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "CLIESTAC.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "CORES.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "MODELOS.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

AEVAL(DIRECTORY( "VEICULOS.cdx" ),{ |aFILE| FERASE(aFILE[F_NAME]) } )

// PARA VERIFICAR SE A REDE TRAVOU OS BANCOS DE DADOS... ABORTAR.

// CASO O FERASE NÃ‡O CONSIGA DELETAR, Â PORQUE A REDE ESTA TRAVADA!

IF FILE( "CADETIQ.cdx" ) .OR. ;

FILE( "CADFORNE.cdx" ) .OR. ;

FILE( "ANIMAIS.cdx" ) .OR. ;

FILE( "VEICULOS.cdx" )

SndPlaySound(".\Erro.wav" )

MsgStop( cMsg, "Problemas Na Rede ou no Computador, Cuidado!" )

DBCLOSEALL()

RELEASE ALL

SYSREFRESH()

__QUIT()

ENDIF

id=code>id=code>

JoÃ£o Santos - SÃ£o Paulo.

kmt_karinha@pop.com.br

kapiaba@brfree.com.br

Fone: (11) 3106-2832

FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe

Editado por - kapiaba on 04/11/2008 16:36:17

kapiaba · November 4, 2008

citaÃ§Ã£o:
eu aprendi q o dbSetOrder(0), ficava pela order do recno().

mas tambem nunca usei dbSetOrder(0) nos programas q quiz ate hoje - heheheh !

att

Gilberto Frohlich - Toledo/PR

giba_f@hotmail.com

giba_f@yahoo.com.br

xHarbour xBuild+Fivewin 2.7+PellesC+(Postgres+DB2)

id=quote>id=quote>

APRENDEU, AONDE???

JoÃ£o Santos - SÃ£o Paulo.

kmt_karinha@pop.com.br

kapiaba@brfree.com.br

Fone: (11) 3106-2832

FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe

Eric.Developer · November 4, 2008

OlÃ¡ Alessandro.

pode nÃ£o ter comprovado na prÃ¡tica, mas hÃ¡ dois erros de lÃ³gica, e uma incoveniÃªncia aos usuÃ¡rios da rede, se nÃ£o for uma inclusÃ£o em lote (mÃºltiplas inclusÃµes).

* DbCommit() atualiza a tabela, logo, isso sÃ³ ocorrerÃ¡ quando tiver "posse exclusiva" do registro, ou seja, antes do DBUnLock(), nÃ£o tendo a posse, nÃ£o terÃ¡ nenhum efeito.

* DBAppend(), por si sÃ³ jÃ¡ deixa o novo registro travado "se" tiver sucesso na operaÃ§Ã£o, obrigatoriamente testa-se com NETERR().

Se outro usuÃ¡rio travou a tabela (FLOCK()) no seu sistema, a forma que usou nÃ£o incluirÃ¡ um registro.

Usar DBSetOrder(0) (Ordem fÃsica no DBF) Ã© uma necessidade bÃ¡sica e correta, aqueles que ainda tem dÃºvidas sobre esta funÃ§Ã£o, basta consultar o be-a-bÃ¡ do Clipper (NG em portuguÃªs).

http://xbasesuporte.freeforums.org/viewtopic.php?t=194

citaÃ§Ã£o:
orderAnt:=IndexOrd() // armazenar a ordem ativa

DbSetOrder(0) // retirar o "foco" de qualquer Ãndice, embora continuem abertos

DbAppend() // Novo Registro

lockfile() // travar arquivo ...

.....

DbUnlock() // destravar registro

DbCommit() // gravar fisicamente antes de liberar

DbSetOrder(orderAnt) // retornar para a ordem que estava antes

id=quote>id=quote>

pauloaraujo · November 4, 2008

citaÃ§Ã£o:
OlÃ¡ Alessandro.

pode nÃ£o ter comprovado na prÃ¡tica, mas hÃ¡ dois erros de lÃ³gica, e uma incoveniÃªncia aos usuÃ¡rios da rede, se nÃ£o for uma inclusÃ£o em lote (mÃºltiplas inclusÃµes).

* DbCommit() atualiza a tabela, logo, isso sÃ³ ocorrerÃ¡ quando tiver "posse exclusiva" do registro, ou seja, antes do DBUnLock(), nÃ£o tendo a posse, nÃ£o terÃ¡ nenhum efeito.

* DBAppend(), por si sÃ³ jÃ¡ deixa o novo registro travado "se" tiver sucesso na operaÃ§Ã£o, obrigatoriamente testa-se com NETERR().

Se outro usuÃ¡rio travou a tabela (FLOCK()) no seu sistema, a forma que usou nÃ£o incluirÃ¡ um registro.

Usar DBSetOrder(0) (Ordem fÃsica no DBF) Ã© uma necessidade bÃ¡sica e correta, aqueles que ainda tem dÃºvidas sobre esta funÃ§Ã£o, basta consultar o be-a-bÃ¡ do Clipper (NG em portuguÃªs).

http://xbasesuporte.freeforums.org/viewtopic.php?t=194

citaÃ§Ã£o:
orderAnt:=IndexOrd() // armazenar a ordem ativa

DbSetOrder(0) // retirar o "foco" de qualquer Ãndice, embora continuem abertos

DbAppend() // Novo Registro

lockfile() // travar arquivo ...

.....

DbUnlock() // destravar registro

DbCommit() // gravar fisicamente antes de liberar

DbSetOrder(orderAnt) // retornar para a ordem que estava antes

id=quote>id=quote>

id=quote>id=quote>

Alessandro,

Assino embaixo.

VocÃª nÃ£o pode liberar o registro e depois pedir para gravar fisicamente.

Um abraÃ§o

Editado por - pauloaraujo on 04/11/2008 22:28:47

frkiko · November 5, 2008

citaÃ§Ã£o:
EU SEI MEU QUERIDO, RESPONDA A PERGUNTA:

VOCE AO CRIAR SEUS INDICES, DESTROI OS ANTERIORES ANTES??

ASSIM:

JoÃ£o Santos - SÃ£o Paulo.

kmt_karinha@pop.com.br

kapiaba@brfree.com.br

Fone: (11) 3106-2832

FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe

Editado por - kapiaba on 04/11/2008 16:36:17

id=quote>id=quote>

Com certeza JoÃ£o.... abraÃ§os

Em MsDos usava cdx e era muito bom.

SÃ³ nÃ£o sei o que estÃ¡ acontecento, acredito que seja um problema da minha versÃ£o de Fivewin.

Obrigados a todos de qualquer forma.

Francisco J S Barbosa

Belo Horizonte - MG

MSN: francisco@ponteware.com.br

FiveWin for Harbour 2.4 - Workshop

kapiaba · November 5, 2008

citaÃ§Ã£o:

citaÃ§Ã£o:
EU SEI MEU QUERIDO, RESPONDA A PERGUNTA:

VOCE AO CRIAR SEUS INDICES, DESTROI OS ANTERIORES ANTES??

ASSIM:

JoÃ£o Santos - SÃ£o Paulo.

kmt_karinha@pop.com.br

kapiaba@brfree.com.br

Fone: (11) 3106-2832

FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe

Editado por - kapiaba on 04/11/2008 16:36:17

id=quote>id=quote>
Com certeza JoÃ£o.... abraÃ§os

Em MsDos usava cdx e era muito bom.

SÃ³ nÃ£o sei o que estÃ¡ acontecento, acredito que seja um problema da minha versÃ£o de Fivewin.

Obrigados a todos de qualquer forma.

Francisco J S Barbosa

Belo Horizonte - MG

MSN: francisco@ponteware.com.br

FiveWin for Harbour 2.4 - Workshop

id=quote>id=quote>

EM CLIPPER DOS, FUNCIONA SIM, PORQUE O COMPILADOR NÃƒO PREVE ESTE ERRO.

EM FIVEWIN NÃƒO FUNCIONA PORQUE INDICE 0(ZERO) NÃƒO EXISTE PARA O COMPILADOR XHARBOUR.

JÃ FIZ TESTES NA VERSÃƒO 2.7 E DÃ PROBLEMAS. EVITE!

AbraÃ§os.

JoÃ£o Santos - SÃ£o Paulo.

kmt_karinha@pop.com.br

kapiaba@brfree.com.br

Fone: (11) 3106-2832

FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe

frkiko · November 5, 2008

citaÃ§Ã£o:
EM CLIPPER DOS, FUNCIONA SIM, PORQUE O COMPILADOR NÃƒO PREVE ESTE ERRO.

EM FIVEWIN NÃƒO FUNCIONA PORQUE INDICE 0(ZERO) NÃƒO EXISTE PARA O COMPILADOR XHARBOUR.

JÃ FIZ TESTES NA VERSÃƒO 2.7 E DÃ PROBLEMAS. EVITE!

AbraÃ§os.

JoÃ£o Santos - SÃ£o Paulo.

kmt_karinha@pop.com.br

kapiaba@brfree.com.br

Fone: (11) 3106-2832

FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe

id=quote>id=quote>

Senhores que utilizam desta forma realmente em xHarbour, nÃ£o funciona indice (0) zero. Pois quero migrar para xHarbour e ai Ã© bom ficar sabendo. AtÃ© mudar para Mysql.

Obrigado.

NÃ£o fique bravo joÃ£o, sÃ³ quero mais informaÃ§Ãµes.

Francisco J S Barbosa

Belo Horizonte - MG

MSN: francisco@ponteware.com.br

FiveWin for Harbour 2.4 - Workshop

Editado por - frkiko on 05/11/2008 09:01:27

kapiaba · November 5, 2008

citaÃ§Ã£o:

citaÃ§Ã£o:
EM CLIPPER DOS, FUNCIONA SIM, PORQUE O COMPILADOR NÃƒO PREVE ESTE ERRO.

EM FIVEWIN NÃƒO FUNCIONA PORQUE INDICE 0(ZERO) NÃƒO EXISTE PARA O COMPILADOR XHARBOUR.

JÃ FIZ TESTES NA VERSÃƒO 2.7 E DÃ PROBLEMAS. EVITE!

AbraÃ§os.

JoÃ£o Santos - SÃ£o Paulo.

kmt_karinha@pop.com.br

kapiaba@brfree.com.br

Fone: (11) 3106-2832

FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe

id=quote>id=quote>
Senhores que utilizam desta forma realmente em xHarbour, nÃ£o funciona indice (0) zero. Pois quero migrar para xHarbour e ai Ã© bom ficar sabendo. AtÃ© mudar para Mysql.

Obrigado.

NÃ£o fique bravo joÃ£o, sÃ³ quero mais informaÃ§Ãµes.

Francisco J S Barbosa

Belo Horizonte - MG

MSN: francisco@ponteware.com.br

FiveWin for Harbour 2.4 - Workshop

Editado por - frkiko on 05/11/2008 09:01:27

id=quote>id=quote>

KKKKKKKKKKKKKK

DEMOCRACIA Ã‰ ISTO. NÃƒO FOSSE ASSIM, O QUE SERIA DO OBAMA BIN LADEN NOS ESTADOS UNIDOS??? KKKKKKKKKKKK

DEI MEU TESTEMUNHO. TIVE PROBLEMAS, BASTOU ACERTAR O TAG E TUDO FUNCIONOU DE BOA...

NÃƒO SOU O DONO DA RAZÃƒO. MAS QUE INDICE ZERO(0) NÃƒO EXISTE, NÃƒO EXISTE!

ATÃ‰ QUE ME PROVEM EM CONTRARIO... PODE SER QUE NA ULTIMA VERSÃƒO DO XHARBOUR ISTO TENHA SIDO INCORPORADO. ATÃ‰ A VERSÃƒO 0.99.71, NÃƒO.

AbraÃ§os.

JoÃ£o Santos - SÃ£o Paulo.

kmt_karinha@pop.com.br

kapiaba@brfree.com.br

Fone: (11) 3106-2832

FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe

Editado por - kapiaba on 05/11/2008 09:12:13

vagner · November 5, 2008

OlÃ¡,

Se vc estÃ¡ alterando a Chave do Ãndice, sim precisa mudar o Ãndice, eu ou coloco como (0) ou mudo para um outro Ãndice, Ã© indiferente, senÃ£o vai dar Corruption Detect com certeza

Agora se nÃ£o estÃ¡ alterando a Chave, nÃ£o hÃ¡ necessidade de se mudar o Ãndice.

Veja bem, eu estou falando em ALTERAR a Chave do Indexado, em uma inclusÃ£o, nÃ£o hÃ¡ necessidade de se mudar o Ãndice. vou dar um pequeno exemplo

Use Cliente New Share Alias Cliente Via "DbfCdx"

Inde On Codigo To Cliente

Appen Blank

//Verificar Travamento

Repl Codigo With "001"

Repl Nome With "Teste"

Unlock

//Alterar Chave

Cliente->(DbSetOrder(0))

//Verificar Travamento

Repl Codigo With "002"

Repl Nome With "Teste 2"

Unlock

Cliente->(DbSetOrder(1))

//NÃ£o Altera a Chave

//Verificar Travamento

Repl Nome With "Teste 3"

Unlock

id=code>id=code>

Estou postando em dicas, um txt que eu tenho sobre DbfCdx, estÃ¡ em Espanhol, mas Ã© muito explicativo, contendo vÃ¡rias funÃ§Ãµes do CDX

Vagner Wirts

VI Encontro estÃ¡ chegando , nÃ£o perca

kapiaba · November 5, 2008

Veja um exemplo para saber quais os TAGS que tem no seu ARQUIVO.CDX, veja se tem o INDICE 0(zero)

USE DbfConCdx

FOR x := 1 TO 50 //-> Maximo numero de TAGS.

IF !EMPTY(ORDNAME(x))

DBSETORDER(x)

cNombre := OrdName(x))

cKey := Ordkey(x)

cCondic := OrdFor(x)

AbraÃ§os.

JoÃ£o Santos - SÃ£o Paulo.

kmt_karinha@pop.com.br

kapiaba@brfree.com.br

Fone: (11) 3106-2832

FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe

kapiaba · November 5, 2008

Vagner, bom dia.

Gentileza, poderia EXPLANAR um pouco sobre CHAVE DE INDICE:

http://msdn.microsoft.com/pt-br/library/ms191241.aspx

Obrigado.

AbraÃ§os.

JoÃ£o Santos - SÃ£o Paulo.

kmt_karinha@pop.com.br

kapiaba@brfree.com.br

Fone: (11) 3106-2832

FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe

Arquivo de Indice

Recommended Posts

Link to comment

Share on other sites

Top Posters In This Topic

Popular Days

Top Posters In This Topic

Popular Days

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Join the conversation