Имя: Пароль:
1C
1С v8
При вводе на основании не переносится цена, сумма
0 НатГолубева777
 
13.08.20
15:34
Добрый день! Подскажите почему при вводе на основании документа не копирует цену?

Процедура ОбработкаЗаполнения(Основание)
    
    
    ДокументОснование = Основание;

    Если ТипЗнч(Основание) = Тип("ДокументСсылка.ЗаказПокупателя") Тогда
        ЗаполнитьПродукциюПоЗаказуПокупателя(ДокументОснование);
    КонецЕсли;
        

КонецПроцедуры

Процедура ЗаполнитьПродукциюПоЗаказуПокупателя(ЗаказПокупателя) Экспорт
    
    Если ТоварыПоЗаказу.Количество() > 0 Тогда
        Ответ = Вопрос("Табличные части документа будут очищены. Продолжить?", РежимДиалогаВопрос.ДаНет);
        Если Ответ = КодВозвратаДиалога.Нет Тогда
            Возврат;
        Иначе
            ТоварыПоЗаказу.Очистить();
            Зарезервировано.Очистить();
        КонецЕсли;    
    КонецЕсли;    
    
    Заявка = ЗаказПокупателя;
    Контрагент = ЗаказПокупателя.Контрагент;
    НомерЗаявки = ЗаказПокупателя.Номер;


    
    Для Каждого ТекСтрокаТовары Из ЗаказПокупателя.Товары Цикл

            
            НоваяСтрока = ТоварыПоЗаказу.Добавить();
            НоваяСтрока.Номенклатура               = ТекСтрокаТовары.Номенклатура;
            НоваяСтрока.Характеристика             = ТекСтрокаТовары.ХарактеристикаНоменклатуры;
            НоваяСтрока.ЕдИзм                      = ТекСтрокаТовары.ЕдиницаИзмерения;
            НоваяСтрока.Количество                 = ТекСтрокаТовары.Количество;
            НоваяСтрока.Цена                       = ТекСтрокаТовары.Цена;
//            НоваяСтрока.Скидка                     = ТекСтрокаТовары.Скидка;
            НоваяСтрока.Сумма                      = ТекСтрокаТовары.Сумма;
            
            

    КонецЦикла;
        
КонецПроцедуры
1 Ёпрст
 
13.08.20
15:48
(0) дык, расскоментируй скидку свою
2 НатГолубева777
 
13.08.20
15:56
При такой процедуре тоже не переносится цена

Процедура ОбработкаЗаполнения(Основание)
    //{{__КОНСТРУКТОР_ВВОД_НА_ОСНОВАНИИ
    // Данный фрагмент построен конструктором.
    // При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!
    Если ТипЗнч(ДанныеЗаполнения) = Тип("ДокументСсылка.ЗаказПокупателя") Тогда
        // Заполнение шапки
        Комментарий = ДанныеЗаполнения.Комментарий;
        Контрагент = ДанныеЗаполнения.Контрагент;
        Заказ = ДанныеЗаполнения.Ссылка;
        Для Каждого ТекСтрокаТовары Из ДанныеЗаполнения.Товары Цикл
            НоваяСтрока = ТоварыПоЗаказу.Добавить();
            НоваяСтрока.ЕдИзм = ТекСтрокаТовары.ЕдиницаИзмерения;
            НоваяСтрока.Количество = ТекСтрокаТовары.Количество;
            НоваяСтрока.Номенклатура = ТекСтрокаТовары.Номенклатура;
            НоваяСтрока.Скидка = ТекСтрокаТовары.ПроцентАвтоматическихСкидок;
            НоваяСтрока.Сумма = ТекСтрокаТовары.Сумма;
            НоваяСтрока.Характеристика = ТекСтрокаТовары.ХарактеристикаНоменклатуры;
            НоваяСтрока.Цена = ТекСтрокаТовары.Цена;
        КонецЦикла;
    КонецЕсли;
    //}}__КОНСТРУКТОР_ВВОД_НА_ОСНОВАНИИ
КонецПроцедуры
3 НатГолубева777
 
13.08.20
15:56
В чем может быть проблема?
4 НатГолубева777
 
13.08.20
16:04
Тема закрыта... Нашла
5 Lokli
 
13.08.20
16:17
В качестве аргумента у тебя переменная Основание. А заполняешь из ДанныеЗаполнения. WTF?
Здесь можно обсудить любую тему при этом оставаясь на форуме для 1Сников, который нужен для работы. Ymryn