Программирование на Атлантисе (VIP, FCOM, ARD), FastReport
Модераторы: m0p3e , edward_K , Модераторы
Vlad
Постоянный обитатель
Сообщения: 101 Зарегистрирован: 29 мар 2005, 17:49
Откуда: Красноярск
Сообщение
Vlad » 24 окт 2005, 13:21
В интерфейсе две лог. таблицы. Для 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 » 24 окт 2005, 13:32
p.s. Версия 712, в процедуре порядок сортировки указываю через ti т.е. SETORDER(a2.tiSort1)
Maverick
Абориген
Сообщения: 943 Зарегистрирован: 29 мар 2005, 17:49
Откуда: External Developer
Контактная информация:
Сообщение
Maverick » 25 окт 2005, 13:05
If bSort then SETORDER(tisort1)
Else SETORDER(tisort2)
Знающий людей разумен.
Знающий себя просветлён.
Побеждающий людей силен.
Побеждающий самого себя могущественнен
Vlad
Постоянный обитатель
Сообщения: 101 Зарегистрирован: 29 мар 2005, 17:49
Откуда: Красноярск
Сообщение
Vlad » 25 окт 2005, 14:31
Maverick писал(а): If bSort then SETORDER(tisort1)
Else SETORDER(tisort2)
тогда ошибка при компиляции
"Нет такой функции, поля...:tisort1"