Внимание!
Эта wiki об устаревших версиях
Документация к актуальной версии интеграции 1С и телефонии доступна по ссылке
Инструменты пользователя
Инструменты пользователя
astpanel:designer:crm2:modulesrc
Различия
Здесь показаны различия между двумя версиями данной страницы.
| Предыдущая версия справа и слева Предыдущая версия Следующая версия | Предыдущая версия | ||
|
astpanel:designer:crm2:modulesrc [2015/02/11 11:37] apor |
astpanel:designer:crm2:modulesrc [2016/06/24 13:26] (текущий) imal |
||
|---|---|---|---|
| Строка 15: | Строка 15: | ||
| Если Метаданные.Имя = "CRM" | Если Метаданные.Имя = "CRM" | ||
| ИЛИ Метаданные.Имя = "УправлениеНебольшойФирмой_CRMСтандарт" | ИЛИ Метаданные.Имя = "УправлениеНебольшойФирмой_CRMСтандарт" | ||
| + | ИЛИ Метаданные.Имя = "УправлениеНебольшойФирмой_CRM" | ||
| + | ИЛИ Метаданные.Имя = "КомплекснаяАвтоматизация_CRM" | ||
| ИЛИ Метаданные.Имя = "УправлениеТорговлей_CRM_2" Тогда | ИЛИ Метаданные.Имя = "УправлениеТорговлей_CRM_2" Тогда | ||
| пвхНастройкиПользователей = ?(Метаданные.ПланыВидовХарактеристик.Найти("НастройкиПользователей") <> Неопределено, ПланыВидовХарактеристик.НастройкиПользователей, ПланыВидовХарактеристик.CRM_НастройкиПользователей); | пвхНастройкиПользователей = ?(Метаданные.ПланыВидовХарактеристик.Найти("НастройкиПользователей") <> Неопределено, ПланыВидовХарактеристик.НастройкиПользователей, ПланыВидовХарактеристик.CRM_НастройкиПользователей); | ||
| Строка 118: | Строка 120: | ||
| КонецФункции | КонецФункции | ||
| + | |||
| + | // Программное добавление кнопки отправки факса на форму печати документа. | ||
| + | // | ||
| + | Процедура ДобавитьКнопкиФаксаНаФормуПечати(ЭтаФорма) Экспорт | ||
| + | |||
| + | ИмяКоманды = "МИКО_ОтправитьКакФакс"; | ||
| + | Команда = ЭтаФорма.Команды.Добавить(ИмяКоманды); | ||
| + | Команда.Подсказка = НСтр("ru='Отправить факсом'"); | ||
| + | Команда.Заголовок = "Отправить факсом"; | ||
| + | Команда.Действие = "МИКО_ОтправитьКакФакс"; | ||
| + | Команда.Картинка = БиблиотекаКартинок.МИКО_ОтправитьФакс; | ||
| + | Команда.Отображение = ОтображениеКнопки.Картинка; | ||
| + | |||
| + | КнопкаПозвонить = ЭтаФорма.Элементы.Добавить("элМИКО_ОтправитьКакФакс", Тип("КнопкаФормы"), ЭтаФорма.Элементы.ГруппаСохранитьОтправить); | ||
| + | КнопкаПозвонить.ИмяКоманды = ИмяКоманды; | ||
| + | КнопкаПозвонить.ЦветРамки = ЦветаСтиля.ЦветФонаФормы; | ||
| + | |||
| + | ИмяКоманды = "МИКО_Позвонить"; | ||
| + | Команда = ЭтаФорма.Команды.Добавить(ИмяКоманды); | ||
| + | Команда.Подсказка = НСтр("ru='Позвонить'"); | ||
| + | Команда.Заголовок = "Позвонить"; | ||
| + | Команда.Действие = "МИКО_Позвонить"; | ||
| + | Команда.Картинка = БиблиотекаКартинок.МИКО_Телефон; | ||
| + | Команда.Отображение = ОтображениеКнопки.Картинка; | ||
| + | |||
| + | КнопкаПозвонить = ЭтаФорма.Элементы.Добавить("элМИКО_Позвонить", Тип("КнопкаФормы"), ЭтаФорма.Элементы.ГруппаСохранитьОтправить); | ||
| + | КнопкаПозвонить.ИмяКоманды = ИмяКоманды; | ||
| + | КнопкаПозвонить.ЦветРамки = ЦветаСтиля.ЦветФонаФормы; | ||
| + | |||
| + | КонецПроцедуры | ||
| + | |||
| + | // Для документов будет возвращено значение реквизита "Контрагент" | ||
| + | // Для справочников - возвращается ссылка на элемент | ||
| + | // В случае ошибки возвращается "Неопределено" | ||
| + | // | ||
| + | Функция ПолучитьСсылкуНаУчастникаИзДокумента(Ссылка) Экспорт | ||
| + | |||
| + | Если Справочники.ТипВсеСсылки().СодержитТип(ТипЗнч(Ссылка)) Тогда | ||
| + | Возврат Ссылка; | ||
| + | ИначеЕсли Документы.ТипВсеСсылки().СодержитТип(ТипЗнч(Ссылка)) Тогда | ||
| + | МассивОбъектов = Новый Массив; | ||
| + | ДобавитьЗначениеРеквизитаВМассив(Ссылка, МассивОбъектов, "Контрагент"); | ||
| + | ДобавитьЗначениеРеквизитаВМассив(Ссылка, МассивОбъектов, "Партнер"); | ||
| + | ДобавитьЗначениеРеквизитаВМассив(Ссылка, МассивОбъектов, "КонтактноеЛицо"); | ||
| + | |||
| + | Возврат МассивОбъектов; | ||
| + | КонецЕсли; | ||
| + | КонецФункции // ПолучитьСсылкуНаУчастникаИзДокумента() | ||
| + | |||
| + | // Получате значение раквизита, если значение заполнено - добавляет его в массив. | ||
| + | // | ||
| + | Функция ДобавитьЗначениеРеквизитаВМассив(Знач Ссылка, Массив, ИмяРеквизита) Экспорт | ||
| + | Если Ссылка.Метаданные().Реквизиты.Найти(ИмяРеквизита) = Неопределено Тогда | ||
| + | Возврат Ложь; | ||
| + | КонецЕсли; | ||
| + | Если ЗначениеЗаполнено(Ссылка[ИмяРеквизита]) Тогда | ||
| + | Массив.Добавить(Ссылка[ИмяРеквизита]); | ||
| + | КонецЕсли; | ||
| + | |||
| + | Возврат Истина; | ||
| + | КонецФункции // ДобавитьЗначениеРеквизитаВМассив() | ||
| + | |||
| </code> | </code> | ||
astpanel/designer/crm2/modulesrc.1423654665.txt.gz · Последние изменения: 2015/02/11 11:37 — apor
Инструменты страницы
Если не указано иное, содержимое этой вики предоставляется на условиях следующей лицензии: Public Domain
