Ценовая власть (УТ 11.5) - 2

06.04.24

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

+1 –
В прошлый раз специальной обработкой мы выбрали объекты УТ 1.5, группируя по подсистемам. Оказалось, что состав подсистем не вполне корректно отображает функциональную структуру, но зато мы нашли процедуру, которая, вроде бы, должна содержать в себе всё, что нас интересует. Обновление цен должно ведь следовать выбранной стратегии ценообразования, верно? Иначе что она обновляет...

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

Для обозримости, исключим из нее все, что (на наш взгляд) прямо не относится к предмету нашего интереса.

Получилось так: ... нет, не получилось. Уважаемый читатель. Разобрать эту процедуру - не два байта. В следующих строках моего письма пойдут логи моего первого прохода по представленному коду. Не ждите здесь чего-то на пальцах разжеванного. Подключайтесь к чтению кода, пожалуйста.

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

Если ВидЦены.СпособЗаданияЦены = Перечисления.СпособыЗаданияЦен.ЗагружаетсяИзЯндексМаркет Тогда
Если ВидЦены.СпособЗаданияЦены = Перечисления.СпособыЗаданияЦен.ЗагружаетсяСOzon Тогда

... для означенных видов цен загружаем с сайта, Яндекс или Озон

Ну, что же, тоже стратегия. Назовем ее "По рынку".

С остальными видами начинается гранд-конструирование какой-то структуры, явно с какими-то очень сериозными намерениями

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

... вот и опции подошли.

Белый и пушистый, говоришь? Надолго тебя не хватит. Что там было с ФО_20 и ФО_25? А не важно, грузим обе. Сюпри-из :)

Автор, будь осторожен и внимателен! Их тошнит от тебя, а не от их собственного кода, помни об этом!

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


Процедура ИнициализироватьВыбранныеЦеныНоменклатуры(Форма, МассивВидоВЦен = Неопределено,ТаблицаВидовЦен = Неопределено)

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

Отдельно (следом) получаем СтрокаВидЦен.СхемаКомпоновкиДанных

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

И дальше:

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

Итак, мы получили для исследования еще две процедуры. Ну, мы ведь не ждали, что будет легко, верно?

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

Может оказаться, что они работают в уже загруженных в структуру формы СКД и формулах.

Далее мы скопипастим сюда две найденные процедуры, ПостроитьДеревоЦен и УстановитьЦены. Во второй из них, небольшой самой по себе (мы ее и не станем копипастить), нас ждет еще одна:

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

... после чего уже имеем результат:

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

Хорошее время, чтобы вспомнить Генри и его друзей. Он занимался математикой. Ученый. И стал применять всякие умные формулы к чисто эмпирическим маркетинговым приемчикам. Потом как-то структурировал презентации, и получилось то, что теперь называется "стратегиями ценообразования". То есть, строго говоря, это - не научная теория. Уже в процессе его коммерческой деятельности, как он сам рассказывает, появляются новые и новые эмпирические штучки, которые его "удивляют". Остается только снабдить эти штучки красивыми графиками (диаграммами), и дело пошло. В этом смысле - относительно появления новых штучек - предсказательная сила этой "науки" равна нулю.

Но его практические рекомендации чаще выстреливают, чем не выстреливают. Но выстреливают они не от того, что математика. Ценообразование , и вся экономика в целом, выстреливают тогда, когда продавец и покупатель находят взаимовыгодный компромисс. Покупатель получает удовлетворение какой-то своей хотелки за некоторую сумму денег, а продавец покрывает (не всегда) свои затраты и сколько-то сверху.

А теперь построим дерево цен и спрячем строительство под катом. Разбирать будем в следующий раз. Там действительно много букв, не раскрывайте кат, если у вас в этом нет реальной необходимости. В конфигураторе это выглядит не настолько пугающе.
 

 
спойлер

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

ценообразование

+1 –

Вы можете заказать платную адаптацию этой статьи под ваши задачи на «Бирже заказов».

  • 0% комиссии — оплата напрямую исполнителю;
  • Исполнители любого масштаба — от отдельных специалистов до команд под проект;
  • Прямой обмен контактами между заказчиком и исполнителем;
  • Безопасная сделка — при необходимости;
  • Рейтинги, кейсы и прозрачная система откликов.

См. также

Схема связей метаданных 1С

Инструментарий разработчика Механизмы типовых конфигураций Разработчик 1С 8.5 1С:Управление нашей фирмой 3.0 Абонемент ($m)

