Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
14 дек 2024, 14:08

v8.2 УП: УТ 11, документ УстановкаЦенНоменклатуры

Автор asdfr1, 25 фев 2013, 09:25

0 Пользователей и 1 гость просматривают эту тему.

asdfr1

делаю обработку как для обычного приложения УстановкаЦенНоменклатуры. Включили Характеристики.Теперь в документе УстановкаЦенНоменклатуры не удаётся оставить цену Номенклатуры, она уходит в характеристики

ТЗ = Запрос.Выполнить().Выгрузить();
   ОткрытьЗначение(ТЗ);
Для каждого Строка Из ТЗ Цикл
Объект = Строка.Ссылка.ПолучитьОбъект();
Записать = Истина;
Объект.Записать(РежимЗаписиДокумента.ОтменаПроведения);
КонецЦикла;

Для Каждого ТекущаяСтрока Из Объект.Товары Цикл

СтрокаТаблициТоваров = Объект.Товары.Получить(ТекущаяСтрока.НомерСтроки-1);  //+ получили строку

Товарчик=СтрокаТаблициТоваров.Номенклатура;  //+ Значение строки
//НоваяЦена=СтрокаТаблициТоваров.Цена;         //+ Значение строки

СтрокаНаименования = "1. Автозапчасти";   //+  нашли характеристику в справочнике характеристик
Характеристика=Справочники.ХарактеристикиНоменклатуры.НайтиПоНаименованию(СтрокаНаименования);
//СтрокаТаблициТоваров.Цена=НоваяЦена; 
 
СтрокаТаблициТоваров.Характеристика=Характеристика;  //+ установили значение
//СтрокаТаблициТоваров.Цена=НоваяЦена;                 //+ установили значение

Сообщить(Товарчик);

Записать = Истина;
Объект.Записать(РежимЗаписиДокумента.Запись);
   
КонецЦикла;


или это в корне не правльно и нужно переписать процедуру ДобавитьХарактеристику(Команда)

Yura063

Характеристики это подчиненный справочник, который позволяет вам не дублировать номенклатуру. Но принцип работы будет одинаковый, если вы создадите две номенклатуры и установите на них цену или Создадите одну номенклатуру и две характеристики к ней. Так как система предусматривает разные цены на разные характеристики, то и цены она крепит за номенклатурой с характеристикой!
Помогли, отблагодари!

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск