SQLTOARR — различия между версиями

Материал из Фабиус wiki
Перейти к: навигация, поиск
м (Примеры)
м (Примеры)
 
(не показано 5 промежуточных версий этого же участника)
Строка 1: Строка 1:
SQLTOARR - это функция из справочника [[R266]]
+
[[SQLTOARR]] - это функция из справочника [[R266]]
 
+
Выполняет запрос SELECT и возвращает заполненный двумерный массив
Выполняет запрос SELECT и возвращает заполненный двумерный массив
+
[[SQLTOARR]]( < sql >,  { 'имя поля 1',  'имя поля 2',  ... }  [, path = OpdataPath ] )
 
+
SQLTOARR(< sql >,  { 'имя поля 1',  'имя поля 2',  ... }  [, path = OpdataPath ])
+
 
+
 
= Примеры =
 
= Примеры =
  
 
   local sql, aa, fld
 
   local sql, aa, fld
  
   if ![[YesNo]]( 'Добавить выработку?', false )
+
   if ![[YESNO]]( 'Добавить выработку?', false )
 
     return
 
     return
 
   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]]

Текущая версия на 08:14, 1 декабря 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 )

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

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

Функции Delphi