ТМС:Сводник — различия между версиями

Материал из wiki.standart-n.ru
Перейти к: навигация, поиск
(Передача параметра в справочник)
(Передача параметра в справочник)
Строка 18: Строка 18:
  
 
     //Вызываем справочник
 
     //Вызываем справочник
   ShowWDict('''ID справочника''','', qParams.params);  
+
   ShowWDict('''ID справочника''','''', qParams.params);  
 
   finally
 
   finally
 
   qParams.Free;
 
   qParams.Free;

Версия 14:06, 20 марта 2020

Полезные скрипты для работы с ТМС, WDict и Аналитическими отчетами

Передача параметра в справочник

var
qParams: TibQuery;
begin
 qParams := dm.TempQuery(nil);
 try
  qParams.sql.text := 'select * from rdb$database where 1=:tek_id';
  qParams.prepare;
  //Определяем параметр
  qParams.parambyname('Имя параметра').asstring := Значение параметра;
   //Вызываем справочник
  ShowWDict(ID справочника,', qParams.params); 
 finally
  qParams.Free;
 end;
end;