НКО PiBi 7.70.469

[LLidiya]

У клиента Московский Союз Художников стоит программа Бухгалтерский учет 4.5 НКО разработка компании ПиБи.
При необходимости проводить документы поступления с учетом НДС и дальнейшим его списанием на счет 68.2 в программе происходит задвоение оборотов по кредиту счета 19.3 .Поступившая насчет сумма НДС списывается на счет 68,2 и на счет 86.50. Устранить в ручную конечно можно, но работать довольно неудобно.
Ответьте пожалуйста, проконсультируете, вопрос терпит, но решение нужно принять. Помогите.

[АнонимХ]

Столько букв и ни одной по делу...
Проводки показывай и что не устраивает.
А разработчика озадачить не судьба?

[LLidiya]

Подскажите, как? я не знаю, к сожалению...

[LLidiya]

Извините, а что в объяснении не понятно? Подскажите, я отвечу.
Документ - Поступление материалов, в реквизите Налоги - НДС сверху 18%. После проведения в проводке появляется две записи:
1-я запись: Д19.3 - К60.1 Выделен НДС Сумма 466,06 от суммы 2589,50
2-я запись: Д86.50 - К19.3 Списан НДС Сумма 466,06

А как вам проводки отослать? Подскажите пожалуйстаАнонимХ,

[LLidiya]

Посмотрела в конфигурации, кусок НКО, в котором мне конечно не разобраться:
//НКО
Если (Подразделение.ВидДеятельности = Перечисление.ХарактерДеятельности.НКО) Тогда
СуммаСписанногоНДС = 0;
Если (Константа.АвтоСписаниеНДС = Перечисление.Булево.Да) Тогда
Операция.НоваяПроводка();
Операция.СодержаниеПроводки = "Списан оплаченный НДС";
Операция.НомерЖурнала = "МТ";
Операция.Дебет.Счет = СчетПоКоду("86.50");
Операция.Дебет.СтатьиЗатратНаПроизводство = СтатьяЗатратНКО;
Операция.Кредит.Счет = Сч19_3;
Операция.Кредит.Контрагенты = Контрагент;
Если ПустоеЗначение(ДатаНомерСчетаФактуры) = 0 Тогда
Операция.Кредит.СчетаФактурыПолученные = ТекущийДокумент();
КонецЕсли;
Операция.Сумма = ИтогоНДС;
СуммаСписанногоНДС = ИтогоНДС;
КонецЕсли;
Если Константа.ОтражатьПоступлениеНа086 = 1 Тогда
Операция.НоваяПроводка();
Операция.СодержаниеПроводки = "Учет расходов на приобретение ОС,НМА,матер.";
Операция.НомерЖурнала = "НА";
Операция.Дебет.Счет = СчетПоКоду("086");
Операция.Сумма = Итог("Всего")-СуммаСписанногоНДС;
КонецЕсли;
КонецЕсли;
//Конец вставки НКО

[LLidiya]

Ну вот, пока поясняла сама поняла, извините, оказывается, в константе автосписание НДС надо поставить "Нет", а там стояло "Да". Спасибо, что совсем не услали...

[АнонимХ]

Вот и чудненько! Удачи.

[LLidiya]

Еще раз, спасибо)))