【搞定】待办任务中的批处理任务的问题**

yancm

现在流程不支持此模式。如果需要实现的话要写代码。具体代码实现方式需要研究一下。

thb425

代码如何写那

yancm

在业务模型\协同系统\任务\任务中心信息 按下面的代码修改下面的函数

procedure TTASKCENTERINFO.DataSetBatchTaskBeforeOpen(DataSet: TDataSet);
const
  cFlowTaskSQL = 'TTASK.FGROUPGUID = ''-1'' AND TTASK.FPROCURL = ''%s'' AND TTASK.FPROCUNITID = ''%s'' AND TTASK.FSTATE IN (%s) AND TTASK.FFLOWGUID = ''%s'' ' ;
  cTaskSQL = 'TTASK.FGROUPGUID = ''-1'' AND TTASK.FTYPE = ''%s'' AND TTASK.FSTATE IN (%s)';
var
  lProcessingTask: string;
begin

  lProcessingTask := TFilterBuilder.DoGetTaskStatesQueryStr(TTask.CanProcessTaskStates);
  if Task.IsFlowTask then
    DataSetBatchTask.UserFilter := SysUtils.Format(cFlowTaskSQL, [Task.ProcURL, Task.ProcUnitID, lProcessingTask,TASK.FlowGUID ])
  else
    DataSetBatchTask.UserFilter := SysUtils.Format(cTaskSQL, [Task.TaskType, lProcessingTask]);

  DataSetBatchTask.SQLFilter := DataSetTaskIndex.SQLFilter;
  DataSetBatchTask.SQLFiltered := True;
end;

yancm

看在我写了代码的基础上，反馈一下吧，

yancm

长期无反馈，先结贴了