По теме из базы знаний
- Унифицированная форма ИНВ-11 (Акт инвентаризации расходов будущих периодов)
- Особенности расходов будущих периодов в ERP 2.5
- ИНВ-11 (Акт инвентаризации расходов будущих периодов). БП 3.0
- Инструкция по блоку РСБУ "Учет расходов будущих периодов" в 1С: Управление холдингом 3.2
- ИНВ-11. Инвентаризация расходов будущих периодов для ERP, КА, УТ
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
Нет, не большие.
Вот это я из xml-файла вырезал:
<Проводка СчетДт="91.2" СчетКт="97">
Сумма Значение="4028"/>
НомерЖурнала" Значение="ЗП"
ПрочиеДоходыИРасходы
Реквизит Идентификатор="Код" Значение="000035"/>
Наименование" Значение="Выплаты из собственных средств"/>
Идентификатор="РасходыБудущихПериодов">
Наименование" Значение="Расходы будущих периодов по оплате труда"
Вот это я из xml-файла вырезал:
<Проводка СчетДт="91.2" СчетКт="97">
Сумма Значение="4028"/>
НомерЖурнала" Значение="ЗП"
ПрочиеДоходыИРасходы
Реквизит Идентификатор="Код" Значение="000035"/>
Наименование" Значение="Выплаты из собственных средств"/>
Идентификатор="РасходыБудущихПериодов">
Наименование" Значение="Расходы будущих периодов по оплате труда"
При выгрузке из ЗиК проверяет между начисленным и выгруженными сумами если находит расхождения то кидает их на 91 счет (91.1 или 91.2), я (у себя) поправил так:
ТаблицаКорреспонденций.ВыбратьСтроки();
Пока ТаблицаКорреспонденций.ПолучитьСтроку() = 1 Цикл
// изменено
//ТаблицаКорреспонденций.Сумма = Окр(ТаблицаКорреспонденций.Сумма,2);
//<--------------------
Если ТаблицаКорреспонденций.Шаблон.СчетКредита.Код=СчетКтПФР.Код Тогда ИтогоЗаМесяцПоПроводкамПФР = ИтогоЗаМесяцПоПроводкамПФР + ТаблицаКорреспонденций.Сумма;
ИначеЕсли ТаблицаКорреспонденций.Шаблон.СчетКредита.Код=СчетКтФФОМС.Код Тогда
ИтогоЗаМесяцПоПроводкамФФОМС = ИтогоЗаМесяцПоПроводкамФФОМС + ТаблицаКорреспонденций.Сумма;
ИначеЕсли ТаблицаКорреспонденций.Шаблон.СчетКредита.Код=СчетКтТФОМС.Код Тогда
ИтогоЗаМесяцПоПроводкамТФОМС = ИтогоЗаМесяцПоПроводкамТФОМС + ТаблицаКорреспонденций.Сумма;
ИначеЕсли ТаблицаКорреспонденций.Шаблон.СчетКредита.Код=СчетКтФСС.Код Тогда
ИтогоЗаМесяцПоПроводкамФСС = ИтогоЗаМесяцПоПроводкамФСС + ТаблицаКорреспонденций.Сумма;
ИначеЕсли ТаблицаКорреспонденций.Шаблон.СчетКредита.Код=СчетКтСтраховаяПенс.Код Тогда
ИтогоЗаМесяцПоПроводкамСтраховаяПенс = ИтогоЗаМесяцПоПроводкамСтраховаяПенс + ТаблицаКорреспонденций.Сумма;
ИначеЕсли ТаблицаКорреспонденций.Шаблон.СчетКредита.Код=СчетКтНакопительнаяПенс.Код Тогда
ИтогоЗаМесяцПоПроводкамНакопительнаяПенс = ИтогоЗаМесяцПоПроводкамНакопительнаяПенс + ТаблицаКорреспонденций.Сумма;
КонецЕсли;
КонецЦикла;
КонецЕсли;
КонецЕсли;
// добавлено <yvv> 130706 ------------------> начало ----------------->
ИтогоЗаМесяцПоПроводкамПФР = Окр(ИтогоЗаМесяцПоПроводкамПФР,2);
ИтогоЗаМесяцПоПроводкамФФОМС = Окр(ИтогоЗаМесяцПоПроводкамФФОМС,2);
ИтогоЗаМесяцПоПроводкамТФОМС = Окр(ИтогоЗаМесяцПоПроводкамТФОМС,2);
ИтогоЗаМесяцПоПроводкамФСС = Окр(ИтогоЗаМесяцПоПроводкамФСС,2);
ИтогоЗаМесяцПоПроводкамСтраховаяПенс = Окр(ИтогоЗаМесяцПоПроводкамСтраховаяПенс,2);
ИтогоЗаМесяцПоПроводкамНакопительнаяПенс = Окр(ИтогоЗаМесяцПоПроводкамНакопительнаяПенс,2);
// <-------------------------- конец <-----------------------------------
БылиРасхождения = 0;
Строки в глобальном модуле с 50958 по 50982 (релиз 270).\
p.s. у меня гл. модуль изменен поэтому строки у тебя могут отличатся
ТаблицаКорреспонденций.ВыбратьСтроки();
Пока ТаблицаКорреспонденций.ПолучитьСтроку() = 1 Цикл
// изменено
//ТаблицаКорреспонденций.Сумма = Окр(ТаблицаКорреспонденций.Сумма,2);
//<--------------------
Если ТаблицаКорреспонденций.Шаблон.СчетКредита.Код=СчетКтПФР.Код Тогда ИтогоЗаМесяцПоПроводкамПФР = ИтогоЗаМесяцПоПроводкамПФР + ТаблицаКорреспонденций.Сумма;
ИначеЕсли ТаблицаКорреспонденций.Шаблон.СчетКредита.Код=СчетКтФФОМС.Код Тогда
ИтогоЗаМесяцПоПроводкамФФОМС = ИтогоЗаМесяцПоПроводкамФФОМС + ТаблицаКорреспонденций.Сумма;
ИначеЕсли ТаблицаКорреспонденций.Шаблон.СчетКредита.Код=СчетКтТФОМС.Код Тогда
ИтогоЗаМесяцПоПроводкамТФОМС = ИтогоЗаМесяцПоПроводкамТФОМС + ТаблицаКорреспонденций.Сумма;
ИначеЕсли ТаблицаКорреспонденций.Шаблон.СчетКредита.Код=СчетКтФСС.Код Тогда
ИтогоЗаМесяцПоПроводкамФСС = ИтогоЗаМесяцПоПроводкамФСС + ТаблицаКорреспонденций.Сумма;
ИначеЕсли ТаблицаКорреспонденций.Шаблон.СчетКредита.Код=СчетКтСтраховаяПенс.Код Тогда
ИтогоЗаМесяцПоПроводкамСтраховаяПенс = ИтогоЗаМесяцПоПроводкамСтраховаяПенс + ТаблицаКорреспонденций.Сумма;
ИначеЕсли ТаблицаКорреспонденций.Шаблон.СчетКредита.Код=СчетКтНакопительнаяПенс.Код Тогда
ИтогоЗаМесяцПоПроводкамНакопительнаяПенс = ИтогоЗаМесяцПоПроводкамНакопительнаяПенс + ТаблицаКорреспонденций.Сумма;
КонецЕсли;
КонецЦикла;
КонецЕсли;
КонецЕсли;
// добавлено <yvv> 130706 ------------------> начало ----------------->
ИтогоЗаМесяцПоПроводкамПФР = Окр(ИтогоЗаМесяцПоПроводкамПФР,2);
ИтогоЗаМесяцПоПроводкамФФОМС = Окр(ИтогоЗаМесяцПоПроводкамФФОМС,2);
ИтогоЗаМесяцПоПроводкамТФОМС = Окр(ИтогоЗаМесяцПоПроводкамТФОМС,2);
ИтогоЗаМесяцПоПроводкамФСС = Окр(ИтогоЗаМесяцПоПроводкамФСС,2);
ИтогоЗаМесяцПоПроводкамСтраховаяПенс = Окр(ИтогоЗаМесяцПоПроводкамСтраховаяПенс,2);
ИтогоЗаМесяцПоПроводкамНакопительнаяПенс = Окр(ИтогоЗаМесяцПоПроводкамНакопительнаяПенс,2);
// <-------------------------- конец <-----------------------------------
БылиРасхождения = 0;
Строки в глобальном модуле с 50958 по 50982 (релиз 270).\
p.s. у меня гл. модуль изменен поэтому строки у тебя могут отличатся
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот