Ценовая власть или Управление ценообразованием (УТ 11.5)

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

Довелось как-то встретить молодых амбициозных франчайзи, которым удалось "выиграть внедрение" УПП на большом машиностроительном заводе.

За счет демпинга, разумеется.

Управляли ли они при этом ценой своей услуги? Нет. Они не могли не демпинговать. Был ли это их бизнес? Так-то да... Но был ли это бизнес? Определенно нет. Что это было, передать невозможно, из уважения к модераторам и почтенной публике.

Пусть скажет Уоррен Баффет:

Чтобы оценить предприятие, в первую очередь нужно смотреть, способно ли оно влиять на свои цены. И если вам приходится молиться, прежде чем поднимать цены, то ваш бизнес оставляет желать лучшего.

Так вот. Разобравшись несколько с тем, что такое "ценовая власть", посмотрим, что для этого есть в УТ 11.5.

Для подобных целей в начале года автором была представлена обработка Подсистемы и Объекты: ERP, УХ, КА и т.д. Воспользуемся

Соберем интересующие нас объекты в сводную табличку. Формализовать этот наш интерес сходу не получается, так что вручную, пока это разовое мероприятие.

Получилось вот что:

Таблица определенно представляет интерес для желающих прокачать скилл в CRM&Маркетинге УТ 1.5, но упомянутая выше обработка явно слишком дорога для такого интереса (цена одного часа работы - ха-ха!). Поэтому я представляю эту таблицу (результат, полученный с помощью "Подсистемы&Объекты") здесь в виде специальной обработки с минимальной ценой.

Но уже здесь и сейчас, в виде иллюстрации, она оказалась очень даже информативна. Оказывается, в УТ (текущую - 1.5) зашиты две версии ценообразования, 2.0 и 2.5! Кто-то пожмет плечами, а автор об этом не знал.

В конфигурации на первую ФО - ИспользуетсяЦенообразование20 - ссылок практически нет. А вот на константу второй ФО в модулях немногим менее 200 ссылок. Интересна так же разница в составах этих функциональных опций

Уже есть прямая практическая польза: смело (нет) выкидываем из конфигурации ФО_20, её константу и отчеты. Но в ФО_25 объектов, напротив, подозрительно мало. Но при этом в состав включен справочник "Склады", который по-любому должен присутствовать, включена опция или нет. Надо разбираться дальше. Вернемся к нашей выборке, и оставим в ней то, что покажется нам относящимся к нашей цели.

Лирическое отступление. Вообще правильно начинать надо с того, что написано умными людьми до нас. Это, по крайней мере, направит нас в наших собственных поисках. Поищем в интернете какой-нибудь мануал (классика жанра: "какой мануал, ехать надо").

Итак, ООО «ТНСОФТ» (не реклама). Читаем вместе, чтобы мне тут не забивать текст лишними цитатами.

Прочитали? Я тоже. Впечатлён, написано (вендором) много. Настолько много, что с первого раза сложить это всё в обозримую когнитивную картинку не получилось. Поэтому декомпозиция - наше всё.

Но сначала довольно важное, если верить Hermann'у Simon'у, замечание. Герман пишет следующее:

Ценовая власть на 35 % выше в компаниях, где топ-менеджеры лично участвуют в принятии ценовых решений, вместо того чтобы делегировать эту задачу другим. Если в компании есть специальный отдел ценообразования, то ее ценовая власть на 24 % выше, чем в компаниях без соответствующего отдела.

Для нас это означает, что надо заполнить следующий список:

В компании должны быть специальные мотивированные люди, которые занимаются ценообразованием, - это в книжечку внедренцам с аналитиками.

Декомпозицию, наверное, можно провести по функциональным опциям. С двумя из них мы уже разобрались и забыли. И без них у нас осталось семь опций, хорошее число, которое уже можно удержать в одном взгляде.

1. Рейтинги продаж

Справка по справочнику РейтингиПродажНоменклатуры:

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

В регистре ПланыПродажПоКатегориям отсутствует числовой показатель "Цена", только "Количество". Отсюда делаем вывод, что данная ФО нас здесь не интересует. Вычеркиваем.

Хотя, на будущее, возьмем на заметку: нельзя ли этот рейтинг как-нибудь прикрутить к стратегии ценообразования.

