Документация программиста

Уникальное поле в справочнике

1. Уникальное поле в справочнике

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

 

Генератор пароля в форме

1. Генератор пароля в форме элемента справочника по нажатию кнопки.

Функция ГенерацияСлучайногоПароля(Длина) 
	ГСЧ = Новый ГенераторСлучайныхЧисел();    
	СлучайнаяСтрока = "";
	Для Счет = 1 по Длина Цикл        
		Набор = ГСЧ.СлучайноеЧисло(1,3);    
		Если Набор = 1 Тогда           
			СлучайныйСимвол = Символ(ГСЧ.СлучайноеЧисло(48,57));
		ИначеЕсли Набор = 2 Тогда
			СлучайныйСимвол = Символ(ГСЧ.СлучайноеЧисло(65,90));
		ИначеЕсли Набор = 3 Тогда
			СлучайныйСимвол = Символ(ГСЧ.СлучайноеЧисло(97,122));
		КонецЕсли;			
		СлучайнаяСтрока = СлучайнаяСтрока + СлучайныйСимвол;
	КонецЦикла;      
	Возврат(СлучайнаяСтрока);
КонецФункции

2. Обработка нажатия кнопки.

&НаКлиенте
Процедура ГенераторПароля(Команда)  
	Объект.Пароль = ГенерацияСлучайногоПароля(12);    
КонецПроцедуры