Имя: Пароль:
1C
1С v8
Создание партнеров на основании контрагентов
,
0 Aleksei_Pro
 
04.12.13
21:25
Написал код , вопрос почему контактная информация не переносится, в отладке стоит и показывает что есть :

    Запрос = Новый Запрос;
    Запрос.Текст =
        "ВЫБРАТЬ
        |    Контрагенты.Ссылка,
        |    Контрагенты.Наименование,
        |   Контрагенты.НаименованиеПолное,
        |    Контрагенты.Партнер
        |ИЗ
        |    Справочник.Контрагенты КАК Контрагенты";

    Результат = Запрос.Выполнить();

    ВыборкаДетальныеЗаписи = Результат.Выбрать();

    Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
        
        Спр=Справочники.Партнеры.СоздатьЭлемент();
        Спр.Наименование=ВыборкаДетальныеЗаписи.Наименование;
        Спр.НаименованиеПолное=ВыборкаДетальныеЗаписи.НаименованиеПолное;
        Спр.Клиент=Клиент;
        Спр.Поставщик=Поставщик;
        Спр.ПрочиеОтношения=ПрочиеОтношения;
        Спр.ЮрФизЛицо=Перечисления.КомпанияЧастноеЛицо.Компания;
        
        ТЗ = ВыборкаДетальныеЗаписи.Ссылка.КонтактнаяИнформация.Выгрузить();
        Спр.КонтактнаяИнформация.Загрузить(ТЗ);
        
        Спр.Записать();
        Конт=ВыборкаДетальныеЗаписи.Ссылка.ПолучитьОбъект();
        Конт.Партнер=Спр.Ссылка;
        Конт.Записать();
        Сообщить("Партнер "+Спр.Наименование+" Создан");        
        
    КонецЦикла;
1 Ярус
 
04.12.13
21:33
что типа владельца нет?
2 Ярус
 
04.12.13
21:34
тьфу опять не дочитал
3 Ярус
 
04.12.13
21:35
а там не в рс эта инфа сидит?
4 Aleksei_Pro
 
04.12.13
21:36
нет , УТ11
5 Aleksei_Pro
 
04.12.13
21:39
есть мысли?
6 zakidonoff
 
04.12.13
21:43
(5) Есть. Ты пытаешься забрать контактную информацию программно из темповой таблицы справочника контрагента, которая заполняется лишь при открытии формы его карточки.
Понятно изъясняюсь?
7 Aleksei_Pro
 
04.12.13
21:43
(6) как правильно сделать?
8 MKZM
 
04.12.13
21:44
(6) Больше чем. Сделать реквизит?
9 zakidonoff
 
04.12.13
21:45
(7) КИ = РегистрыСведений.КонтактнаяИнформация.СоздатьНаборЗАписей();
КИ.Отбор
...
и т.д аккурат по справке.
10 Aleksei_Pro
 
04.12.13
21:48
(9) какой регистр сведений.....это УТ11
11 Aleksei_Pro
 
04.12.13
21:53
И не одного ответа, все как будто с УТ11 не работали и не знают что регистра сведений там нет.
12 MKZM
 
04.12.13
21:59
(0) Как узнал что не переносится?
13 MKZM
 
04.12.13
22:01
ВыборкаДетальныеЗаписи.Ссылка.КонтактнаяИнформация.Выгрузить();
Может тут?
14 Aleksei_Pro
 
04.12.13
22:16
в справочнике пусто, хотя отладчиком если смотреть то все есть.
15 MKZM
 
04.12.13
22:17
А вообще херня полная
16 MKZM
 
04.12.13
22:19
Ну ответ в (1)
17 zakidonoff
 
04.12.13
22:30
(10) Ну да. И ты указывал. Извини, сплю (
Отладчик где говорит, что инфа есть?
Здесь?
ВыборкаДетальныеЗаписи.Ссылка.КонтактнаяИнформация.Выгрузить();
Или здесь?
Спр.КонтактнаяИнформация.Загрузить(ТЗ);

И есть именно инфа или таблица значений с одной строкой и пустыми полями?
18 Aleksei_Pro
 
04.12.13
22:32
(17)после записи справочника.
19 zakidonoff
 
04.12.13
22:36
(18) УФ?
20 Aleksei_Pro
 
04.12.13
22:49
да
21 zakidonoff
 
04.12.13
23:05
(20) Конфликт с процедурами при записи\обработкой заполнения.
Записываешь зависимые объекты - там стоят перекрёстные процедуры заполнения КИ контрагента из партнёра.
Когда записываешь контрагента - КИ есть. Когда записываешь партнёра - КИ контрагента затираются...
Наверное, как-то так. Лень ковыряться. Да и конфы под рукой нет.
Посмотри что в таблице КИ контрагента после записи партнёра.
22 m-serg74
 
04.12.13
23:09
(20), (21) не там виды контактной информации предопределнные из справочника он с видом АдресКонтрагента, например грузит, а форма партнера ищет с видом АдресПартнера, а такой нету
23 zakidonoff
 
04.12.13
23:10
(22) Была такая мысль, ога. Но нет конфигуратора сейчас, чтобы проверить. Думал, это очевидно и не предлагать -)
В общем, спкнч всем.
24 m-serg74
 
04.12.13
23:14
(20) так что у партнеров групповой обработкой какой нить виды с контрагентных на партнерных поменяй
Компьютеры — прекрасное средство для решения проблем, которых до их появления не было.