Имя: Пароль:
1C
1С v8
УТ 11. В какой процедуре загружаются цены из дока поступление товаров и услуг?
0 luter-89
 
18.03.16
14:14
В модуле формы Установки цен есть процедура ЗаполнитьДокумент().

            // Документ вводится на основании Поступления товаров и услуг.
            // Необходимо выбрать цены, расчитываемые по документу поступления и переформировать таблицу цен.
            Если ЗначениеЗаполнено(Объект.ДокументОснование)
                И Не ЗначениеЗаполнено(Объект.Ссылка) Тогда
                
                Для Каждого ТекСтрока Из ВыбранныеЦены Цикл
                    Если ТекСтрока.УстанавливатьЦенуПриВводеНаОсновании Тогда
                        ТекСтрока.Выбрана = Истина;
                        НоваяСтрока = Объект.ВидыЦен.Добавить();
                        НоваяСтрока.ВидЦены = ТекСтрока.Ссылка;
                    КонецЕсли;
                КонецЦикла;
                
                УстановкаЦенКлиентСервер.ВыбратьВсеЗависимыеЦены(ЭтаФорма);
                УстановкаЦенКлиентСервер.ВыбратьВсеВлияющиеЦены(ЭтаФорма);
                ВыбранныеЦеныИзменены = Ложь;
                
                ВидыЗагружаемыхСтарыхЦен = Новый Массив();
                Для Каждого ТекСтрока Из ВыбранныеЦены Цикл
                    Если ТекСтрока.Выбрана И (ТекСтрока.СпособЗаданияЦены = Перечисления.СпособыЗаданияЦен.Вручную) Тогда
                        ВидыЗагружаемыхСтарыхЦен.Добавить(ТекСтрока);
                    КонецЕсли;
                КонецЦикла;
                
                УстановкаЦенСервер.ПостроитьДеревоЦен(ЭтаФорма);
                
                //Загружает старые цены по видам цен
                УстановкаЦенСервер.ЗагрузитьТабличнуюЧастьТовары(ЭтаФорма, КэшДанных);
                
                УстановкаЦенСервер.ПоместитьВидыЦенВТабличнуюЧасть(ЭтаФорма, Объект.ВидыЦен);
                
                Данные = Новый Структура;
                Данные.Вставить("Форма", ЭтаФорма);
                Данные.Вставить("Документы", Новый Массив);
                Данные.Вставить("СохранятьБазовые", Ложь);
                Данные.Документы.Добавить(Объект);
                УстановкаЦенСервер.ПоместитьЦеныВТабличнуюЧасть(Данные);
                
                УстановкаЦенСервер.ОбновитьСтарыеЦеныНоменклатуры(ЭтаФорма, КэшДанных);
                
                ТаблицаНоменклатуры = УстановкаЦенСервер.СоздатьТаблицуНоменклатурыПоДеревуЦен(ЭтаФорма);
                УстановкаЦенСервер.ЗагрузитьЗначенияБазовыхЦен(ЭтаФорма, ТаблицаНоменклатуры, ВидыЗагружаемыхСтарыхЦен,, 0, Истина, КэшДанных);
                
                Если УстановкаЦенСервер.ЗаполненыОбязательныеПараметрыСхемКомпоновкиДанных(ЭтаФорма, Ложь) Тогда
                    
                    УстановкаЦенСервер.ВычислитьЦеныПоДаннымИБ(ЭтаФорма, ТаблицаНоменклатуры,,,КэшДанных);
                    
                    Если ОбщегоНазначенияПовтИсп.РазделениеВключено() Тогда
                        ДанныеДляРасчетаВычисляемыхЦенНаКлиенте = УстановкаЦенСервер.ПодготовитьДанныеДляРасчетаВычисляемыхЦен(ЭтаФорма, ТаблицаНоменклатуры,,,,КэшДанных);
                    Иначе
                        УстановкаЦенСервер.РассчитатьВычисляемыеЦены(ЭтаФорма, ТаблицаНоменклатуры,,,,КэшДанных);
                    КонецЕсли;
                    
                    Элементы.ГруппаСтраницы.ТекущаяСтраница = Элементы.ГруппаУстановкаЦен;
                
                Иначе
                    ПроверитьЗаполнениеПараметровПриОткрытии = Истина;
                КонецЕсли;
                
            Иначе
                
                УстановкаЦенСервер.ПостроитьДеревоЦен(ЭтаФорма);
                УстановкаЦенСервер.ЗагрузитьТабличнуюЧастьТовары(ЭтаФорма, КэшДанных);
                
            КонецЕсли;
            
        КонецЕсли;
        
    КонецЕсли;
    
    Возврат ДанныеДляРасчетаВычисляемыхЦенНаКлиенте;


Коментарием указано, что на основании поступления должны подгрузиться цены из основания. Но во всех процедурах цены берутся из регистра сведений, то есть старые цены. Или документ установка цен не заполняется ценами из поступления?
1 luter-89
 
18.03.16
15:50
http://catalog.mista.ru/public/195575/
Вот ответ на мой вопрос