| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Помогите примером!!! Как получить выходные параметры хранимой процедуры!!! [D5, D6, MSSQL]

vasilly ©   (2002-03-06 10:26:00) 

Как в Дельфи получить выходные параметры хранимой процедуры??

---

Polevi   (2002-03-06 10:47:00) [1]

qryChangeAccountState.SQL.Add(
"EXEC ChangeAccountState :AccID,:StateID,@ReturnValue=:ReturnValue OUTPUT)");

function TRDM.ChangeAccountState(AccID, StateID: Integer): WordBool;
begin
qryChangeAccountState.Parameters.ParamByName("AccID").Value:=AccID;
qryChangeAccountState.Parameters.ParamByName("StateID").Value:=StateID;
qryChangeAccountState.ExecSQL;
result:=qryChangeAccountState.Parameters.ParamByName("ReturnValue").Value=1;
end;

---

MetallAdm   (2002-03-06 10:44:00) [2]

Попробуй еще так !

Query.Close;
Query.SQL.Clear;
Query.SQL.Add("Exec MyProc :a,:b,:c");
Query.Params[0].AsInteger:=Data;
Query.Params[1].AsInteger:=b1; -- Смотри какой тип тип может и asDateTime я просто непомню как цу тебя :))
Query.Params[2].AsInteger:=c1;
Query.Open;
DataNew0:=Query.FieldByName("a").AsInteger;
DataNew1:=Query.FieldByName("b").AsInteger;
DataNew2:=Query.FieldByName("c").AsInteger;

ну может быть и так !
вообшем что то в таком духе эксперементируй !

---

Наверх