![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
AdoDataSet для работы c StoredProc
Explorer © (2004-11-09 08:53:00)Мастера!
Подскажите, как правильно использовать AdoDataSet для работы c StoredProc (какие функции) и как узнать Return_Value от сервера?
При использовании ADOStoredProc делал так:
with DataModuleMashteh.ADOStoredProcOrg do
begin
Close;
Parameters.ParamByName('@type').Value := TypeOrg;
Parameters.ParamByName('@IDUser').Value := UserCron;
Parameters.ParamByName('@OrganizName').Value := DBEditNameOrg.Text;
Parameters.ParamByName('@ERR').Value := 1;
Prepared;
ExecProc;
if(Parameters.ParamByName('@Err').Value=1) then
begin
MessageDlg('Error',mtError, [mbOk], 0);
end
else begin
MessageDlg('Update',mtInformation, [mbOk], 0);
end;
end;
Но в AdoDataSet видать это делается по другому, а инфы мало.
sniknik (2004-11-09 23:35:00) [1]ну а на шаг дальше? ADOStoredProc это тот же ADODataSet только сильно урезанный
вот он, весь ;о)
TADOStoredProc= class( TCustomADODataSet)
public
constructor Create(AOwner: TComponent); override;
procedure ExecProc;
published
property CommandTimeout;
property DataSource;
property EnableBCD;
property ProcedureName: WideString read GetCommandText write SetCommandText;
property Parameters;
property Prepared;
end;
constructor TADOStoredProc.Create(AOwner: TComponent);
begin
inherited Create(AOwner);
Command.CommandType := cmdStoredProc;
Command.CommandTextAlias := 'ProcedureName'; { Do not localize }
end;
procedure TADOStoredProc.ExecProc;
begin
InitializeMasterFields(Self);
Command.Execute;
end;
и как думаеш что дальше делать надо, в отличии от ADOStoredProc?
Explorer (2004-11-09 23:05:00) [2]А чего в вопросе не понятно?
Надо отправить параметры в хранимую процедуру и получить от нее результат.
Как это делаю в ADOStoredProc я описал, а вот как это сделать в ADODataSet при использовании CommandType = cmdStoredProc ?
sniknik (2004-11-09 22:29:00) [3]не, лень просто. ты скажи как не получается вот тогда и поговорим.
а то получается ты инфы не нашол а мне главы из книги переписывать?
Explorer (2004-11-09 21:48:00) [4]Никто не использует для работы с хранимыми процедурами?