ADOStoredProc выполнение процедуры с параметрами

[funball]

Добрый день.

Подскажите пжл. почему может не рабтать такая схема записи:
ADOStoredProc_addel_save.ProcedureN ame:='MSV_GIN_MONITOR.MSV_MON_UPDAT E_CFG_ROUTERS';
ADOStoredProc_addel_save.Parameters .ParamByName('p_rout_id').Value:=pp _rout_id;
ADOStoredProc_addel_save.Parameters .ParamByName('p_ipaddr').Value:=pp_ ipaddr;
ADOStoredProc_addel_save.Parameters .ParamByName('p_name').Value:=pp_na me;
ADOStoredProc_addel_save.Parameters .ParamByName('p_status').Value:=pp_ status;
ADOStoredProc_addel_save.Parameters .ParamByName('p_reg_cod').Value:=pp _reg_cod;
ADOStoredProc_addel_save.Parameters .ParamByName('p_cntry_cod').Value:= pp_cntry_cod;
ADOStoredProc_addel_save.ExecProc;

В ADOStoredProc_addel_save изначально пуста, т.е. без названия проц. и параметров. Может быть нужно каким-то образом эти параметры обозначить. Подскажите пжл. как? Процедура в пакете.
Ругается, что переменная 'p_rout_id' не найдена.

[soleil@mmc]

после присвоения имени процедуре написать это

ADOStoredProc_addel_save.Prepare;

а еще есть вероятность, что кто-то ткнул в св-вах ХП на параметры и они сохранились в дфм этого модуля - ХП при этом не будет даже на препейр подтягивать недавно добавленные параметры в ХП на стороне сервера (можно проверить так: кликнуть по форме "View as text" и поискать описание ХП - сохраненные параметры будет видно невооруженным глазом)

[funball]

Сообщение от soleil@mmc

после присвоения имени процедуре написать это

ADOStoredProc_addel_save.Prepare;

а еще есть вероятность, что кто-то ткнул в св-вах ХП на параметры и они сохранились в дфм этого модуля - ХП при этом не будет даже на препейр подтягивать недавно добавленные параметры в ХП на стороне сервера (можно проверить так: кликнуть по форме "View as text" и поискать описание ХП - сохраненные параметры будет видно невооруженным глазом)

Вот все что прописано:
object ADOStoredProc_addel_save: TADOStoredProc
Connection = E
ProcedureName = 'MSV_GIN_MONITOR.MSV_MON_UPDATE_CFG _ROUTERS'
Parameters = <>
Left = 256
Top = 32
end

Строка ADOStoredProc_addel_save.Prepared после объявления названия проц. не помогла.
Я конечно могу сделать создав доп.объект хр. проц., но хочется по возможности обходиться одним(этот запускает еще 2 процедуры, правда без параметров(запускает успешно)). Может как обнулять можно все предыдущие параметры перед объявлением новых?

[soleil@mmc]

проверил - ок

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

Может как обнулять можно все предыдущие параметры перед объявлением новых?

а обнулять можно так

procedure PrepareClear(Proc: TStoredProc);
var
  i: integer;
begin
  Proc.Prepare;
  for i := 0 to Proc.Params.Count - 1 do
    Proc.Params[i].Clear;
end;

а это очепятка в стартовом посте или так и написано реально?

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

ve.ProcedureName:='MSV_GIN_MONITOR. MSV_MON_UPDATE_CFG_ROUTERS';

я про пробел в имени ХП

З.Ы.: и эттааа... пользуйся тегами. например, для кода есть такой CODE