if DataSetDetail.Modified = true then
begin
DataSetDetail.Post;
if DataSetMaster.Modified = true then
begin
DataSetMaster.Post; //billid
DataSetMaster.ApplyUpdates;
if DataSetBalanceSetting.Active = false then
DataSetBalanceSetting.Open;
BDept:= DataSetBalanceSetting.FieldByName('departmentcode').AsString;
BRole:= DataSetBalanceSetting.FieldByName('positioncode').AsString;
BPerson := DataSetBalanceSetting.FieldByName('employeecode').AsString;
//传入的值 billid 是流程字段
FBalanceBillid := DataSetMaster.FieldByName('billid').AsString;
UserStartFlow('Biz:\LATHIEPM\PROC_SUBLEASEHOLDBALANCE.PROC',
BDept,BRole,BPerson,'FUN_LEASEHOLEBALANCE',BalanceBillid,
projectname + FormatDatetime('yyyymm',
business.Data.SysSrv.SysService.Time) ,'CCCCCC');
end; |