0
Олег
29.08.12
✎
10:29
|
8.2 УПП 2.8.11.5 + БИТ Финанс
Делаю так:
КонтактныеДанные = РегистрыСведений.КонтактнаяИнформация.СоздатьМенеджерЗаписи();
Для каждого СтрТЧ Из ТЧ Цикл
Если ПустаяСтрока(СтрТЧ.Адрес) Тогда
Продолжить;
КонецЕсли;
КонтактныеДанные.Объект = СтрТЧ.Пользователь.Ссылка;
//КонтактныеДанные.Период = '20120101000000';
КонтактныеДанные.Тип = Перечисления.ТипыКонтактнойИнформации.АдресЭлектроннойПочты;
КонтактныеДанные.Вид = Справочники.ВидыКонтактнойИнформации.СлужебныйАдресЭлектроннойПочтыПользователя;
КонтактныеДанные.Представление = СтрТЧ.Адрес;
Попытка
КонтактныеДанные.Записать(Ложь);
Исключение
Сообщить(ОписаниеОшибки());
КонецПопытки;
КонецЦикла;
Не записывает и всё, молча, тихо не пишет и всё хоть убейся. В отладчике на N-м переходе в общих модулях теряюсь. Грешу на БИТ финанс.
ЗЫ:
В типовой записано так, недавно обнаружил:
ЗаписьКонтактнойИнформации = РегистрыСведений.КонтактнаяИнформация.СоздатьМенеджерЗаписи();
ЗаписьКонтактнойИнформации.Тип = Перечисления.ТипыКонтактнойИнформации.АдресЭлектроннойПочты;
ЗаписьКонтактнойИнформации.Вид = ВидКонтактнойИнформации;
ЗаписьКонтактнойИнформации.Объект = НовыйОбъект.Ссылка;
ЗаписьКонтактнойИнформации.Представление = АдресЭлектроннойПочты;
Попытка
ЗаписьКонтактнойИнформации.Записать(Ложь);
Исключение
Сообщить(ОписаниеОшибки());
ФиксироватьТранзакцию = Ложь;
КонецПопытки;
Уже руками быстрее бы вбил почту пользователей, но интересно в чём причина.
|
|