update failed
Enviado: Janeiro 14th, 2013, 10:20 pm
boa noite a todos.
Desenvolvi a rotina abaixo e está dando o seguinte problema: 'update failed'
procedure TFormFrm_ExpArqUnive.ZeraQuantidades;
begin
TabGlobal.DTmp_001.Abrir;
TabGlobal.DTmp_001.First;
while not TabGlobal.DTmp_001.Eof do
begin
Tabglobal.DTmp_001.Modifica;
TabGlobal.DTmp_001.Quantidade.Conteudo := 0;
Tabglobal.DTmp_001.Salva;
TabGlobal.DTmp_001.Next;
end;
TabGlobal.DTmp_001.Close;
end;
Se alguém puder me ajudar ficarei muito grato.
Att.
Daniel Montello Filho
Desenvolvi a rotina abaixo e está dando o seguinte problema: 'update failed'
procedure TFormFrm_ExpArqUnive.ZeraQuantidades;
begin
TabGlobal.DTmp_001.Abrir;
TabGlobal.DTmp_001.First;
while not TabGlobal.DTmp_001.Eof do
begin
Tabglobal.DTmp_001.Modifica;
TabGlobal.DTmp_001.Quantidade.Conteudo := 0;
Tabglobal.DTmp_001.Salva;
TabGlobal.DTmp_001.Next;
end;
TabGlobal.DTmp_001.Close;
end;
Se alguém puder me ajudar ficarei muito grato.
Att.
Daniel Montello Filho