стрПараметры = Новый Структура("Ключ", СсылкаНаКонтрагента);

ФормаОснования = ПолучитьФорму("Справочник.Контрагенты.ФормаОбъекта", стрПараметры);

ФормаОснования.Открыть();   

 //Открытие формы редактирования календаря поставки на шаге 1.

&НаКлиенте

Процедура ИспользуемыеКалендариВыбор(Элемент, ВыбраннаяСтрока, Поле, СтандартнаяОбработка)

	

	Календарь = Элементы.ИспользуемыеКалендари.ТекущиеДанные.Календарь;

	Если Календарь <> ОсновнойКалендарьПредприятия Тогда

		ПараметрыФормы = Новый Структура("Ключ", Календарь);

		Форма = ПолучитьФорму("Справочник.Календари.ФормаОбъекта", ПараметрыФормы);

		Форма.РежимОткрытияОкна = РежимОткрытияОкнаФормы.БлокироватьОкноВладельца;

		Форма.Открыть();

	КонецЕсли;

		

КонецПроцедуры   

 // Функция предоставляет диалог выбора рабочего места



Функция ВыбратьРабочееМесто(ОткрыватьФормуВыбораПриПервомОбращении = Ложь, ИдентификаторКлиента = "") Экспорт



	Результат    = Ложь;

	РабочееМесто = "";



	ПараметрыФормы = Новый Структура();

	ПараметрыФормы.Вставить("ОткрыватьПриПервомОбращении", ОткрыватьФормуВыбораПриПервомОбращении);

	ПараметрыФормы.Вставить("ИдентификаторКлиента", ИдентификаторКлиента);

	ФормаВыбораРМ = ПолучитьФорму("Справочник.ПодключаемоеОборудование.Форма.ФормаВыбораРабочегоМеста", ПараметрыФормы);

	Ответ = ФормаВыбораРМ.ОткрытьМодально();



	Если Ответ = КодВозвратаДиалога.ОК Тогда

		РМ = ФормаВыбораРМ.Параметры.РабочееМесто;



		МенеджерОборудованияСервер.УстановитьРабочееМестоКлиента(РМ);



		Оповестить("ИзмененоРабочееМестоТекущегоСеанса", РабочееМесто);



		Результат = Истина;

	КонецЕсли;



	Возврат Результат;



КонецФункции