| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251 | object rmGcl_XmjBillsData: TrmGcl_XmjBillsData  OldCreateOrder = False  Left = 795  Top = 218  Height = 150  Width = 215  object cdsGcl: TClientDataSet    Active = True    Aggregates = <>    FieldDefs = <      item        Name = 'IndexCode'        DataType = ftString        Size = 50      end      item        Name = 'IndexID'        DataType = ftInteger      end      item        Name = 'B_Code'        DataType = ftString        Size = 50      end      item        Name = 'Name'        DataType = ftWideString        Size = 200      end      item        Name = 'Code'        DataType = ftString        Size = 50      end      item        Name = 'Peg'        DataType = ftWideString        Size = 50      end      item        Name = 'NameDanWei'        DataType = ftWideString        Size = 200      end      item        Name = 'NameFenBu'        DataType = ftWideString        Size = 200      end      item        Name = 'NameFenXiang'        DataType = ftWideString        Size = 200      end      item        Name = 'NameUnit'        DataType = ftWideString        Size = 200      end      item        Name = 'DrawingCode'        DataType = ftWideString        Size = 50      end      item        Name = 'Price'        DataType = ftFloat      end      item        Name = 'Quantity'        DataType = ftFloat      end      item        Name = 'TotalPrice'        DataType = ftFloat      end      item        Name = 'DealQuantity'        DataType = ftFloat      end      item        Name = 'DealTotalPrice'        DataType = ftFloat      end      item        Name = 'DifferQuantity'        DataType = ftFloat      end      item        Name = 'DifferTotalPrice'        DataType = ftFloat      end      item        Name = 'Units'        DataType = ftWideString        Size = 20      end      item        Name = 'NewPrice'        DataType = ftFloat      end      item        Name = 'Position'        DataType = ftWideString        Size = 255      end      item        Name = 'OrgQuantity'        DataType = ftFloat      end      item        Name = 'OrgTotalPrice'        DataType = ftFloat      end      item        Name = 'MisQuantity'        DataType = ftFloat      end      item        Name = 'MisTotalPrice'        DataType = ftFloat      end      item        Name = 'OthQuantity'        DataType = ftFloat      end      item        Name = 'OthTotalPrice'        DataType = ftFloat      end>    IndexDefs = <>    Params = <>    StoreDefs = True    Left = 56    Top = 48    Data = {      9C0200009619E0BD01000000180000001B0000000000030000009C0209496E64      6578436F6465010049000000010005574944544802000200320007496E646578      4944040001000000000006425F436F6465010049000000010005574944544802      0002003200044E616D6502004A00000001000557494454480200020090010443      6F646501004900000001000557494454480200020032000350656701004A0000      0001000557494454480200020064000A4E616D6544616E57656902004A000000      0100055749445448020002009001094E616D6546656E427502004A0000000100      0557494454480200020090010C4E616D6546656E5869616E6702004A00000001      00055749445448020002009001084E616D65556E697402004A00000001000557      494454480200020090010B44726177696E67436F646501004A00000001000557      494454480200020064000550726963650800040000000000085175616E746974      7908000400000000000A546F74616C507269636508000400000000000C446561      6C5175616E7469747908000400000000000E4465616C546F74616C5072696365      08000400000000000E4469666665725175616E74697479080004000000000010      446966666572546F74616C5072696365080004000000000005556E6974730100      4A0000000100055749445448020002002800084E657750726963650800040000      00000008506F736974696F6E02004A000000010005574944544802000200FE01      0B4F72675175616E7469747908000400000000000D4F7267546F74616C507269      636508000400000000000B4D69735175616E7469747908000400000000000D4D      6973546F74616C507269636508000400000000000B4F74685175616E74697479      08000400000000000D4F7468546F74616C507269636508000400000000000000}    object cdsGclIndexCode: TStringField      FieldName = 'IndexCode'      Size = 50    end    object cdsGclIndexID: TIntegerField      FieldName = 'IndexID'    end    object cdsGclB_Code: TStringField      FieldName = 'B_Code'      Size = 50    end    object cdsGclName: TWideStringField      FieldName = 'Name'      Size = 200    end    object cdsGclCode: TStringField      FieldName = 'Code'      Size = 50    end    object cdsGclPeg: TWideStringField      FieldName = 'Peg'      Size = 50    end    object cdsGclNameDanWei: TWideStringField      FieldName = 'NameDanWei'      Size = 200    end    object cdsGclNameFenBu: TWideStringField      FieldName = 'NameFenBu'      Size = 200    end    object cdsGclNameFenXiang: TWideStringField      FieldName = 'NameFenXiang'      Size = 200    end    object cdsGclNameUnit: TWideStringField      FieldName = 'NameUnit'      Size = 200    end    object cdsGclDrawingCode: TWideStringField      FieldName = 'DrawingCode'      Size = 50    end    object cdsGclPrice: TFloatField      FieldName = 'Price'    end    object cdsGclQuantity: TFloatField      FieldName = 'Quantity'    end    object cdsGclTotalPrice: TFloatField      FieldName = 'TotalPrice'    end    object cdsGclDealQuantity: TFloatField      FieldName = 'DealQuantity'    end    object cdsGclDealTotalPrice: TFloatField      FieldName = 'DealTotalPrice'    end    object cdsGclDifferQuantity: TFloatField      FieldName = 'DifferQuantity'    end    object cdsGclDifferTotalPrice: TFloatField      FieldName = 'DifferTotalPrice'    end    object cdsGclUnits: TWideStringField      FieldName = 'Units'    end    object cdsGclNewPrice: TFloatField      FieldName = 'NewPrice'    end    object cdsGclPosition: TWideStringField      FieldName = 'Position'      Size = 255    end    object cdsGclOrgQuantity: TFloatField      FieldName = 'OrgQuantity'    end    object cdsGclOrgTotalPrice: TFloatField      FieldName = 'OrgTotalPrice'    end    object cdsGclMisQuantity: TFloatField      FieldName = 'MisQuantity'    end    object cdsGclMisTotalPrice: TFloatField      FieldName = 'MisTotalPrice'    end    object cdsGclOthQuantity: TFloatField      FieldName = 'OthQuantity'    end    object cdsGclOthTotalPrice: TFloatField      FieldName = 'OthTotalPrice'    end  endend
 |