Процедура PopAllConditions |
Процедура снимает все условия с логической таблицы.
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. // Interface example