Лист Доставки. Комментарий адреса доставки контрагента.

1С v8

23.03.16

✎

11:52

Доброго времени суток!

Есть внешняя печатная форма ЛистДоставки, появилась необходимость добавить поле с комментариями из адреса доставки контрагента, поле в макете я добавил, но с комментарием траблы из контрагента-комментарий добавил, но нужен комментарий из адреса доставки контрагента, в программирование 1с новичок, прошу слишком не пинать.

...
ОбластьМакета.Параметры.Место = СтрокаДокумента.АдресДоставки;
ОбластьМакета.Параметры.Комментарий = CтрокаДокумента.Контрагент.Комментарий;
ОбластьМакета.Параметры.СуммаНакладной = СтрокаДокумента.Накладная.СуммаДокумента;
...

P.S. КА 1.1.68.2

1 PR третий

23.03.16

✎

11:52

И че и че?

2 DeniskinMENZ

23.03.16

✎

11:54

Вообщем поясню, справочник контрагенты(выбираю контрагента)-вкладка контакты-выбираю адрес-выходит окно адрес там есть поле комментарий вот именно этот комментарий надо вывести в печатную форму

3 zdas

23.03.16

✎

11:56

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

4 PR третий

23.03.16

✎

11:58

(2) Ну нормально, че. Делай.

5 DeniskinMENZ

23.03.16

✎

12:15

(3) Да правильно, вот только как вытащить его?

6 ДенисЧ

23.03.16

✎

12:22

Регистр сведений КонтактнаяИнформация

7 DeniskinMENZ

23.03.16

✎

13:00

Где-то так?

КомментарийАдресаДоставки = РегистрыСведений.КонтактнаяИнформация

8 ДенисЧ

23.03.16

✎

13:12

Нет. Где-то так
нз = РегистрыСведений.КонтактнаяИнформация.СоздатьНаборЗаписей();
нз.Отбор.Объект = Контрагент;
нз.Отбор.Тип = Перечисления.ТипыКонтактнойИнформации.Адрес;
нз.Отбор.Вид = Справочники.ВидыКонтактнойИнформации.АдресФизЛица;
нз.Прочитать();
Если нз.Количество() > 0 ТОгда
комм = нз[0].Комментарий;
КонецЕсли;

Разумеется, тип и вид - ставить свои

9 FIXXXL

23.03.16

✎

13:52

(7) посмотри типовые процедуры "доставания" адреса
в той же Печати типовой

10 Garykom

гуру

23.03.16

✎

13:54

(6) В КА2 КИ уже в ТЧ ?

11 DeniskinMENZ

25.03.16

✎

00:57

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

12 DeniskinMENZ

25.03.16

✎

00:58

Ошибку дает
{ВнешняяОбработка.ВнешняяОбработка2.МодульОбъекта(63)}: Поле объекта недоступно для записи (Объект)
нз.Отбор.Объект = СтрокаДокумента.Накладная.Контрагент;