Имя: Пароль:
1C
1С v8
Создание в КА 2 контактной информации Партнера
,
0 leon92
 
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.Регион = РегионКонтрагента;
Пользователь не знает, чего он хочет, пока не увидит то, что он получил. Эдвард Йодан