---

&НаКлиенте
Процедура УслугаНачалоВыбора(Элемент, ДанныеВыбора, СтандартнаяОбработка)

	Если Не ЗначениеЗаполнено(Объект.Мастер) Тогда
		Сообщить("Сначала выберите мастера.");
		СтандартнаяОбработка = Ложь;
		Возврат;
	КонецЕсли;

	СписокУслуг = ПолучитьСписокУслугМастера(Объект.Мастер);

	Если СписокУслуг.Количество() = 0 Тогда
		Сообщить("Для выбранного мастера не указаны выполняемые услуги.");
		СтандартнаяОбработка = Ложь;
		Возврат;
	КонецЕсли;

	ВыбранныйЭлемент = СписокУслуг.ВыбратьЭлемент("Выберите услугу");

	Если ВыбранныйЭлемент <> Неопределено Тогда
		Объект.Услуга = ВыбранныйЭлемент.Значение;
		Объект.СуммаУслуги = ПолучитьЦенуУслуги(Объект.Услуга);
	КонецЕсли;

	СтандартнаяОбработка = Ложь;

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