Форум программистов, компьютерный форум CyberForum.ru

1С: Собственные программы

Войти
Регистрация
Восстановить пароль
 
Neophyte1C
2 / 2 / 4
Регистрация: 18.08.2016
Сообщений: 50
#1

1C 8.x Создать элемент контактной информации (факс) - 1С

15.12.2016, 13:07. Просмотров 221. Ответов 0
Метки нет (Все метки)

Приветствую всех.

Вопрос возник у меня. Мне надо у контрагента в его контактной информации "Телефон контрагента 1" перенести в "Факс контрагента", который ещё не создан.

Делаю так:

1C
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
Запрос = Новый Запрос;                          
    Запрос.Текст = "ВЫБРАТЬ
                   |    КонтактнаяИнформация.Представление,
                   |    Контрагенты.Наименование
                   |ИЗ
                   |    РегистрСведений.КонтактнаяИнформация КАК КонтактнаяИнформация
                   |        ВНУТРЕННЕЕ СОЕДИНЕНИЕ Справочник.Контрагенты КАК Контрагенты
                   |        ПО КонтактнаяИнформация.Объект = Контрагенты.Ссылка
                   |ГДЕ
                   |    КонтактнаяИнформация.Вид = &Вид
                   //|  Или КонтактнаяИнформация.Вид = &Вид1)
                   |    И КонтактнаяИнформация.Тип = &Тип
                   |    И КонтактнаяИнформация.Объект = &Объект";                                       
    Запрос.УстановитьПараметр("Вид",Справочники.ВидыКонтактнойИнформации.НайтиПоКоду("000011872")); 
    //Запрос.УстановитьПараметр("Вид1",Справочники.ВидыКонтактнойИнформации.НайтиПоКоду("000011872"));
    Запрос.УстановитьПараметр("Тип",Перечисления.ТипыКонтактнойИнформации.Телефон);
    Запрос.УстановитьПараметр("Объект",СсылкаНаОбъект);
        Результат = Запрос.Выполнить().Выгрузить();                     
    Для каждого Строка из Результат Цикл
 
            ЗаписьРегистра = РегистрыСведений.КонтактнаяИнформация.СоздатьМенеджерЗаписи();     
            ЗаписьРегистра.Объект = СсылкаНаОбъект;     
            ЗаписьРегистра.Вид = Справочники.ВидыКонтактнойИнформации.ФаксКонтрагента;      
            ЗаписьРегистра.Тип = Перечисления.ТипыКонтактнойИнформации.Телефон;         
            ЗаписьРегистра.Представление = Строка.Представление;    
            ЗаписьРегистра.Записать(Истина);  
 
    КонецЦикла;
Но в ответ ничего не происходит, не создаётся "Факс контрагента" с перенесённым номером. Показано на рисунке.

С другим кодом, тоже самое - ничего.

1C
1
2
3
4
5
6
7
8
КИ = РегистрыСведений.КонтактнаяИнформация.СоздатьНаборЗаписей();
            КИ.Отбор.Объект.Установить(СсылкаНаОбъект);
            Факс = КИ.Добавить();
            Факс.Объект = СсылкаНаОбъект;
            Факс.Тип    = Перечисления.ТипыКонтактнойИнформации.Телефон;
            Факс.Вид    = Справочники.ВидыКонтактнойИнформации.ФаксКонтрагента;
            Факс.Представление = Строка.Представление;
            КИ.Записать();
Подскажите, что не так делаю?
Миниатюры
Создать элемент контактной информации (факс)  
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
15.12.2016, 13:07     1C 8.x Создать элемент контактной информации (факс)
Посмотрите здесь:

Выборка контактной информации из запроса - 1С
Доброго времени суток. в УТ 10.3 написал следующие строки выборки контактной информации из запроса: Запрос = Новый Запрос; ...

Виды контактной информации непонятные элементы - 1С
Добрый день всем. Ситуация такова. Пришел обновлять типовую конфу БП 2.0, бух говорит что пропали поля ввода адресов при создании...

1C 8.x Порядок типов контактной информации в карточке контрагента - 1С
Всем доброго времени суток. В 1С 8.2, УТ10.3, в карточке контрагента есть вкладка контактная информация. Хочу добавить новый вид...

Выбрать и адрес, и телефон, и ящик из контактной информации - 1С
Привет. У меня тут снова вопрос родился. Мне надо получить контактную информацию(адрес, телефон и мыло), делаю вот так Запрос2 =...

Построить описание класса, содержащего информацию о контактной информации организации - Python
Построить описание класса, содержащего информацию о контактной информации организации (почтовый адресе, e-mail, 2 телефона). Предусмотреть...

Drupal, ubercart и payonline оформление заказа и передача контактной информации - PHP
Есть проблема Стоит Drupal, на нее нацеплен ubercart и привязана оплата картой через payonline При оформлении заказа, нас...

ФАКС!!!!!!!!!!!!!!!! - MS Word
Помогите!!!!!!!!!!!!!!((((((((((((((((( Завтра экзамен!!!!!!!!!!!!!!!!((((((((((((((((((((

Факс из ACCESS - MS Access
Имется ли возможность отправки факсов из ACCESS (Например, отчёт) С отправкой Е-mail нет проблем.

Факс-сервер - Сети
Привет всем! Я на самом деле сомневаюсь, что правильно выбрал тему, но все же. Может сталкивался кто, появилась необходимость...

Факс VentaFax - Софт
Установил, не могу настроить, может кто нибудь подскажет настройки подключения к модему?

Факс работает некорректно - Принтеры, МФУ
Добрый день!!! Мфу HP LaserJet M1530, при отправке факса, я набираю номер адресата, в это время факс фиксирует входящий факс , идет...

Рanasonic kx-ft 31 не принимает факс - Телефония
Всем привет! Ув. форумчане столкнулся с проблемой факс panasonic kx-ft 31 не принимает факс т. е. принимает но не полностью до половины и...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru