123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247 |
- object rmFxBillsCompareData: TrmFxBillsCompareData
- OldCreateOrder = False
- Left = 567
- Top = 304
- Height = 150
- Width = 215
- object cdsBills: TClientDataSet
- Active = True
- Aggregates = <>
- FieldDefs = <
- item
- Name = 'Code'
- DataType = ftString
- Size = 50
- end
- item
- Name = 'B_Code'
- DataType = ftString
- Size = 50
- end
- item
- Name = 'Name'
- DataType = ftWideString
- Size = 100
- end
- item
- Name = 'Units'
- DataType = ftWideString
- Size = 20
- end
- item
- Name = 'SQuantity'
- DataType = ftFloat
- end
- item
- Name = 'SPrice'
- DataType = ftFloat
- end
- item
- Name = 'STotalPrice'
- DataType = ftFloat
- end
- item
- Name = 'CQuantity'
- DataType = ftFloat
- end
- item
- Name = 'CPrice'
- DataType = ftFloat
- end
- item
- Name = 'CTotalPrice'
- DataType = ftFloat
- end
- item
- Name = 'DQuantity'
- DataType = ftFloat
- end
- item
- Name = 'DPrice'
- DataType = ftFloat
- end
- item
- Name = 'DTotalPrice'
- DataType = ftFloat
- end
- item
- Name = 'MemoStr'
- DataType = ftString
- Size = 50
- end
- item
- Name = 'SDgnQuantity1'
- DataType = ftFloat
- end
- item
- Name = 'SDgnQuantity2'
- DataType = ftFloat
- end
- item
- Name = 'SDgnQuantity'
- DataType = ftString
- Size = 50
- end
- item
- Name = 'CDgnQuantity1'
- DataType = ftFloat
- end
- item
- Name = 'CDgnQuantity2'
- DataType = ftFloat
- end
- item
- Name = 'CDgnQuantity'
- DataType = ftString
- Size = 50
- end
- item
- Name = 'DDgnQuantity1'
- DataType = ftFloat
- end
- item
- Name = 'DDgnQuantity2'
- DataType = ftFloat
- end
- item
- Name = 'DDgnQuantity'
- DataType = ftString
- Size = 50
- end
- item
- Name = 'XiangCode'
- DataType = ftWideString
- Size = 20
- end
- item
- Name = 'MuCode'
- DataType = ftString
- Size = 20
- end
- item
- Name = 'JieCode'
- DataType = ftString
- Size = 20
- end
- item
- Name = 'XiMuCode'
- DataType = ftString
- Size = 20
- end>
- IndexDefs = <>
- Params = <>
- StoreDefs = True
- Left = 48
- Top = 40
- Data = {
- 950200009619E0BD01000000180000001B000000000003000000950204436F64
- 65010049000000010005574944544802000200320006425F436F646501004900
- 00000100055749445448020002003200044E616D6501004A0000000100055749
- 44544802000200C80005556E69747301004A0000000100055749445448020002
- 00280009535175616E7469747908000400000000000653507269636508000400
- 000000000B53546F74616C5072696365080004000000000009435175616E7469
- 747908000400000000000643507269636508000400000000000B43546F74616C
- 5072696365080004000000000009445175616E74697479080004000000000006
- 44507269636508000400000000000B44546F74616C5072696365080004000000
- 0000074D656D6F53747201004900000001000557494454480200020032000D53
- 44676E5175616E746974793108000400000000000D5344676E5175616E746974
- 793208000400000000000C5344676E5175616E74697479010049000000010005
- 57494454480200020032000D4344676E5175616E746974793108000400000000
- 000D4344676E5175616E746974793208000400000000000C4344676E5175616E
- 7469747901004900000001000557494454480200020032000D4444676E517561
- 6E746974793108000400000000000D4444676E5175616E746974793208000400
- 000000000C4444676E5175616E74697479010049000000010005574944544802
- 0002003200095869616E67436F646501004A0000000100055749445448020002
- 002800064D75436F64650100490000000100055749445448020002001400074A
- 6965436F646501004900000001000557494454480200020014000858694D7543
- 6F646501004900000001000557494454480200020014000000}
- object cdsBillsCode: TStringField
- FieldName = 'Code'
- Size = 50
- end
- object cdsBillsB_Code: TStringField
- FieldName = 'B_Code'
- Size = 50
- end
- object cdsBillsName: TWideStringField
- FieldName = 'Name'
- Size = 100
- end
- object cdsBillsUnits: TWideStringField
- FieldName = 'Units'
- end
- object cdsBillsSQuantity: TFloatField
- FieldName = 'SQuantity'
- end
- object cdsBillsSPrice: TFloatField
- FieldName = 'SPrice'
- end
- object cdsBillsSTotalPrice: TFloatField
- FieldName = 'STotalPrice'
- end
- object cdsBillsCQuantity: TFloatField
- FieldName = 'CQuantity'
- end
- object cdsBillsCPrice: TFloatField
- FieldName = 'CPrice'
- end
- object cdsBillsCTotalPrice: TFloatField
- FieldName = 'CTotalPrice'
- end
- object cdsBillsDQuantity: TFloatField
- FieldName = 'DQuantity'
- end
- object cdsBillsDPrice: TFloatField
- FieldName = 'DPrice'
- end
- object cdsBillsDTotalPrice: TFloatField
- FieldName = 'DTotalPrice'
- end
- object cdsBillsMemoStr: TStringField
- FieldName = 'MemoStr'
- Size = 50
- end
- object cdsBillsSDgnQuantity1: TFloatField
- FieldName = 'SDgnQuantity1'
- end
- object cdsBillsSDgnQuantity2: TFloatField
- FieldName = 'SDgnQuantity2'
- end
- object cdsBillsSDgnQuantity: TStringField
- FieldName = 'SDgnQuantity'
- Size = 50
- end
- object cdsBillsCDgnQuantity1: TFloatField
- FieldName = 'CDgnQuantity1'
- end
- object cdsBillsCDgnQuantity2: TFloatField
- FieldName = 'CDgnQuantity2'
- end
- object cdsBillsCDgnQuantity: TStringField
- FieldName = 'CDgnQuantity'
- Size = 50
- end
- object cdsBillsDDgnQuantity1: TFloatField
- FieldName = 'DDgnQuantity1'
- end
- object cdsBillsDDgnQuantity2: TFloatField
- FieldName = 'DDgnQuantity2'
- end
- object cdsBillsDDgnQuantity: TStringField
- FieldName = 'DDgnQuantity'
- Size = 50
- end
- object cdsBillsXiangCode: TWideStringField
- FieldName = 'XiangCode'
- end
- object cdsBillsMuCode: TStringField
- FieldName = 'MuCode'
- end
- object cdsBillsJieCode: TStringField
- FieldName = 'JieCode'
- end
- object cdsBillsXiMuCode: TStringField
- FieldName = 'XiMuCode'
- end
- end
- end
|