【结贴】流程控制的问题**

rzport_gongyu

有一个流程 A_____B_____C.
在B这个环节我有一个流程代理 有一个事件afterflowstartup 作了一些业务数据操作。 其中A传给B，B可以传给C，C又可以传给B。

想问一下 我想判断是A发给B的时 ，执行这个事件。而要是C发给B的话就不执行这个事件。 如何代码取得 流程ID进行判断？

lixy

http://bbs.justep.com/forum.php?mod=viewthread&tid=3526

rzport_gongyu

这是我在事件里写的代码。var
  I: Integer;
  lUnits: TList;
begin

     lUnits := TList.Create;
  try
    FlowBroker1.FlowControl.CurrentProcUnit.GetLeadingUnits(lUnits,
      [TProcUnitKind.ukActivity], [TProcUnitKind.ukActivity]); // ukActivity表示活动环节

    for I := 0 to lUnits.Count - 1 do
    begin

         if TProcUnit(lUnits[I]).ID='FWCZ' then
         begin

            DataSetBroker1.DataSet.Open;
            DataSetBroker2.DataSet.Append;
            DataSetBroker2.DataSet.FieldByName('bh').AsString := DataSetBroker1.DataSet.FieldByName('bh').AsString;
            DataSetBroker2.DataSet.FieldByName('wjbt').AsString := DataSetBroker1.DataSet.FieldByName('wjbt').AsString;
            DataSetBroker2.DataSet.FieldByName('wh').AsString := DataSetBroker1.DataSet.FieldByName('wh').AsString;
            DataSetBroker2.DataSet.FieldByName('ztc').AsString := DataSetBroker1.DataSet.FieldByName('ztc').AsString;
            DataSetBroker2.DataSet.FieldByName('mj').AsString := DataSetBroker1.DataSet.FieldByName('mj').AsString;
            DataSetBroker2.DataSet.FieldByName('fwdw').AsString := DataSetBroker1.DataSet.FieldByName('fwdw').AsString;
            DataSetBroker2.DataSet.FieldByName('fwsj').AsDateTime := DataSetBroker1.DataSet.FieldByName('fwsj').ASDateTime;
         end;

但是他取出来的流程是所有 有可能的环节 而不是我想要得A环节 。怎么样只取得我需要的A环节

lixy

http://bbs.justep.com/forum.php?mod=viewthread&tid=2852

lixy

楼主可以多关注下精华贴区
http://bbs.justep.com/forumdisplay.php?s=&forumid=24
很多问题可能都不需寻找了。

rzport_gongyu

可以了 结帖