[kuzovova]

Документ расходы на приобретение модуль документа строка 136

    //РазницаБезНДС = Макс(0, СуммаБезНДС - (СуммаГрнО - НДСГрнО));
    //РазницаНДС = Макс(0, НДС - НДСГрнО);     
    //Если Счет.ВидСубконто(1) = ВидыСубконто.Контрагенты Тогда
    //    Если Счет.ВидСубконто(2) = ВидыСубконто.Заказы Тогда
    //        Если Субконто2.Вид()="Договор" Тогда
    //            КонтрагентПлательщик = Субконто2.ПлательщикНалогаНаПрибыль;
    //        Иначе
    //            КонтрагентПлательщик = Субконто1.ПлательщикНалогаНаПрибыль.Получить(Субконто2.ДатаДок);
    //        КонецЕсли;
    //    Иначе
    //        КонтрагентПлательщик = Субконто1.ПлательщикНалогаНаПрибыль.Получить(ДатаДок)
    //    КонецЕсли;
    //    Если КонтрагентПлательщик = 0 Тогда
    //        РазницаБезНДС = СуммаБезНДС;
    //    КонецЕсли;
    //КонецЕсли;

не правильно определяет первое событие, нужно снять коментарий

у меня в 1с 7.7 /.287 все точно так же, а считает неправильно, что менять то ничего не понятно.... или скопируйте со своего как правильно. спасибо

[Юли4ка]

Ошибка в модуле документа Корректировка остатков необоротных активов на 01 апреля 2011г.
Остатки по налоговому учету берутся на начало 1-ого квартала а должны на начало 2-ого. Исправлять так:

// ===============================
Процедура ПроводкиШапка()       
    ОстСтоимостьНУ = 0;
    Для НомерГруппы = 1 По 4 Цикл
        Ит = СоздатьОбъект("БухгалтерскиеИтоги");
        Ит.ИспользоватьРазделительУчета(Фирма);
        СчетГруппы = "ОС."+НомерГруппы;
        Ит.ИспользоватьСубконто(ВидыСубконто.НалогиОтчисления);
        // Ит.ВыполнитьЗапрос(НачКвартала(ДатаДок),,СчетГруппы); // неправильно: НачКвартала(ДатаДок) = 01.01.2011 т.к. ДатаДок=31.03.2011
        Ит.ВыполнитьЗапрос(НачКвартала(ДатаДок+1),,СчетГруппы); // правильно: по сост. на 01.04.2011 (НКУ раздел ХХ, подраздел 4, ст. 6) 
        //Возьмем остатки в целом по группе
        ОстСтоимостьГруппы = Ит.СНД("С");
        ОстСтоимостьНУ = ОстСтоимостьНУ + ОстСтоимостьГруппы;
    КонецЦикла;
    
    // НМА
    Ит = СоздатьОбъект("БухгалтерскиеИтоги");
    Ит.ИспользоватьРазделительУчета(Фирма);
    Ит.ИспользоватьСубконто(ВидыСубконто.НеоборотныеАктивы);
    // Ит.ВыполнитьЗапрос(НачКвартала(ДатаДок),,"НА.1,НА.2"); // неправильно: НачКвартала(ДатаДок) = 01.01.2011 т.к. ДатаДок=31.03.2011
    Ит.ВыполнитьЗапрос(НачКвартала(ДатаДок+1),,"НА.1,НА.2"); // правильно: по сост. на 01.04.2011 (НКУ раздел ХХ, подраздел 4, ст. 6) 
    Ит.ВыбратьСубконто(1);
    Пока Ит.ПолучитьСубконто(1) = 1 Цикл
        ПервСтоимость = 0;
        Если Ит.ПолучитьСчет(,СчетПоКоду("НА.1")) = 1 Тогда
            ПервСтоимость = Ит.СНД("С");
        КонецЕсли;
        ОстСтоимость = ПервСтоимость;
        Если Ит.ПолучитьСчет(,СчетПоКоду("НА.2")) = 1 Тогда
            ОстСтоимость = ПервСтоимость - Ит.СНК("С");
        КонецЕсли;
        ОстСтоимостьНУ = ОстСтоимостьНУ + ОстСтоимость;
    КонецЦикла; 
    РазницаБУНУ = Итог("ОстаточнаяСтоимостьБУ") -  ОстСтоимостьНУ;
    РазницаБУНУ = ?(РазницаБУНУ < 0, -РазницаБУНУ, 0); // Если остатки в бухучете больше, то ничего допроводить не надо
    СчетНУ = "Н" + НеобАктивРазница.Счет;
    глПровНУ(Контекст,СчетНУ,,,"Разница НУ корр. остат. необ. активов",, МестоХраненияРазн,НеобАктивРазница,,,,, ,,"НА",РазницаБУНУ);
