Приветствую. А поделитесь опытом работы с куросорами в 1С++. А то вариант с пробежкой по курсору и выгрузкой итогового сета во временную таблицу у меня не проходит.
З.Ы. Тапком не бейте - в скуле не силен.

Мне требуется в проводить вычисления в цикле.
Т.е. сложить значение предыдущей строки с текущей и вписать ее в таблицу.  Временная таблица ИМХО подходит не очень.

Z1 писал(а) 11. Мая 2012 :: 13:17:

Исправляюсь.
Мне требуется получить таблицу товаров с временем отсутствия этих товаров на складе.  
Как я делаю. Получаю таблицу товаров с остатками и оборотами отсортированную по полям товар,позиция документа. Прохожусь курсором по таблице. Результаты вычислений пишу во временную таблицу. Потом селектом получаю данные их временной таблицы.

Проблема - включаю отладку, копирую код из 1С в скульный запрос. В скуле результирующий набор нормальный, в 1С это одна строчка с первым товаром.

Вопрос - хотелось бы знать почему один и тот же запрос выдает разные результирующие наборы из 1С и SQL.

jjjj1111 писал(а) 11. Мая 2012 :: 10:47:



А что именно не проходит?
Курсор не крутится, или посчитанный результат в таблицу не инсертится?

Как крутить курсор - смотри BOL, скажем, начиная с DECLARE CUSRSOR и далее по связным терминам (FETCH, CLOSE, DEALLOCATE) + смотри примеры, там все нормально расписано.

РС.выполнить("Create table #TempTable (TovID char(9),X int)");


	ТекстЗапроса="

	|use torg
    |SET NOCOUNT ON
	|declare @tov char(9),@ost int,@osttek int,@poz int,@dvizh int, @X int
	|declare @tovp char(9),@pozp int
	|DECLARE curs CURSOR LOCAL FOR
	|SELECT Рсв.Товар,Рсв.Ост,Рсв.Позиция,Рсв.Движение FROM(
	|SELECT Р.Товар,Р.КвоОстаток as Ост,0 as Движение,0 as позиция FROM $РегистрОстатки.ОстаткиТоваров(:ДатаС,
	|		INNER JOIN $Справочник.Склады as Скл(NOLOCK) ON Скл.ID=Склад AND $Скл.НомерМагазина=:ВыбНМ
	|		INNER JOIN $Справочник.Товары as Тов(NOLOCK) ON Тов.ID=Товар
	|		INNER JOIN $Справочник.Сотрудники as Мен(NOLOCK) ON Мен.ID=$Тов.Менеджер AND $Мен.ведениетоваров=1,
	|	,(Товар,Склад),(Кво))as Р
	|
	|UNION ALL
	|
	|SELECT Р.Товар,0 as Ост,(Р.КвоПриход-Р.КвоРасход) as Движение,dbo._1s_timedoc_minus(Р.ПозицияДокумента,:ДатаС,:Старт,:Финиш) as позиция
	|FROM $РегистрОбороты.ОстаткиТоваров(:ДатаС,:ДатаПо~,Документ,
	|		INNER JOIN $Справочник.Склады as Скл(NOLOCK) ON Скл.ID=Склад AND $Скл.НомерМагазина=:ВыбНМ
	|		INNER JOIN $Справочник.Товары as Тов(NOLOCK) ON Тов.ID=Товар
	|		INNER JOIN $Справочник.Сотрудники as Мен(NOLOCK) ON Мен.ID=$Тов.Менеджер AND $Мен.ведениетоваров=1,
	|	,(Товар,Склад),(Кво))as Р)as Рсв
	|ORDER BY Рсв.Товар,Рсв.Позиция
	|

	|OPEN curs
	|Set @tovp='' set @pozp=0 set @x=0
	|FETCH NEXT FROM curs INTO @tov,@ost,@poz,@dvizh
	|WHILE @@FETCH_STATUS = 0
	|BEGIN
	|	IF @tov=@tovp
	|		BEGIN
	|	 		set @osttek=@osttek+@dvizh
	|			IF @osttekp<=0 set @X=@X+(@poz-@pozp)
	|			set @pozp=@poz
	|		END;
	|	ELSE
	|	 	BEGIN
	|			IF @osttekp<=0 set @X=:ОбщВремя-@pozp
	|			IF @X>0 BEGIN INSERT INTO #TempTable VALUES (@tovp,@X) set @X=0 END;
	|			IF @poz=0 set @X=:ОбщВремя
	|			set @osttek=@ost+@dvizh
	|			set @pozp=@poz
	|		END;
	|	set @tovp=@tov
	|	set @osttekp=@osttek
	|	FETCH NEXT FROM curs INTO @tov,@ost,@poz,@dvizh
	|END;
	|IF @X>0 INSERT INTO #TempTable VALUES (@tovp,@X)

	|Close curs
	|deallocate curs
	|
	|";

	РС.УстановитьТекстовыйПараметр("ВыбНМ",ВыбНМ);
	РС.УстановитьТекстовыйПараметр("ВыбМен",ВыбМен);
	РС.установитьтекстовыйпараметр("ПредМесяц",добавитьмесяц(НачМесяца(ДатаС),-1));
	РС.установитьтекстовыйпараметр("ТекМесяц",НачМесяца(ДатаС));
	РС.установитьтекстовыйпараметр("ДатаС",ДатаС);
	РС.установитьтекстовыйпараметр("ДатаПо",ДатаПо);
	РС.УстановитьТекстовыйПараметр("Старт",ВыбНМ.НачалоРаботы);
	РС.УстановитьТекстовыйПараметр("Финиш",ВыбНМ.КонецРаботы);
	*(датапо-датас+1));
	т=РС.выполнитьинструкцию(ТекстЗапроса);

	т=РС.выполнитьинструкцию("SELECT tovid as Тов,x FROM #TempTable");
	т.выбратьстроку();
	РС.выполнить("drop table #TempTable");  

