УстановитьПривилегированныйРежим(Истина);
Выборка = Справочники.Пользователи.Выбрать();
Официант = Справочники.Пользователи.ПустаяСсылка();
Пока Выборка.Следующий() Цикл
ИдентПольз = Выборка.ИдентификаторПользователяИБ;
Если ИдентПольз = Новый УникальныйИдентификатор("00000000-0000-0000-0000-000000000000") Тогда
Продолжить;
КонецЕсли;
ПользовательИБ = ПользователиИнформационнойБазы.НайтиПоУникальномуИдентификатору(Новый УникальныйИдентификатор(ИдентПольз));
ХэшНастоящегоПароля = ПользовательИБ.СохраняемоеЗначениеПароля;
НачатьТранзакцию();
ПользовательИБ.Пароль = Пароль;
ПользовательИБ.Записать();
ПользовательИБ = ПользователиИнформационнойБазы.НайтиПоУникальномуИдентификатору(Новый УникальныйИдентификатор(ИдентПольз));
ХешВведенногоПароля = ПользовательИБ.СохраняемоеЗначениеПароля;
ОтменитьТранзакцию();
Если ХешВведенногоПароля = ХэшНастоящегоПароля Тогда
Официант = Справочники.Пользователи.НайтиПоРеквизиту("ИдентификаторПользователяИБ", Новый УникальныйИдентификатор(ПользовательИБ.УникальныйИдентификатор));
Прервать;
Иначе
Продолжить;
КонецЕсли;
КонецЦикла;
ДанныеФормыОткр.ТекОФ = Официант;
УстановитьПривилегированныйРежим(Ложь);