Архив за месяц: Декабрь 2017

1С 8.3 Как программно получить сведения об организации или клиенте в виде структуры

Если у Вас одна из типовых конфигураций, то не обязательно делать кучу запросов, чтобы получить сведения об организации или контрагенте, такие, как фактический адрес, ИНН и пр. Достаточно выполнить функцию  УправлениеКонтактнойИнформацией.СведенияОЮрФизЛице.

Например, чтобы получить информацию об организации, можно поступить так

СведенияОНашейОрганизации = УправлениеКонтактнойИнформацией.СведенияОЮрФизЛице(текдоговор.Организация, ТекущаяДата(),,);

Второй параметр — это дата, на которую программа получает срез последней информации. Ведь контактные данные изменяются во времени.

Таким же образом получаем сведения о Контрагенте, передавая первым аргументом ссылочный тип «Справочники.Контрагенты», или же физическое лицо.

Вот как можно получить информацию о контрагенте.

СведенияОКонтрагенте = УправлениеКонтактнойИнформацией.СведенияОЮрФизЛице(Контрагент, ТекущаяДата());

Функция возврацает структуру, элементы которой содержат наиболее полную информацию о юридическом или физическом лице, чтобы использовать её для вывода на печать из одной только этой структуры. Вот неполный перечень наименований этих полей. Назначение их известно из названия.

  1. ПолноеНаименование
  2. ФактическийАдрес
  3. ЮридическийАдрес
  4. НомерСчета
  5. Банк
  6. МФО
  7. КодПоЕДРПОУ
  8. Банк

Пример вывода на печать типичной информации про одну из сторон подписанте договора:

ОблГлава10=макет.ПолучитьОбласть("Глава10");
ОблГлава10.Параметры.ИнфоНашейОрганизации = СокрЛП(СведенияОНашейОрганизации.ПолноеНаименование)+Символы.ПС
+"Юридична адреса: "+СокрЛП(СведенияОНашейОрганизации.ЮридическийАдрес)+Символы.ПС
+"Банківські реквізити: р/р "+СокрЛП(СведенияОНашейОрганизации.НомерСчета)+" в "+СокрЛП(СведенияОНашейОрганизации.Банк)+", МФО "+СокрЛП(СведенияОНашейОрганизации.МФО)
+" код ЄДРПОУ "+СокрЛП(СведенияОНашейОрганизации.КодПоЕДРПОУ)+Символы.ПС+"ІПН "+СокрЛП(СведенияОНашейОрганизации.ИНН);

 


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

Используем другую функцию

пример:

 

	ответственныеЛицаНашейОрганизации = ОбщегоНазначения.ОтветственныеЛица(текдоговор.Организация, ТекущаяДата());
	ответственныеЛицаКонтрагента = ОбщегоНазначения.ОтветственныеЛицаКонтрагента(Ссылка,ТекущаяДата());
        НашРуководитель =  ответственныеЛицаНашейОрганизации.Руководитель;
       .......
Возвращаемая структура будет иметь элементы с наименованиями Руководитель, Кассир, Бухгалтер и т.д.