Различия

Здесь показаны различия между двумя версиями данной страницы.

Ссылка на это сравнение

Предыдущая версия справа и слева Предыдущая версия
Следующая версия
Предыдущая версия
Следующая версия Следующая версия справа и слева
шлюз_выгрузка:сформировать_хоз_субъект [2018/08/02 14:31]
misha
шлюз_выгрузка:сформировать_хоз_субъект [2018/08/02 14:51]
misha
Строка 1: Строка 1:
-====== Пример формирования ​документа для выгрузки в АСП:​Шлюз ======+====== Пример формирования ​хозяйствующего субъекта для выгрузки в АСП:​Шлюз ======
  
 <1c> <1c>
Строка 23: Строка 23:
  ХозСубъект.Комментарий = "​перенесено через XDTO";  ХозСубъект.Комментарий = "​перенесено через XDTO";
   
- // Управляемые формы //#2 +
- //Если Контрагент.КонтактнаяИнформация.Количество() > 0 Тогда +
- // Для каждого Инф из Контрагент.КонтактнаяИнформация Цикл  +
- //​ Если Инф.Тип = Перечисления.ТипыКонтактнойИнформации.Адрес Тогда  +
- //          ХозСубъект.Адрес = Инф.Представление;​ +
- //​ Прервать;​ +
- //​ КонецЕсли;​ +
- //​ КонецЦикла;​ +
- //​Иначе +
- //​ Возврат Строка(Контрагент.Наименование)+":​ необходимо заполнить контактную информацию.";​ +
- //​КонецЕсли;​+
   
  // Обычные формы //#2  // Обычные формы //#2
Строка 77: Строка 67:
 ++++ ++++
  
-++++#Заполнение адреса+++++#Заполнение адреса 
 +
 +На управляемых формах адрес Хоз. субъекта можно получить следующим способом ​
 <1c> <1c>
 +Если Контрагент.КонтактнаяИнформация.Количество() > 0 Тогда 
 + Для каждого Инф из Контрагент.КонтактнаяИнформация Цикл  
 + Если Инф.Тип = Перечисления.ТипыКонтактнойИнформации.Адрес И Инф.Вид = Справочники.ВидыКонтактнойИнформации.ЮрАдресКонтрагента Тогда //​Инф.Вид = Справочники.ВидыКонтактнойИнформации.ФактАдресКонтрагента 
 +          ХозСубъект.Адрес = Инф.Представление;​ 
 + Прервать;​ 
 + КонецЕсли;​ 
 + КонецЦикла;​ 
 +Иначе 
 + Возврат Строка(Контрагент.Наименование)+":​ необходимо заполнить контактную информацию.";​ 
 +КонецЕсли;​
 </1c> </1c>
 +Для обычных форм это может быть:
 <1c> <1c>
 +ХозСубъект.Адрес = УправлениеКонтактнойИнформацией.ПолучитьАдресИзКонтактнойИнформации(Контрагент,​ "​Юридический"​);​ 
 +</​1c>​ 
 +или 
 +<​1c>​ 
 +ХозСубъект.Адрес = УправлениеКонтактнойИнформацией.ПолучитьАдресИзКонтактнойИнформации(Контрагент,​ "​Фактический"​);​
 </1c> </1c>
 ++++ ++++