Программирование на Атлантисе (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"