dev1c:param_name_tab
Это старая версия документа!
Список имен параметров табличного документа
Функция ПолучитьМассивИменПараметров(ОбластьТабДокумента) Экспорт
МассивИменПараметров = Новый Массив;
Для НомерСтроки = 1 По ОбластьТабДокумента.ВысотаТаблицы Цикл
Для НомерКолонки = 1 По ОбластьТабДокумента.ШиринаТаблицы Цикл
Ячейка = ОбластьТабДокумента.Область(НомерСтроки, НомерКолонки, НомерСтроки, НомерКолонки);
Если Ячейка.Заполнение = ТипЗаполненияОбластиТабличногоДокумента.Параметр Тогда
//если такого параметра еще нет, то добавим его
Если МассивИменПараметров.Найти(Ячейка.Параметр) = Неопределено тогда
МассивИменПараметров.Добавить(Ячейка.Параметр);
КонецЕсли;
ИначеЕсли Ячейка.Заполнение = ТипЗаполненияОбластиТабличногоДокумента.Шаблон Тогда
//выделим все параметры в шаблоне в отдельные строки
ТекстШаблона = Ячейка.Текст;
ТекстШаблона = СтрЗаменить(ТекстШаблона, "[", Символы.ПС + "[");
ТекстШаблона = СтрЗаменить(ТекстШаблона, "]", Символы.ПС);
Для Счетчик = 1 По СтрЧислоСтрок(ТекстШаблона) Цикл
ТекСтрока = СтрПолучитьСтроку(ТекстШаблона, Счетчик);
Если Лев(ТекСтрока, 1) = "[" тогда
ИмяПараметра = Сред(ТекСтрока, 2);
//если такого параметра еще нет, то добавим его
Если МассивИменПараметров.Найти(ИмяПараметра) = Неопределено тогда
МассивИменПараметров.Добавить(ИмяПараметра);
КонецЕсли;
КонецЕсли;
КонецЦикла;
КонецЕсли;//конец проверки, что в ячейке - текст, параметр или шаблон
КонецЦикла;//конец обхода по колонкам
КонецЦикла;//конец обхода по строкам
Возврат МассивИменПараметров;
КонецФункции
dev1c/param_name_tab.1738325692.txt.gz · Последнее изменение: 2025/01/31 12:14 — admin16