Выполнение этой команды показывает сейчас таблицу из 3 строк.
Если копирую текст запроса в SSMS  то мне выводит нормальную таблицу из 10500 строк.

jjjj1111 писал(а) 14. Мая 2012 :: 12:21:


Курсоры также работают не так быстро как хотелось бы
Ты напиши конкретнее что получить хочешь на пальцах, т.е. на простом примере
Можно сделать хитрое соединение
Посчитать, допустим, нарастающий итог или что-то еще
Может потребуется что-то предварительно упорядочить или присвоить "номер строки"... но все равно разница значительна

Но вопрос даже не в этом. Меня заинтересовало почему одинаковые конструкции неодинаково работают в 1с и qa.

Цитата:

Ну провайдеры не объясняют ситуации...
Попробуйте если не сложно у себя выполнить запрос

	РС.выполнить("Create table #TempTable (TovID char(9),pr float)");

	ТекстЗапроса="
	|use torg
	|declare @tov char(9),@price float,@curs_rows bigint,@counter bigint
	|DECLARE curs CURSOR global static FOR
	|SELECT sc14.ID,sc14.sp153 from sc14
	|OPEN curs
	|set @curs_rows=@@cursor_rows
	|set @counter=0
	|WHILE @counter<@curs_rows
	|BEGIN
	|	set @counter=@counter+1
	|	FETCH absolute @counter FROM curs into @tov,@price
	|	INSERT INTO #TempTable VALUES (@tov,@price)
	|END;

	|Close curs
	|deallocate curs
	|";

	РС.выполнить(ТекстЗапроса);

	т=РС.выполнитьинструкцию("SELECT tovid,pr FROM #TempTable");
	т.выбратьстроку();
	сообщить(РС.выполнитьскалярный("SELECT count(*) FROM #TempTable"));
	РС.выполнить("drop table #TempTable");
 

где sc14 - таблица товаров с колвом строк 60000, sp153 цена.