Param in Query / Multiple String

Comments

• DevNico

  August 2010 edited August 2010

  UP
  
  I set the Variable Value in Delphi :
  
  Variable.value := '''' + 'A1' + '''' + ',' + '''' + 'B2' + '''' + ',' + '''' + 'B5' + '''';
  
  And When i execute the report, i have an error :
  
  "Error in the Expression ''A1','B2','B5'' : ';' expected".
  
  If someone can help me, or indicate a solution more easy for setting my Variable Value .......
  
  Thank
• gordk St.Catherines On. Canada.

  August 2010 edited 8:15AM

  you may need to use an or query and three variables.
• DevNico

  August 2010 edited 8:15AM

  it's not possible, in my delphi app, the user select one or many items in a checklist.
  The number of select is variables.
  
  Or there is not a filter ?
  
• gordk St.Catherines On. Canada.

  August 2010 edited 8:15AM

  i believe it is the expression parser
  it cannot resolve the where clause parameter portion
  WHERE ACOLUMN1 IN (:PARAM1)
  what you may have to do is work entirely from delphi and pass the complete sql into
  the query object after the report is loaded by using the findobjectmethod and setting the sql prop.
• gordk St.Catherines On. Canada.

  August 2010 edited 8:15AM

  There is a work around
  if the query's sqlstring is hard coded it will work. so build the string, add it to the query.
  here is a sample change i made in the main demo internalquery report to illustrate.
  create a variable mystrvar and give it a value of '"FL","CA"'
  cleared the sql prop of the query
  
  var
  sqlstr:string; // added global variable
  // added procedure for ok button
  procedure Button1OnClick(Sender: TfrxComponent);
  begin
  
  sqlstr :='select c.* from Customer c where c.State in('+<mystrvar>+')';
  //showmessage(sqlstr); this was to check the string
  bdequery1.sql.add(sqlstr);
  end;
  You need to be care full when you set the mystrvar value from delphi
  so that the value has begining and ending delimiters
  try ''''+quotedstr(value)+','+quotedstr(value)+''''