RET ALC NAME — различия между версиями

Материал из Фабиус wiki
Перейти к: навигация, поиск
м (Пример)
м (Текст программы)
Строка 20: Строка 20:
 
   
 
   
 
  sql := [ Select NUMBER, COMPONENT ;
 
  sql := [ Select NUMBER, COMPONENT ;
   From R202 ;
+
   From [[R202]] ;
 
   Where KOD = '243' and COMPONENT like '%] + num_grp + [%' ]
 
   Where KOD = '243' and COMPONENT like '%] + num_grp + [%' ]
 
  aa := [[SqlToArr]]( sql, { 'NUMBER', 'COMPONENT' }, ReflisPath )
 
  aa := [[SqlToArr]]( sql, { 'NUMBER', 'COMPONENT' }, ReflisPath )

Версия 10:38, 18 ноября 2016

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

RET_ALC_NAME(num_grp)

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

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

Пример

RET_ALC_NAME( 405 )

18-11-2016 10-29-21.png

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

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

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