Выделить записи в таблице по некоторому сложному условию — различия между версиями
Материал из Фабиус wiki
Hisava (обсуждение | вклад) м |
Hisava (обсуждение | вклад) м |
||
| Строка 1: | Строка 1: | ||
| + | = 1 = | ||
local aa, sql, flt | local aa, sql, flt | ||
sql := [ Select RGNUM From DOCS] + Ret_f_ext() + [ Where KINDDOC = 'MTR' ] | sql := [ Select RGNUM From DOCS] + Ret_f_ext() + [ Where KINDDOC = 'MTR' ] | ||
| Строка 8: | Строка 9: | ||
SetSelRows( , true ) | SetSelRows( , true ) | ||
endif | endif | ||
| + | |||
| + | = 2 = | ||
Версия 16:57, 22 апреля 2016
1
local aa, sql, flt
sql := [ Select RGNUM From DOCS] + Ret_f_ext() + [ Where KINDDOC = 'MTR' ]
aa := SelectSqlToArr( sql, { 'RGNUM' } )
if !IsEmpty( aa )
aa := PrepareArr( aa )
flt := Create_Filt_From_Arr( 'RGNUM', aa )
SetFilter( flt )
SetSelRows( , true )
endif
