Произвольная обработка данных табличных документов
Обработка позволяет с помощью написанного Вами алгоритма произвести что-либо, используя данные, находящиеся в загружаемых (или заполняемых программно) на форму обработки произвольных таблиц mxl. В качестве примера прилагается алгоритм для формирования запроса к данным справочника Контрагенты, загруженного в [Таблицу 1].
- Описание
- Подробнее
Описание
Разработана по мотивам публикации "Произвольная обработка данных таблицы MXL"
Только теперь на порядок больше возможностей и одновременно можно использовать до 10 таблиц.
В принципе можно делать что угодно, поскольку "против кода нет приема" 😉
За основу взята замечательная обработка "Консоль кода для управляемых форм".
В своей работе мы постоянно используем "Произвольную обработку данных табличных документов" в своей работе. Написаны уже сотни алгоритмов. Можем, при необходимости, и Вам какой нибудь написать)
Пример алгоритма, стартующего с колес в любой типовой конфигурации:
//Общий методический пример
Запрос=Новый ЗАпрос;
Запрос.Текст="ВЫБРАТЬ ПЕРВЫЕ 100
| Контрагенты.Ссылка КАК Ссылка,
| Контрагенты.Наименование КАК Наименование,
| Контрагенты.ИНН КАК ИНН,
| Контрагенты.КПП КАК КПП
|ИЗ
| Справочник.Контрагенты КАК Контрагенты";
ТЗТабДок1=Запрос.Выполнить().Выгрузить();
ТабДок1.Очистить();
Построитель = Новый ПостроительОтчета;
Построитель.ИсточникДанных=Новый ОписаниеИсточникаДанных(ТЗТабДок1);
Построитель.Вывести(ТабДок1);
СтрокиУ = ТабДок1.Область(1,,3,);
ТабДок1.УдалитьОбласть(СтрокиУ, ТипСмещенияТабличногоДокумента.ПоГоризонтали);
//Создаем новую ТЗ из ТабДок1 2323131
Построитель = Новый ПостроительОтчета;
Построитель.ИсточникДанных = Новый ОписаниеИсточникаДанных(ТабДок1.Область());
Построитель.Выполнить();
ТабДанные = Построитель.Результат.Выгрузить();
ЗапросТЗ=Новый Запрос;
ЗапросТЗ.Текст = "ВЫБРАТЬ
| Т.Наименование,
| Т.ИНН
|ПОМЕСТИТЬ Таб
|ИЗ
| &ТЗ КАК Т
|;
|
|////////////////////////////////////////////////////////////////////////////////
|ВЫБРАТЬ
| ТТ.Наименование,
| ТТ.ИНН
|ИЗ
| Таб КАК ТТ
|ГДЕ
| ТТ.Наименование<>""""";
ЗапросТЗ.УстановитьПараметр("ТЗ",ТабДанные);
ТабДанные1 = ЗапросТЗ.Выполнить().Выгрузить();
ТабДанные1.Сортировать("Наименование ВОЗР");
ТабДок2.Очистить();
Построитель = Новый ПостроительОтчета;
Построитель.ИсточникДанных=Новый ОписаниеИсточникаДанных(ТабДанные1);
Построитель.Вывести(ТабДок2);
СтрокиУ = ТабДок2.Область(1,,3,);
ТабДок2.УдалитьОбласть(СтрокиУ, ТипСмещенияТабличногоДокумента.ПоГоризонтали);