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

Материал из Фабиус wiki
Перейти к: навигация, поиск
м
м (Примеры)
 
(не показана одна промежуточная версия этого же участника)
Строка 6: Строка 6:
 
   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]]
 
[[Функции 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