1c/Tasks
1
0
Fork 0
mirror of https://github.com/BlizD/Tasks.git synced 2025-04-13 11:40:39 +02:00
Code Issues Releases Activity

#242 Заполнение типа контактной информации заказчика

Browse Source
This commit is contained in:
GenVP 2020-08-24 18:48:04 +03:00
parent 16dd80eb40
commit f7d741d95d
1 changed files with 27 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
src/cf/CommonModules/узОбновлениеИнформационнойБазы/Ext/Module.bsl
View File

@ -285,6 +285,12 @@
+ "Справочник.ЭлектронноеПисьмоИсходящееПрисоединенныеФайлы";; + "Справочник.ЭлектронноеПисьмоИсходящееПрисоединенныеФайлы";;
//- УрянскийД 2020-06-22 (окончание) //- УрянскийД 2020-06-22 (окончание)
// + #242 Пиганов Г.В. 2020-08-02
Обработчик = Обработчики.Добавить();
Обработчик.НачальноеЗаполнение = Истина;
Обработчик.Процедура = "узОбновлениеИнформационнойБазы.ОбновитьПредопределенныеВидыКонтактнойИнформацииЗаказчиков";
// - #242 Пиганов Г.В. 2020-08-02
КонецПроцедуры КонецПроцедуры
Процедура ПередОбновлениемИнформационнойБазы() Экспорт Процедура ПередОбновлениемИнформационнойБазы() Экспорт
КонецПроцедуры КонецПроцедуры
@ -1632,6 +1638,26 @@
КонецПроцедуры КонецПроцедуры
// #242 Пиганов Г.В. 2020-08-02
Процедура ОбновитьПредопределенныеВидыКонтактнойИнформацииЗаказчиков() Экспорт
МодульУправлениеКонтактнойИнформацией = ОбщегоНазначения.ОбщийМодуль("УправлениеКонтактнойИнформацией");
ПараметрыВида = МодульУправлениеКонтактнойИнформацией.ПараметрыВидаКонтактнойИнформации("АдресЭлектроннойПочты");
ПараметрыВида.Вид = "узEmailКонтрагенты";
ПараметрыВида.МожноИзменятьСпособРедактирования = Истина;
ПараметрыВида.РазрешитьВводНесколькихЗначений = Истина;
ПараметрыВида.Порядок = 1;
МодульУправлениеКонтактнойИнформацией.УстановитьСвойстваВидаКонтактнойИнформации(ПараметрыВида);
ПараметрыВида = МодульУправлениеКонтактнойИнформацией.ПараметрыВидаКонтактнойИнформации("Телефон");
ПараметрыВида.Вид = "узТелефонКонтрагенты";
ПараметрыВида.МожноИзменятьСпособРедактирования = Истина;
ПараметрыВида.РазрешитьВводНесколькихЗначений = Истина;
ПараметрыВида.Порядок = 2;
МодульУправлениеКонтактнойИнформацией.УстановитьСвойстваВидаКонтактнойИнформации(ПараметрыВида);
КонецПроцедуры
//#Область ПрограммныйИнтерфейс //#Область ПрограммныйИнтерфейс
@ -1890,4 +1916,4 @@
////////////////////////////////////////////////////////////////////////////////// //////////////////////////////////////////////////////////////////////////////////
//// Обновление ИБ //// Обновление ИБ
//#КонецОбласти //#КонецОбласти