КонецПроцедуры

Помогите пожалуйста, исправила как у вас написано, а все равно берется остаточная стоимость на 01.01.11, как можно еще исправить. Спасибо.

[pashenkoav]

Поле установки нового релиза 287 начинают всплывать глюки. Предлагаю делиться выловленными глюками. Так как релиз сложный и ходить несколько раз это роскошь. поэтому хочется исправить все за один раз.

Документ "Финансовые результаты" не сворачивает некоторые счета по видам затрат (например 902)

для исправления необходимо изменить условия в следующих процедурах:

Процедура ПроводкиОпределениеФинансовогоРезультата()
    ///.......
    Пока Ит.ПолучитьСчет() = 1 Цикл
        ///........
        //Если Ит.Счет.КоличествоСубконто() = 2 Тогда
                   Если Ит.Счет.КоличествоСубконто() >= 2 Тогда
        ///........    
        КонецЕсли;
    КонецЦикла;
КонецПроцедуры

Процедура ПроводкиОпределениеФинансовогоРезультатаНУ()
    ///........
    Пока Ит.ПолучитьСчет() = 1 Цикл
        ///.....
        //Если Ит.Счет.КоличествоСубконто() = 2 Тогда
                   Если Ит.Счет.КоличествоСубконто() >= 2 Тогда
    ///......        
        КонецЕсли;
    КонецЦикла;   
    ///.....
КонецПроцедуры

строку № 260 и № 310 (Если Ит.Счет.КоличествоСубконто() = 2 Тогда)
заменить на (Если Ит.Счет.КоличествоСубконто() >= 2 Тогда)

Документ "Начисление износа" - при печати выводит неправильные итоговые суммы по группам. Необходимо добавить обнуление переменной "ИтСумма"

Процедура Печать()
    ///....
    Если ВидПФ = 2 Тогда
        // налоговый учет
        ///....
        Пока Ит.ПолучитьСчет() = 1 Цикл
            ///....
            Пока Ит.ПолучитьСубконто(1) = 1 Цикл
                НА = Ит.Субконто(1); 
                НомерГруппы = НА.Группа;
                Если (НомерГруппы <> ГруппаПред) Тогда
                    Если (ГруппаПред <> 0) Тогда
                        Таб.ВывестиСекцию("ОСДно");
                        Таб.НоваяСтраница();
                        ИтСумма=0;// Добавляем обнуление.
                    КонецЕсли;
                    ГруппаПред = НомерГруппы; 
                    Группа = ?(Константа.ФормыНаУкраинском = Да,"Група ","Группа ")+НомерГруппы;
                    Таб.ВывестиСекцию("ОСШапка");
                КонецЕсли;
                БалСтоимость = ИтМ.СНД(СчетНА,,,,НА); 
                Кво = 1;
                Сумма = Ит.КО(СчетИзноса);
                
                Наименование = "Инв. № "+Сокрлп(НА.ИнвенНомер)+", "+НА.ПолнНаименование;
                
                Таб.ВывестиСекцию("ОССтрока");
                ИтСумма = ИтСумма + Сумма;
            КонецЦикла;
        КонецЦикла;
        ////........
    КонецЕсли;
    
///.....
КонецПроцедуры

Причина редактирования: Выделяйте код!

[5_kopeek]

При проведении документа НачислениеИзноса неправильно рассчитывается износ (БУ<>НУ), если был изменен метод начисления амортизации с налогового на прямолинейный. Вариант решения

[Irchik]

а как исправить проводку по модернизации, нету проводки НДС.