Estou ficando maluca!!!!!!!!!!!

14/02/2003

0

Tenho o seguinte SELECT numa rotina

dm1.sqlPesq.close;
dm1.sqlPesq.sql.Clear;
dm1.sqlPesq.sql.Add(´SELECT A.LG_BLOQUEADO, A.CO_VISIT, A.NU_RG, A.NO_PESSOA, A.NO_EMPRESA, A.NO_FOTO, A.FOTO, A.DS_DOCUMENTO,B.NO_CONTATO, B.CO_HISTORICO,B.DS_OBS, ´);
dm1.sqlPesq.sql.Add(´ B.NU_ANDAR, B.CO_COND, B.DT_VISITA, B.DT_SAIDA, B.HR_ENTRADA, B.HR_SAIDA, B.FOTO, B.NU_CRACHA, B.NO_EMPRESA VISITA´);
dm1.sqlPesq.sql.Add(´ FROM CADVISIT A, HISTORICO B WHERE ´);
dm1.sqlPesq.sql.Add(´ B.CO_VISIT = A.CO_VISIT ´);
dm1.sqlPesq.sql.Add(´ AND B.HR_SAIDA IS NULL ´);
dm1.sqlPesq.sql.Add(´ ORDER By B.DT_VISITA desc, B.HR_ENTRADA DESC´);
dm1.sqlPesq.Open;

Reparem q eu seleciono as colunas DT_SAIDA e HR_SAIDA

aih eu tento fazer um update num registro com essa instrucao:

dm1.qryPesq.Edit;
dm1.qryPesq.FieldByName(´HR_SAIDA´).AsDateTime := Time;
dm1.qryPesqDT_SAIDA.AsDateTime := Date;
dm1.qryPesq.Post;

porem qdo dou applyupdates(0) no evento afterpost da qrypesq dah a seguinte msg:
Unknown Column DT_SAIDA e nao consegue fazer o update.... o q pode ser isso??

estou usando uma query do dbexpress (sqlPesq) e um clientdataset do dataaccess (qryPesq) para acesso ao interbase

obrigada,
K-ROL


K-rol

K-rol

Responder

Posts

14/02/2003

Anonymous

Use
dm1.qryPesq.FieldByName(´DT_SAIDA´).AsDateTime := Date;
Irá funcionar se neste momento sua qryPesq conter uma instrução que esteja retornando este campo.

espero ter ajudado. :wink:


Responder

14/02/2003

Anonymous

Tente, ao invés de:

dm1.qryPesq.Edit;
dm1.qryPesq.FieldByName(´HR_SAIDA´).AsDateTime := Time;
dm1.qryPesqDT_SAIDA.AsDateTime := Date;
dm1.qryPesq.Post

Fazer:

dm1.QRYEXEC.Close;
dm1.QRYEXEC.SQL.Clear;
dm1.QRYEXEC.SQL.Add(´Update Historico Set HR_Saida = ´+QuotedStr(FormatDateTime(´HH:MM:SS´,time)) );
dm1.QRYEXEC.SQL.Add(´, DT_SAIDA = ´+QuotedStr(FormatDateTime(´dd/mm/yyyy´,Date)));
If dm1.QRYEXEC.ExecSql >= 1 then
Mensagem = ´Atualização perfeita´;


Agora, qto. ao seu problema: Eu utilizo ADO, e tb. não consigo atualizar uma base de consulta envolvendo relacionamento de arquivos, ou seja,
Na Query não deve existir dados de outros arquivos a serem atualizados...


Tchau...

A Calma, a Paciência, etc... são Virtudes - A Perseverença não deve levar ao Ódio...


Responder

Assista grátis a nossa aula inaugural

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar