Новости для бухгалтера, бухучет, налогообложение, отчетность, ФСБУ, прослеживаемость и маркировка, 1С:Бухгалтерия

Вход или Регистрация

Показывать по 10 20 40 сообщений
Новая тема Ответить
Письмо в техподдержку 1С
[Прочее]

Выгрузка из ЗиКа в Бухгалтерию НДФЛ по обособленным подразделениям

Денис
читатель
офлайн
Дата регистрации: 30.03.2005
Сообщений: 115
Пост №1
 
04.08.2007 14:39

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

StarS
читатель
офлайн
Дата регистрации: 15.07.2003
Сообщений: 1623
Пост №2
 
05.08.2007 10:04

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

Денис
читатель
офлайн
Дата регистрации: 30.03.2005
Сообщений: 115
Пост №3
 
19.08.2007 22:19

> Пользовательскими нельзя, а в ЗиК нужно подправить одну из процедур глобального модуля.<br><br>Можете подсказать какую? Тогда, как понимаю придется и в бухгалтерии на счете 68.1<br> делать субконто "подразделения"?

StarS
читатель
офлайн
Дата регистрации: 15.07.2003
Сообщений: 1623
Пост №4
 
20.08.2007 05:23

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

Показывать по 10 20 40 сообщений

Читают тему:

Быстрый переход
Учет, налогообложение, автоматизация
  • Книга жалоб и предложений по работе сайта
  • Для технических специалистов
  • Представление регламентированной отчетности
  • Говорильня
  • Бухгалтерский учет: обсуждаем проекты нормативных актов и рекомендаций по ведению учета от БМЦ
  • Новый порядок применения ККТ (онлайн кассы с передачей сведений в ФНС)
  • Интернет-конференция: Оформление командировок по новым правилам
  • МАРКИРОВКА
  • ЕГАИС
  • Учет, налогообложение, автоматизация