SQLTOARR — различия между версиями
Материал из Фабиус wiki
Hisava (обсуждение | вклад) м |
Hisava (обсуждение | вклад) м (→Примеры) |
||
| Строка 10: | Строка 10: | ||
endif | endif | ||
| − | sql := [ Select DANAL2, Sum( AMNT ) AMNT From [[DOCP]]] + [[Ret_f_ext]]() + [ Where KINDDOC = 'PAC' and LVLNUM = '4' and ; | + | sql := [ Select DANAL2, Sum( AMNT ) AMNT From [[DOCP]]] + [[Ret_f_ext]]() + [ Where KINDDOC = '[[PAC]]' and LVLNUM = '4' and ; |
DATDOC = '] + SqlDate( DOCS1->DATDOC ) + [' Group by DANAL2 ] | DATDOC = '] + SqlDate( DOCS1->DATDOC ) + [' Group by DANAL2 ] | ||
fld := { 'DANAL2', 'AMNT' } | fld := { 'DANAL2', 'AMNT' } | ||
aa := '''SqlToArr'''( sql, fld ) | aa := '''SqlToArr'''( sql, fld ) | ||
| + | |||
= Смотрите также = | = Смотрите также = | ||
[[Полезные функции]] | [[Полезные функции]] | ||
[[Функции Delphi]] | [[Функции Delphi]] | ||
Версия 15:31, 8 июня 2017
SQLTOARR - это функция из справочника R266
Выполняет запрос SELECT и возвращает заполненный двумерный массив
SQLTOARR( < sql >, { 'имя поля 1', 'имя поля 2', ... } [, path = OpdataPath ] )
Примеры
local sql, aa, fld
if !YesNo( 'Добавить выработку?', false ) return endif
sql := [ Select DANAL2, Sum( AMNT ) AMNT From DOCP] + Ret_f_ext() + [ Where KINDDOC = 'PAC' and LVLNUM = '4' and ; DATDOC = '] + SqlDate( DOCS1->DATDOC ) + [' Group by DANAL2 ] fld := { 'DANAL2', 'AMNT' } aa := SqlToArr( sql, fld )
