Директивы: сравнить расчёт с контекстом формы и по явному аргументу

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

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

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

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

Подготовка

  1. В отдельной учебной базе платформы 8.5.1.1343 создайте внешнюю обработку УчебнаяФорма85 с пустой управляемой основной формой. Используйте тонкий клиент Windows.

  2. В свойствах формы → События назначьте ПриСозданииНаСервере. Вставьте полный модуль урока, включая клиентские и серверные помощники, на уровне модуля.

  3. Не создавайте вручную ЗначениеПримера, ПолеПримера и кнопку: код создаёт их полностью. Каждый урок запускайте в отдельной копии своей формы.

  4. Сохраните свою EPF и откройте её в учебной базе. Собственное количество начинается с 3, цена книги задана в коде как 250; исходный расчёт равен 750.

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

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

  7. Запуск и вид в 1С не проверены. Компоновку, сочетания клавиш и расположение команд осмотрите вручную в указанном клиенте; не переносите настройки на рабочие формы без отдельной проверки.

&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
    Новые = Новый Массив;
    ТипРеквизита = Новый ОписаниеТипов("Число", Новый КвалификаторыЧисла(2, 0, ДопустимыйЗнак.Неотрицательный));
    Новые.Добавить(Новый РеквизитФормы("ЗначениеПримера", ТипРеквизита, "", "Количество книг", Истина));
    ЭтаФорма.ИзменитьРеквизиты(Новые);
    ЭтаФорма.ЗначениеПримера = 3;
    Поле = Элементы.Добавить("ПолеПримера", Тип("ПолеФормы"));
    Поле.Вид = ВидПоляФормы.ПолеВвода;
    Поле.ПутьКДанным = "ЗначениеПримера";
    Поле.Заголовок = "Количество собственных книг";


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

&НаКлиенте
Процедура УчебноеДействие(Команда)
    ИсходноеКоличество = ЗначениеПримера;
    СуммаПоФорме = РассчитатьПоФорме();
    СуммаПоАргументу = РассчитатьПоАргументу(ИсходноеКоличество);
    СуммаНаКлиенте = ОбщийУчебныйРасчёт(ИсходноеКоличество);
    Сообщить(СуммаПоФорме = СуммаПоАргументу);
    Сообщить(СуммаПоАргументу = СуммаНаКлиенте);
    Сообщить(ЗначениеПримера = ИсходноеКоличество);
    Сообщить(СуммаНаКлиенте = ИсходноеКоличество * 250);
    Сообщить(СтрШаблон("Три способа собственного расчёта: %1", СуммаНаКлиенте));
КонецПроцедуры

&НаСервере
Функция РассчитатьПоФорме()
    Возврат ОбщийУчебныйРасчёт(ЗначениеПримера);
КонецФункции

&НаСервереБезКонтекста
Функция РассчитатьПоАргументу(Знач Количество)
    Возврат ОбщийУчебныйРасчёт(Количество);
КонецФункции

&НаКлиентеНаСервереБезКонтекста
Функция ОбщийУчебныйРасчёт(Знач Количество)
    Если ТипЗнч(Количество) <> Тип("Число") Тогда
        ВызватьИсключение "Количество должно быть числом";
    КонецЕсли;
    Если Количество < 1 ИЛИ Количество > 10 ИЛИ Количество <> Цел(Количество) Тогда
        ВызватьИсключение "Количество должно быть целым от 1 до 10";
    КонецЕсли;
    Возврат Количество * 250;
КонецФункции

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

  1. ПриСозданииНаСервере имеет доступ к форме и создаёт собственный реквизит. Клиентская кнопка сохраняет числовой снимок количества.

  2. РассчитатьПоФорме имеет &НаСервере и читает ЗначениеПримера из контекста формы. При таком вызове передаются данные формы.

  3. РассчитатьПоАргументу имеет &НаСервереБезКонтекста. Оно не обращается к ЭтаФорма, Элементы или реквизитам: количество приходит аргументом.

  4. ОбщийУчебныйРасчёт имеет &НаКлиентеНаСервереБезКонтекста. Чистое вычисление доступно обоим контекстам, но не получает данные формы неявно.

  5. Сравнить три суммы и неизменность количества. Наличие Сервер в названии директивы не означает автоматический сетевой вызов совместной функции, вызванной на клиенте.

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

  1. Для 3: четыре Истина и сумма 750. Для 5: четыре Истина и 1250. Никакой записи документов или файлов нет.

  2. В отладчике выполните пошагово оба серверных вызова: первый видит реквизит формы, второй — только аргумент. Для 0/11 общий расчёт вызывает исключение.

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

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

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

  1. &НаСервереБезКонтекста не имеет доступа к реквизитам и переменным формы. Не добавляйте туда скрытые чтения ЗначениеПримера.

  2. Директива &НаКлиентеНаСервере предназначена для модуля команды, а не этой формы. В форме здесь используется её вариант БезКонтекста.

  3. Совместная функция — не разрешение вызвать клиентский интерфейс на сервере. Передавайте простые нужные значения и сверяйте доступность используемых API.

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

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

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

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

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