Tem solucao para este problema.
Registro em branco
Moderador: Moderadores
Registro em branco
Tenho um problema no meus sistema, toda ves que cai a energia ou o computador trava, o sistema cria um registro em branco na tabela que esta aberta, ai tem que apagar o registro e o indice.
Tem solucao para este problema.

Tem solucao para este problema.
Re: Registro em branco
Acho que este é um problema sério dos DBFS...ja tive clientes que após um problmea com luz, travamento, etc ao abrir o sistema estava com os bancos de dados totalmente corrompidos, cheio de códigos de maquina.evaldo escreveu:Tenho um problema no meus sistema, toda ves que cai a energia ou o computador trava, o sistema cria um registro em branco na tabela que esta aberta, ai tem que apagar o registro e o indice.
Tem solucao para este problema.
Ai se não tiver back up.... :-O
A melhor Nobreak.
Anderson
Clipper 52e/Clipper 53b/Blinker 7/Vlib/Fglib/DBFNTX
_______________________________________________
Migrando para [x]Harbour 0.99.60 (SimpLex) + MiniGUI 1.2 Exp. (Build 22)
_______________________________________________
Assine o manifesto dos artistas pela preservação da amazônia.
Clipper 52e/Clipper 53b/Blinker 7/Vlib/Fglib/DBFNTX
_______________________________________________
Migrando para [x]Harbour 0.99.60 (SimpLex) + MiniGUI 1.2 Exp. (Build 22)
_______________________________________________
Assine o manifesto dos artistas pela preservação da amazônia.
Prezado Colega
Basta você fazer uma busca por um registro que um campo chave esteja em branco. Exemplo :
Vale salientar que isso não é um procedimento normal, é apenas um paliativo e que o correto é ir buscar as causas dos problemas e não ficar consertando-os, eu também uso DBFs e óbiamente que eventualmente meus clientes tem problemas com falta de energia, travamentos, etc..., porém dificilmente meus arquivos se corrompem e ou aparecem registros fantasmas.
Até logo.
Marcelo
Basta você fazer uma busca por um registro que um campo chave esteja em branco. Exemplo :
Código: Selecionar todos
USE PRODUTOS SHARED
DO WHIL .NOT. EOF()
IF CODIGO=SPACE(6)
RLOCK()
DELETE
DBUNLOCK()
ENDIF
SKIP
ENDDO
Até logo.
Marcelo
Programador que é programador, quando tá de folga vai inventar função nova, fazer testes, ou seja... se divertir
Cobra 210 - Drive de 8" 1.024 KB - 64 KB RAM - Impressora de Linha Cobra - Visicalc - Fortran - Dialog - Sistema Operacional SP/M (é sp/m mesmo - era o cp/m da cobra)
Cobra 210 - Drive de 8" 1.024 KB - 64 KB RAM - Impressora de Linha Cobra - Visicalc - Fortran - Dialog - Sistema Operacional SP/M (é sp/m mesmo - era o cp/m da cobra)

