Бухгалтерские Итоги 7.7->8.2

Если ПустоеЗначение(Доходы.ДДС)=0 Тогда
                    БИ.ИспользоватьСубконто(ВидыСубконто.ДвиженияДенежныхСредств,Доходы.ДДС,,);
                КонецЕсли;
                БИ.ВыполнитьЗапрос(ДатаНач, ДатаКон, Доходы.Дт, Доходы.Кт,,2,"Операция",);
                БИ.ВыбратьПериоды(,,,); 
                Пока БИ.ПолучитьПериод(,)=1 Цикл 
                    Опер = БИ.Операция;
                    Если Доходы.Дт.ЭтоГруппа() = 1 Тогда 
                        Если Опер.Дебет.Счет.ПринадлежитГруппе(Доходы.Дт)=0 Тогда  
                            Продолжить;
                        КонецЕсли;
                    Иначе
                        Если Опер.Дебет.Счет <> Доходы.Дт Тогда
                            Продолжить;
                        КонецЕсли;
                    КонецЕсли;
                    
                    Док = Опер.Документ;  
                    //Анализ по видам документов 

                    Если ПустоеЗначение(Доходы.Проект)=0 Тогда
                        Если глЕстьРеквизитШапки("Проект",Док.Вид())<>0 Тогда
                            Если Док.Проект <> Доходы.Проект Тогда
                                Продолжить;                            
                            КонецЕсли;
                        КонецЕсли;                                
                    КонецЕсли;