В АбонентыЭДО ресурс ИНН имеет строковый тип длиной 12. Урок проверяет только технический контракт длины, не действительность ИНН.
Где и как запускать
Учебная база: создайте серверный общий модуль УчебныеЗадачи (флаг Сервер). Код без директив вставьте в тело процедуры ВыполнитьПример() Экспорт. Вызовите её из серверного обработчика команды учебной обработки. Не запускайте в рабочей базе.
Подготовка
Запускайте в учебной копии конфигурации. Примеры читают структуру метаданных, но не создают объекты, не записывают регистры и не проводят документы.
Сверяйте вывод с деревом конфигурации в Конфигураторе. Имена, длины и настройки в УНФ, КА2, БП, УТ 11 и УТ 10.3 могут различаться.
Имена объектов взяты из XML КА2 Progress: C:\claude\KA2\Progress\XML_CF_KA2_PROGRESS. Исходные XML не изменяйте. Выполняйте код только в своей учебной копии соответствующей конфигурации.
В другой конфигурации предварительно найдите аналогичный объект в Конфигураторе и замените только строку имени в поиске. Отсутствие имени обрабатывается до чтения свойств; оно не доказывает отсутствие аналогичной возможности.
Каждый урок запускайте отдельно. Код не вызывает бизнес-функции модулей и обработчики команд, не переключает привилегированный режим и не меняет параметры сеанса.
Регистр = Метаданные.РегистрыСведений.Найти("АбонентыЭДО");
Если Регистр = Неопределено Тогда
ВызватьИсключение "В учебной конфигурации отсутствует РегистрыСведений.АбонентыЭДО";
КонецЕсли;
Ресурс = Регистр.Ресурсы.Найти("ИНН");
Если Ресурс = Неопределено Тогда
ВызватьИсключение "В АбонентыЭДО отсутствует ресурс ИНН";
КонецЕсли;
Если Не Ресурс.Тип.СодержитТип(Тип("Строка")) Тогда
ВызватьИсключение "Ожидался строковый ресурс ИНН";
КонецЕсли;
Квалификаторы = Ресурс.Тип.КвалификаторыСтроки;
Сообщить(Квалификаторы.Длина = 12);
ТестоваяСтрока = "000000000000";
СлишкомДлинная = "00000000000000";
Сообщить(СтрДлина(ТестоваяСтрока) <= Квалификаторы.Длина);
Сообщить(СтрДлина(СлишкомДлинная) > Квалификаторы.Длина);
Сообщить(Лев(ТестоваяСтрока, 1) = "0");
Сообщить("Маска: " + Ресурс.Маска);
Сообщить("Режим пароля: " + Строка(Ресурс.РежимПароля));
Сообщить("Проверка заполнения: " + Строка(Ресурс.ПроверкаЗаполнения));Разбор по шагам
Ресурс описывает строку, поэтому не преобразуем входное значение в Число.
Проверяем допустимую длину до возможной загрузки; здесь ни загрузки, ни записи нет.
Строка из нулей специально синтетическая и не заявляется действительным налоговым номером.
Маска, парольное отображение и ПроверкаЗаполнения — отдельные настройки, не алгоритм проверки контрольных цифр.
Как проверить результат
По XML четыре проверки Истина: длина 12, допуск 12 символов, отказ 14 символам и сохранённый ведущий ноль.
РежимПароля Ложь; реальные ИНН из записей регистра не читаются и не выводятся.
Ожидаемый результат
Показана техническая защита строкового идентификатора от потери нулей и лишней длины.
На что обратить внимание
Не используйте тестовую строку как реальный ИНН и не считайте длину полной проверкой номера.
РежимПароля маскирует интерфейс, но не шифрует хранимые данные.
Пример не запускался в вашей базе. Перед применением проверьте его в указанном учебном контексте.