2. Товарные категории

Засада, опять этот регистр. Но я ведь помню, где-то глаз цеплялся, категории входят в ценообразование! Надо разобраться.

3. Управление коллекциями разработчики отличили тем, что прописали в состав подсистему. Бывает.

4. Форматы магазинов. Точно входит в ценообразование, но нет того регистра.

5. Бонусы лояльности

6. Карты лояльности

Вообще нет никаких регистров, но десяток документов. Какие движения они делают в рамках этой функциональной опции?

Ох, разбираться в этом не переизбираться.

Но карты - точно входят (с бонусами, разумеется).

Герман просто взахлеб рассказывает о картах BahnCard (пассажирский поток на немецких ЖД).

7. ОграниченияРучныхСкидокВПродажахПоПользователям

Ну, да. Это, вне всяких сомнений, функциональная опция. Но почему не включили в состав две-три подсистемы? Недоработка.

Если без сарказма, то я бы использовал для этого роль, "РазрешитьРучныеСкидкиВПродажахПопользователям". Или "Запретить...", как-то так.

**

Нельзя сказать, чтобы ФО оказались подходящим разрезом для декомпозиции. Но в целом полезно (имхо).

Вернемся к табличке с объектами подсистем.

Ну, что сказать. Не то, чтобы я разочарован.

Ключевого регистра ЦеныНоменклатуры25, как и его прототипа ЦеныНоменклатуры здесь нет.

Они включены в какие-то левые, "служебные" подсистемы

Это не значит, что представленная обработка "Подсистемы&Объекты" не справилась с ожиданиями, она-то как раз выполнила то, что от нее ожидалось. Не ожидалось, что программисты вендора заполняют составы подсистем "на-отвали".

Это не значит, что братья-1сники, которые в аналитику и консалтинг, не получат от нее пользы. Это значит, что еще большую пользу она доставит тем сотрудникам вендора, что приставлены смотреть за соответствием прикладных решений архитектуре платформы, как то:

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

**

Регламентное задание "Обновление Цен" - это та жемчужина, которую "Подсистемы&Объекты" отыскала для нас здесь и сейчас. Как бы автор еще о нем узнал? Да никак.

А почему автор считает это хорошим результатом? Это потому, что автор предполагает использование в обработчике этого задания всего того, что он хочет найти, и ничего такого, что найти не хочет.

***

