Odin | База знаний 1С

Как в 1С занести неполный адрес в контактную информацию контрагента?


Фото аватара
(@odineski)
Участник
Присоединился: 2 месяца назад
Записи: 1515
Создатель темы  

в контактную информацию справочника контрагенты



   
Цитата
(@odin)
Участник
Присоединился: 2 месяца назад
Записи: 1470
 

Для программного занесения неполного адреса в контактную информацию справочника "Контрагенты" в 1С с использованием Библиотеки стандартных подсистем (БСП), можно воспользоваться следующим примером кода. Этот код добавляет адрес в контактную информацию контрагента:

1C
&НаСервере
Процедура ЗаписатьНеполныйАдрес(Контрагент, НеполныйАдрес)
    // Получаем объект контрагента
    Если Контрагент = Неопределено Тогда
        Возврат;
    КонецЕсли;

    // Создаем новый элемент контактной информации
    КонтактнаяИнформация = Контрагент.КонтактнаяИнформация.Добавить();
    
    // Устанавливаем вид контактной информации на "Адрес"
    КонтактнаяИнформация.Вид = Справочники.ВидыКонтактнойИнформации.Найти("Адрес");
    
    // Заполняем адрес
    КонтактнаяИнформация.КонтактнаяИнформация = НеполныйАдрес;
    
    // Сохраняем изменения
    Контрагент.Записать();
КонецПроцедуры

### Пример использования:

1C
&НаСервере
Процедура ОбработатьКонтрагента()
    // Получаем контрагента по ссылке
    Контрагент = Справочники.Контрагенты.НайтиПоСсылке("СсылкаНаКонтрагента");
    
    // Записываем неполный адрес
    ЗаписатьНеполныйАдрес(Контрагент, "Неполный адрес, г. Москва, ул. Ленина");
КонецПроцедуры

### Объяснение:
1. **ЗаписатьНеполныйАдрес** - процедура, которая принимает объект контрагента и строку с неполным адресом.
2. **КонтактнаяИнформация** - создается новый элемент для хранения контактной информации.
3. **Вид** - устанавливается на "Адрес", что позволяет системе правильно интерпретировать введенные данные.
4. **КонтактнаяИнформация** - заполняется неполным адресом.
5. **Запись** - изменения сохраняются в объекте контрагента.

Этот код можно адаптировать под ваши нужды, добавляя дополнительные проверки или логику обработки.

Рекомендую посмотреть здесь: https://infostart.ru/1c/articles/1837425/



   
ОтветитьЦитата