|
@@ -862,6 +862,19 @@ object rmBillsGatherData: TrmBillsGatherData
|
|
|
item
|
|
|
Name = 'ABDgnPrice'
|
|
|
DataType = ftFloat
|
|
|
+ end
|
|
|
+ item
|
|
|
+ Name = 'FinalDgnQty'
|
|
|
+ DataType = ftString
|
|
|
+ Size = 20
|
|
|
+ end
|
|
|
+ item
|
|
|
+ Name = 'FinalDgnQty1'
|
|
|
+ DataType = ftFloat
|
|
|
+ end
|
|
|
+ item
|
|
|
+ Name = 'FinalDgnQty2'
|
|
|
+ DataType = ftFloat
|
|
|
end>
|
|
|
IndexDefs = <>
|
|
|
Params = <>
|
|
@@ -869,7 +882,7 @@ object rmBillsGatherData: TrmBillsGatherData
|
|
|
Left = 32
|
|
|
Top = 80
|
|
|
Data = {
|
|
|
- B70600009619E0BD010000001800000041000000000003000000B70609586961
|
|
|
+ 010700009619E0BD010000001800000044000000000003000000010709586961
|
|
|
6E67436F64650100490000000100055749445448020002000A00064D75436F64
|
|
|
650100490000000100055749445448020002000A00074A6965436F6465010049
|
|
|
00000001000557494454480200020014000858694D75436F6465010049000000
|
|
@@ -922,7 +935,10 @@ object rmBillsGatherData: TrmBillsGatherData
|
|
|
6E7469747932436F6D7061726533080004000000000006425F436F6465010049
|
|
|
000000010005574944544802000200320005507269636508000400000000000A
|
|
|
504444676E507269636508000400000000000B43444444676E50726963650800
|
|
|
- 0400000000000A414244676E507269636508000400000000000000}
|
|
|
+ 0400000000000A414244676E507269636508000400000000000B46696E616C44
|
|
|
+ 676E51747901004900000001000557494454480200020014000C46696E616C44
|
|
|
+ 676E5174793108000400000000000C46696E616C44676E517479320800040000
|
|
|
+ 0000000000}
|
|
|
object cdsEstimateBillsXiangCode: TStringField
|
|
|
FieldName = 'XiangCode'
|
|
|
Size = 10
|
|
@@ -1125,6 +1141,15 @@ object rmBillsGatherData: TrmBillsGatherData
|
|
|
object cdsEstimateBillsABDgnPrice: TFloatField
|
|
|
FieldName = 'ABDgnPrice'
|
|
|
end
|
|
|
+ object cdsEstimateBillsFinalDgnQty: TStringField
|
|
|
+ FieldName = 'FinalDgnQty'
|
|
|
+ end
|
|
|
+ object cdsEstimateBillsFinalDgnQty1: TFloatField
|
|
|
+ FieldName = 'FinalDgnQty1'
|
|
|
+ end
|
|
|
+ object cdsEstimateBillsFinalDgnQty2: TFloatField
|
|
|
+ FieldName = 'FinalDgnQty2'
|
|
|
+ end
|
|
|
end
|
|
|
object cdsProjectGclBills: TClientDataSet
|
|
|
Active = True
|