| Процедура
PopAllConditions |
Top Previous Next |
| Назначение
|
| Процедура
снимает все условия с логической таблицы. |
| Описание
|
| procedure
PopAllConditions; |
| Пример
|
| В
примере на таблицу "Сотрудники" описано условие, при установке
которого в таблице становятся видны только штатные сотрудники. В
анкете описаны две кнопки. В обработчиках событий от кнопок
снимается и устанавливается условие, после чего вызывается функция
перерисовки панели. |
| Interface
Example; |
| create view as
select * from Employee |
| condition
byStatus = (Status = 'П'); |
| screen
ViewEmployee; |
| Fields
|
| Name;
|
| Status;
|
| Buttons
|
| cmDoCondition;
|
| cmRemoveCondition;
|
| <<
|
| Имя .@@@@@@@
Статус .@@ |
| <. Просмотр
только постоянных сотр. .> |
| <. Просмотр
всех сотрудников .> |
| >>
|
| end;
|
| HandleEvent
|
| cmDoCondition:
{ |
| PushCondition(tcbyStatus);
|
| modifier
GetFirst main employee; |
| RescanPanel(#Employee);
|
| }
|
| cmRemoveCondition:
{ |
| PopCondition(tcByStatus);
|
| RescanPanel(#Employee);
|
| }
|
| end;
|
| end;
|
| end. //
Interface example |