RET ALC NAME — различия между версиями
Материал из Фабиус wiki
Hisava (обсуждение | вклад) (Новая страница: «RET_ALC_NAME - это функция из справочника R266 RET_ALC_NAME(num_grp) По номеру группы алкоголя вернуть…») |
Hisava (обсуждение | вклад) м (→Пример) |
||
Строка 12: | Строка 12: | ||
[[Файл:18-11-2016 10-29-21.png]] | [[Файл: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 | ||
= Смотрите также = | = Смотрите также = |
Версия 10:37, 18 ноября 2016
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