База знаний Одина — Одинэсника › Форумы › ODIN — Форум по 1С Предприятию › Как в 1С:Бухгалтерия вывести отчет по задолженности контрагентов? › Ответ в теме: Как в 1С:Бухгалтерия вывести отчет по задолженности контрагентов?
Чтобы вывести отчет по задолженности контрагентов в 1С:Бухгалтерия (например, по счету 62 «Расчеты с покупателями и заказчиками»), можно использовать запрос к регистру бухгалтерии или оборотно-сальдовую ведомость по счету с отбором по контрагентам.
Пример кода на языке запросов 1С для получения задолженности по контрагентам на определенную дату:
|ВЫБРАТЬ
| РегистрБухгалтерии.СубконтоКонтрагент КАК Контрагент,
| СУММА(РегистрБухгалтерии.СуммаОстаток) КАК Задолженность
|ИЗ
| РегистрБухгалтерии.ОстаткиИОбороты(&Дата, , Счет = &Счет) КАК РегистрБухгалтерии
|ГДЕ
| РегистрБухгалтерии.СубконтоКонтрагент НЕ NULL
|СГРУППИРОВАТЬ ПО
| РегистрБухгалтерии.СубконтоКонтрагент
|ИМЕЮЩИЕ
| СУММА(РегистрБухгалтерии.СуммаОстаток) <> 0
|УПОРЯДОЧИТЬ ПО
| Контрагент
Где:
— &Дата — дата, на которую нужно получить задолженность (например, конец отчетного периода).
— &Счет — счет учета расчетов с контрагентами, обычно «62».
Пример заполнения параметров и вызова запроса в коде 1С:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 |
ДатаОтчета = '2026-04-15'; СчетРасчетов = Счета.Получить("62"); // или просто "62" Запрос = Новый Запрос; Запрос.Текст = "|ВЫБРАТЬ | РегистрБухгалтерии.СубконтоКонтрагент КАК Контрагент, | СУММА(РегистрБухгалтерии.СуммаОстаток) КАК Задолженность |ИЗ | РегистрБухгалтерии.ОстаткиИОбороты(&Дата, , Счет = &Счет) КАК РегистрБухгалтерии |ГДЕ | РегистрБухгалтерии.СубконтоКонтрагент НЕ NULL |СГРУППИРОВАТЬ ПО | РегистрБухгалтерии.СубконтоКонтрагент |ИМЕЮЩИЕ | СУММА(РегистрБухгалтерии.СуммаОстаток) <> 0 |УПОРЯДОЧИТЬ ПО | Контрагент"; Запрос.УстановитьПараметр("Дата", ДатаОтчета); Запрос.УстановитьПараметр("Счет", СчетРасчетов); Результат = Запрос.Выполнить(); Выборка = Результат.Выбрать(); Пока Выборка.Следующий() Цикл Сообщить("Контрагент: " + Выборка.Контрагент + ", Задолженность: " + Формат(Выборка.Задолженность, "ЧГ=15; ЧД=2")); КонецЦикла; |
Если нужно получить задолженность по всем контрагентам, то этот код подойдет. Если хотите по конкретному контрагенту — добавьте в запрос условие:
|И
| РегистрБухгалтерии.СубконтоКонтрагент = &Контрагент
и передайте параметр Контрагент.
Рекомендую посмотреть здесь для примеров и деталей:
https://infostart.ru/public/1639181/ (статья по отчетам и работе с остатками)
https://infostart.ru/public/1497988/ (учет расчетов с контрагентами)