Предлагаю переделать язык C# (заменить стандартные ключевые слова на русские)

ТекДокум=ДанныеСтроки.Ссылка;
    Если ТекДокум=Неопределено Тогда
        Возврат;
    КонецЕсли;
    ОформлениеСтроки.Ячейки.ЕДРПОУ.Значение = ТекДокум.Контрагент.ЕДРПОУ;
    Запрос=Новый Запрос;
    Запрос.Текст="ВЫБРАТЬ
    |   ПоступлениеТоваров.Ссылка КАК Ссылка,
    |   ПоступлениеТоваров.СуммаДокумента КАК Сумма
    |ИЗ
    |   Документ.ПоступлениеТоваров КАК ПоступлениеТоваров
    |ГДЕ
    |   ПоступлениеТоваров.Проведен И
    |   ПоступлениеТоваров.ДокументОснование = &ВыбОснование
    |
    |ОБЪЕДИНИТЬ
    |
    |ВЫБРАТЬ
    |   КассовыйОрдер.Ссылка КАК Ссылка,
    |   КассовыйОрдер.Сумма КАК Сумма
    |ИЗ
    |   Документ.КассовыйОрдер КАК КассовыйОрдер
    |ГДЕ
    |   КассовыйОрдер.Проведен И
    |   КассовыйОрдер.ДокументСделка = &ВыбОснование
    |
    |ОБЪЕДИНИТЬ
    |
    |ВЫБРАТЬ
    |   ПоступлениеДопРасходов.Ссылка КАК Ссылка,
    |   ПоступлениеДопРасходов.СуммаДокумента КАК Сумма
    |ИЗ
    |   Документ.ПоступлениеДопРасходов КАК ПоступлениеДопРасходов
    |ГДЕ
    |   ПоступлениеДопРасходов.Проведен И
    |   ПоступлениеДопРасходов.ДокументОснование.Ссылка = &ВыбОснование";
    Запрос.УстановитьПараметр("ВыбОснование",ТекДокум);
    ТаблДоков=Запрос.Выполнить().Выгрузить();
    СуммаПодчиненных = ТаблДоков.Итог("Сумма");
    Если СуммаПодчиненных = ТекДокум.СуммаДокумента Тогда
        ОформлениеСтроки.ЦветФона = WebЦвета.БледноЗеленый;
    ИначеЕсли СуммаПодчиненных > 0 Тогда
        ОформлениеСтроки.ЦветФона = WebЦвета.СветлоРозовый;
    КонецЕсли;

/////////////////////////////////////////////   
    // ПРОДАЖИ
 
    НаборЗаписей = РегистрыНакопления.Продажи.СоздатьНаборЗаписей();
    НаборЗаписей.Отбор.Регистратор.Установить(Докум.Ссылка);
    НаборЗаписей.Прочитать();
    
    Для каждого Запись Из НаборЗаписей Цикл
        
        НаборЗаписей.Очистить();    
        НаборЗаписей.Записать();
        
    КонецЦикла;
    
    Для Каждого ТекСтрокаТовары Из Докум.Товары Цикл
        
        Если ТекСтрокаТовары.КоличествоФакт>0 Тогда
            
            Движения=РегистрыНакопления.Продажи.СоздатьНаборЗаписей();
            Движения.Отбор.Регистратор.Установить(Докум.Ссылка);
            
            Продажи = Движения.Добавить();
            Продажи.Период  = Докум.Дата;
            Продажи.ПодразделениеКомпании=Докум.ПодразделениеКомпании;
 
            Бла-бла-бла
 
            Движения.Записать(Ложь);
        КонецЕсли;         
        
    КонецЦикла;