Erro na instrucao update de um comando SQL
12/02/2003
0
Esto usando esse codigo para atualizar um registro no meu bd interbase
query.close;
query.sql.clear;
query.sql.add(´update tabela ´);
query.sql.add(´set hr_saida :hr_saida, dt_saida = :dt_saida´);
query.sql.add(´where co_historico = :co_historico´);
query.parambyname(´hr_saida´).astime := datetimepicker1.time;
query.parambyname(´dt_saida´).asdatetime := datetimepicker2.date;
query.aprambyname(´co_historico´) := tabela.fieldbyname(´campo´).asinteger;
query.execsql;
qdo executo essa utlima linha da o seguinte erro:
unassigned code
o campo hr_saida eh time
o campo dt_saida eh timestamp
e co_historico eh integer
alguem sabe pq dah esse erro?
como solucionar?
obrigada,
K-ROL
query.close;
query.sql.clear;
query.sql.add(´update tabela ´);
query.sql.add(´set hr_saida :hr_saida, dt_saida = :dt_saida´);
query.sql.add(´where co_historico = :co_historico´);
query.parambyname(´hr_saida´).astime := datetimepicker1.time;
query.parambyname(´dt_saida´).asdatetime := datetimepicker2.date;
query.aprambyname(´co_historico´) := tabela.fieldbyname(´campo´).asinteger;
query.execsql;
qdo executo essa utlima linha da o seguinte erro:
unassigned code
o campo hr_saida eh time
o campo dt_saida eh timestamp
e co_historico eh integer
alguem sabe pq dah esse erro?
como solucionar?
obrigada,
K-ROL
K-rol
Curtir tópico
+ 0
Responder
Posts
13/02/2003
Anonymous
with Query do
begin
if Active then
Close;
SQL.Clear;
SQL.Add(´update tabela´);
SQL.Add(´set hr_saida = :hr_saida,´);
SQL.Add(´ dt_saida = :dt_saida´);
SQL.Add(´where co_historico = :co_historico´);
ParamByName(´hr_saida´).AsTime := Datetimepicker1.Time;
ParamByName(´dt_saida´).asdatetime := Datetimepicker2.Date;
ParamByName(´co_historico´).AsInteger := Tabela.FieldByName(´campo´).AsInteger;
ExecSQL;
end;
begin
if Active then
Close;
SQL.Clear;
SQL.Add(´update tabela´);
SQL.Add(´set hr_saida = :hr_saida,´);
SQL.Add(´ dt_saida = :dt_saida´);
SQL.Add(´where co_historico = :co_historico´);
ParamByName(´hr_saida´).AsTime := Datetimepicker1.Time;
ParamByName(´dt_saida´).asdatetime := Datetimepicker2.Date;
ParamByName(´co_historico´).AsInteger := Tabela.FieldByName(´campo´).AsInteger;
ExecSQL;
end;
Responder
13/02/2003
Moonlight
nessa linha:
query.sql.add(´set hr_saida :hr_saida, dt_saida = :dt_saida´);
no primeiro vc colocou soh :
query.sql.add(´set hr_saida :hr_saida, dt_saida = :dt_saida´);
no primeiro vc colocou soh :
Responder
Clique aqui para fazer login e interagir na Comunidade :)