8.х Загрузить адреса

Тема в разделе "Конфигурирование на платформе "1С:Предприятие 8"", создана пользователем OIT, 13 мар 2008.

  1. AlexFF
    Offline

    AlexFF Разбирающийся

    Регистрация:
    6 мар 2007
    Сообщения:
    565
    Симпатии:
    1
    Баллы:
    26
    Она в конфигурации (это я про Зуп 2.5.6.4) в ветке обработки. Собственно когда Вы начинаете работать с контактной информацией Вы работаете с этой обработкой.
  2. bash
    Offline

    bash

    Регистрация:
    3 апр 2008
    Сообщения:
    6
    Симпатии:
    0
    Баллы:
    1
    Плиз хелп. У меня тоже проблема с загрузкой адресов. При заполнении адреса он автоматом проставляет что адрес НЕ российский. Можно как-то ему указать что адрес российский? у меня ЗУП 2.1.
    Заранее благодарю))
  3. AlexFF
    Offline

    AlexFF Разбирающийся

    Регистрация:
    6 мар 2007
    Сообщения:
    565
    Симпатии:
    1
    Баллы:
    26
    а там разве нет в явном виде признака для типа адреса.
    сейчас нет под рукой Зуп. вечером посмотрю.
  4. LxS
    Offline

    LxS Разработчик

    Регистрация:
    5 апр 2007
    Сообщения:
    680
    Симпатии:
    0
    Баллы:
    26
    В справочнике ВидыКонтактнойИнформации посмотри тип и наименование адреса своего.
  5. bash
    Offline

    bash

    Регистрация:
    3 апр 2008
    Сообщения:
    6
    Симпатии:
    0
    Баллы:
    1
    извините что пропал на столь долгий срок....

    Код:
    рс=РегистрыСведений.КонтактнаяИнформация.СоздатьМенеджерЗаписи();
    рс.Объект=Справочники.ФизическиеЛица.НайтиПоКоду("25");
    
    рс.вид=Справочники.ВидыКонтактнойИнформации.ФактАдресФизЛица;
    //ИнформАдресФизЛица.Предопределенный;
    рс.тип=Перечисления.ТипыКонтактнойИнформации.Адрес;
    рс.Активность=Истина;
    
    рс.поле1="111222";	
    рс.поле2="Санкт-Петербург г";	
    рс.поле4="Зеленогорск г";	
    рс.поле6="Хреновая ул";	
    рс.поле7="7";	
    рс.поле8="8";	
    рс.поле9="9";
    рс.Представление="111222, Санкт-Петербург г, Зеленогорск г, Хреновая ул";
    рс.Записать();
    
    
  6. Melanto
    Offline

    Melanto Опытный в 1С

    Регистрация:
    28 ноя 2007
    Сообщения:
    204
    Симпатии:
    0
    Баллы:
    26
    Код:
    рс=РегистрыСведений.КонтактнаяИнформация.СоздатьМенеджерЗаписи();
    рс.поле1="111222";    
    рс.поле2="Санкт-Петербург г";    
    рс.поле4="Зеленогорск г";    
    рс.поле6="Хреновая ул";    
    рс.поле7="7";    
    рс.поле8="8";    
    рс.поле9="9";
    рс.Представление="111222, Санкт-Петербург г, Зеленогорск г, Хреновая ул";
    рс.Записать();
    
    
    
    [/quote]

    Мне кажется, что порядок заполнения полей может влиять на то, куда определяется адрес.
    У меня при переброса из 1сУТ КИ формирует такую последовательность полей, и в 1сБ определяет такую запись как Российский адрес
    <КИ Тип="Адрес" Вид="Фактический адрес юр.лица"
    Представление="125167, Москва, Ленинградский пр-т, дом № 62"
    П1="125167" П2="" П3="" П4="Москва" П5="" П6="Ленинградский пр-т" П7="62" П8="" П9="" П10=""/>

    (При переносе тупо П1=П1 и т.д.... Т.е. город не в Поле2, а в Поле4)
  7. bash
    Offline

    bash

    Регистрация:
    3 апр 2008
    Сообщения:
    6
    Симпатии:
    0
    Баллы:
    1
    не получилось(((
  8. LxS
    Offline

    LxS Разработчик

    Регистрация:
    5 апр 2007
    Сообщения:
    680
    Симпатии:
    0
    Баллы:
    26
    Код:
                    Менеджер = РегистрыСведений.КонтактнаяИнформация.СоздатьМенеджерЗаписи();
    Менеджер.Объект                              = Спр.Ссылка;
    Менеджер.Вид                                   = Справочники.ВидыКонтактнойИнформации.НайтиПоКоду("00001");
    Менеджер.Тип                                    = Перечисления.ТипыКонтактнойИнформации.Адрес;
    Менеджер.Поле1                                = СокрЛП(Результат.Поле1);
    Менеджер.Поле2                                = СокрЛП(Результат.Поле2);
    Менеджер.Поле3                                = СокрЛП(Результат.Поле3);
    Менеджер.Поле4                                = СокрЛП(Результат.Поле4);
    Менеджер.Поле5                                = СокрЛП(Результат.Поле5);
    Менеджер.Поле6                                = СокрЛП(Результат.Поле6);
    Менеджер.Поле7                                = СокрЛП(Результат.Поле7);
    Менеджер.Поле8                                = СокрЛП(Результат.Поле8);
    Менеджер.Поле9                                = СокрЛП(Результат.Поле9);
    Менеджер.Поле10                              = СокрЛП(Результат.Поле10);
    Менеджер.Представление                  = Результат.Представление;
    Менеджер.Записать();
    
    
    
    
    
    
    
    В видах контактной информации у меня такая картина:

    Вложения:

    • Snap1.png
      Snap1.png
      Размер файла:
      21,8 КБ
      Просмотров:
      138
  9. bash
    Offline

    bash

    Регистрация:
    3 апр 2008
    Сообщения:
    6
    Симпатии:
    0
    Баллы:
    1
    хм... ну да у меня тоже самое....
  10. bash
    Offline

    bash

    Регистрация:
    3 апр 2008
    Сообщения:
    6
    Симпатии:
    0
    Баллы:
    1

Поделиться этой страницей