admin/kb-personal
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

new

Browse Source
This commit is contained in:
wakadakawaka 2025-05-19 21:09:07 +05:00
parent 5f25e19496
commit 026e477863
1 changed files with 34 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

34
src/content/docs/knowledge-base/Примеры кода, шаблоны/БСП и типовые/1. Библиотека стандартных подсистем/Работа с документами/Проверка заполнения документа.md Normal file
View File

@ -0,0 +1,34 @@
```bsl
Процедура ОбработкаПроверкиЗаполнения(Отказ, ПроверяемыеРеквизиты)
НепроверяемыеРеквизиты = Новый Массив; // сюда имена реквизитов, которые нужно исключить из проверки
Если Статус = Перечисления.УДК_СтатусыВыполненияЗаданий.ВРаботе Тогда
НепроверяемыеРеквизиты.Добавить("Аналитик");
КонецЕсли;
Если Статус = Перечисления.УДК_СтатусыВыполненияЗаданий.Закрыта Тогда
// в этот массив можно добавить реквизиты, которые нужно проверить
ПроверяемыеРеквизиты.Добавить("СписокОбъектов.ДатаПомещения");
КонецЕсли;
ОбщегоНазначения.УдалитьНепроверяемыеРеквизитыИзМассива(ПроверяемыеРеквизиты, НепроверяемыеРеквизиты);
// Тут проверяем каждую строку ТЧ и привязваем сообщение об ошибке к конкретной ячейки конкретной строки
Для Каждого Строка Из СписокОбъектов Цикл
Если Не ЗначениеЗаполнено(Строка.ДатаПомещения) И Строка.СостояниеОбъекта = Перечисления.УДК_СостоянияОбъектов.ПомещенВХранилище Тогда
ОбщегоНазначения.СообщитьПользователю("Заполните дату помещения в ХК",
,
Сообщение.Поле = ОбщегоНазначенияКлиентСервер.ПутьКТабличнойЧасти("Объект.СписокОбъектов", Строка.НомерСтроки, "ДатаПомещения"),
,
Отказ)
КонецЕсли;
КонецЦикла;
КонецПроцедуры
```