Доброго времени суток.
Помогите, пожалуйста, разобраться с проблемой. У меня есть четыре поля edit, один combobox и следующая процедура
Код:
procedure TForm1.Button4Click(Sender: TObject);
begin
if (edit1.Text <> '') then
begin
OracleSession4.Connected := true;
query_tel.Close;
query_tel.SQL.Clear;
query_tel.declareVariable('closed_', otDate);
query_tel.declareVariable('id_klnt_', otInteger);
query_tel.setvariable(0,now);
query_tel.setvariable(1,strtoint(edit1.Text));
query_tel.SQL.Add('update jurid set closed=:closed_ where id_klnt=:id_klnt_');
query_tel.ExecSQL;
query_tel.Close;
query_tel.DeleteVariables;
query_tel.SQL.Clear;
query_tel.SQL.Add('commit');
query_tel.ExecSQL;
query_tel.Close;
OracleSession4.Connected := false;
showmessage ('Закрыт!');
end
else
showmessage ('Введите номер!');
end;
Так вот, если все поля и комбо бокс заполнены, то при нажатии на кнопку выдает ошибку ORA-01036:illegal variable name/number при выполнении query_tel.ExecSQL;. А если заполнен только edit1, то все работает отлично. Подскажите в чем проблема?