Начисление процентов по кредитам и займам полученным / выданным. Расширение для БП КОРП 3.0

Версия №2 отличается от предыдущей:
1. Периодической % по договору;
2. Возможностью выполнять "промежуточные" процентов (например при необходимости получить сумму %% к определенной дате, а не только к концу периода);
3. Вручную определять, необходимость записей для раздела №7 декларации НДС (по выданным займам);

4. Можно вручную настраивать в расчете счета учета кредитов / займов (в случае, если бухгалтерия в плане счетов добавила свой счет);

5. В случае ручной корректировки какого-либо показателя (ставка, база, срок в днях) в документе начисления, выполняется перерасчет суммы начисленных процентов.

Все остальные возможности реализованы в версии №1.

Расширение включает в себя 3 новых объекта:

1. Справочник: "Способ отражения расходов по кредитам/займам" (можно было использовать типовой справочник "Способ отражения расходов по амортизации", но решил, что корректнее с точки зрения методологии создать независимый объект;
2. Перечисление: "Направление займа", со значениями: "Выданный" и "Полученный";
3. Документ: "Начисление процентов по кредитам и займам".

Справочник "Договоры контрагентов" дополнил реквизитами: 

• Флаг "Это договор займа" (виден только в случае вида договора = Прочее);
• При включении займа открывается группа с реквизитами настройки займа:
  • % займа;
  • Счет учета договора %;
  • Способ отражения расходов: (из соответствующего справочника расширения).

Все пользовательские объекты включены в подсистему "Операции" - "Бухгалтерский учет" - "Учет кредитов и займов".

Для попадания в расчет флаг "Это договор займа" должен быть включен.

Табличная часть документа начисления:

1. Направление: "Выданный" / "Полученный" (результат из запроса)
2. Способ отражения расходов: из справочника договора займа (для настройки счета доходов/расходов);
3. Дата: либо конечная дата периода регистрации (в случае если не было оборотов по телу в течение месяца), либо дата изменения базы (для корректного расчета курса, при займе/кредите валютном;
4. Счет учета процентов: из справочника договора займа (для указания на каком счете учитывать процентный договор - актуально для выданных займов); 
5. Период начисления: "Дата С" и "Дата по" - за какой период выполнен расчет;
6. Количество дней: Разница между "Дата С" и "Дата по" - справочно - для наглядности;
7. База: Показатель для расчета. База на "Дату";
8. Ставка: Значение из договора (реквизит не периодический);
9. Валюта: Валюта займа;
10. Курс: Курс займа на "Дату";
11. Валютная сумма: Расчет в случае, если займ/кредит валютный;
12. Сумма, руб: Расчет рублевой суммы займа/кредита.

Ниже запрос выполнения расчета по версии №1 (если кому интересно):

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

		|	ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.СтавкаРефинансированияЦБ.СрезПоследних(&НачПериода"+К+") КАК ПроцентныеСтавкиФинансовыхИнструментов
		|	ПО (ИСТИНА)

20.02.2025г. Расширение адаптировано для совместимости с редакцией 3.0.170.19.