[необходимо зарегистрироваться для просмотра ссылки]
Запрос = Новый Запрос();
Запрос.Текст=
"ВЫБРАТЬ
| ХО_Движение.Период КАК Период,
| ХО_Движение.СчетДт КАК СчетДт,
| ХО_Движение.СчетКт КАК СчетКт,
| ХО_Движение.Организация КАК Организация,
| ХО_Движение.Сумма КАК Сумма,
| ХО_Движение.СчетДт.ВидыСубконто.(
| НомерСтроки,
| ВидСубконто КАК Ключ,
| ВЫБОР
| КОГДА ХО_Движение.СчетДт.ВидыСубконто.НомерСтроки = 1
| ТОГДА ХО_Движение.СубконтоДт1
| КОГДА ХО_Движение.СчетДт.ВидыСубконто.НомерСтроки = 2
| ТОГДА ХО_Движение.СубконтоДт2
| ИНАЧЕ ХО_Движение.СубконтоДт3
| КОНЕЦ КАК Значение
| ) КАК СубконтоДт,
| ХО_Движение.СчетКт.ВидыСубконто.(
| НомерСтроки ,
| ВидСубконто КАК Ключ,
| ВЫБОР
| КОГДА ХО_Движение.СчетКт.ВидыСубконто.НомерСтроки = 1
| ТОГДА ХО_Движение.СубконтоКт1
| КОГДА ХО_Движение.СчетКт.ВидыСубконто.НомерСтроки = 2
| ТОГДА ХО_Движение.СубконтоКт2
| ИНАЧЕ ХО_Движение.СубконтоКт3
| КОНЕЦ КАК Значение
| ) КАК СубконтоКт
|ИЗ
| РегистрБухгалтерии.Хозрасчетный.ДвиженияССубконто КАК ХО_Движение
|ГДЕ
| ХО_Движение.Регистратор = &Регистратор";
Запрос.УстановитьПараметр("Регистратор", Источник);
Хозрасчетный = Новый ТаблицаЗначений;
Хозрасчетный.Колонки.Добавить("Содержание");
Хозрасчетный.Колонки.Добавить("Организация");
ВходящиеДанные = Новый Структура("Дата, Организация, Содержание ");
ВходящиеДанные.Дата = Источник.Дата;
ВходящиеДанные.Организация = Источник.Организация;
ВходящиеДанные.Содержание = "Зарплата "+Источник;
рез= Запрос.Выполнить();
Выборка = рез.Выбрать();
Пока Выборка.Следующий() Цикл
Стр = Хозрасчетный.Добавить();
Стр.Содержание= "круто";
Стр.Организация = Выборка.Организация;
КонецЦикла;
Если Хозрасчетный.Количество()>0 Тогда
ВходящиеДанные.Вставить("Хозрасчетный", Хозрасчетный);
ВыгрузитьПоПравилу(, ,ВходящиеДанные , , "ОперацияБух_");
КонецЕсли;