Сортировка

Программирование на Атлантисе (VIP, FCOM, ARD), FastReport

Модераторы: m0p3e, edward_K, Модераторы

Ответить
Vlad
Постоянный обитатель
Сообщения: 101
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Красноярск

Сортировка

Сообщение Vlad »

В интерфейсе две лог. таблицы. Для 2-ой необходимо сделать «переключаемую» сортировку.
Пишу примерно следующее:

Код: Выделить всё

…
.create view a1 as select  table1.*;
.create view a2 as select table2.*, table3.*, table4.*
Order sort1 by table2.field1, table3.field1
Order sort2 by table3.field1, table2.field1
;
…

Procedure OnFilters;
Begin
…
If bSort then SETORDER(a2.sort1)
  Else SETORDER(a2.sort2)
A2._loop
{
   logstrtofile('C:\1.txt',a2.table2.field1); 
}

End;
Что не так делаю?
Vlad
Постоянный обитатель
Сообщения: 101
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Красноярск

Сообщение Vlad »

p.s. Версия 712, в процедуре порядок сортировки указываю через ti т.е. SETORDER(a2.tiSort1)
Maverick
Абориген
Сообщения: 943
Зарегистрирован: 29 мар 2005, 17:49
Откуда: External Developer
Контактная информация:

Сообщение Maverick »

If bSort then SETORDER(tisort1)
Else SETORDER(tisort2)
Изображение
Знающий людей разумен.
Знающий себя просветлён.
Побеждающий людей силен.
Побеждающий самого себя могущественнен
Vlad
Постоянный обитатель
Сообщения: 101
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Красноярск

Сообщение Vlad »

Maverick писал(а):If bSort then SETORDER(tisort1)
Else SETORDER(tisort2)
тогда ошибка при компиляции
"Нет такой функции, поля...:tisort1"
Ответить