Как программно перебрать реквизиты справочника?
08.06.2005
13:02
#1
Уважаемые, подскажите пожалуйста, как программно можно перебрать реквизиты справочника Сотрудники и занести их в список!<br><br>В итоге нужно чтобы получился список с реквизитами справочника! Благодарю!
08.06.2005
13:18
#2
"ТабРеквизиты = СоздатьОбъект("ТаблицаЗначений");<br><br>ТабРеквизиты.ВставитьКолонку("Реквизит");<br><br>ТабРеквизиты.ВставитьКолонку("РеквИдентиф");<br><br>Для Сч = 1 По Метаданные.Справочник("Сотрудники").Реквизит() Цикл<br><br> ИденМД = Метаданные.Справочник("Сотрудники").Реквизит(Сч).Идентификатор;<br><br> ПредМД = Метаданные.Справочник("Сотрудники").Реквизит(Сч).Представление();<br><br> ТабРеквизиты.НоваяСтрока();<br><br> ТабРеквизиты.Реквизит = ПредМД;<br><br> ТабРеквизиты.РеквИдентиф = ИденМД;<br><br>КонецЦикла;<br><br>//И не забыть про Код и Наименование!!!"
Читают тему
(гостей: 1)