[请求]流程流出时报错！

zykj

我们在afterFlowout事件中已经写了终止流程的语句：flowcontrol.flowFinish(nil); 意为在流出后就结束流程，此时就需要取消在代办任务界面上遗留的任务消息。

atiger

那不要执行流程结束，而是执行中止任务或者终止流程，这样就不会产生任务了，

zykj

终止语句是不是：flowcontrol.flowAbort(nil); 但是我用这个语句会报：oracle的违反唯一性约束的错误啊

shangxy

不要写到afterflowout事件中，写到窗体的关闭事件里面

zykj

还是不行，而且待办任务栏上面也不会消失。

出错内容：
没有启动事务，不能执行该操作

shangxy

procedure TMainForm.BizFormClose(Sender: TObject; var Action: TCloseAction);
var lFlowParam :TLoadFlowParam;
    lFlows :TObjectList;
    lFlowControl :TFlowControl;
begin
{  lFlowParam := TLoadFlowParam.Create;
     if  lFlowParam.GUIDs.count = 0 then
    begin
        //accept:=true;
       lFlowParam.IDs.Add(DataSetBroker1.DataSet.FieldByName('zd1').AsString);
    end;
  lFlows:= TObjectList.Create;
  Flow.FlowEngine.GetFlows(lFlowParam, lFlows);
  lFlowControl := self.Context.GetParentContext(BizSys.IL_FLOW).Owner as TFlowControl;  }
  FlowBroker1.FlowControl.FlowAbort(nil);

end;

这个是我在写的代码测试没有问题的。