Версия 16:50, 20 ноября 2019

CREATE_FILT_FROM_ARR - это программа из справочника R266

Создание фильтра для последующей передачи, например, в ChoiceRefr

CREATE_FILT_FROM_ARR( _field, _arr )

_field - имя поля, например, 'KOD'

_arr - массив значений, например, { 1, 2 }

Результат

KOD = 1 or KOD = 2

Смотрите также

@@ Строка 9: / Строка 9: @@
 Результат
   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
 = Смотрите также =
 [[Полезные функции]]
 [[Функции Delphi]]