Clipper On Line • Ver Tópico - LetoDB - Problemas com DbCommit()
Mudar para estilo Clássico
Discussão sobre Banco de Dados e RDDs para Clipper/[x]Harbour.
Postar uma resposta

Re: LetoDB - Problemas com DbCommit()

18 Out 2010 17:00

Olá!

Sinceramente nunca vi o Leto.

Chamou a minha atenção nos arquivos .INI onde um tem "RDD=LETO" e o outro "Default_Driver = CDX "

Re: LetoDB - Problemas com DbCommit()

18 Out 2010 17:13

ANDRIL escreveu:Alamino, tente isso para forçar o refresh do registro:

É meu caro ... já havia tentado isso também. E nada !
alxsts escreveu:Chamou a minha atenção nos arquivos .INI onde um tem "RDD=LETO" e o outro "Default_Driver = CDX "

Alex, a linha RDD=LETO é para o meu exe saber que é para se conectar via LETODB, caso contrário conecta via DBFCDX. Já a outra linha é do arquivo INI onde o motor do LetoDB identifica se utilizará o padrão CDX ou NTX.

A luta continua.

Re: LetoDB - Problemas com DbCommit()

18 Out 2010 17:33

Alamnino,

Você tentou simular este erro local, abrindo duas instancias do programa no windows?

Re: LetoDB - Problemas com DbCommit()

18 Out 2010 18:35

Alamino,

A solução é antes do RLOCK coloque um SKIP -1 ou DbSkip(-1) ou DbGoTop()

Código:
sele cdpar000
do while .t.
   DbGoTop() ou DbSkip(-1)
   if !rlock()
      msgexclamation("Aguardando para criar novo orçamento ...","ATENÇÃO")
      loop
   else
      repl numnum with numnum + ="posthilit">1</span>
      dbcommit()
      orc = numnum
      dbunlock()

Re: LetoDB - Problemas com DbCommit()

18 Out 2010 21:06

asimoes escreveu:A solução é antes do RLOCK coloque um SKIP -1 ou DbSkip(-1) ou DbGoTop()


Agora você derrubou a árvore inteira. :)) :)) :))

Usei um dbgotop(). Vai entender né !?
Assimoes e também Andril, obrigadíssimo pelo esforço.

Re: LetoDB - Problemas com DbCommit()

21 Out 2010 09:55

Então o danado estava dando um skip sem eu mandar ?

LetoDB - Problemas com DbCommit()

19 Jun 2018 22:55

Alamino, passei pela mesma dificuldade, não sei se já resolvei, mas a solução é esta

sele cdpar000
do while .t.
if !rlock()
msgexclamation("Aguardando para criar novo orçamento ...","ATENÇÃO")
loop
else
repl numnum with numnum + 1
Goto 1 // Adiciona somente esta linha no seu código fonte, levando em consideração que o banco de dados de número de pedido só tenha este registro, diga-me se teve exito
dbcommit()
orc = numnum
dbunlock()
* OBS.: Se já resolveu esta situação desconsidere este ajuda.
Postar uma resposta