Форум программистов, компьютерный форум, киберфорум
Наши страницы

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

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

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

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

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

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

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

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

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

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

0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
15.12.2016, 13:07
Привет! Вот еще темы с ответами:

Структура "Информация": - носитель; - объем; - название; - автор. Удалить первый элемент с заданным объемом информации, добавить элемент перед элемент - C++
Структура "Информация": - носитель; - объем; - название; - автор. Удалить первый элемент с заданным объемом информации, добавить...

Удалить первый элемент с заданным объемом информации, добавить элемент перед элементом с указанным номером - C++
Структура "Информация": - носитель; - объем; - название; - автор. Удалить первый элемент с заданным объемом информации, добавить...

Доработка структуры (удалить первый элемент с заданным объемом информации, добавить элемент перед элементом с указанным номером) - C++
//--------------------------------------------------------------------------- ЗАДАНИЕ:Создать двоичный файл из элементов , заданных...

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


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

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Опции темы

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