Кто ссылается на этот справочник, на что ссылается документ и какие регистры он двигает — обработка показывает это схемой прямо в базе. Выбранный объект — в центре, слева — кто ссылается на него, справа — на что ссылается он, под схемой — через какой реквизит; щелчок по соседу делает центром его. Много соседей — группы по видам, связи через составные типы — пунктиром и отключаются флажком. Для документации схему можно взять текстом PlantUML или сохранить файлом HTML вместе с таблицей связей. В статье я разбираю код: связи по типам реквизитов, движениям и владельцам, временное хранилище формы, схему в поле HTML и щелчок по узлу.

2 стартмани

30.09.2026    890    18    Petr_32    2    

6
Переопределяемые процедуры в 1С

Механизмы типовых конфигураций Разработчик 1С:Предприятие 8 Абонемент ($m)

Использование переопределяемых процедур в 1С на управляемых формах.

1 стартмани

01.09.2026    4297    waider    3    

15
Цифровой рубль обязателен с 1 сентября. Я открыл УТ 11.5.27.79 и не нашёл, чем его принимать

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

С 1 сентября компании с выручкой от 120 миллионов обязаны принимать цифровой рубль, за отказ — штраф до 50 тысяч за каждый случай. Я снял выгрузку с актуального релиза «Управления торговлей» и пошёл смотреть, где это включается. Оказалось, что казначейский контур в типовой сделан подробно, а кассового нет вообще — и это не забывчивость, а решение, записанное в конфигурации прямым текстом.

31.08.2026    2423    G_100802897175107255412    6    

5
Механизм подключаемых команд: как расширить функционал объектов БСП без снятия с поддержки

Инструментарий разработчика БСП (Библиотека стандартных подсистем) Механизмы типовых конфигураций Разработчик 1С 8.3 1С:ERP Управление предприятием 2 Абонемент ($m)

Данное расширение — это механизм, сделанный при помощи двух модулей из БСП (3.1.11.415), который позволяет динамически добавлять команды (кнопки и не только при желании) на формы управляемого приложения без изменения конфигурации. На примере данного механизма удобно рассмотреть некоторые возможности для расширения функционала объектов, которые подключены к механизму библиотеки стандартных подсистем.

1 стартмани

20.03.2026    5370    InFlach    0    

6
Механизм интервальных регистров в 1С:ЗУП 3.1

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

Интервальные регистры в 1С:ЗУП 3.1 заменяют тяжелые срезы последних, ускоряя отчеты по кадровым данным через интервалы ДатаНачала–ДатаОкончания. Разбираем отличия, примеры кода, плюсы и способы синхронизации.

12.03.2026    7217    AlexeyPROSTO_1C    5    

21
Механизм сдвига периода в регистрах ЗУП

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

Как в ЗУП работает механизм расстановки времени в регистрах сведений с помощью подписки на события?Рассматривается логика сдвигов для разных типов документов (прием, увольнение, отпуск) и дается инструкция по подключению нового регистра к этому механизму.

03.03.2026    4627    YA_1100893639    1    

9
Добавление объекта в подсистему "Версионирование объектов" на расширении в ЗУП

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

Описываю мой опыт подключения документа к подсистеме "Версионирование объектов" в ЗУП 3.1.

30.01.2026    5050    Mattakushi    2    

6
Получение в коде должности из классификатора по коду ОКПДТР

Универсальные функции Механизмы типовых конфигураций Разработчик 1С:Предприятие 8 1С:Зарплата и Управление Персоналом 3.x 1С:Франчайзи, автоматизация бизнеса Россия Бесплатно (free)

В статье рассказывается, как программно получить наименование должности из классификаторов по коду ОКПДТР в ЗУП Корп.

31.10.2025    4329    Sardukar    0    

5
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. o.nikolaev 219 07.04.24 21:26 Сейчас в теме
1) Глядя на такой код вспоминается старый фильм "Казино".
...
- Какой рукой ты подавал ему сигналы?!!
- Правой :(
(удар молотком по правой руке)
...
2) Не стреляйте в разрабов. У них СРОКИ и РАСПИСАНИЕ ВЫПУСКА РЕЛИЗОВ.
3) Так понимаю что код будет скоро как код Oracle. Куча флагов которые надо править пока тесты не перестанут падать.
+ – Ответить
Для отправки сообщения требуется регистрация/авторизация