[分享]关于流程入口环节多条业务数据的处理

alang

流程有一个流程字段FlowField属性，缺省流程可以根据流程字段的一个值创建一个流程实例。在有些情况下，一个流程实例可能会对应多条业务数据，这些业务数据同时随着流程流转或者回退。

举例1：一个流程实例中对应多条业务数据
可以在流程入口环节的BeforeFlowStartup事件中，可以定义对应一个流程实例对应多条业务数据

如下面的例子中，当前数据集DataSet中有几条记录都可以放到这一个流程实例中
procedure TMAINFORM.FlowBroker1BeforeFlowStartup(Sender: TObject; Command: TFlowStartupCommand);
begin
  Command.FlowValue.IDs.Clear;
  DataSetBroker1.DataSet.First;
  while not DataSetBroker1.DataSet.Eof do
  begin
    Command.FlowValue.IDs.Add(DataSetBroker1.DataSet.FieldByName('PRODUCTID').AsString);
    DataSetBroker1.DataSet.Next;
  end;
end;

alang

举例2：在流程入口环节输入多条业务数据，每一条数据启动一个流程实例
设置流程启动规则的启动模式为流转时
设置流程启动规则的能否多次启动为True

在入口环节的功能窗体上放一个Button，在OnClick事件中做流转
procedure TMAINFORM.Button1Click(Sender: TObject);
begin
  DataSetBroker1.DataSet.First;
  while not DataSetBroker1.DataSet.Eof do
  begin
    FlowBroker1.FlowControl.FlowOut(nil);
    DataSetBroker1.DataSet.Next;
  end;
end;