Отображение остатка товара в заказе покупателя с учетом характеристики номенклатуры

Люди помогите! Надо, чтобы в заказе покупателей в столбце ОСТАТКИ, отображались остатки номенклатуры с учетом характеристики(сейчас показывает общие остатки). 8.3 УТ 10.3

Процедура ТоварыПриПолученииДанных(Элемент, ОформленияСтрок)

    РаботаСДиалогами.УстановитьКартинкиВСтрокахТЧ(ОформленияСтрок, Неопределено, мКартинкаНаборКомплект, Ложь);


    СписокНоменклатуры=Элемент.Значение.Выгрузить(,"Номенклатура");
    Запрос=Новый Запрос;
    Запрос.Текст=
    "ВЫБРАТЬ
    |    ТоварыНаСкладахОстатки.Номенклатура.Ссылка КАК Номенклатура,
    |    ТоварыНаСкладахОстатки.КоличествоОстаток КАК Остаток
    |ИЗ
    |    РегистрНакопления.ТоварыНаСкладах.Остатки КАК ТоварыНаСкладахОстатки
    |ГДЕ
    |    ТоварыНаСкладахОстатки.Номенклатура В(&Номенклатура)";
    Если Не СкладГруппа=Неопределено Тогда
        Запрос.Текст=Запрос.Текст+
        "
        |    И ТоварыНаСкладахОстатки.Склад=&Склад";
    КонецЕсли;
    Запрос.УстановитьПараметр("Номенклатура",СписокНоменклатуры);
    Запрос.УстановитьПараметр("Склад",СкладГруппа);
    Результат=Запрос.Выполнить();
    ТЗостатки=Результат.Выгрузить();
    Запрос.Текст=
    "ВЫБРАТЬ
    |    ТоварыВРезервеНаСкладахОстатки.Номенклатура.Ссылка КАК Номенклатура,
    |    ТоварыВРезервеНаСкладахОстатки.КоличествоОстаток КАК Остаток
    |ИЗ
    |    РегистрНакопления.ТоварыВРезервеНаСкладах.Остатки КАК ТоварыВРезервеНаСкладахОстатки
    |ГДЕ
    |    ТоварыВРезервеНаСкладахОстатки.Номенклатура В(&Номенклатура)";
    Если Не СкладГруппа=Неопределено Тогда
        Запрос.Текст=Запрос.Текст+
        "
        |    И ТоварыВРезервеНаСкладахОстатки.Склад=&Склад";
    КонецЕсли;
    Запрос.УстановитьПараметр("Номенклатура",СписокНоменклатуры);
    Запрос.УстановитьПараметр("Склад",СкладГруппа);
    Результат=Запрос.Выполнить();
    ТЗрезерв=Результат.Выгрузить();
    Красный=Новый Цвет(255,0,0);
    Для Каждого ОформлениеСтроки Из ОформленияСтрок Цикл
        ТекЦенаБезСкидки=ОформлениеСтроки.ДанныеСтроки.Цена;
        ТекПроцентСкидкиНаценки=ОформлениеСтроки.ДанныеСтроки.ПроцентСкидкиНаценки+ОформлениеСтроки.ДанныеСтроки.ПроцентАвтоматическихСкидок;
        ТекЦенаСоСкидкой=Окр(ТекЦенаБезСкидки*(1-(ТекПроцентСкидкиНаценки/100)),2);
        ОформлениеСтроки.Ячейки.ЦенаСоСкидкой.ОтображатьТекст=Истина;
        ОформлениеСтроки.Ячейки.ЦенаСоСкидкой.Выравнивание=ГоризонтальноеПоложение.Право;
        ОформлениеСтроки.Ячейки.ЦенаСоСкидкой.Текст=Формат(ТекЦенаСоСкидкой,"ЧЦ=15; ЧДЦ=2");
        //
        ТекОстаток=0;
        СтрокаТЗостатки=ТЗостатки.Найти(ОформлениеСтроки.ДанныеСтроки.Номенклатура,"Номенклатура");
        Если СтрокаТЗостатки<>Неопределено Тогда
            Остаток=СтрокаТЗостатки.Остаток;
            СтрокаТЗрезерв=ТЗрезерв.Найти(ОформлениеСтроки.ДанныеСтроки.Номенклатура,"Номенклатура");
            Если СтрокаТЗрезерв<>Неопределено Тогда
                Остаток=Остаток-СтрокаТЗрезерв.Остаток;
            КонецЕсли;
            ТекОстаток=?(ОформлениеСтроки.ДанныеСтроки.Коэффициент=0,Остаток,Остаток/ОформлениеСтроки.ДанныеСтроки.Коэффициент);
        КонецЕсли;
        ОформлениеСтроки.Ячейки.Остаток.ОтображатьТекст=Истина;
        ОформлениеСтроки.Ячейки.Остаток.Выравнивание=ГоризонтальноеПоложение.Право;
        ОформлениеСтроки.Ячейки.Остаток.Текст=Формат(ТекОстаток,"ЧЦ=15; ЧДЦ=3");
        //
        ТекНедостача=ОформлениеСтроки.ДанныеСтроки.Количество-ТекОстаток;
        ОформлениеСтроки.Ячейки.Недостача.Выравнивание=ГоризонтальноеПоложение.Право;
        ОформлениеСтроки.Ячейки.Недостача.Текст=Формат(ТекНедостача,"ЧЦ=15; ЧДЦ=3");
        ОформлениеСтроки.Ячейки.Недостача.ЦветТекста=Красный;
        ОформлениеСтроки.Ячейки.Недостача.ОтображатьТекст=?(ТекНедостача>0,Истина,Ложь);
    КонецЦикла;