RET ALC NAME

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

RET_ALC_NAME(num_grp)

По номеру группы алкоголя вернуть наименование группы

num_grp - номер группы

Пример

RET_ALC_NAME( 405 )

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

parameters num_grp

local aa, sql

sql := [ Select NUMBER, COMPONENT ;
  From R202 ;
  Where KOD = '243' and COMPONENT like '%] + num_grp + [%' ]
aa := SqlToArr( sql, { 'NUMBER', 'COMPONENT' }, ReflisPath )

if !IsEmpty( aa )
  aa := StrToArray( aa[1,2], "'" )
  result := aa[2]
endif

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

Функции Delphi

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