Проблема с документом Отражение зарплаты в регл учете Диамед

 Добавил следующий код в модуль объекта документа Отражения зарплаты в регл учете.

Если ТаблицаНетБазы.Количество() > 0 Тогда
        //нет базы и с начала года, отразим взносы в Дт 91 счета, Zaur tut problema
        Для каждого СтрокаТЗ Из ТаблицаНетБазы Цикл     
           
        СтрокаДТ = ПромежуточнаяТаблица.Найти(ПланыСчетов.Хозрасчетный.МСФОРасчетыПоОбязательномуМедСтрахованию,"СчетКт");

            СтрокаДТ2 = ПромежуточнаяТаблица.Найти(ПланыСчетов.Хозрасчетный.МСФОРасчетыСФондомСоцСтрахования,"СчетКт");
           
            СтрокаТЧ = ПромежуточнаяТаблица.Добавить();
           
            СтрокаТЧ.СчетДт            = ОтражениеЗарплатыВРеглУчетеДополнительный.ПолучитьСчетПрочихРасходов(?(СтрокаТЗ.ВидБазы = "БазаПФР_ЕНВД", Истина, Ложь));
            СтрокаТЧ.СубконтоДт1     = Справочники.ПрочиеДоходыИРасходы.РасходыПоУплатеСтраховыхВзносов;
            СтрокаТЧ.СчетКт            = СтрокаТЗ.СчетКт;
            СтрокаТЧ.СубконтоКт1    = Перечисления.ВидыПлатежейВГосБюджет.Налог;
           
            Если СтрокаТЗ.ВидБазы = "БазаСБО" Тогда
                Если СтрокаДТ <> Неопределено Тогда
                    СтрокаТЧ.СчетДт =    ПланыСчетов.Хозрасчетный.МСФООсновноеПроизводство;
                    СтрокаТЧ.СубконтоДт1 = ПолучитьПодразделениеСотрудника(СтрокаТЗ.Физлицо);               
                    СтрокаТЧ.СубконтоДт3     = СтрокаДТ.СубконтоДт3;
                КонецЕсли;
            ИначеЕсли СтрокаТЗ.ВидБазы = "БазаОМСО" Тогда
                //Если СтрокаДТ <> Неопределено Тогда
                    СтрокаТЧ.СчетДт =    ПланыСчетов.Хозрасчетный.МСФОРасходыНаАдминистративныйПерсонал; //МСФООсновноеПроизводство;
                    СтрокаТЧ.СубконтоДт1 = ПолучитьПодразделениеСотрудника(СтрокаТЗ.Физлицо);
                    Попытка
                        СтрокаТЧ.СубконтоДт2     = Справочники.СтатьиЗатрат.НайтиПоНаименованию("İcbari tibbi siğorta haqqı (işəgötürəndən)");
                    Исключение
                        СтрокаТЧ.СубконтоДт2     = Справочники.СтатьиЗатрат.ПустаяСсылка();
                    КонецПопытки;
                //КонецЕсли;    
            Иначе
                Если СтрокаДТ2 <> Неопределено Тогда
                    СтрокаТЧ.СчетДт =    ПланыСчетов.Хозрасчетный.МСФООсновноеПроизводство;
                    СтрокаТЧ.СубконтоДт1 = ПолучитьПодразделениеСотрудника(СтрокаТЗ.Физлицо);               
                    СтрокаТЧ.СубконтоДт3     = СтрокаДТ2.СубконтоДт3;
                КонецЕсли;
            КонецЕсли;
                       
            СтрокаТЧ.Сумма            = СтрокаТЗ.СуммаВзноса;

           
        КонецЦикла;
    КонецЕсли;    

 

  Д  'njn этот код взял из конфигурации альтуса. расчет страховых взносов за сотрудников без базы , текущем месяце.  Поместил его в функцию ПолучитьПроводкиПоСтраховымВзносам2011.

Дополнительно перенес еще одну используемыую функцию ПолучитьПодразделениеСотрудника