Ценовая власть-4. Алгоритм обновления цен, формулы и схемы СКД в ВидыЦен

08.04.24

Разработка - Механизмы типовых конфигураций

Результат исследования алгоритма обновления цен 2.5 в целях повышения квалификации и поиска возможностей предложить пользователям что-нибудь полезное.

Что полезного тут можно предложить пользователю? Очевидно, у вендора гораздо большая мощность для внедрения всяческих полезных фенечек, чем у одиночки-любителя.

Кроме одной вещи. Вендор не может отказаться от принципа повторного использования кода, из-за чего у клиента, активно использующего какой-либо функционал (нагруженные системы!), возникают проблемы.

Очевидно (автору очевидно, кто не согласен - пусть подумает, почему в любой торговле продажники "приносят деньги", а 1сники их только хотят), функционал ценообразования - один из важнейших в любой коммерческой фирме. Ключевой. Что надо сделать, какое чудо сотворить, чтобы снизить себестоимость товара (продукции, услуги) хотя бы на 10% ? А в "ценовой стратегии" +10% к цене - это рядовой, рабочий результат.

Если на фирме с продажными ценами работают, и работают серьезно, то вот вам пожалуйста - узкое место.

Хорошо бы, конечно, для этого плотное сотрудничество с заинтересованным клиентом. Но кто знает, кто знает... Вот завтра вдруг найдется такой, - "Хочу в ценовую стратегию!" - а и нечего ему предложить, кроме мануалов по типовому функционалу.

***

Процесс исследования представлен тремя предыдущими публикациями цикла:

Представление результата исследования:

УстановкаЦенСервер.ВыполнитьОбновлениеЦен(ВидыЦен, ПараметрыОбновленияЦен)

Из видов цен выбираются со способом задания "ЗагружаетсяИзЯндексМаркет" и "ЗагружаетсяСOzon", в цикле по ним с сайтов загружаются цены.

Создается технологическая структура

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

довесочек в структуру

	СтруктураФормы.Объект.Вставить("Товары", ДокументУстановкиЦен.Товары);
	СтруктураФормы.Объект.Вставить("Товары2_5", ДокументУстановкиЦен.Товары2_5);

В цикле по справочнику ВидыЦен заполняет ВыбранныеЦены в СтруктураФормы и получает настройку компоновки данных

	УстановкаЦенСервер.ИнициализироватьВыбранныеЦены(СтруктураФормы);
	СтруктураФормы.ТаблицаНастройкиКомпоновкиДанных = ПолучитьИзВременногоХранилища(СтруктураФормы.АдресХранилищаНастройкиКомпоновкиДанных);

еще довесочек

СтруктураФормы.ВыбранныеЦены.Колонки.Добавить("СхемаКомпоновкиДанных");

Строки выбранных цен заполняются схемой компоновки по адресу в этой же строке

Виды цен в структуре приводятся в соответствие с ПараметрыОбновленияЦен.ВариантОбновленияЦен

Следующий шаг, получение дерева (это уже в третьей публикации)

УстановкаЦенСервер.ПостроитьДеревоЦен(СтруктураФормы);

И завершение процедуры-обработчика, переходящее в УстановитьЦены (А нельзя здесь было просто очистить строки и адрес, а потом дважды вызвать УстановитьЦены для обновления и обнуления? Ну, это голимая риторика... Даже неловко почему-то)

	Для Индекс = 1 По 2 Цикл
		СтруктураФормы.ДеревоЦен.Строки.Очистить();
		СтруктураФормы.АдресХранилищаКэшаДанных = "";
		УстановитьЦены(МассивВидовЦен, СтруктураФормы, ?(Индекс = 1, "Обновление", "Обнуление"));
	КонецЦикла;

УстановитьЦены(Знач МассивВидовЦен, Знач СтруктураФормы, Знач ВидОбновленияЦен = "Обновление")

		УстановкаЦенСервер.ДобавитьТоварыПоОтборамСКД(СтруктураФормы, Истина);
	
		//	рассчитать цены
		ПараметрыРасчета = Новый Структура();
		ПараметрыРасчета.Вставить("ВидыЦен",				МассивВидовЦен);
		ПараметрыРасчета.Вставить("ТолькоВыделенныеСтроки",	Ложь);
		ПараметрыРасчета.Вставить("ТолькоНезаполненные",	Ложь);
		ПараметрыРасчета.Вставить("ЗагрузкаСтарыхЦен",		Ложь);
		ПараметрыРасчета.Вставить("ОкруглениеРучныхЦен",	Ложь);
		ПараметрыРасчета.Вставить("РасчетПоФормулам",		Истина);
	
		УстановкаЦенСервер.РассчитатьЦены(СтруктураФормы, ПараметрыРасчета);

Завершение:

