Запрет на введение символов в имени контрагента

[LexaK]

LexaK, Действительно, мне нужно проверить лишь одну вносимую строку на форме элемента, это вообще возможно реализовать внешней обработкой?

ааа, понятно! рабочую конфигурацию - вносить туда всякие левые проверки, вам не доверяют!

Как вариант, сделайте эту проверку в расширении конфигурации.

[vienya]

Спасибо. Всё получилось через расширение сделать.

[vienya]

В продолжении темы хочу спросить, как по условию обратиться в справочнике контрагенты к строке наименования Юр/ФизЛица ?

Пробую в ФормеЭлемента:

Код Выделить Развернуть

Объект.НаименованиеПолное = "";   
Если Объект.НаименованиеПолное = Перечисления.ЮридическоеФизическоеЛицо.ФизическоеЛицо Тогда
[условие недопустимых символов физлица]
        Иначе   
[условие недопустимых символов юрлица]
КонецЕсли;
Пишет: Переменная не определена (Перечисления)

[LexaK]

vienya, очень напоминает письмо на деревню дедушке!
напишите сначала какая база у вас? полная версия?
в разных базах все по разному, например в УТ
это реквизит ЮрФизЛицо (ПеречислениеСсылка.ЮрФизЛицо)

[vienya]

LexaK, Извините.
БП Корп 8.3 серверная база. Реквизиты подтянулись при написании. Подсказали, что НаКлиенте надо обращаться к ним через

Код Выделить Развернуть

ПредопределенноеЗначение("Перечисление.ЮридическоеФизическоеЛицо.ЮридическоеЛицо")

[Максим75]

vienya, так Вы бы сразу написали бы, что на клиенте пытаетесь обратиться к Перечисления.ЮридическоеФизическоеЛицо.ФизическоеЛицо.
Многое не доступно на клиенте, только на сервере.

[vienya]

Это может кому-то пригодиться, потому-что должно быть распространённой задачей. Целиком рабочий код на ограничения написания в имени спецсимволов, цифр и латиницы у ЮЛ и на ограничения написания в имени спецсимволов у ФЛ выглядит так:

Код Выделить Развернуть

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

[vienya]

Максим75, До сегодняшней ночи я их и не различал.

[vienya]

Вот моя попытка установить ограничения написания в имени спецсимволов, цифр и латиницы у ЮЛ и на ограничения написания в имени спецсимволов у ФЛ выглядит так. Код не работает:

Код Выделить Развернуть

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

Код Выделить Развернуть

РезультатПроверкиФЛ = ТРег(СтроковыеФункцииКлиентСерверРФ.ТолькоКириллицаВСтроке(Объект.Наименование, Ложь, "-")); Но ведь это не проверка, а порядок написания.

[Максим75]

Максим75, До сегодняшней ночи я их и не различал.

ну как столкнётесь с невозможностью на клиенте работать с таблицей значений - сразу научитесь различать.