4
bvb
21.09.22
✎
13:47
|
Получилось как то так
УниверсальныйОтчет.СортироватьСписокДоступныхПолейПоПредставлению ();
Процедура СортироватьСписокДоступныхПолейПоПредставлению () Экспорт
Сп = Новый СписокЗначений;
Для Каждого ДоступноеПоле ИЗ ПостроительОтчета.ДоступныеПоля Цикл
Сп.Добавить(ДоступноеПоле, Доступноеполе.Представление);
КонецЦикла;
Сп.СортироватьПоПредставлению();
Для Каждого ЭлементСписка ИЗ Сп Цикл
ДоступноеПоле = ЭлементСписка.Значение;
ИндексПоляВСписке = Сп.Индекс(ЭлементСписка);
ТекущийИндексПоля = ПостроительОтчета.ДоступныеПоля.Индекс(ДоступноеПоле);
ПостроительОтчета.ДоступныеПоля.Сдвинуть(ДоступноеПоле, ИндексПоляВСписке - ТекущийИндексПоля);
КонецЦикла;
КонецПроцедуры
|
|