Создание в КА 2 контактной информации Партнера

1С v8

26.01.19

✎

20:41

Необходимо создать программно АдресЭП, Телефон, АдресФакт...Из эксель.
Создается один реквизит например телефон
СозданиеКонтактнойИнформации.Вид = Справочники.ВидыКонтактнойИнформации.ТелефонПартнера;
СозданиеКонтактнойИнформации.Тип = Перечисления.ТипыКонтактнойИнформации.Телефон;
СозданиеКонтактнойИнформации.Представление = ТелефонК;

Какой дальнейший код должен быть, что бы заполнить все остальные реквизиты?
Например если повторить процедуру с представоением другого реквизита, все просто перезапишется на следующий и все...
На других форумах такой вопрос только по одному реквизиту, у меня же их три...как делать? Спасибо!

1 Мимохожий Однако

26.01.19

✎

20:50

Копипаста. Потом замени Телефон на АдресЭП.

2 leon92

26.01.19

✎

22:11

Решил так
     СозданиеКонтактнойИнформации1 = СоздаюПартнера.КонтактнаяИнформация.Добавить();
     СозданиеКонтактнойИнформации1.Вид = Справочники.ВидыКонтактнойИнформации.ТелефонПартнера;
     СозданиеКонтактнойИнформации1.Представление = ТелефонК;
     СозданиеКонтактнойИнформации2 = СоздаюПартнера.КонтактнаяИнформация.Добавить();
     СозданиеКонтактнойИнформации2.Вид = Справочники.ВидыКонтактнойИнформации.EmailПартнера;
     СозданиеКонтактнойИнформации2.Представление = ЭлПочта;
     СозданиеКонтактнойИнформации3 = СоздаюПартнера.КонтактнаяИнформация.Добавить();
     СозданиеКонтактнойИнформации3.Вид = Справочники.ВидыКонтактнойИнформации.АдресПартнера;
     СозданиеКонтактнойИнформации3.Представление = КонтрагентПредставлениеАдреса;
     СозданиеКонтактнойИнформации4 = СоздаюПартнера.КонтактнаяИнформация.Добавить();
     СозданиеКонтактнойИнформации4.Город = ГородКонтрагента;
     СозданиеКонтактнойИнформации4.Регион = РегионКонтрагента;