Подскажите с циклом..

1С v8

04.04.13

✎

06:25

О, великие умы форума ! Подскажите начинающим)

Есть некий запрос с заполнением:

Запрос23 = Новый Запрос;
Запрос23.Текст ="ВЫБРАТЬ
| ХозрасчетныйДвиженияССубконто.СубконтоДт2,
| ХозрасчетныйДвиженияССубконто.Сумма,
| ХозрасчетныйДвиженияССубконто.СчетКт КАК СчетКт,
| ХозрасчетныйДвиженияССубконто.Период,
| ХозрасчетныйДвиженияССубконто.СуммаНУДт,
| ХозрасчетныйДвиженияССубконто.СуммаНУКт,
| ХозрасчетныйДвиженияССубконто.СуммаПРДт,
| ХозрасчетныйДвиженияССубконто.СуммаПРКт,
| ХозрасчетныйДвиженияССубконто.СуммаВРДт,
| ХозрасчетныйДвиженияССубконто.СуммаВРКт,
| ХозрасчетныйДвиженияССубконто.СчетДт,
| ХозрасчетныйДвиженияССубконто.СубконтоКт2,
| ХозрасчетныйДвиженияССубконто.ПодразделениеДт.Ссылка КАК ПодразделениеДтСсылка
|ИЗ
| РегистрБухгалтерии.Хозрасчетный.ДвиженияССубконто(
| &НачПериода,
| &КонПериода,
| СчетКт = &Счет
| И ПодразделениеКт.Ссылка = &Подразделение,
| ,
| ) КАК ХозрасчетныйДвиженияССубконто
|
|СГРУППИРОВАТЬ ПО
| ХозрасчетныйДвиженияССубконто.ПодразделениеДт.Ссылка,
| ХозрасчетныйДвиженияССубконто.СубконтоДт2,
| ХозрасчетныйДвиженияССубконто.Сумма,
| ХозрасчетныйДвиженияССубконто.СчетКт,
| ХозрасчетныйДвиженияССубконто.Период,
| ХозрасчетныйДвиженияССубконто.СуммаНУДт,
| ХозрасчетныйДвиженияССубконто.СуммаНУКт,
| ХозрасчетныйДвиженияССубконто.СуммаПРДт,
| ХозрасчетныйДвиженияССубконто.СуммаПРКт,
| ХозрасчетныйДвиженияССубконто.СуммаВРДт,
| ХозрасчетныйДвиженияССубконто.СуммаВРКт,
| ХозрасчетныйДвиженияССубконто.СчетДт,
| ХозрасчетныйДвиженияССубконто.СубконтоКт2
|
|УПОРЯДОЧИТЬ ПО
| ПодразделениеДтСсылка";

Запрос23.УстановитьПараметр("Счет", Счет);
Запрос23.УстановитьПараметр("Подразделение", Подразделение);
Запрос23.УстановитьПараметр("НачПериода", НачалоДня(НачПериода));
Запрос23.УстановитьПараметр("КонПериода", КонецДня(КонПериода));

Результат1 = Запрос23.Выполнить();
Выборка23 = Результат1.Выбрать();

ВыборкаПодразделения = Результат1.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);

Пока ВыборкаПодразделения.Следующий() Цикл

Выборка00 = ВыборкаПодразделения.Выбрать();

Пока Выборка23.Следующий() Цикл

Если Выборка23.СубконтоКт2.Код = "0000047" тогда

АБУ3 = АБУ3 + Выборка23.Сумма;
////////////////и т.д./////////////////

КонецЕсли;
КонецЦикла;

Секция.Параметры.АБУ3=АБУ3;
///////////////////тд/////////
Таблица.Присоединить(Секция);
КонецЦикла;

Выходит какая-то фигня...
Подскажите пожалуйста как поправить ?!?
Заранее спасибо !!

1 Галахад

гуру

04.04.13

✎

06:28

У меня мозг поломался. :-(

2 Wobland

04.04.13

✎

06:29

дерево обходится так:
ВыборкаРаз=Запрос.Выполнить.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
Пока ВыборкаРаз.Следующий()
ВыборкаДва=ВыборкаРаз.Выбрать();
Пока ВыборкаДва Следующий()

а (0) разбирать не хочу

3 ZanderZ

04.04.13

✎

06:29

итоги сделай по ПодразделениеДтСсылка

4 Wobland

04.04.13

✎

06:30

а нет, хочу. Выборка23 там ваще никуда не впилась

5 Галахад

гуру

04.04.13

✎

06:31

Вы чо реально (0) поняли?

6 Рэйв

04.04.13

✎

06:33

(5)Да он хочет дерево группировок обойти кажется

7 Wobland

04.04.13

✎

06:33

(5) элементарно, Ватсон. человек не знает, как делать, ему надо рассказать с начал. а то, что в (0) выкинуть

8 Wobland

04.04.13

✎

06:34

а ещё сумму в цикле считать не по-нашенски

9 Wobland

04.04.13

✎

06:35

(8) *это не по-нашенски ;)

10 Галахад

гуру

04.04.13

✎

06:35

(6) А-а-а.

(7) Не знает как делать, это ладно. Как догадались чего вообще хочет?

11 Wobland

04.04.13

✎

06:42

(10) я даже запрос не видел. есть предположение, что нужны не итоги, а группировка.

ещё вариант любви с деревом:
Кедр=Запрос.Выполнить().Выгрузить(ОбходРезультатаЗапроса.ПоГруппировкам);
Для Каждого ТекСтрокаРаз Из Кедр.Строки Цикл
ТекСтрокаРаз.Фирма="";
ТекСтрокаРаз.Касса="";
Для Каждого ТекСтрокаДва Из ТекСтрокаРаз.Строки Цикл
ТекСтрокаДва.Касса="";
КонецЦикла;
КонецЦикла;

12 hasan-rusel

04.04.13

✎

06:42

(2)
Поправил как

Пока ВыборкаПодразделения.Следующий() Цикл

Выборка00 = ВыборкаПодразделения.Выбрать();

Пока Выборка00.Следующий() Цикл

БОЛЬШОЕ СПАСИБО !!!!!!!!!!!
Блин, ты мне столько раз уже помог ) С меня проставон )))

13 SnarkHunter

04.04.13

✎

06:47

(0)Подсказывать можно О чем-то, но никак ни С чем-то.

14 Wobland

04.04.13

✎

06:49

(13) подскажите [о том, как быть] с циклом

15 SnarkHunter

04.04.13