v7: Как вывести строки ТЧ дока
☑
0
wladimir90
18.01.12
✎
10:11
Всем привет. Надо вывести все строки ТЧ выбраного документа в 7.7 в таблицу из внешней обработки. Подскажите плз что не так делаю, он в цикл даже не заходит. В 7ке вообще ниче не понимаю...
Запрос = СоздатьОбъект("Запрос");
ТекстЗапроса =
"//{{ЗАПРОС(Сформировать)
|ТабельДень_ИТэ = Документ.ТабельДень_ИТэ.ТекущийДокумент;
|Сотрудник = Документ.ТабельДень_ИТэ.Сотрудник;
|ПришелВремя = Документ.ТабельДень_ИТэ.ПришелВремя;
|УшелВремя = Документ.ТабельДень_ИТэ.УшелВремя;
|Опоздал = Документ.ТабельДень_ИТэ.Опоздал;
|Удержание = Документ.ТабельДень_ИТэ.Удержание;
|Сумма = Документ.ТабельДень_ИТэ.Сумма;
|СуммаИтог = Документ.ТабельДень_ИТэ.СуммаИтог;
|ВсегоОтработано = Документ.ТабельДень_ИТэ.ВсегоОтработано;
|ВидНачисления = Документ.ТабельДень_ИТэ.ВидНачисления;
|Оклад = Документ.ТабельДень_ИТэ.Оклад;
|ВсегоПереработал = Документ.ТабельДень_ИТэ.ВсегоПереработал;
|СуммаПереработки = Документ.ТабельДень_ИТэ.СуммаПереработки;
|График = Документ.ТабельДень_ИТэ.График;
|ВидУдержания = Документ.ТабельДень_ИТэ.ВидУдержания;
|ВсегоПеререботкаВнутр = Документ.ТабельДень_ИТэ.ВсегоПеререботкаВнутр;
|Простой = Документ.ТабельДень_ИТэ.Простой;
|Группировка ТабельДень_ИТэ;
|Условие(ТабельДень_ИТэ = ТабельДень);
|"//}}ЗАПРОС
;
// Если ошибка в запросе, то выход из процедуры
Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
Возврат;
КонецЕсли;
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Таблица");
Таб.ВывестиСекцию("Шапка");
Состояние("Заполнение выходной таблицы...");
Пока Запрос.Группировка("ТабельДень_ИТэ") = 1 Цикл
Таб.ВывестиСекцию("Данные");
КонецЦикла;
Таб.Показать("Таблица", "");
1
wladimir90
18.01.12
✎
10:17
ап
2
filh
18.01.12
✎
10:17
А зачем запрос?
3
PuhUfa
18.01.12
✎
10:18
Если по одному документу то зачем запрос? просто так выводи
4
mdocs
18.01.12
✎
10:19
а где группировка по строке документа?
5
filh
18.01.12
✎
10:19
У тебя ТабельДень уже определен, ну и пройдись по строкам ТЧ документа.
ТабельДень.ВыбратьСтроки()
Пока ТабельДень.ПолучитьСтроку() = 1 Цикл
...
КонецЦикла
6
wladimir90
18.01.12
✎
10:19
хм. а как?
7
wladimir90
18.01.12
✎
10:19
О! Спасибо )
Основная теорема систематики: Новые системы плодят новые проблемы.