【搞定】2144升级到X32617之后，SQL条件构造窗体中没有了条件下拉字段项供选择**

ht88th

我们在2144中做了个通用的报表界面，目前，共有近400个报表都是通过一个界面（界面上放一个导航条 及 一个网格 及 报表选择下拉框 等对象），升级后，在X3中出现以下现像：
报表A从 数据库1 取数，报表B从 数据库2 取数，取数及显示到网格一切OK，但导航条中的过滤按钮弹出的对话框，只有从数据库1中取数的报表 才有条件字段，从其它数据库取数的报表，过滤条件没有下拉项；

测试代码如下：


procedure TSJWG1.Button1Click(Sender: TObject);
var
  lSQL: string;
begin
  Refinfo.DataSetBZSJJ1.Close;
  Refinfo.DataSetBZSJJ1.ConnectionString := 'DATABASEURL=Biz:\JEWIMPHARMA\WAREHOUSESPACE\WareHouseDB.Database'; //从业务库取数

  lSQL := 'SELECT * FROM ST_INFORMHEADER';
  Refinfo.DataSetBZSJJ1.SQL.Text:=lSQL;
  Refinfo.DataSetBZSJJ1.Open;  //此时过滤对话框中能下拉条件字段
end;


procedure TSJWG1.Button2Click(Sender: TObject);
var
  lSQL: string;
begin
  Refinfo.DataSetBZSJJ1.Close;
  Refinfo.DataSetBZSJJ1.ConnectionString := 'DATABASEURL=Biz:\SYSTEM\System.DataBase';  //从系统库取数

  lSQL := 'SELECT * FROM SYS_TABLEFIELD';
  Refinfo.DataSetBZSJJ1.SQL.Text:=lSQL;
  Refinfo.DataSetBZSJJ1.Open; //此时过滤对话框中没有条件字段
end;


procedure TSJWG1.Button3Click(Sender: TObject);
var
  lSQL: string;
begin
  Refinfo.DataSetBZSJJ1.Close;
  Refinfo.DataSetBZSJJ1.ConnectionString := 'DATABASEURL=Biz:\JEWIMPHARMA\WAREHOUSESPACE\WareHouseDB.Database'; //从业务库取数

  lSQL :='select st_storeheader.memo,st_storedetail.sourcetype,st_storedetail.sourceno'
    + ' FROM st_storeheader,st_storedetail WHERE st_storeheader.PRIMARYID=st_storedetail.LINKID AND ROWNUM<=10';
  Refinfo.DataSetBZSJJ1.SQL.Text:=lSQL;
  Refinfo.DataSetBZSJJ1.Open;  //此时过滤对话框中又有条件字段可下拉出来供选择了

end;

ht88th

问题找到了，使用URL切换数据库就OK了
用Refinfo.DataSetBZSJJ1.DATABASE.URL:= 'Biz:\SYSTEM\System.DataBase'