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