1С 8.3 БСП ПоказатьПредупреждениеВсеВидимыеРеквизитыРазблокированы - Программист 1С Минск. Автоматизация бизнеса.

Популярные страницы:
Перейти к контенту

1С 8.3 БСП ПоказатьПредупреждениеВсеВидимыеРеквизитыРазблокированы

Данные > Примеры кода 1С > 1С 8.3 БСП > Запрет редактирования реквизитов объектов
Перейти в раздел примеры кода 1С 8.3:
1С 8.3 БСП ПоказатьПредупреждениеВсеВидимыеРеквизитыРазблокированы. Выводит предупреждение о том, что все видимые реквизиты разблокированы.
Примера кода от rayastar
ЗапретРедактированияРеквизитовОбъектовКлиент.ПоказатьПредупреждениеВсеВидимыеРеквизитыРазблокированы(ОбработкаПродолжения);

//
&НаКлиенте
Процедура Подключаемый_РазрешитьРедактированиеРеквизитовОбъекта(Команда)

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

КонецПроцедуры
// Автор библиотеки: ООО "1С-Софт". Все права защищены © 2021
// Типовая конфигурация Библиотека стандартных подсистем (далее - БСП)
// Код БСП распространяется по лицензии Attribution 4.0 International (CC BY 4.0):
// ссылка на лицензию: https://creativecommons.org/licenses/by/4.0/legalcode
Поиск кода
0
Комментарии
____________________
Copyright©, «Программист 1С в г.Минске», 06.09.2021
Перепечатка текста и фотографий разрешена при наличии прямой ссылки на источник
Назад к содержимому