Привязать заголовок своей страницы к числовой сумме Книги

Учебные задачи

Путь заголовка указывает на собственный числовой реквизит Сумма. Команда меняет количество и пересчитывает сумму; путь не переназначается.

Где и как запускать

Полный модуль своей новой управляемой формы внешней обработки. Данные только в памяти формы.

Подготовка

  1. В своей отдельной конфигурации УчебнаяКонфигурацияСинтаксиса создайте новую внешнюю обработку с пустой управляемой основной формой. Каждый урок вставляйте в отдельную копию формы целым модулем.

  2. В событии формы ПриСозданииНаСервере назначьте одноимённый обработчик. Не создавайте вручную реквизиты НазваниеТовара, Количество, Цена, Сумма, две страницы и команду: код создаёт их сам.

  3. Первая страница содержит вымышленную Книгу: количество 3, цена 250, сумма 750. Это только значения формы, не номенклатура, цены, документ или регистр базы.

  4. Другая страница с собственным пояснением нужна для ручного переключения вкладок. Команда находится вне страниц и не скрывается при переключении.

  5. Используйте настольный тонкий/толстый клиент 8.5.1.1343. Сохранённые свойства не доказывают видимый эффект во всех темах и интерфейсах; размеры окна и внешний вид проверяются вручную.

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

    КомандаДействия = ЭтаФорма.Команды.Добавить("УчебноеДействие");
    КомандаДействия.Действие = "УчебноеДействие";
    КомандаДействия.Заголовок = "Проверить собственную страницу";
    КомандаДействия.Подсказка = "Действие только над данными учебной формы";
    КомандаДействия.ИзменяетСохраняемыеДанные = Ложь;
    Кнопка = Элементы.Добавить("КнопкаУчебноеДействие", Тип("КнопкаФормы"));
    Кнопка.ИмяКоманды = КомандаДействия.Имя;
    Кнопка.Заголовок = КомандаДействия.Заголовок;

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

&НаКлиенте
Процедура УчебноеДействие(Команда)
    Если ТипЗнч(Цена) <> Тип("Число") ИЛИ Цена < 0 Тогда
        Сообщить("Введите собственную неотрицательную числовую цену");
        Возврат;
    КонецЕсли;
    Если Количество = 3 Тогда
        Количество = 4;
    Иначе
        Количество = 3;
    КонецЕсли;
    Сумма = Количество * Цена;
    Сообщить("Текущее собственное представление суммы: " + Формат(Сумма, Элементы.УчебнаяСтраницаКниги.Формат));
    Сообщить(Элементы.УчебнаяСтраницаКниги.ПутьКДаннымЗаголовка = "Сумма");
    Сообщить(Элементы.УчебнаяСтраницаКниги.ОтображатьЗаголовок);
КонецПроцедуры

Разбор по шагам

  1. Своя динамическая страница ещё не имеет пути заголовка: назначить его один раз на Сумма.

  2. У расширения Страница Формат допускает запись. Это не тот же контракт, что у расширения обычной группы, где он только читается.

  3. ОтображатьЗаголовок включить явно, не оставлять решение автоматике.

  4. Команда меняет количество 3↔4 и вычисляет сумму с текущей собственной ценой. Заголовок связан с данными, не формируется ручным присваиванием текста каждый раз.

  5. Вторая страница не меняется, название Книга не сохраняется в справочник.

Как проверить результат

  1. При создании две проверки Истина. При цене 250 первая команда даёт представление 1000 с двумя знаками после разделителя, вторая 750.

  2. После команды ещё две проверки Истина: путь по-прежнему Сумма и заголовок включён. Разделитель зависит от локали.

Ожидаемый результат

Изменяются данные связанного заголовка с явным числовым форматом и правильным контрактом страницы.

На что обратить внимание

  1. Повторное присваивание другого ПутьКДаннымЗаголовка уже привязанной странице не поддерживается.

  2. Цвета/шрифты темы и способ отображения вкладок требуют фактической проверки клиента.

  3. Отформатированная строка заголовка не заменяет числовой реквизит Сумма.

Пример не запускался в вашей базе. Перед применением проверьте его в указанном учебном контексте.

Не хотите разбираться сами?

Адаптируем это решение под вашу базу. Оценка бесплатно.

Оставить задачу

1С, 1С:Предприятие — товарные знаки ООО «1С». Сайт не является официальным представительством фирмы «1С» и не аффилирован с ней.