Разложение юридического адреса при его добавлении

Форум Учет и отчетность Бухгалтерский учет и налоги (БУ)

1С:Бухгалтерия 2.0 Платформа 1С v8.3

1. aximo 2104 02.06.14 08:17 Сейчас в теме

Создаю программно контрагента в конфе Бух 2.0
добавляю ему юридический адрес "по полям"

        ЗаписьКИ = КИ.СоздатьМенеджерЗаписи();
        ЗаписьКИ.Объект = ВыбКонтрагент.Ссылка;
        ЗаписьКИ.Вид = Справочники.ВидыКонтактнойИнформации.ЮрАдресКонтрагента;
        ЗаписьКИ.Тип = Перечисления.ТипыКонтактнойИнформации.Адрес;
        
        ЗаписьКИ.Представление = ЮрАдрКонтр.ПредстАдреса;
        
        ЗаписьКИ.Поле1             = ЮрАдрКонтр.Индекс;        
        ЗаписьКИ.Поле2             = ЮрАдрКонтр.Регион;
        ЗаписьКИ.Поле3             = ЮрАдрКонтр.Район;
        ЗаписьКИ.Поле4             = ЮрАдрКонтр.Город;        
        ЗаписьКИ.Поле5             = "";
        ЗаписьКИ.Поле6             = ЮрАдрКонтр.Улица;        
        ЗаписьКИ.Поле7             = ЮрАдрКонтр.Дом;        
        
        
        ЗаписьКИ.Записать(Истина);

Показать

проблема, адрес почему-то записывается в произвольной форме.

Если СтруктураАдреса.Свойство("ЗаПределамиРФ") Тогда            
        Объект.Поле1 = СтруктураАдреса.Страна;
        Объект.Представление = СтруктураАдреса.Представление;        
    Иначе
        Объект.Поле1 = СтруктураАдреса.Индекс;
        Объект.Поле2 = СтруктураАдреса.Регион;
        Объект.Поле3 = СтруктураАдреса.Район;
        Объект.Поле4 = СтруктураАдреса.Город;
        Объект.Поле5 = СтруктураАдреса.НаселенныйПункт;
        Объект.Поле6 = СтруктураАдреса.Улица;
        Объект.Поле7 = СтруктураАдреса.Дом;
        Объект.Поле8 = СтруктураАдреса.Корпус;
        Объект.Поле9 = СтруктураАдреса.Квартира;
        
        //Определяем представление сразу же

        Объект.Представление = ПолучитьПредставлениеАдреса(Объект);
    КонецЕсли;

Показать

непонятно, что есть "ЗаПределамиРФ". как железно закрепить, чтобы адрес расписывался по полям, а не "Представлением"?

спасибо.

Ответы

Подписаться на ответы Инфостарт бот

Свернуть все

2. YNik 02.06.14 10:44 Сейчас в теме

(1) aximo, чтобы свойство ЗаПределамиРФ не было истиной. надо, чтобы в представлении адреса была 9 или 12 запятых.

3. aximo 2104 02.06.14 16:40 Сейчас в теме

(2) что-то не сработало... нет ли примерчика понятного... второй день бьюсь

4. YNik 02.06.14 19:55 Сейчас в теме

(3) aximo, вот как в программе формируется представление (9 запятых):

Представление = 
	СокрЛП(КодСтраны) + "," 
	+ СокрЛП(Поле1) + ","
	+ СокрЛП(Поле2) + ","
	+ СокрЛП(Поле3) + ","
	+ СокрЛП(Поле4) + ","
	+ СокрЛП(Поле5) + ","
	+ СокрЛП(Поле6) + ","
	+ СокрЛП(Поле7) + ","
	+ СокрЛП(Поле8) + ","
	+ СокрЛП(Поле9);

Показать

а в представлении, которое выводится на форму, программа убирает лишние запятые и пустые поля.

Оставьте свое сообщение

E-mail: