Переустановить фильтр в Browse

[Игорь Столяров]

Привет всем !

У меня опять лузерский вопрос. Clarion 6.3 ABC.
Есть некий броузер с 2-мя закладками и какими-то установками для отбора записей,
обычный ABC шаблон генерит для него следующий код, например:

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

  BRW1.AddSortOrder(,NPR:By_Prioritet)  ! Add the sort order for NPR:By_Prioritet for sort order 1
  BRW1.SetFilter('(NPR:Vid = 1)')               ! Apply filter expression to browse
  
  BRW1.AddSortOrder(,NPR:By_Name)      ! Add the sort order for NPR:By_Name for sort order 2
  BRW1.SetFilter('(NPR:Vid = 2)')               ! Apply filter expression to browse
  .....
  ! Вот здесь имею желание переустановить фильтр для первой закладки (NPR:By_Prioritet),
  ! но не имею возможности указать к какой закладке применить изменение.
  If Loc:HZ = 123 then BRW1.SetFilter('(NPR:Vid = 7)').

Вопрос. Как вручную переустановить фильтр именно для первой закладки ?
Как меняется фильтр - понятно, непонятно как применить фильтр к первой закладке ...

Заранее спасибо за воспоможение.

[Алексей- Софт-Центр]

Добрый день!
If choice (?sheet1) =1 then

End

Алексей

[Игорь Столяров]

Спасибо ! Уже нарыл в справке вот такую комбинацию:

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

  If Loc:HZ = 123
     BRW1.SetSort(1)
     BRW1.SetFilter('(NPR:Vid = 7)')
  end   

[kreator]

Я пишу в ApplyFilter после Parent Call типа:

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

case choice(?CurrentTab)
  of 1
       BRW1::View:Browse{prop:SQLFilter} = 'a.polm=' & IDSOTR & ' and a.datm is not null'
  of 2
       BRW1::View:Browse{prop:SQLFilter} = 'a.otpm=' & IDSOTR & ' and a.datm is not null'
  of 3
       BRW1::View:Browse{prop:SQLFilter} = '(a.polm=' & IDSOTR & ' or a.otpm=' & IDSOTR & ') and a.datm is not null'
end