|
|
@@ -1023,7 +1023,7 @@ begin
|
|
|
Rec.AddDifferValue(Rec.GatherTotalPrice, fDiffer);
|
|
|
Rec.AddDifferValue(Rec.EndGatherTotalPrice, fDiffer);
|
|
|
with TProjectData(TPhaseData(FPhaseData).ProjectData).BillsMeasureData do
|
|
|
- UpdateGather(iMaterialID, fDiffer)
|
|
|
+ UpdateGather(iMaterialID, fDiffer);
|
|
|
UpdateParentRecord(Rec.BillsID.AsInteger, fDiffer, 'GatherTotalPrice');
|
|
|
end;
|
|
|
end;
|