Как передать параметр в ModifySQL

@Fu11buster · Регистрация: 11.03.2016

Author24 — интернет-сервис помощи студентам

Здравствуйте, не могу передать параметр из DBGrid в ModifySql
Интересует как передать параметры :Num_passage_old и :Start_date_old которые отсутствуют в SelectSql
Сам Modyfy:

SQL

1	EXECUTE PROCEDURE UPD_CAR_PASSAGE :Num_passage, :Num_car, :Start_date, :Finish_date, :Weight, :Num_passage_old, :Start_date_old

SelectSql:

SQL

SELECT PASSAGE.NUM_PASSAGE, CAR_PASSAGES.Num_car, PASSAGE.PASSAGE_NUMBER, PASSAGE.STARTING_POINT, PASSAGE.DESTINATION, CAR_PASSAGES.START_DATE, CAR_PASSAGES.FINISH_DATE, CAR_PASSAGES.WEIGHT, PASSAGE. DISTANCE
FROM PASSAGE, CAR_PASSAGES
WHERE CAR_PASSAGES.Num_car = :nc 
AND CAR_PASSAGES.Num_passage = Passage.Num_passage

Pascal

with DM.DSCarPassage.DataSet do
  begin
    Open;
    Edit;
    FieldByName('Num_car').AsInteger := FCars.DBGrid1.DataSource.DataSet.FieldByName('Num_car').AsInteger;
    FieldByName('Passage_number').AsString := DBLookupComboBox1.Text;
    FieldByName('Num_passage').AsInteger := DBLookupComboBox1.KeyValue;
    FieldByName('Start_date').AsDateTime:= DateTimePicker1.Date;
    FieldByName('Finish_date').AsDateTime:= DateTimePicker2.Date;
    FieldByName('Weight').AsInteger := SpinEdit1.Value;
    POST;
    Close;
    Open;
end;

Пробовал так:

Pascal

    DM.IBCarPassage.UnPrepare;
    DM.IBCarPassage.ParamByName('Num_passage_old').Value := FCarPassages.DBGrid1.DataSource.DataSet.FieldByName('Num_passage').AsInteger;
    DM.IBCarPassage.ParamByName('Start_date_old').AsDate := FCarPassages.DBGrid1.DataSource.DataSet.FieldByName('Start_date').Value;
    DM.IBCarPassage.Prepare;
    DM.IBCarPassage.Open;

Но выдает ошибку, что поле Num_passage_old не найдено

@krapotkin · 23.12.2017, 14:57

сначала замечания
1.зачем вам Prepare / Unprepare ? Оно и без вас чудесно справится.

2. зачем вот эта цепь - FCarPassages.DBGrid1.DataSource.DataSet ?
вы не знаете, к какому датасету сейчас подключен DBGrid и не можете его указать прямо, без кучи ссылок?

по вопросу
не находит, потому что выполняет Open
а Open - это Select. там нет таких параметров.
Думаю, что IBX просто не готово иметь новые поля в ModifySQL

если у вас такой сложный случай, может вам отдельно стоит выполнять Modify, в отдельном Query?

@Fu11buster · 23.12.2017, 16:34 **[ТС]**

Сообщение от krapotkin

сначала замечания
1.зачем вам Prepare / Unprepare ? Оно и без вас чудесно справится.

2. зачем вот эта цепь - FCarPassages.DBGrid1.DataSource.DataSet ?
вы не знаете, к какому датасету сейчас подключен DBGrid и не можете его указать прямо, без кучи ссылок?

по вопросу
не находит, потому что выполняет Open
а Open - это Select. там нет таких параметров.
Думаю, что IBX просто не готово иметь новые поля в ModifySQL

если у вас такой сложный случай, может вам отдельно стоит выполнять Modify, в отдельном Query?

1. Искал в чем проблема, пробовал разные методы, оставил так
2. У меня несколько форм, и на каждой есть DBGrid, этим кодом беру данные с другой формы

Решил проблему добавив компонент IBStoredProc на DataModule и вызывая процедуру изменения записи с помощью этого компонента.

@krapotkin 5791 / 4532 / 1432 Регистрация: 14.04.2014 Сообщений: 20,176 Записей в блоге: 20
	23.12.2017, 14:57	2
	сначала замечания 1.зачем вам Prepare / Unprepare ? Оно и без вас чудесно справится. 2. зачем вот эта цепь - FCarPassages.DBGrid1.DataSource.DataSet ? вы не знаете, к какому датасету сейчас подключен DBGrid и не можете его указать прямо, без кучи ссылок? по вопросу не находит, потому что выполняет Open а Open - это Select. там нет таких параметров. Думаю, что IBX просто не готово иметь новые поля в ModifySQL если у вас такой сложный случай, может вам отдельно стоит выполнять Modify, в отдельном Query? 1

@Fu11buster 0 / 0 / 0 Регистрация: 11.03.2016 Сообщений: 4
	23.12.2017, 16:34 [ТС]	3
	Сообщение от krapotkin сначала замечания 1.зачем вам Prepare / Unprepare ? Оно и без вас чудесно справится. 2. зачем вот эта цепь - FCarPassages.DBGrid1.DataSource.DataSet ? вы не знаете, к какому датасету сейчас подключен DBGrid и не можете его указать прямо, без кучи ссылок? по вопросу не находит, потому что выполняет Open а Open - это Select. там нет таких параметров. Думаю, что IBX просто не готово иметь новые поля в ModifySQL если у вас такой сложный случай, может вам отдельно стоит выполнять Modify, в отдельном Query? 1. Искал в чем проблема, пробовал разные методы, оставил так 2. У меня несколько форм, и на каждой есть DBGrid, этим кодом беру данные с другой формы Решил проблему добавив компонент IBStoredProc на DataModule и вызывая процедуру изменения записи с помощью этого компонента. 0