Fazendo umas experiências aqui com uso de transações, dá um erro Leto/1031 sempre na função dbunlock().
Por acaso poderiam me dizer qual o enrosco ?
O seguinte trecho está entre o BeginTransaction e CommitTransaction, e sempre na linha com dbunlock() acontece o erro.
Código: Selecionar todos
sele cdcli000
do while .t.
if !rlock()
millisec(100)
loop
else
exit
endif
enddo
repl clideb with vencido+vencendo
//dbcommit()
//dbrunlock()
sele cdcor000
set scope to
