Ошибка при занесении заказчика вручную #81

src/cf/Catalogs/узКонтрагенты/Ext/ManagerModule.bsl

@@ -0,0 +1,16 @@
+Процедура ПроверитьИИсправитьВидыКонтактнойИнформации() Экспорт
+	МассивВидовКонтактойИнформации = Новый Массив();
+	МассивВидовКонтактойИнформации.Добавить(ПредопределенноеЗначение("Справочник.ВидыКонтактнойИнформации.узEmailКонтрагенты"));
+	МассивВидовКонтактойИнформации.Добавить(ПредопределенноеЗначение("Справочник.ВидыКонтактнойИнформации.узТелефонКонтрагенты"));
+	
+	ЕстьОшибки = Ложь;
+	Для каждого пВидкКонтактнойИнформации из МассивВидовКонтактойИнформации цикл
+		Если НЕ ЗначениеЗаполнено(пВидкКонтактнойИнформации.Тип) Тогда
+			ЕстьОшибки = Истина;
+		Конецесли;
+	Конеццикла;
+	
+	Если ЕстьОшибки Тогда
+		узОбновлениеИнформационнойБазы.ОбновлениеНаВерсию_1_0_3_035();
+	Конецесли;
+КонецПроцедуры 

src/cf/Catalogs/узКонтрагенты/Forms/ФормаЭлемента/Ext/Form.xml

@@ -10,6 +10,7 @@
 		<Event name="OnReadAtServer">ПриЧтенииНаСервере</Event>
 		<Event name="OnOpen">ПриОткрытии</Event>
 		<Event name="BeforeClose">ПередЗакрытием</Event>
+		<Event name="BeforeWrite">ПередЗаписью</Event>
 		<Event name="OnCreateAtServer">ПриСозданииНаСервере</Event>
 		<Event name="BeforeWriteAtServer">ПередЗаписьюНаСервере</Event>
 		<Event name="FillCheckProcessingAtServer">ОбработкаПроверкиЗаполненияНаСервере</Event>

src/cf/Catalogs/узКонтрагенты/Forms/ФормаЭлемента/Ext/Form/Module.bsl

@@ -117,6 +117,10 @@
     // Конец СтандартныеПодсистемы.КонтактнаяИнформация
 КонецПроцедуры
 
+&НаКлиенте
+Процедура ПередЗаписью(Отказ, ПараметрыЗаписи)
+	ПроверитьИИсправитьВидыКонтактнойИнформацииНаСервере();
+КонецПроцедуры
 
 #КонецОбласти
 
@@ -209,3 +213,8 @@
 // Конец СтандартныеПодсистемы.КонтактнаяИнформация
 
 #КонецОбласти
+
+&НаСервере
+Процедура ПроверитьИИсправитьВидыКонтактнойИнформацииНаСервере()
+	Справочники.узКонтрагенты.ПроверитьИИсправитьВидыКонтактнойИнформации();
+КонецПроцедуры