R09 KOD KG — различия между версиями
Материал из Фабиус wiki
Hisava (обсуждение | вклад) м |
Hisava (обсуждение | вклад) м (→Смотрите также) |
||
| Строка 9: | Строка 9: | ||
R09_KOD_KG() | R09_KOD_KG() | ||
[[Файл:21-04-2017 12-06-50.png]] | [[Файл:21-04-2017 12-06-50.png]] | ||
| + | = Текст = | ||
| + | parameters kod_okei := '166' | ||
| + | |||
| + | local sql | ||
| + | sql := [ Select KOD From [[R09]] Where KOD_OKEI = '] + kod_okei + [' ] | ||
| + | result := [[SqlToArr]]( sql,, ReflisPath ) | ||
| + | // 166 кг | ||
= Смотрите также = | = Смотрите также = | ||
[[Полезные функции]] | [[Полезные функции]] | ||
[[Функции Delphi]] | [[Функции Delphi]] | ||
Версия 12:08, 21 апреля 2017
R09_KOD_KG - это программа из справочника R09
Возвращает код кг из справочника R09
R09_KOD_KG( kod_okei )
kod_okei - код из общероссийского справочника единиц измерения
Пример
R09_KOD_KG()
Текст
parameters kod_okei := '166' local sql sql := [ Select KOD From R09 Where KOD_OKEI = '] + kod_okei + [' ] result := SqlToArr( sql,, ReflisPath ) // 166 кг
