Поиск  Пользователи  Правила  Войти
RSS
Выгрузка из ЗиКа в Бухгалтерию НДФЛ по обособленным подразделениям
 
Вобщем вопрос в заголовке - как выгрузить начисления по НДФЛ из ЗиКа в Бухию по подразделениям? Можно ли это сделать пользовательскими средствами или придется менять обе конфы?

Спасибо
 
Пользовательскими нельзя, а в ЗиК нужно подправить одну из процедур глобального модуля.
 
> Пользовательскими нельзя, а в ЗиК нужно подправить одну из процедур глобального модуля.

Можете подсказать какую? Тогда, как понимаю придется и в бухгалтерии на счете 68.1
делать субконто "подразделения"?
 
"Да, добавлять в бухгалтерии субконто на 68.1
В ЗиК в глПроводкиЗаПериод()

Пока ЗапросУдержания.Группировка("ЗаписьЖР")=1 Цикл

ВР=ЗапросУдержания.ВР;  //вид расчета
РезультатВР= ЗапросУдержания.РезультатВР; //результат по ВР, нулевые значения отсекли запросом
ДокументВР = ЗапросУдержания.ТекущийДокумент;    //документ основание ВР
ЗаписьЖР   = ЗапросУдержания.ЗаписьЖР;    //ссылка на запись ЖР

УдержаниеРаспределятьПропорционально = 0;

Если  (ЭтоУдержаниеПроцентом(ВР, ДокументВР) = 1) тогда
УдержаниеРаспределятьПропорционально = глПолучитьВариантРаспределенияУдержания(ВР);
КонецЕсли;

Если ВР = ВидРасчета.НДФЛ Тогда
Если (ЗаписьЖР.ПериодРегистрации.ДатаНачала<>ЗаписьЖР.ДатаНачала) Тогда
глПолучитьРаспределениеРезультата(ЗаписьЖР, ТаблицаРаспределения,,, "Проверка",УдержаниеРаспределятьПропорционально,ДоходыВычетыНалогиСотрудниковДругойПериод,РезультатВР,БюджетнаяОрганизация);
Иначе
глПолучитьРаспределениеРезультата(ЗаписьЖР, ТаблицаРаспределения,,, "Проверка",УдержаниеРаспределятьПропорционально,ДоходыВычетыНалогиСотрудниковНДФЛПарам,РезультатВР,БюджетнаяОрганизация);
КонецЕсли;
Иначе
глПолучитьРаспределениеРезультата(ЗаписьЖР, ТаблицаРаспределения,,, "Проверка",УдержаниеРаспределятьПропорционально,ДоходыВычетыНалогиСотрудниковНДФЛПарам,РезультатВР,БюджетнаяОрганизация);
КонецЕсли;
//ВСТАВКА\
Если ВР=ВидРасчета.НДФЛ Тогда
ПодрНДФЛ=Сотрудник.Подразделение.Получить(ЗаписьЖР.ДатаОкончания);
Для СчН=1 По ВсегоПроводок Цикл
ТаблицаРаспределения.ПолучитьСтрокуПоНомеру(СчН);
ШаблонПроводки=ТаблицаРаспределения.Шаблон;
Если  (ТаблицаРаспределения.Шаблон.СчетКредита.Субконто2.Наименование="Подразделения") Тогда
ТаблицаРаспределения.Шаблон=глПодобратьШаблонПроводки("НДФЛ-"+ПодрНДФЛ.Наименование, ШаблонПроводки.СчетДебета, ШаблонПроводки.Субконто1Дебета,ШаблонПроводки.Субконто2Дебета,ШаблонПроводки.Субконто3Дебета,ШаблонПроводки.Субконто4Дебета,ШаблонПроводки.Субконто5Дебета,ШаблонПроводки.Субконто6Дебета, ШаблонПроводки.Субконто7Дебета,
ШаблонПроводки.СчетКредита, ШаблонПроводки.Субконто1Кредита,ПодрНДФЛ,ШаблонПроводки.Субконто3Кредита,ШаблонПроводки.Субконто4Кредита,
ШаблонПроводки.ПодпадаетПодЕНВД,);
КонецЕсли;
КонецЦикла;
КонецЕсли;
//ВСТАВКА/
ВсегоПроводок = ТаблицаРаспределения.КоличествоСтрок();
Если ВсегоПроводок = 0 Тогда
Продолжить;
КонецЕсли;

Накопили=0;
Для Сч = 1 По ВсегоПроводок  Цикл
.............

Это кусок из релиза 273"
Читают тему

Читайте нас: