开始计量后，直接导入分包汇总数据，父项不汇总计算

DataModules/StageDm.pas

@@ -677,7 +677,9 @@ var
   ChildNode: TMeasureBillsIDTreeNode;
   fDeal, fQc, fPc, fTotal, fPM: Double;
 begin
-  if not Assigned(ANode.StageRec) then Exit;
+  if not Assigned(TMeasureBillsIDTreeNode(ANode.FirstChild).StageRec) then Exit;
+  if not Assigned(ANode.StageRec) then
+    ANode.StageRec := AddStageRecord(ANode.ID);
 
   fDeal := 0;
   fQc := 0;