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