【结贴】[请求]流程的默认执行者设置**

wfox

流程的默认执行者，是否可以实现如果在流程中进行了设置则永远按照设置来确认默认执行者，如果没有设置则通过用户上次流转的人员来确认执行者。

例如我们有个环节默认设置为流转给第一个环节的执行者即申请人并做了限定，由于多张表单申请人不一样，审批人后面流转的时候默认的执行者就出不来了。

lixy

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

wfox

因为在很多情况下，无法准确的确认默认执行者，使用上一次的执行者是有一定道理的，所以不想整体去掉。

像这种可以准确的确定默认执行者的情况，按照你提供的方法只能是通过代码了吗？？？

lixy

是的。 如果觉得平台的记忆执行者的功能不满意，只能每一个功能加代码添加执行者了。

wfox

像我在1楼提到的方案是否可以实现，可以提供给我们相关的代码吗？
对于设置了默认执行者的则永远按照设置来确认默认执行者，如果没有设置则通过用户上次流转的人员来确认执行者

lixy

每一个功能加段默认执行者判断的代码就行了。
怎么加默认执行者，上面的链接有。
怎么判断，可以取默认执行者列表是否是空。

wfox

我的意思是不想每个功能加代码，能够在统一的某个地方加代码即可。
例如：在平台将上次流转的人员设置为默认执行者的地方加个判断

wfox

我的意思是不想每个功能加代码，能够在统一的某个地方加代码即可。
例如：在平台将上次流转的人员设置为默认执行者的地方加个判断

lixy

可以在http://bbs.justep.com/showthread.php?threadid=18672
链接的函数位置加代码。
也就是
业务模型\系统空间\简洁风格\界面库\窗体库\标准风格主窗体
procedure TSTANDARDSTYLEMAINFORM.DoOnCreateFlowTasks(Sender: TObject; ACommand: TFlowCommand);
begin
     TDefaultFlowExecutorsManager.RefreshExecutors(ACommand);   
   ............. 后面做。

wfox

直接改的TDefaultFlowExecutorsManager.RefreshExecutors(ACommand: TFlowCommand)函数，初步看实现了如果有设置默认人员则不使用上一次人员的目的，是否会引起问题还需要确认，
能不能帮忙看看这样改行吗

      // 20090611 add
      if lFlowTask.Executors.Count > 0 then
          break;
        // end end

        for J := 0 to lFlowTask.Executors.Count - 1 do
          if SysUtils.SameText(lFlowTask.Executors[J].BizURL.URL, lExecutor) then
          begin
            lBizURL.URL := lExecutor;
            lOrgURL := TOrgURL.Create(lBizURL);
            TOrgURLs(lDefault.Objects[lDefault.IndexOf(lProcURL + '[' + lProcUnitid + ']')]).Add(lORgURL);
            break;
          end