Проблемы с adodc

[funtik_sql]

Всем привет.
Проблема такая: Есть БД MSQL, в ней есть процедура Proc1 из которой я вызываю другую процедуру Proc2.

Есть проект VB, а в нем компонент adodc.Так вот при вызове метода Refresh, adodc выдает ошибку:

Операция не допускается, если объект закрыт

Код: Выделить всё

Adodc1.ConnectionString = "File Name=test.udl"
Adodc1.CommandType = adCmdStoredProc
Adodc1.RecordSource = "Proc1"
Adodc1.Refresh


Proc1 должна возвращать набор записей, но они естессно не возвращаются.

[GSerg]

Раз.

tag_warning

[funtik_sql]

Короче экпирименты показали следующее:
При вызове из Proc1 процедуры, в которой осуществляется простая выборка - все норм.
При вызове из Proc1 процедуры, в которой осуществляется запрос с использованием агрегатных функций - неработает.

С чем это может быть связвно?

[GSerg]

С корявым написанием запроса с использованием агрегатных функций, например.

[Antonariy]

А еще с тем, что ADODC это коллекция багов и глюков. И вообще устарело. Оно использует ADO 2.1.

[funtik_sql]

С корявым написанием запроса с использованием агрегатных функций, например.

Как например не прокатит.
Обе функции работают по отдельности нормально, вызываются через adodc нормально. Проблема имеено в совместном вызове.

[alibek]

Нет ли вложенных транзакций?
И да, ADODC выкинуть.

[funtik_sql]

Нет ли вложенных транзакций?
И да, ADODC выкинуть.

В процедуре Proc2 состовляется обычный запрос с группировкой из таблиц и view.
А какая альтернатива есть adodc?

[GSerg]

Покажи запрос и скажи, какая база.

[funtik_sql]

Покажи запрос и скажи, какая база.

MSSQL2000

Proc1:

Код: Выделить всё

CREATE PROCEDURE Proc1 AS
SET NOCOUNT ON
create table #data (
Users_Id int,
FirstObgectAC_id int,
)

insert #data exec Proc2
SELECT Users_id,FirstObgectAC_id
FROM #data
drop table #data
GO


Proc2

Код: Выделить всё

CREATE PROCEDURE Proc2 AS
SET NOCOUNT ON
SELECT Users.Users_Id, min(ObjectAC.ObAC_id) AS FirstObgectAC_id
FROM Users LEFT JOIN ObjectAC ON Users.Users_Id = ObjectAC.Users_Id
GROUP BY Users.Users_Id
GO


ObjectAC - это таблица

[Konst_One]

попробуй

Код: Выделить всё

CREATE PROCEDURE Proc1 AS
SET NOCOUNT ON
create table #data (
Users_Id int,
FirstObgectAC_id int
)


SET NOCOUNT ON

insert #data exec Proc2

SET NOCOUNT OFF

SELECT Users_id,FirstObgectAC_id
FROM #data

--drop table #data
GO

ошибка:

create table #data (
Users_Id int,
FirstObgectAC_id int,
)

[funtik_sql]

4Konst_One
Не, не помогает
Запятой там нет, просто глюкануло

[Konst_One]

а зачем тебе вообще нужна процедура Proc1
она бессмыслена в данном исполнении, юзай сразу Proc2

[funtik_sql]

а зачем тебе вообще нужна процедура Proc1
она бессмыслена в данном исполнении, юзай сразу Proc2

В ней создается запрос из многих таблиц.
Он очень длинный, я просто для удобства привел ту часть где идет обращение к Proc2.

[funtik_sql]

Кстати вариант без агрегатной функции работает:
Proc2

Код: Выделить всё

CREATE PROCEDURE Proc2 AS
SET NOCOUNT ON
SELECT Users.Users_Id
FROM Users LEFT JOIN ObjectAC ON Users.Users_Id = ObjectAC.Users_Id
GROUP BY Users.Users_Id
GO


[Konst_One]

попробуйте отказаться от ADODC и перейти на работу с ADODB.Recordset, проблем таких у вас не будет

[HandKot]

при LEFT JOIN могут возникать пустые ObjectAC.ObAC_id
что вызывает WARNING что, вероятно, и определяется как ошибка

Код: Выделить всё

Warning: Null value is eliminated by an aggregate or other SET operation.

попробуйте отказаться от ADODC и перейти на работу с ADODB.Recordset, проблем таких у вас не будет Wink

проблемы останутся

РЕШЕНИЕ: поменять запрос, к примеру так

Код: Выделить всё

MIN(ISNULL(ObjectAC.ObAC_id,0))

[funtik_sql]

4HandKot
Да ошибка была именно в пустых полях
Спасибо, выручил)

[Antonariy]

А лучше inner join.

[HandKot]

А лучше inner join.

тут возникает множество решений
и ISNULL()
и INNER JOIN
и подзапрос SELECT ...
и ... вероятно еще есть

у каждого пути есть свои плюсы и минусы