|

楼主 |
发表于 2008-11-18 09:22:09
|
显示全部楼层
但是我同样的方法,很多的流程启动的时候,都不会报主表没有数据的情况。就这一个流程出现这个情况。
在很多流程里下面这段代码是插入流程审批模版的 都不需要dsbMaster.DataSet.Append; 这句
procedure TMainForm.BizFormShow(Sender: TObject);
var
lDataSet : TSqlDataSet;
begin
if not dsbMaster.DataSet.Active then dsbMaster.DataSet.Open;
if not dsbFlow.DataSet.Active then dsbFlow.DataSet.Open;
if not DataSetBroker1.DataSet.Active then DataSetBroker1.DataSet.Open;
dsbMaster.DataSet.Append;
if not Flowbroker.FlowControl.FlowStartuped then
begin
lDataSet := DataSetBroker1.DataSet as TSqlDataSet;
FlowCommonUtils.TFlowUtils.LoadFlowTempletData('CONSTRACTOPINIONPRECESS',lDataSet);
end;
(InfoBroker.Info as CONSTRACTINFOR.TCONSTRACTINFOR).ModifyFlowData('bsWrite','10');
end; |
|