From e890211b215eb004f4b9de3e31f34236f54f0704 Mon Sep 17 00:00:00 2001 From: Anton Ivanov Date: Sun, 11 Feb 2018 11:11:47 +0300 Subject: [PATCH] =?UTF-8?q?#78=20=D0=B4=D0=BE=D0=B1=D0=B0=D0=B2=D0=B8?= =?UTF-8?q?=D0=BB=20=D0=BD=D0=B0=D1=81=D0=BB=D0=B5=D0=B4=D0=BE=D0=B2=D0=B0?= =?UTF-8?q?=D0=BD=D0=B8=D0=B5=20=D0=B7=D0=B0=D0=BA=D0=B0=D0=B7=D1=87=D0=B8?= =?UTF-8?q?=D0=BA=D0=B0=20=D0=B8=20=D0=9A=D0=BE=D0=BD=D1=84=D0=B8=D0=B3?= =?UTF-8?q?=D1=83=D1=80=D0=B0=D1=86=D0=B8=D0=B8=20=D0=B8=D0=B7=20=D1=80?= =?UTF-8?q?=D0=BE=D0=B4=D0=B8=D1=82=D0=B5=D0=BB=D1=8F?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- .../Forms/ФормаЭлемента/Ext/Form/Module.bsl | 22 +++++++++++++++++++ 1 file changed, 22 insertions(+) diff --git a/src/cf/Catalogs/узЗадачи/Forms/ФормаЭлемента/Ext/Form/Module.bsl b/src/cf/Catalogs/узЗадачи/Forms/ФормаЭлемента/Ext/Form/Module.bsl index 7f5656424..aae4ba52f 100644 --- a/src/cf/Catalogs/узЗадачи/Forms/ФормаЭлемента/Ext/Form/Module.bsl +++ b/src/cf/Catalogs/узЗадачи/Forms/ФормаЭлемента/Ext/Form/Module.bsl @@ -647,6 +647,28 @@ ТребоватьЗаполнитьРодителя = Параметры.ТребоватьЗаполнитьРодителя; Конецесли; Объект.ПоказыватьВОтчетахИКанбанДоске = Истина; + + ЗаполнитьЗначенияИзРодителя(); +КонецПроцедуры + +&НаСервере +Процедура ЗаполнитьЗначенияИзРодителя() + МассивРеквизитов = Новый Массив(); + МассивРеквизитов.Добавить("Контрагент"); + МассивРеквизитов.Добавить("Конфигурация"); + + Для каждого ИмяРеквизита из МассивРеквизитов цикл + ЗначениеРеквизита = Объект[ИмяРеквизита]; + Если ЗначениеЗаполнено(ЗначениеРеквизита) Тогда + Продолжить; + Конецесли; + ЗначениеРеквизитаРодителя = Объект.Родитель[ИмяРеквизита]; + Если НЕ ЗначениеЗаполнено(ЗначениеРеквизитаРодителя) Тогда + Продолжить; + Конецесли; + + Объект[ИмяРеквизита] = ЗначениеРеквизитаРодителя; + Конеццикла; КонецПроцедуры &НаКлиенте