找到原因了 是流程状态的2个事件
{procedure TMAINFORM.FlowBrokerAfterTaskAbort(Sender: TObject; Command: TTaskAbortCommand);
begin
Inherited;
if BaseInfo.CanSetBillState then
BaseInfo.SetBillState('5');
end;
procedure TMAINFORM.FlowBrokerAfterFlowOut(Sender: TObject; Command: TFlowOutCommand);
begin
Inherited;
if BaseInfo.CanSetBillState then
BaseInfo.SetBillState('7');
end; }