Выделить записи в таблице по некоторому сложному условию — различия между версиями
Материал из Фабиус wiki
Hisava (обсуждение | вклад) м |
Hisava (обсуждение | вклад) м |
||
| Строка 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' ] | + | aa := SelectSqlToArr( sql, { 'RGNUM' } ) |
| − | + | if !IsEmpty( aa ) | |
| − | aa := SelectSqlToArr( sql, { 'RGNUM' } ) | + | aa := PrepareArr( aa ) |
| − | + | flt := Create_Filt_From_Arr( 'RGNUM', aa ) | |
| − | if !IsEmpty( aa ) | + | SetFilter( flt ) |
| − | + | SetSelRows( , true ) | |
| − | + | endif | |
| − | + | ||
| − | + | ||
| − | + | ||
| − | + | ||
| − | + | ||
| − | + | ||
| − | + | ||
| − | endif | + | |
Версия 10:06, 22 апреля 2016
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