Бухгалтерия 7.7. Релиз 535. Некорректности (ошибки) при вступлении в силу постановления 1137. Релиз 536 вышел
Задачи пользователя - Адаптация типовых решений
При обновлении на 535 релиз обнаружил некорректность в документах поступления - ПоступлениеМатериалов, ПоступлениеНМА, ПоступлениеОборудования, ПоступлениеОС, ПоступлениеТоваров - в продедуре ПриОткрытии(). Код который внесли при вступлении в силу "Постановление
от 26 декабря 2011 г. N 1137 "О формах и правилах заполнения (ведения) документов, применяемых при расчетах по налогу на добавленную стоимость""
...
Если ((ПустоеЗначение(ДатаНомерСчетаФактуры) = 1) и (Выбран() = 1))
или (((ПустоеЗначение(ДатаСчетаФактуры) = 1) или (ПустоеЗначение(НомерСчетаФактуры) = 1)) и (Выбран() = 1)) Тогда
СчетФактураПредъявлен = 0;
Форма.ДатаНомерСчетаФактуры.Доступность(0);
Форма.ДатаСчетаФактуры.Доступность(0);
Форма.НомерСчетаФактуры.Доступность(0);
Иначе
СчетФактураПредъявлен = 1;
Форма.ДатаНомерСчетаФактуры.Доступность(1);
Форма.ДатаСчетаФактуры.Доступность(1);
Форма.НомерСчетаФактуры.Доступность(1);
КонецЕсли;
сбрасывает установленный флаг получения счет-фактуры при открытии документа.
Предлагаю заменить следующим кодом:
Если глПолучитьВерсиюПостановления(ДатаДок) = 2 Тогда
Если ((ПустоеЗначение(ДатаСчетаФактуры) = 1) или (ПустоеЗначение(НомерСчетаФактуры) = 1)) и (Выбран() = 1) Тогда
СчетФактураПредъявлен = 0;
Форма.ДатаСчетаФактуры.Доступность(0);
Форма.НомерСчетаФактуры.Доступность(0);
Иначе
СчетФактураПредъявлен = 1;
Форма.ДатаСчетаФактуры.Доступность(1);
Форма.НомерСчетаФактуры.Доступность(1);
КонецЕсли;
Иначе
Если (ПустоеЗначение(ДатаНомерСчетаФактуры) = 1) и (Выбран() = 1) Тогда
СчетФактураПредъявлен = 0;
Форма.ДатаНомерСчетаФактуры.Доступность(0);
Иначе
СчетФактураПредъявлен = 1;
Форма.ДатаНомерСчетаФактуры.Доступность(1);
КонецЕсли;
КонецЕсли;
Также необходимо для правильного формирования проводок по НДС откорректировать в модулях проведения этих документов строки:
Если ПустоеЗначение(ДатаНомерСчетаФактуры) = 0 Тогда
Операция.Дебет.СчетаФактурыПолученные = ТекущийДокумент();
КонецЕсли;
Предлагаю заменить следующим кодом:
Если (ПустоеЗначение(ДатаНомерСчетаФактуры) = 0) ИЛИ ((ПустоеЗначение(НомерСчетаФактуры) = 0) И (ПустоеЗначение(ДатаСчетаФактуры) = 0)) Тогда
Операция.Дебет.СчетаФактурыПолученные = ТекущийДокумент();
КонецЕсли;
ЗЫ. Номера строк не указываю, так как обновляемая конфигурация изменена - их легко найти по поиску. Жду комментариев.
Вступайте в нашу телеграмм-группу Инфостарт
Вы можете заказать платную адаптацию этой статьи под ваши задачи на «Бирже заказов».
- 0% комиссии — оплата напрямую исполнителю;
- Исполнители любого масштаба — от отдельных специалистов до команд под проект;
- Прямой обмен контактами между заказчиком и исполнителем;
- Безопасная сделка — при необходимости;
- Рейтинги, кейсы и прозрачная система откликов.