&НаКлиенте
Процедура ИмяПапкиПоставщикаНачалоВыбора(Элемент, ДанныеВыбора, ВыборДобавлением, СтандартнаяОбработка)
СтандартнаяОбработка = Ложь;
Режим = РежимДиалогаВыбораФайла.ВыборКаталога;
ДиалогОткрытия = Новый ДиалогВыбораФайла(Режим);
ДиалогОткрытия.Каталог = Объект.ИмяПапкиПоставщика;
ДиалогОткрытия.Заголовок = "Выберите каталог";
Оповещение = Новый ОписаниеОповещения("ВыборКаталога_Завершение", ЭтотОбъект);
ДиалогОткрытия.Показать(Оповещение)
КонецПроцедуры
&НаКлиенте
Процедура ВыборКаталога_Завершение(Результат, Параметр) Экспорт
Если Результат <> Неопределено Тогда
Объект.ИмяПапкиПоставщика = Результат[0];
КонецЕсли;
КонецПроцедуры