|
@@ -945,7 +945,7 @@ begin
|
|
|
WarningMessage('未开始计量,请在开始计量后再导入分包汇总数据。')
|
|
|
else if CurProjectFrame.ProjectData.StageDataReadOnly then
|
|
|
WarningMessage('当前正在查看数据非最新数据,请切换至最新一期再导入分包汇总数据。')
|
|
|
- else if QuestMessage('导入将清空标段本期所有计量数据(合同计量、数量变更计量),确定继续?') and SelectFile(sFileName, '.sgf') then
|
|
|
+ else if QuestMessage('导入将清空标段本期所有计量数据(合同计量),确定继续?') and SelectFile(sFileName, '.sgf') then
|
|
|
CurProjectFrame.ProjectData.ImportSubTenderGather(sFileName);
|
|
|
end;
|
|
|
|