【结贴】runfunc函数的问题**

trickle

代码如下，功能A调用功能B：
SystemCore.TSystemCore.FuncManager.RunFunc(Context,'','Biz:\DAILYWORK\FUNC\GZDYCX.FUNC',zxrxm,nil,false);

在打开的功能B里有一个查询操作，使用的数据集与调用上面代码的功能A使用的不是同一个数据集，但是是同一个数据表。
在功能A上进行新增操作，有个按钮点击之后执行上面的按钮打开功能B进行查询，但是查询结果为空，不知道为什么？实际是有数据的。
不知道是不是与context参数有关，麻烦帮看下。

atiger

在功能A上进行新增操作后，数据是否提交到数据表呢？也就是说，你是从数据库上看数据确实有的，还是从功能A界面上看到的。
如果没有提交到数据库，且不是一个数据集，那么跟环境肯定没有关系的

trickle

没有提交到数据库，但是查询的时候功能给出的结果是空。

shangxy

在运行b功能传进去zxrxm参数的值是否已经提交到数据库里面了？如果你只是在A功能看到没有提交到数据库，那么运行b功能也是看不到的。

trickle

没有提交。我不是要查新增的数据，是要查历史数据

jiahaiming

建议楼主，在B功能里设置断点，跟踪一下代码，看看过滤部分是否有问题

trickle

过滤没有问题，但是数据集一直是空的

shangxy

代码设置断点跟踪一下，看一下取数据的sql是不是你想要的，这个sql取出来的记录是否正确呢？

trickle

在调用的功能B的onshow方法里写了如下操作：
procedure TGZDYCXW.BizFormShow(Sender: TObject);
var
  zxrxm,sql:string;
begin
  dsbgzdy.dataset.Open;
  zxrxm := FuncBroker1.Func.Parameters.ToString;
  if zxrxm.Equals('')=false then begin

    sql:='select * from gzb where zxrxm='''+zxrxm+'''';
    tsqldataset(dsbgzdy.DataSet).SQL.Text:=sql;
    dsbgzdy.DataSet.close;
    dsbgzdy.DataSet.open;
    if dsbgzdy.DataSet.RecordCount=0 then
      jsdialogs.ShowMsg('没有给该人分配过作业。','提示');
  end;
end;

shangxy

dsbgzdy.DataSet.open以后你看一下dsbgzdy.DataSet.DataFetch.CommandText值是什么？在数据库中能查询出值么？和你的sql一样么？