起步软件技术论坛-X3

 找回密码
 立即注册
搜索
查看: 131|回复: 3

【结帖】为什么选择了两个执行者,只显示了一个**

[复制链接]
发表于 2008-5-7 16:29:08 | 显示全部楼层 |阅读模式
代码如下:begin
  dsb_ps.DataSet.Open;
  dsb_ps.DataSet.First;
  while not dsb_ps.DataSet.Eof do
  begin
  dsb_ps.DataSet.Edit;
  zxz := dsb_ps.DataSet.FieldByName('psrid').AsString;
  dsb_ps.DataSet.Post;
  //lStr:= zxz;
  lFlowTask := Command.FlowTasks.FindFlowTask('dzwjps');//根据任务环节查找任务
  if lFlowTask <> nil then
  begin
    lFlowTask.Executors.Clear;   //删除缺省执行者
    lOrgURL := TOrgURL.Create('','',zxz); //部门、岗位、人员创建组织单元
    lFlowTask.Executors.Add(lOrgURL);//添加执行者
    end;
     dsb_ps.DataSet.Next;
  end;
end;
回复

使用道具 举报

发表于 2008-5-7 16:39:16 | 显示全部楼层
这样试一下呢,是不是这个效果?
  lFlowTask := Command.FlowTasks.FindFlowTask('dzwjps');//根据任务环节查找任务
  if lFlowTask <> nil then
    lFlowTask.Executors.Clear;   //删除缺省执行者
  //
  dsb_ps.DataSet.Open;
  dsb_ps.DataSet.First;
  while not dsb_ps.DataSet.Eof do
  begin
    dsb_ps.DataSet.Edit;
    zxz := dsb_ps.DataSet.FieldByName('psrid').AsString;
    dsb_ps.DataSet.Post;
    //lStr:= zxz;
    if lFlowTask <> nil then
    begin
      lOrgURL := TOrgURL.Create('','',zxz); //部门、岗位、人员创建组织单元
      lFlowTask.Executors.Add(lOrgURL);//添加执行者
    end;
    dsb_ps.DataSet.Next;
  end;
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-5-7 16:50:20 | 显示全部楼层
谢谢,对了,
回复 支持 反对

使用道具 举报

发表于 2008-5-7 16:53:37 | 显示全部楼层
好的,那结了
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2025-7-12 07:42 , Processed in 0.063190 second(s), 15 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表