"А зачем типовое все постирали? Можно же было ниже прописать свой случай по аналогии со счетом "ОсновноеПроизводство", а теперь не разберешь что и куда там заменяется. Попробуйте переделать на:<br> <br><br><pre>Если Параметры.СводныеПроводки Тогда ТекстЗапроса = Запросы.ОтражениеЗарплатыВРеглУчетеБУ_Сводно .Текст;Иначе ТекстЗапроса = Запросы.ОтражениеЗарплатыВРеглУчетеБУ.Текст;КонецЕсли;ТекстДопУсловия = """";Если Данные.ВариантПериодаВыборки = 1 Тогда ТекстДопУсловия = " | И ОтражениеЗарплатыВРеглУчетеОтражениеВУчете.Ссылка.Дата >= &ДатаНачала"; ИначеЕсли Данные.ВариантПериодаВыборки = 2 Тогда ТекстДопУсловия = " | И ОтражениеЗарплатыВРеглУчетеОтражениеВУчете.Ссылка.Дата <= &ДатаОкончания"; ИначеЕсли Данные.ВариантПериодаВыборки = 3 Тогда ТекстДопУсловия = " | И ОтражениеЗарплатыВРеглУчетеОтражениеВУчете.Ссылка.Дата МЕЖДУ &ДатаНачала И &ДатаОкончания "; КонецЕсли;ТекстЗапроса = СтрЗаменить(ТекстЗапроса, "//Доп условие", ТекстДопУсловия);Запрос = Новый Запрос(ТекстЗапроса);Запрос.УстановитьПараметр("Проведен", Истина);Запрос.УстановитьПараметр("Организация", Данные.Организация);Запрос.УстановитьПараметр("ДатаНачала", НачалоДня(ДатаНачала));Запрос.УстановитьПараметр("ДатаОкончания", КонецДня(ДатаОкончания));Если Параметры.СводныеПроводки Тогда СписокСчетовБухУчета = Новый("СписокЗначений"); СписокСчетовБухУчета.Добавить(ПланыСчетов.Хозрасчетный.РасчетыСПерсоналомПоОплатеТруда); СписокСчетовБухУчета.Добавить(ПланыСчетов.Хозрасчетный.РасчетыПоДепонированнымСуммам); СписокСчетовБухУчета.Добавить(ПланыСчетов.Хозрасчетный.РасходыНаОплатуТрудаБудущихПериодов); Запрос.УстановитьПараметр("СчетБУ", СписокСчетовБухУчета); Запрос.УстановитьПараметр("Счет97", ПланыСчетов.Хозрасчетный.РасходыНаОплатуТрудаБудущихПериодов); КонецЕсли;РезультатЗапроса = Запрос.Выполнить();Если РезультатЗапроса.Пустой() Тогда Отказ = ИстинаКонецЕсли;// Структура документаТабДок = Новый ТаблицаЗначений;ТабДок.Колонки.Добавить("ДатаДок");ТабДок.Колонки.Добавить("НомерДок");ТабДок.Колонки.Добавить("Комментарий");ТабДок.Колонки.Добавить("Ссылка");ТабДок.Колонки.Добавить("ТабличнаяЧасть");Выборка = РезультатЗапроса.Выбрать();Пока Выборка.СледующийПоЗначениюПоля("Ссылка") Цикл НоваяСтрока = ТабДок.Добавить(); НоваяСтрока.ДатаДок = Выборка.ДатаДок; НоваяСтрока.НомерДок = Выборка.Номер; НоваяСтрока.Комментарий = Выборка.Комментарий; НоваяСтрока.Ссылка = Выборка.Ссылка; НоваяСтрока.ТабличнаяЧасть = Новый ТаблицаЗначений; НоваяСтрока.ТабличнаяЧасть.Колонки.Добавить("ДебетСчет"); НоваяСтрока.ТабличнаяЧасть.Колонки.Добавить("ДебетСубконто1"); НоваяСтрока.ТабличнаяЧасть.Колонки.Добавить("ДебетСубконто2"); НоваяСтрока.ТабличнаяЧасть.Колонки.Добавить("ДебетСубконто3"); НоваяСтрока.ТабличнаяЧасть.Колонки.Добавить("КредитСчет"); НоваяСтрока.ТабличнаяЧасть.Колонки.Добавить("КредитСубконто1"); НоваяСтрока.ТабличнаяЧасть.Колонки.Добавить("КредитСубконто2"); НоваяСтрока.ТабличнаяЧасть.Колонки.Добавить("КредитСубконто3"); НоваяСтрока.ТабличнаяЧасть.Колонки.Добавить("Сумма"); Пока Выборка.Следующий() Цикл Если Не ЗначениеЗаполнено(Выборка.СчетДт) или Не ЗначениеЗаполнено(Выборка.СчетКт) Тогда Продолжить; КонецЕсли; НоваяСТрокаТЧ = НоваяСтрока.ТабличнаяЧасть.Добавить(); НоваяСТрокаТЧ.ДебетСчет = Выборка.СчетДт; // У этих счетов субконто не совпадает Если Выборка.СчетДт = ПланыСчетов.Хозрасчетный.ОбщехозяйственныеРасходы Или Выборка.СчетДт = ПланыСчетов.Хозрасчетный.ОбщепроизводственныеРасходы Тогда НоваяСТрокаТЧ.ДебетСубконто1 = Выборка.СубконтоДт2; НоваяСТрокаТЧ.ДебетСубконто2 = Выборка.СубконтоДт1; НоваяСТрокаТЧ.ДебетСубконто3 = Выборка.СубконтоДт3; ИначеЕсли Выборка.СчетДт = ПланыСчетов.Хозрасчетный.ОсновноеПроизводство ИЛИ Выборка.СчетДт = ПланыСчетов.Хозрасчетный.БракВПроизводстве Тогда НоваяСТрокаТЧ.ДебетСубконто1 = Выборка.СубконтоДт2; НоваяСТрокаТЧ.ДебетСубконто2 = Выборка.СубконтоДт3; НоваяСТрокаТЧ.ДебетСубконто3 = Выборка.СубконтоДт1; ИначеЕсли Выборка.СчетДт = ПланыСчетов.Хозрасчетный.ВспомогательныеПроизводства Тогда НоваяСТрокаТЧ.ДебетСубконто1 = Выборка.СубконтоДт1; НоваяСТрокаТЧ.ДебетСубконто2 = Выборка.СубконтоДт3; НоваяСТрокаТЧ.ДебетСубконто3 = Выборка.СубконтоДт2; Иначе НоваяСТрокаТЧ.ДебетСубконто1 = Выборка.СубконтоДт1; НоваяСТрокаТЧ.ДебетСубконто2 = Выборка.СубконтоДт2; НоваяСТрокаТЧ.ДебетСубконто3 = Выборка.СубконтоДт3; КонецЕсли; НоваяСТрокаТЧ.КредитСчет = Выборка.СчетКт; НоваяСТрокаТЧ.КредитСубконто1 = Выборка.СубконтоКт1; НоваяСТрокаТЧ.КредитСубконто2 = Выборка.СубконтоКт2; НоваяСТрокаТЧ.КредитСубконто3 = Выборка.СубконтоКт3; НоваяСТрокаТЧ.Сумма = Выборка.Сумма; КонецЦикла; КонецЦикла;ВыборкаДанных = ТабДок; </pre>"