Форум на Kuban.ru (http://forums.kuban.ru/)
-   Территория 1С (http://forums.kuban.ru/f1040/)
-   -   Как программно получить адрес предприятия? (http://forums.kuban.ru/f1040/kak_programmno_poluchit-_adres_predpriyatiya-8987786.html)

goto8 23.11.2019 18:28

Как программно получить адрес предприятия?
 
1С:Предприятие 8.3 (8.3.15.1700)
Бухгалтерия предприятия, редакция 3.0 (3.0.72.72)
Рисую внешнюю печатную форму к Реализации. Адрес контрагента получаю вот так:

Контрагент = СсылкаНаДокумент.Контрагент;
ТабЧасть = Контрагент.КонтактнаяИнформация;
ПараметрыОтбора = Новый Структура;
КонтактИнформ = ПредопределенноеЗначение("Справочник.ВидыКонтактнойИнформации.ЮрАдресКонтрагента");
ПараметрыОтбора.Вставить("Вид", КонтактИнформ);
МассивСтрок = ТабЧасть.НайтиСтроки(ПараметрыОтбора);
ЮрАдресКонтра = МассивСтрок[0].Представление;

Всё работает.
Пытаюсь точно так же получить адрес организации:

Организация = СсылкаНаДокумент.Организация;
ТабЧастьОрг = Организация.КонтактнаяИнформация;
ПараметрыОтбОрг = Новый Структура;
КонтактИнфОрг = ПредопределенноеЗначение("Справочник.ВидыКонтактнойИнформации.ЮрАдресКонтрагента");
ПараметрыОтбОрг.Вставить("Вид", КонтактИнфОрг);
МассивСтрокОрг = ТабЧастьОрг.НайтиСтроки(ПараметрыОтбОрг);
ЮрАдресОрг = МассивСтрокОрг[0].Представление;

Пишет ошибку: "Индекс находится за границами массива". Как я понимаю, принцип хранения адреса организации отличается от контрагента. А как, в таком случае, этот адрес получить?

goto8 23.11.2019 18:31

Простите, был напуган. Разобрался.

goto8 23.11.2019 19:52

Блин.. А телефон организации как получить?

Trinitron 24.11.2019 08:02

Главное успокоится и спокойно во всём разобраться

USSR 24.11.2019 12:22

(0)Кури в сторону общего модуля "УправлениеКонтактнойИнформацией"

Климов Сергей 26.11.2019 17:53

Причина трабла тут:
КонтактИнфОрг = ПредопределенноеЗначение("Справочник.ВидыКонтактно йИнформации.ЮрАдресКонтрагента");

Нужен не ЮрАдресКонтрагента, а ЮрАдресОрганизации. Копипаста - враг! :)

31337 26.11.2019 18:00

МассивСтрок[0].Представление - афигенный код)) Хоть бы проверку сделал вдруг нет адреса, будет ошибка тогда.

Климов Сергей 26.11.2019 18:12

+6. Запросы рулят.

USSR 26.11.2019 18:45

В БП 3.0 уже все есть, не надо ничего выдумывать, никаких запросов, никаких предопределенных значений

Функция КонтактнаяИнформацияОбъекта(СсылкаИлиОбъект, ВидКонтактнойИнформации = Неопределено, Дата = Неопределено, ТолькоПредставление = Истина) Экспорт

Кондрат2 26.11.2019 19:52

А, завтра 1с поменяет набор функций и все полетит к чертям :(
Хотя, они и структуру данных могут поменять...

goto8 26.11.2019 20:46

[quote=Климов Сергей;47274516]ужен не ЮрАдресКонтрагента, а ЮрАдресОрганизации. Копипаста - враг! :)[/quote]
Спасибо, разобрался. Так и есть, копипаста - враг )
[quote=31337;47274532]афигенный код))[/quote]
Специалист из меня неважный, играю как умею.
[quote=USSR;47274609]уже все есть, не надо ничего выдумывать[/quote]
Для этого нужно хорошо знать эти функции. А с этим - проблема.

USSR 26.11.2019 21:27

Я думаю, что хорошо эти функции и сами разработчики не знают. Приличная фирма по идее должна бы включать в состав конфигурации какое-то более-менее вразумительное описание. Сейчас пока что-то найдешь, полжизни потратишь

goto8 26.11.2019 22:10

Да, 8ка сложна невероятно.. То, что на 77 занимало час - на 8 трачу день. И это при условии того, что знаю, что делать. А какая же она тормознутая..


Текущее время: 00:15. Часовой пояс GMT +3.