// Запускает обновление цен по видам цен
// 
// Параметры:
//   ВидыЦен - массив - элементов типа СправочникСсылка.ВидыЦен - виды цен,
//   по которым необходимо обновить цены.
//   ПараметрыОбновленияЦен - Структура - со свойствами. Может содержать:
//    * ВариантОбновленияЦен - Число - вариант формирования видов цен 
//   (0 - все, 1- Только выбранные, 2 - Выбранные и зависисмые, 3 - Все кроме выбранных).
//
Процедура ВыполнитьОбновлениеЦен(ВидыЦен, ПараметрыОбновленияЦен) Экспорт

	ОбщегоНазначения.ПриНачалеВыполненияРегламентногоЗадания(Метаданные.РегламентныеЗадания.ОбновлениеЦен);

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

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

	ИспользоватьИнтеграциюСOzon = ИнтеграцияСМаркетплейсамиСерверЛокализация.ФункциональнаяОпцияИспользоватьИнтеграциюСOzon();

	Если ИспользоватьИнтеграциюСOzon Тогда

		ВидыЦенБезOzon = Новый Массив();
		ВидыЦенOzon = Новый Массив();
		УчетныеЗаписи = Новый Массив();

		Для Каждого Элемент Из МассивВидовЦен Цикл
			СпособЗаданияЦены = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Элемент, "СпособЗаданияЦены");
			Если СпособЗаданияЦены = Перечисления.СпособыЗаданияЦен.ЗагружаетсяСOzon Тогда
				Настройки = Элемент.ХранилищеНастроекПараметровСпособаЗаданияЦены.Получить();
				Если ТипЗнч(Настройки) = Тип("Структура") Тогда
					ВидыЦенOzon.Добавить(Элемент);
					Если УчетныеЗаписи.Найти(Настройки.УчетнаяЗаписьМаркетплейса) = Неопределено Тогда
						УчетныеЗаписи.Добавить(Настройки.УчетнаяЗаписьМаркетплейса);
					КонецЕсли;
				КонецЕсли;
			Иначе
				ВидыЦенБезOzon.Добавить(Элемент);
			КонецЕсли;
		КонецЦикла;

		МассивВидовЦен = ВидыЦенБезOzon;

		Если ВидыЦенOzon.Количество() Тогда
			Для Каждого УчетнаяЗапись Из УчетныеЗаписи Цикл
				ИнтеграцияСМаркетплейсамиСерверЛокализация.ЗагрузитьЦеныOzon(УчетнаяЗапись, ВидыЦенOzon);
			КонецЦикла;
		КонецЕсли;

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

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

	Для Каждого СтрокаВидЦен Из СтруктураФормы.ВыбранныеЦены Цикл
		Схема = Новый ХранилищеЗначения(ПолучитьИзВременногоХранилища(СтрокаВидЦен.АдресСхемыКомпоновкиДанных));
		СтрокаВидЦен.СхемаКомпоновкиДанных	= Схема.Получить();
	КонецЦикла; 
	
	// применить настройки варианта обновления цен (0 - все цены; 1 - выбранные; 2 - выбранные и зависимые; 3 - все кроме выбранных)
	Если ВариантОбновленияЦен = 0 Тогда
		// все цены
		УстановкаЦенКлиентСервер.ИнвертироватьВыбранныеЦены(СтруктураФормы);
	ИначеЕсли ВариантОбновленияЦен = 1 Тогда 	
		// Только выбранные цены
		// Ничего дополнительно не делаем
	ИначеЕсли ВариантОбновленияЦен = 2 Тогда 	
		// Выбранные и зависимые цены
		УстановкаЦенКлиентСервер.ВыбратьВсеЗависимыеЦены(СтруктураФормы);
	ИначеЕсли ВариантОбновленияЦен = 3 Тогда 	
		// Все кроме выбранных цен
		УстановкаЦенКлиентСервер.ИнвертироватьВыбранныеЦены(СтруктураФормы);
		УстановкаЦенКлиентСервер.ВыбратьВсеВлияющиеЦеныБезРасчета(СтруктураФормы);
	КонецЕсли;	
	
	// 	заполнить товары по отборам номенклатуры
	УстановкаЦенСервер.ПостроитьДеревоЦен(СтруктураФормы);

	МассивВидовЦен.Очистить();
	Для Каждого СтрокаТЧ Из СтруктураФормы.ВыбранныеЦены Цикл

		Если СтрокаТЧ.Выбрана
			И МассивВидовЦен.Найти(СтрокаТЧ.Ссылка) = Неопределено Тогда
			МассивВидовЦен.Добавить(СтрокаТЧ.Ссылка);
		КонецЕсли;
		
	КонецЦикла;

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

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

Листинг процедуры-обработчика ожидаемо пере-выполнил норматив на публикацию в 10 000 знаков.

Поэтому не будет добавлением "воды" несколько слов о том, что вообще вы сейчас тут прочитали.

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

Обратите внимание, что в русскоязычной среде принято широкое использование слов "капитализм" и "социализм". Красные и белые, монархисты, анархисты, либералы и государственники - вот это вот всё. Нет, я не собираюсь задвинуть здесь что-нибудь о политике :)

Я целиком с экономической точки, с точки зрения предметного интереса 1сника.

Так вот, с моей точки зрения полным бредом является трудовая теория происхождения стоимости, и марксизм с его неуловимой (невычисляемой) "прибавочной" стоимостью - просто развитие того же бреда британских учоных.

С моей личной точки зрения, денежная оценка стоимости появляется в момент сделки между продавцом и покупателем в отсутствии третьих лиц. В следующий момент она уже искажается: только что купленный в автосалоне лимузин вы уже не продадите за только что уплаченную вами цену, как только выедете за площадку автосалона. Хотя он нисколько не хуже тех лимузинов, которые остались в салоне, и даже лучше, поскольку про него точно известно, что он заведется и поедет.

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

И второе. Я в любом случае продолжаю копать ценообразование в УТ, и предложу логи копания к публикации на ИС. Но вы можете мотивировать меня делать это быстрее и качественнее. Причем странные люди, которых от меня тошнит, совет не беспокоить себя лишний раз. Не дождетесь :)