Как получить город из адреса партнера

Форум Программирование Общие вопросы программирования (Dev)

1. user87385463 12.12.24 12:15 Сейчас в теме

Всем привет, ЕРП

Какой функцией получить город из справочника партнеры? Или контрагенты

По теме из базы знаний

Как продавать, не продавая? Сарафан для 1с-ника
История изменения контактной информации контрагентов, на примере cохранения истории изменений адресов партнеров и контрагентов, для УТ 11.2
Загрузка адресов произвольного формата (КЛАДР и нестандартных "грязных" адресов) в ФИАС современных конфигураций из 1С 7.7
Не спеша, эффективно и правильно – путь разработки. Часть 3. Практика
Service desk in ITIL 4: что изменилось?

Ответы

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

Свернуть все

2. user1803583 12.12.24 13:39 Сейчас в теме

точно не помню какая функция, просто в глобал поиск напиши СведениеОКонтрагенте

3. VmvLer 12.12.24 13:40 Сейчас в теме

РаботаСАдресами.ГородАдресаКонтактнойИнформации(Адрес)

если "город" это село, то глобальным поиском по модулям ищите по тегу "НаселенныйПункт"

4. VmvLer 12.12.24 13:50 Сейчас в теме

наиболее верно использовать метод

БизнесСеть.ПредставлениеПоследнегоРегионаАдреса(Адрес, Ошибка)

// Представление последнего региона в адресе.
//
// Параметры:
//  Адрес - Строка - адрес во внутреннем формате JSON, XML.
//  Отказ - Булево - признак ошибки выполнения.
// 
// Возвращаемое значение:
//  Строка - значение последнего заполненного уровня региона.
//
Функция ПредставлениеПоследнегоРегионаАдреса(Адрес, Ошибка) Экспорт
	
	Сведения = РаботаСАдресами.СведенияОбАдресе(Адрес);
	Если Не ЗначениеЗаполнено(Сведения) Тогда
		Возврат "";
	КонецЕсли;
	
	Результат = "";
	Если Сведения.Свойство("НаселенныйПункт") И ЗначениеЗаполнено(Сведения.НаселенныйПункт) Тогда
		Результат = Сведения.НаселенныйПункт + " " + Сведения.НаселенныйПунктСокращение;
	ИначеЕсли Сведения.Свойство("Город") И ЗначениеЗаполнено(Сведения.Город) Тогда
		Результат =  Сведения.Город + " " + Сведения.ГородСокращение;
	ИначеЕсли Сведения.Свойство("Район") И ЗначениеЗаполнено(Сведения.Район) Тогда
		Результат =  Сведения.Район + " " + Сведения.РегионСокращение;
	ИначеЕсли Сведения.Свойство("Регион") И ЗначениеЗаполнено(Сведения.Регион) Тогда
		Результат =  Сведения.Регион + " " + Сведения.РегионСокращение;
	ИначеЕсли Сведения.Свойство("Страна") И ЗначениеЗаполнено(Сведения.Страна) Тогда
		Результат =  Сведения.Страна;
	КонецЕсли;
	
	Возврат Результат;

КонецФункции

Показать

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

E-mail: