Запретить ввод собственного сохраняемого реквизита, сохранив расчёт

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

ТолькоПросмотр влияет на сохраняемые реквизиты и команды, изменяющие такие данные. Свою кнопку расчёта оставляем не изменяющей сохраняемые данные.

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

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

Подготовка

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

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

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

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

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

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

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

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

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

&НаКлиенте
Процедура УчебноеДействие(Команда)
    Если ТипЗнч(ЗначениеПримера) <> Тип("Число") Тогда
        ВызватьИсключение "Собственное количество должно быть числом";
    КонецЕсли;
    Если ЗначениеПримера < 1 ИЛИ ЗначениеПримера > 10 ИЛИ ЗначениеПримера <> Цел(ЗначениеПримера) Тогда
        ВызватьИсключение "Для учебного расчёта выберите целое количество от 1 до 10";
    КонецЕсли;
    Цена = 250;
    Сумма = ЗначениеПримера * Цена;
    Сообщить(Сумма >= 250 И Сумма <= 2500);
    Сообщить(Сумма / Цена = ЗначениеПримера);
    Сообщить(СтрШаблон("Собственные книги: %1 × %2 = %3", ЗначениеПримера, Цена, Сумма));
    ЗначениеДо = ЗначениеПримера;
    ПереключитьСобственныйРежим();
    Сообщить(ЗначениеПримера = ЗначениеДо);
    Сообщить("ТолькоПросмотр собственной формы: " + Строка(ЭтаФорма.ТолькоПросмотр));
КонецПроцедуры

&НаСервере
Процедура ПереключитьСобственныйРежим()
    ЭтаФорма.ТолькоПросмотр = Не ЭтаФорма.ТолькоПросмотр;
КонецПроцедуры

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

  1. СохраняемыеДанные передаём пятым аргументом конструктора собственного реквизита; по умолчанию этот признак был бы Ложь.

  2. Сервер устанавливает ТолькоПросмотр = Истина, поэтому связанное поле сохраняемого количества должно запрещать интерактивное редактирование.

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

  4. Изменение ТолькоПросмотр выполняет серверный помощник. Значение количества сравнивается до и после, чтобы не путать запрет ввода с очисткой данных.

  5. После первого нажатия режим выключен: вручную введите 5. Второе нажатие считает 1250 и снова включает режим просмотра.

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

  1. При открытии попробуйте ввод: исходное количество 3 должно быть защищено от редактирования. Первая кнопка выводит 750, три Истина и ТолькоПросмотр = Ложь.

  2. Введите 5 и нажмите снова: 1250, три Истина и ТолькоПросмотр = Истина. Значение 5 не должно исчезнуть.

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

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

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

  1. Без СохраняемыеДанные = Истина этот урок не доказал бы запрет ввода именно этим свойством формы.

  2. ТолькоПросмотр не является правом доступа и не заменяет проверку на сервере в реальной операции записи.

  3. СохраняемыеДанные — свойство формы: никакого документа книги и записи в базу этот модуль не создаёт.

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

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

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

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

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