Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
22 ноя 2024, 21:04

Добавление колонок в табличную часть

Автор bdf2ch, 25 сен 2011, 14:15

0 Пользователей и 1 гость просматривают эту тему.

bdf2ch

Добрый день, помогите пожалуйста разобраться со следующей проблемой:
Есть справочник Спр1, у него несколько реквизитов; есть документ с табличной частью, в которой единственный реквизит - ЭлементСпр с типом Справочники.Спр1.Ссылка, в табличной части документа отображаются только колонки Код и Наименование, каким образом сделать так, чтобы выводились колонки с остальными реквизитами справочника?
Надеюсь на Вашу помощь, заранее благодарен за ответ.

has

Нужно добавить колонки в табличное поле на форме документа. Затем в событие при изменении реквизита ЭлементСпр, проверять если он заполнен(выбран), то заполнять колонки соответствующими реквизитами справочника. Да и типы колонок, должны совпадать с типами реквизитов справочника.

bdf2ch

Цитата: has от 25 сен 2011, 14:40
Нужно добавить колонки в табличное поле на форме документа. Затем в событие при изменении реквизита ЭлементСпр, проверять если он заполнен(выбран), то заполнять колонки соответствующими реквизитами справочника. Да и типы колонок, должны совпадать с типами реквизитов справочника.
А каким образом получить доступ к реквизитам справочника программно? Если Вам не трудно, не могли бы Вы привести примерный код, как это должно выглядеть.

has

Через точку. Будет примерно так, это если у вас реквизиты табличной части документа, а не просто колонки на форме.

Процедура ЭлементСпр1ПриИзменении(Элемент)
   СтрокаТЧ = ЭлементыФормы.ТабличнаяЧасть.ТекущийДанные;
   Если ЗначениеЗаполнено(СтрокаТЧ.ЭлементСпр1) Тогда
      СтрокаТЧ.Реквизит1 = СтрокаТЧ.ЭлементСпр1.Реквизит1;
   КонецЕсли;
КонецПроцедуры

bdf2ch

Цитата: has от 25 сен 2011, 15:03
Через точку. Будет примерно так, это если у вас реквизиты табличной части документа, а не просто колонки на форме.

Процедура ЭлементСпр1ПриИзменении(Элемент)
   СтрокаТЧ = ЭлементыФормы.ТабличнаяЧасть.ТекущийДанные;
   Если ЗначениеЗаполнено(СтрокаТЧ.ЭлементСпр1) Тогда
      СтрокаТЧ.Реквизит1 = СтрокаТЧ.ЭлементСпр1.Реквизит1;
   КонецЕсли;
КонецПроцедуры

Возможно ли сделать то же самое, только без создания реквизитов в табличной части, есть только колонки на форме, вот в них и требуется занести данные?

Андрей Федотов

через ЭлементыФормы. Только зачем?

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск