Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
25 ноя 2024, 10:09

Бизнес-процессы и задачи

Автор Элина, 07 апр 2018, 20:06

0 Пользователей и 1 гость просматривают эту тему.

Элина

Доброго времени суток!
Имеется следующий листинг. Написан он в форме задачи. Нужно, чтобы он выводил документ отказ, если мы хотим отказать клиенту в услугах. Никак не могу придумать как это сделать. Буду благодарна за помощь!
&НаКлиенте
Процедура ПриОткрытии(Отказ)
    Если ПроверкаБизнесПроцесса() Тогда
    Элементы.ПолучитьДокументЗаявка.Видимость = Истина;
   Предупреждение("Требуется работа с документом Заявка, воспользуйтесь кнопкой Получить документ заявка");
КонецЕсли;
КонецПроцедуры

&НаСервере
Функция ПроверкаБизнесПроцесса()
  Если
     ТипЗнч(Объект.БизнесПроцесс)= ТипЗнч(БизнесПроцессы.ПеревозкаГруза.ПустаяСсылка())
  Тогда
    Возврат Истина;
  Иначе
    Возврат Ложь;
  КонецЕсли;
КонецФункции


&НаКлиенте
Процедура ПолучитьДокументЗаявка(Команда)
   ОткрытьЗначение (ПолучитьСсылкуНаСмету());
   Предупреждение(СообщениеДляПользователя());
КонецПроцедуры

&НаСервере
Функция ПолучитьСсылкуНаСмету()
  Возврат Объект.БизнесПроцесс.Заявка;
КонецФункции

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

Теги:

Похожие темы (1)

Рейтинг@Mail.ru

Поиск