Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

то ли ADO глючит, то ли...

olden © (2002-01-22 18:10:00)
MSSQL> процедура, не возвращающая параметров

CREATE PROCEDURE [dbo].[CreateTaxDoc]
@CurPeriodBegin datetime = "010101",
@TMPTableName nvarchar(255) = NULL,
@PaymentId int = NULL
AS
...

в программе происходит вызов процедуры через TADODataSet

ADOds->CommandType = cmdText;
ADOds->CommandText = "exec CreateTaxDoc "010101", NULL, 5";

// Отмечаем, что команда не возвращает набор данных
ADOds->ExecuteOptions = ADOds->ExecuteOptions << eoExecuteNoRecords;

ADOds->Open();

И вот здесь ругается на несовместимость данных
Хотя в QueryAnalyzer та же команда проходит на УРА

Может с настройками датасэта не то. Но я уже все перебрал вроде

kig (2002-01-24 16:21:00) [1]
:))

Я это и имел в виду. А можно из ADO_TLB (или как там она назвается) дергать ф-ции возвращаюшие соответстувущий объект.

2 olden
"Я понимаю, что процедуру можно выполнить и через Query, но для этого придется конвертировать input-параметры процедуры в строку, чтобы скомпоновать TADOQuery.SQL." - я не помню уже, как и можно ли в нем параметризованные запросы юзать. Но если через _Command работать - там все ок. С параметрами.

Delirium (2002-01-24 16:02:00) [2]
Тогда уж:
CreateOleObject("ADODB.CONNECTION") CreateOleObject("ADODB.RECORDSET") CreateOleObject("ADODB.STREAM")
и вообще забыть по Borland :)

kig (2002-01-24 15:27:00) [3]
тогда на кой ляд в палитре присутствует отдельный компонент TADODataSet ? - это Борланду :)))

А вообще (но это мое мнение), пока не требуется данные в морду клиента отображать, проще работать напрямую через
_Recordset
_Command
_Stream
...

Delirium (2002-01-24 12:59:00) [4]
Лично я его не пользую вообще, мне достаточно:
TADOConnection - для коннекта,
TADOQuery - для всех способов получения информации,
TADOCommand - для изменений,
и TADOStoredProc - для процедур, если по каким-либо причинам TADOQuery не подходит.
А зачем TADODataSet, по моему это лишняя придумка Borland-а.

olden (2002-01-24 12:50:00) [5]
тогда на кой ляд в палитре присутствует отдельный компонент TADODataSet ?
Я понимаю, что процедуру можно выполнить и через Query, но дляэтого придется конвертировать input-параметры процедуры в строку, чтобы скомпоновать TADOQuery.SQL.
Избыточность прям изо всех щелей...
Нутром чую подвох. Наверное все же TADODataSet можно принудить, вопрос лишь в том - как.

Интересен код TADOQuery
function TADOQuery.ExecSQL: Integer;
begin
InitializeMasterFields(Self);
Command.Execute(FRowsAffected, EmptyParam);
Result := FRowsAffected;
end;

Получается что самый правильный код для выполнения моей процедуры через ADODataSet был бы

var Cnt: integer;
TADODataSet.Command.Execute(Cnt, EmptyParam);

Но Command является protected-свойством TCustomADODataSet
И опять - ну в чем смысл существования TADODataSet ?

kig (2002-01-23 19:29:00) [6]
Для Вас в данном случае "более универсальным" является TADOQuery, т.к. инкапсулирует работу с адошным как Recordset, так и с Command. Соответственно в него добавлен метод ExecSQL для приведенного примера.

Ну не "умеет" адошный Recordset не возвращать результат.

Теперь по поводу eoExecuteNoRecords.

MSDN:

adExecuteNoRecords (в оригинале)
0x80
Indicates that the command text is a command or stored procedure that does not return rows (for example, a command that only inserts data). If any rows are retrieved, they are discarded and not returned.
adExecuteNoRecords can only be passed as an optional parameter to the Command or Connection Execute method

olden (2002-01-23 18:38:00) [7]
насколько я понял они разделены для удобства
а TADODataSet как отдельный компонент в палитре вставлен как раз для таких случаев, когда заведомо неизвестно что именно придется выполнять, процедуру или запрос

Delirium (2002-01-23 16:50:00) [8]
Ну почему это он более универсальный? И у TADOStoredProc и у TADODataSet - общий предок TCustomADODataSet и раз эти компоненты разделены а не наследуются один от другого значит какая-то разница есть. Надо бы ADODB.PAS изучить, но мне лень :)

olden (2002-01-23 16:46:00) [9]
да, работает
и через TADOQuery тоже
но почему-то через более универсальный TADODataSet не хотит

Delirium (2002-01-23 16:41:00) [10]
Ну я так и не понял через TADOStoredProc твоя процедура работает или нет?

olden (2002-01-23 16:21:00) [11]
я пишу и так и эдак
и на Делфях и на Билдере
дело не в том (какая разница)
дело в несогласии ADODataSet работать как StoredProc в случае если хранимая процедура не возвращает набор данных

а вроде должен бы

olden (2002-01-23 15:30:00) [12]
>А что мешает использовать TADOStoredProc?

объект находится в общем DataModule и желаельно чтобы был универсальным (зачем мне два объекта Query и StoredProc вместо одного DataSet)

>Или хотя бы CommandType указывай cmdStoredProc
Та же история (естественно параметры здесь передаю через Parameters) - ругается

Delirium (2002-01-23 14:22:00) [13]
Я вообще-то пишу в Delphi (D6), а ты (судя по коду) в Builder-е. По этому однозначно утверждать не могу, но у меня еще ни разу не было проблем с передачей параметров в процедуру через ADO.

olden (2002-01-23 14:15:00) [14]
>А что мешает использовать TADOStoredProc?

объект находится в общем DataModule и желаельно чтобы был универсальным (зачем мне два объекта Query и StoredProc вместо одного DataSet)

>Или хотя бы CommandType указывай cmdStoredProc
Та же история (естественно параметры здесь передаю через Parameters) - ругается

Delirium (2002-01-22 19:06:00) [15]
А что мешает использовать TADOStoredProc? Или хотя бы CommandTypeуказывай cmdStoredProc.

Наверх

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