Имя: Пароль:
1C
1С v8
добавление записей в РегистрыСведений.КонтактнаяИнформация
0 lucifer
 
27.03.12
13:11
ФактАдрес="тут адрес";
КИ = РегистрыСведений.КонтактнаяИнформация.СоздатьНаборЗаписей();
    КИ.Отбор.Объект.Значение = ПолеВвода1;// ПолеВвода1 - поле на форме, тип СправочникСсылка.Контрагенты
    КИ.Отбор.Объект.Использование = Истина;
    КИ.Прочитать();
    НоваяЗаписьКИ = КИ.Добавить();
    НоваяЗаписьКИ.Объект =ПолеВвода1;// ПолеВвода1 - поле на форме, тип СправочникСсылка.Контрагенты
    НоваяЗаписьКИ.Тип = Перечисления.ТипыКонтактнойИнформации.Адрес;
    НоваяЗаписьКИ.Вид = Справочники.ВидыКонтактнойИнформации.ФактАдресКонтрагента;
    НоваяЗаписьКИ.Представление = ФактАдрес;
    НоваяЗаписьКИ.ЗначениеПоУмолчанию = Истина;
    КИ.Записать();

данный код нарыл в интернете, работает он нормально, в данном случаи идет запись фактического адреса у выбранного контрагента. Но если запись уже есть то выскакивает ошибка, не пойму как поставить условие на проверку пустое значение или нет ?
1 Naumov
 
27.03.12
13:20
А за чем прочитать перед перезаписью?
сделал набор, отбор по измерениям, добавил запись, записал с затиранием прежних записей.
2 lucifer
 
27.03.12
13:25
(1) все гениальное просто )) спасибо