Проблема с ADOStoredProc

[Skazi21101]

SQL 2000 Server
Есть хранимая процедура Pass_upd
CREATE PROCEDURE Pass_UPD
@worker_surname varchar(50),
@password varchar(50)
AS
UPDATE worker SET password=@password WHERE worker_surname=@worker_surname
GO

На форме combobox и maskedit, ADOconnection, ado query & adostoredproc. В свойствах adostoredproc задано adoconnection и хранимая процедура.
Данные на сервак передаю следующим образом:

procedure TAdm_ChangePass.Button1Click(Sender: TObject);
var k: integer;
s: string;
begin
Try
ADOConnection1.BeginTrans;
with DM.ADOStoredProc1 do
begin
k:=Combobox1.ItemIndex;
s:=Combobox1.Items.Strings[k];
Parameters.ParambyName('@worker_surname').Value:=s;
Parameters.ParamByName('@password').Value:=MaskEdit1.Text;
end;
ADOStoredProc1.ExecProc;
ADOConnection1.CommitTrans;
Except
ADOConnection1.RollbackTrans;
ShowMessage('Невозможно выполнить. Повторите.');
end;

Когда пытаюсь активировать adostoredproc то в ответ получаю ругань adostoredproc1 command text does not return a result set.
Что не так?

[Skazi21101]

вопрос снимается так как без того что бы в делфях поставить у storedproc свойство active все прекрасно работает