ЗУП 3.1 программно изменить начисление в документе

1. NoN098 15 28.07.24 12:05 Сейчас в теме
Добрый день. Есть документы "Прием на работу". Надо некоторые начисления заменить на другие. Как после замены начисления в таблице начислений на новое, не изменяя размера начисления, правильно рассчитать и заполнить таблицу показателей по измененному начислению?

Пробовал через менеджеррасчета - возвращает все пустое и там нет таблицы показателей или как в приведенном коде ошибка деления на ноль.

УстановитьПривилегированныйРежим(Истина);
	
	МенеджерРасчета = Обработки.МенеджерРасчетаЗарплаты.Создать();
	
	ПериодРегистрации = Новый Структура;
	ПериодРегистрации.Вставить("ДатаНачала",НачалоМесяца(ОбъектДок.Дата)); 
	ПериодРегистрации.Вставить("ДатаОкончания",КонецМесяца(ОбъектДок.Дата));
	
	МенеджерРасчета.Инициализировать(ПериодРегистрации, ОбъектДок.Организация);    	
	
	МенеджерРасчета.НастройкиРасчета.Сотрудники = ОбъектДок.Сотрудник;
	МенеджерРасчета.НастройкиРасчета.ФизическиеЛица = ОбъектДок.Сотрудник.ФизическоеЛицо;
	МенеджерРасчета.НастройкиРасчета.РассчитыватьНачисления = Истина;
	МенеджерРасчета.НастройкиРасчета.ОкончательныйРасчет = Истина;

	ТаблицаНачислений = МенеджерРасчета.ТаблицаИсходныеДанныеНачисленияЗарплатыПоНачислениям();	
	НовыйИнтервал = ТаблицаНачислений.Добавить();
	НовыйИнтервал.Сотрудник = ОбъектДок.Сотрудник;
	НовыйИнтервал.Начисление = НовоеНачисление;
	НовыйИнтервал.ДатаНачала = ПериодРегистрации.ДатаНачала;
	НовыйИнтервал.ДатаОкончания = ПериодРегистрации.ДатаОкончания;
	
	МенеджерРасчета.ЗаполнитьНачисленияСотрудникаЗаПериод(ОбъектДок.Сотрудник, ТаблицаНачислений);
 
	МенеджерРасчета.РассчитатьЗарплату();
	
	ТЗНачисления = МенеджерРасчета.Зарплата.Начисления;
	
	УстановитьПривилегированныйРежим(Ложь);
Показать
По теме из базы знаний
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
Оставьте свое сообщение

Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот