Версия 08:27, 10 января 2017

ISPROD - это функция из справочника R266

Проверяет, является ли подразделение производством

ISPROD(Anal)

Anal - код подразделения из справочника R10

Текст программы

parameters anal

result := false

if Empty( anal )
  return
endif

if Ascan( KodToArr('R10','02'), anal ) > 0
  result := true
else
  result := false
endif

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

Функции Delphi

Полезные функции