Страница 1 из 1

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

Добавлено: 05 Сентябрь 2016, 7:32
Игорь Столяров
Привет всем !

У меня опять лузерский вопрос. :) 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)').
Вопрос. Как вручную переустановить фильтр именно для первой закладки ?
Как меняется фильтр - понятно, непонятно как применить фильтр к первой закладке ... :(

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

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

Добавлено: 05 Сентябрь 2016, 9:56
Алексей- Софт-Центр
Добрый день!
If choice (?sheet1) =1 then

End

Алексей

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

Добавлено: 05 Сентябрь 2016, 10:01
Игорь Столяров
Спасибо ! Уже нарыл в справке вот такую комбинацию:

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

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

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

Добавлено: 05 Сентябрь 2016, 10:48
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