Документы.УстановкаЦенНоменклатуры.ЗаписатьИзмененияЦенНаСервере(СтруктураФормы, ТекстКомментария, 1);

УстановкаЦенСервер.РассчитатьЦены(СтруктураФормы, ПараметрыРасчета);

Собирается Номенклатура:

ТаблицаНоменклатуры = СоздатьТаблицуНоменклатурыПоДеревуЦен(Форма, Ложь);

Здесь важны следующие две вызываемые процедуры:

ВычислитьЦеныПоДаннымИБ - работаем по схемам СКД, вызывается ВычислитьЗначенияЦеныПоДаннымИБ2_5:

ДанныеОтчета = Новый ТаблицаЗначений();
ПроцессорВывода.УстановитьОбъект(ДанныеОтчета);
ДанныеОтчета = ПроцессорВывода.Вывести(ПроцессорКомпоновки);
///
ЗагрузитьЦеныИзТаблицыЗначений(
	Форма,
	ДанныеОтчета,
	ТаблицаКоэффициентовУпаковокНоменклатуры,
	КэшДанных,
	СтрокаВидЦены,
	СтруктураПараметров);

РассчитатьВычисляемыеЦены


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

***

Это было краткое изложение алгоритма обновления цен.

В нем задействованы схемы компоновки СКД и формулы. Рассмотрим, что это такое, и нельзя ли что-нибудь с ними сделать так, чтобы весь алгоритм осуществить в одном запросе. Кроме обращения к сторонним сайтам, разумеется. Связь с интернетом надо вообще выделять в обособленный от регламентных процедур процесс. Пока интернет думает, отвечать на наш запрос или не отвечать, процедура стоит.

***

Вот здесь находится все, что надо:

Вот сюда надо поместить результат:

Делать это надо, например, когда изменяется базовая цена, например, загрузили из яндекса/озона, она и поменялась. И надо пересчитать по формуле или СКД все зависимые от базы. И сделать это быстро. Без запросов в цикле.

А заказчик, ну что заказчик. Было бы что предложить, а заказчик найдется.

Вступайте в нашу телеграмм-группу Инфостарт

Ценообразование управление ценами

+2 –2

См. также

Модификация запросов по схеме запроса типовыми возможностями УТ 11.5, о которых вы не знали

Запросы Механизмы типовых конфигураций Программист 1С v8.3 1С:Управление торговлей 11 Россия Бесплатно (free)

Предлагается обзор работы с объектной моделью запроса по схемам запросов типовым функционалом УТ 11.5.

09.10.2025 4426 aximo 15

Создание внешней обработки заполнения объекта с выводом диалога в режиме управляемого приложения

Механизмы типовых конфигураций Программист 1С v8.3 1С:ERP Управление предприятием 2 Россия Бесплатно (free)

В статье рассматривается подход к программной модификации параметров команды внешней обработки заполнения объекта так, чтобы в момент вызова из формы объекта (табличной части документа) она использовалась для открытия вспомогательной формы диалога, а после закрытия вспомогательной формы диалога она использовалась для заполнения объекта (табличной части документа) уже на сервере с контекстом формы документа с использованием введенных данных во вспомогательной форме диалога.

11.08.2025 2623 user1988284 0

Механизм представлений: как он работает и как его расширять

Механизмы типовых конфигураций Программист 1С v8.3 Бесплатно (free)

Каждый, кто работал с кадровыми отчетами в ЗУП, ERP или УХ, сталкивался с механизмом представлений – странным кодом запроса, где поля отображаются пустыми ссылками, а в названии временной таблицы есть слово «Представление». В статье разберем, что такое представления и как ими пользоваться. Больше не нужно ломать голову над тем, откуда и как правильно получать данные. Механизм представлений сделает это за вас.

08.07.2025 7068 user2012581 54

Замена поиска по первым символам на поиск по подстроке

Механизмы типовых конфигураций Программист Стажер 1С v8.3 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Бесплатно (free)

В типовых решениях типа УТ, КА, ERP при вводе строк в поля ввода осуществляется поиск по первым символам. С помощью небольшой доработки (делается через расширение) можно организовать поиск по вхождению.

02.06.2025 1538 lkey 2

Открытие нетиповых форм при начале работы системы в 1С:ERP 2.5

Работа с интерфейсом БСП (Библиотека стандартных подсистем) Механизмы типовых конфигураций Программист 1С v8.3 1C:ERP Бесплатно (free)

В этой статье я расскажу, как в конфигурации 1С:ERP 2.5 при начале работы системы настроить открытие своих нетиповых форм (в том числе и из внешних обработок). Данную методику можно использовать как на тонком клиенте, так и на мобильном или веб-клиенте, а также в мобильном приложении.

12.05.2025 4268 AlexeyPROSTO_1C 2