【结】关于流程问题请教**

dongxt

我想要的效果是这样地：我有一个申请需要审批，是主从表，就是要采购一些物资，头是采购单号，体是具体的采购物资。领导审核后把这些具体物资分给不同的采购负责人，然后流转给他们。我想要的就是，他们每个人都能收到一条任务，而且是独立执行，互不干扰。也就是说一个人看完后任务可以往下流转，而其他人的任务还在。个人处理各人的任务。也就是想手册上说的：独立分配+独立执行。但现实没有独立执行这一选项。我改怎么弄才好？等~

ZX

结贴了结贴了结贴了结贴了结贴了结贴了结贴了

atiger

不太明白？
ZX 你是说 dongxt 他提交的问题ok了？

dongxt

没有啊，我还没得到答案啊

atiger

哦，看来zx是会错帖子了。我还以为你们是一家呢。

1、任务的独立分配就没有任务抢占这一说法，任务抢占是针对任务共同分配而言的。
2、不知道楼主现在已经实现的效果是怎样的，具体说说？并告知哪些没有实现？哪些还没有实现？

从你的描述看，好像是从表是多条记录，每条记录有个字段，存储了采购负责人，要根据这些记录给这些采购负责人人员生成一条独立的任务，是吧？那这些任务是否要回退到申请人那边呢？

dongxt

对，我想要的就是你说的效果。我要可以回退的可以实现吗。我在网上看有手动生成多任务的代码，但是根据数据集的数据条数生成的任务，也就是有几条数据生成几个任务。我的需求是：不是一种物资就分给一个采购人，而是有可能多重物资分给一个采购人。也就是根据采购人分组。

dongxt

还有下面这段代码：
procedure TMainForm.FlowBroker1CreateFlowOutFlowTasks(Sender: TObject; Command: TFlowOutCommand);
var
  lFlowTask: TFlowTask;
  //ContextCurrent:TContextCurrent;
  lOrgURL: TOrgURL;
  Person: TPerson;
begin

  if  DataSetBroker1.DataSet.RecordCount=0 then
   begin
     Business.Forms.Dialogs.ShowMessage('流转时检测到项目数据集为零');
   end
  else
   begin
      lflowTask:=Command.FlowTasks.FindFlowTask(FlowBroker1.FlowControl.CurrentProcUnit.SuccedentUnits[0]);
      lFlowTask.Executors.Clear;
      DataSetBroker1.DataSet.First;
//DataSetBroker1.DataSet有n条记录，将产n个任务
      while not DataSetBroker1.DataSet.eof do
       begin
          Person:=OrgSys.OrgSystem.FindPerson(DataSetBroker1.DataSet.FieldByName('YJSHR').AsString ;
//接受任务的人员ID
          lOrgURL:=TOrgURL.Create('YPJCBM','YPZR',Person.ID);
          lflowTask.Executors.Add(lOrgURl);
          Dialogs.ShowMessage('增加任务到' +DataSetBroker1.DataSet.FieldByName('YJSHR').AsString +' 成功');
          DataSetBroker1.DataSet.Next;
       end;
      Command.UserModify := False;
   end

end;

######################
   lOrgURL:=TOrgURL.Create('YPJCBM','YPZR',Person.ID);
这一句中的 Person.ID 是必须的吗？我想要一个申请分到不同岗位即可。但如果这样写就出错：
lOrgURL:=TOrgURL.Create('YPJCBM','YPZR','');

dongxt

有人吗？

zfang

回7楼
Person.ID 不是必须的。任务可以发到岗位上
你说的报错，具体什么错误？是不是执行规则中设置了只允许发到人员成员上？

dongxt

我设的是岗位成员