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
  end
end
