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