|
|
Добрый день, подскажите пожалуйст при закрытии месяца выводится ошибка при закрытии счетов 20,23,25,26. Последовательность переделов установить "автоматически" в Учетной политике не могу, так как у на Производство с использованием счета 40.Заранее благодарю.
ТекстЗапроса =
"ВЫБРАТЬ
| СУММА(ВложенныйЗапрос.НЗППР) КАК НЗППР,
| СУММА(ВложенныйЗапрос.НЗПВР) КАК НЗПВР,
| СУММА(ВложенныйЗапрос.Разницы) КАК Разницы,
| ВложенныйЗапрос.Счет КАК Счет,
| ВложенныйЗапрос.Подразделение КАК Подразделение,
| ВложенныйЗапрос.НоменклатурнаяГруппа КАК НоменклатурнаяГруппа
|ИЗ
| (ВЫБРАТЬ
| ХозрасчетныйОстаткиИОбороты.СуммаПРНачальныйОстатокДт + ХозрасчетныйОстаткиИОбороты.СуммаПРОборотДт КАК НЗППР,
| ХозрасчетныйОстаткиИОбороты.СуммаВРНачальныйОстатокДт + ХозрасчетныйОстаткиИОбороты.СуммаВРОборотДт КАК НЗПВР,
| 0 КАК Разницы,
| ХозрасчетныйОстаткиИОбороты.Счет КАК Счет,
| ХозрасчетныйОстаткиИОбороты.Подразделение КАК Подразделение,
| ХозрасчетныйОстаткиИОбороты.Субконто1 КАК НоменклатурнаяГруппа
| ИЗ
| РегистрБухгалтерии.Хозрасчетный.ОстаткиИОбороты(
| &НачПериода,
| &КонПериода,
| ,
| ,
| Счет В ИЕРАРХИИ (&Счет),
| &НоменклатурныеГруппы,
| Организация = &Организация
| И (Подразделение, Субконто1) В
| (ВЫБРАТЬ
| Фильтр.Подразделение,
| Фильтр.НоменклатурнаяГруппа
| ИЗ
| Фильтр КАК Фильтр)) КАК ХозрасчетныйОстаткиИОбороты
|
| ОБЪЕДИНИТЬ ВСЕ
|
| ВЫБРАТЬ
| 0,
| 0,
| ИнвентаризацияНЗПСостав.Сумма - ИнвентаризацияНЗПСостав.СуммаНУ,
| ИнвентаризацияНЗПСостав.Ссылка.СчетЗатрат,
| ИнвентаризацияНЗПСостав.Ссылка.ПодразделениеОрганизации,
| ИнвентаризацияНЗПСостав.НоменклатурнаяГруппа
| ИЗ
| Документ.ИнвентаризацияНЗП.Состав КАК ИнвентаризацияНЗПСостав
| ВНУТРЕННЕЕ СОЕДИНЕНИЕ Фильтр КАК Фильтр
| ПО ИнвентаризацияНЗПСостав.Ссылка.ПодразделениеОрганизации = Фильтр.Подразделение
| И ИнвентаризацияНЗПСостав.НоменклатурнаяГруппа = Фильтр.НоменклатурнаяГруппа
| ГДЕ
| ИнвентаризацияНЗПСостав.Ссылка.Организация = &Организация
| И ИнвентаризацияНЗПСостав.Ссылка.Дата МЕЖДУ &НачДата И &КонДата
| И (НЕ ИнвентаризацияНЗПСостав.Ссылка.ПометкаУдаления)) КАК ВложенныйЗапрос
|
|СГРУППИРОВАТЬ ПО
| ВложенныйЗапрос.Счет,
| ВложенныйЗапрос.Подразделение,
| ВложенныйЗапрос.НоменклатурнаяГруппа
|
|УПОРЯДОЧИТЬ ПО
| Счет,
| Подразделение,
| НоменклатурнаяГруппа";
Если ПодразделенияИНоменклатурныеГруппы.Количество() > 0
И ПодразделенияИНоменклатурныеГруппы[0].НоменклатурнаяГруппа = "Все" Тогда
ТекстЗапросаФильтр =
"ВЫБРАТЬ РАЗЛИЧНЫЕ
| Таблица.Подразделение КАК Подразделение
|ПОМЕСТИТЬ Фильтр
|ИЗ
| &ПодразделенияИНоменклатурныеГруппы КАК Таблица
|
|ИНДЕКСИРОВАТЬ ПО
| Подразделение";
ТекстЗапроса = СтрЗаменить(ТекстЗапроса,"И ИнвентаризацияНЗПСостав.НоменклатурнаяГруппа = Фильтр.НоменклатурнаяГруппа", "");
ТекстЗапроса = СтрЗаменить(ТекстЗапроса,"И (Подразделение, Субконто1) В", "И Подразделение В");
ТекстЗапроса = СтрЗаменить(ТекстЗапроса,"Фильтр.Подразделение,", "Фильтр.Подразделение");
ТекстЗапроса = СтрЗаменить(ТекстЗапроса,"Фильтр.НоменклатурнаяГруппа", "");
Иначе
ТекстЗапросаФильтр =
"ВЫБРАТЬ
| Таблица.Подразделение КАК Подразделение,
| Таблица.НоменклатурнаяГруппа КАК НоменклатурнаяГруппа
|ПОМЕСТИТЬ Фильтр
|ИЗ
| &ПодразделенияИНоменклатурныеГруппы КАК Таблица
|
|ИНДЕКСИРОВАТЬ ПО
| Подразделение,
| НоменклатурнаяГруппа";
КонецЕсли;
Запрос = Новый Запрос;
Запрос.МенеджерВременныхТаблиц = Новый МенеджерВременныхТаблиц;
Запрос.УстановитьПараметр("ПодразделенияИНоменклатурныеГруппы", ПодразделенияИНоменклатурныеГруппы);
Запрос.Текст = ТекстЗапросаФильтр;
Запрос.Выполнить(); |
|
1С Бухгалтерия 2.0
).gif)