CREATE FILT FROM ARR — различия между версиями
Материал из Фабиус wiki
Hisava (обсуждение | вклад) (Новая страница: «CREATE_FILT_FROM_ARR - это программа из справочника R266 Создание фильтра для последующей переда…») |
Hisava (обсуждение | вклад) м |
||
| Строка 6: | Строка 6: | ||
_field - имя поля, например, 'KOD' | _field - имя поля, например, 'KOD' | ||
| + | |||
_arr - массив значений, например, { 1, 2 } | _arr - массив значений, например, { 1, 2 } | ||
Версия 13:58, 19 июля 2016
CREATE_FILT_FROM_ARR - это программа из справочника R266
Создание фильтра для последующей передачи, например, в ChoiceRefr
CREATE_FILT_FROM_ARR( _field, _arr )
_field - имя поля, например, 'KOD'
_arr - массив значений, например, { 1, 2 }
результат KOD = 1 or KOD = 2
Текст программы
parameters _field, _arr
local i, filt
if IsEmpty( _arr ) or Empty( _field )
result :=
return
endif
filt :=
for i := 1 to len( _arr )
if ValType( _arr[i] ) = 'C'
filt := filt + iif( Empty( filt ), [], [ or ] ) + _field + [ = '] + _arr[ i ] + [' ]
else
filt := filt + iif( Empty( filt ), , ' or ' ) + _field + ' = ' + _arr[ i ]
endif
next
result := filt
