|
|
@@ -1005,11 +1005,11 @@ procedure TProjectData.CopyPhaseData;
|
|
|
|
|
|
procedure CopyStageLeafXmjGLData(const AFileName: string);
|
|
|
const
|
|
|
- sCopySql = 'Select ID' +
|
|
|
+ sCopySql = 'Select ID,' +
|
|
|
' PreQuantity, PreTotalPrice, PreUsedQuantity, PreUsedTotalPrice,' +
|
|
|
' PrePAL_UsedQuantity, PrePAL_UsedTotalPrice, PrePAL_DeltaPrice, PrePAL_Total,'+
|
|
|
' Quantity, TotalPrice, UsedQuantity, UsedTotalPrice,' +
|
|
|
- ' PAL_UsedQuantity, PAL_UsedTotalPrice, PAL_DeltaPrice, PAL_Total'+
|
|
|
+ ' PAL_UsedQuantity, PAL_UsedTotalPrice, PAL_DeltaPrice, PAL_Total,'+
|
|
|
' EndQuantity, EndTotalPrice, EndUsedQuantity, EndUsedTotalPrice,' +
|
|
|
' EndPAL_UsedQuantity, EndPAL_UsedTotalPrice, EndPAL_DeltaPrice, EndPAL_Total'+
|
|
|
' Into P_StageLeafXmjGL' +
|