Выделить записи в таблице по некоторому сложному условию — различия между версиями
Материал из Фабиус wiki
Hisava (обсуждение | вклад) (Новая страница: «local aa, sql sql := [ Select RGNUM From DOCS] + Ret_f_ext() + [ Where KINDDOC = 'MTR' ] aa := SelectSqlToArr( sql, { 'RGNUM' },,, true ) if !IsEmpty( aa ) aa…») |
Hisava (обсуждение | вклад) м |
||
Строка 2: | Строка 2: | ||
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' },,, true ) | aa := SelectSqlToArr( sql, { 'RGNUM' },,, true ) | ||
if !IsEmpty( aa ) | if !IsEmpty( aa ) | ||
+ | |||
aa := PrepareArr( aa ) | aa := PrepareArr( aa ) | ||
+ | |||
SetSelRows( , true,,,, aa ) | SetSelRows( , true,,,, aa ) | ||
+ | |||
endif | endif |
Версия 09:34, 11 июня 2015
local aa, sql
sql := [ Select RGNUM From DOCS] + Ret_f_ext() + [ Where KINDDOC = 'MTR' ]
aa := SelectSqlToArr( sql, { 'RGNUM' },,, true )
if !IsEmpty( aa )
aa := PrepareArr( aa )
SetSelRows( , true,,,, aa )
endif