object BillsGatherData: TBillsGatherData
  OldCreateOrder = False
  Left = 975
  Top = 520
  Height = 405
  Width = 326
  object smpGclBills: TsdMemoryProvider
    Left = 40
    Top = 16
  end
  object sddGclBills: TsdDataSet
    Active = False
    Provider = smpGclBills
    Left = 40
    Top = 72
    FieldListData = {
[encoded data, 8307 characters]
      0F4E65656450726F636573734E616D65090000}
  end
  object sdvGclBills: TsdDataView
    Active = False
    DataSet = sddGclBills
    Filtered = False
    Columns = <
      item
        FieldName = 'IndexCode'
      end
      item
        FieldName = 'B_Code'
      end
      item
        FieldName = 'Name'
      end
      item
        FieldName = 'Units'
      end
      item
        FieldName = 'Price'
      end
      item
        FieldName = 'DealQuantity'
      end
      item
        FieldName = 'DealTotalPrice'
      end
      item
        FieldName = 'BGLQuantity'
      end
      item
        FieldName = 'BGLTotalPrice'
      end
      item
        FieldName = 'Quantity'
      end
      item
        FieldName = 'TotalPrice'
      end
      item
        FieldName = 'CurDealQuantity'
      end
      item
        FieldName = 'CurDealTotalPrice'
      end
      item
        FieldName = 'CurQcQuantity'
      end
      item
        FieldName = 'CurQcTotalPrice'
      end
      item
        FieldName = 'CurGatherQuantity'
      end
      item
        FieldName = 'CurGatherTotalPrice'
      end
      item
        FieldName = 'PreDealQuantity'
      end
      item
        FieldName = 'PreDealTotalPrice'
      end
      item
        FieldName = 'PreQcQuantity'
      end
      item
        FieldName = 'PreQcTotalPrice'
      end
      item
        FieldName = 'PreGatherQuantity'
      end
      item
        FieldName = 'PreGatherTotalPrice'
      end
      item
        FieldName = 'AddDealQuantity'
      end
      item
        FieldName = 'AddDealTotalPrice'
      end
      item
        FieldName = 'AddQcQuantity'
      end
      item
        FieldName = 'AddQcTotalPrice'
      end
      item
        FieldName = 'AddGatherQuantity'
      end
      item
        FieldName = 'AddGatherTotalPrice'
      end
      item
        FieldName = 'EndDealQuantity'
      end
      item
        FieldName = 'EndDealTotalPrice'
      end
      item
        FieldName = 'EndQcQuantity'
      end
      item
        FieldName = 'EndQcTotalPrice'
      end
      item
        FieldName = 'EndGatherQuantity'
      end
      item
        FieldName = 'EndGatherTotalPrice'
      end
      item
        FieldName = 'Deal_BGLQuantity'
      end
      item
        FieldName = 'Deal_BGLTotalPrice'
      end
      item
        FieldName = 'Deal_BGLPercent'
        DisplayFormat = '0.##'
      end>
    OnCurrentChanged = sdvGclBillsCurrentChanged
    OnGetText = sdvGclBillsGetText
    Left = 40
    Top = 136
  end
  object smpDetailGclBills: TsdMemoryProvider
    Left = 40
    Top = 192
  end
  object sddDetailGclBills: TsdDataSet
    Active = False
    Provider = smpDetailGclBills
    Left = 40
    Top = 248
    FieldListData = {
[encoded data, 8378 characters]
      53697A6502080549734B6579080F4E65656450726F636573734E616D65090000}
  end
  object sdvDetailGclBills: TsdDataView
    Active = False
    DataSet = sddDetailGclBills
    Filtered = False
    Columns = <
      item
        FieldName = 'XmjCode'
      end
      item
        FieldName = 'XmjName'
      end
      item
        FieldName = 'XmjUnits'
      end
      item
        FieldName = 'NameDanWei'
      end
      item
        FieldName = 'NameFenXiang'
      end
      item
        FieldName = 'NameFenBu'
      end
      item
        FieldName = 'NameUnit'
      end
      item
        FieldName = 'Peg'
      end
      item
        FieldName = 'Position'
      end
      item
        FieldName = 'DrawingCode'
      end
      item
        FieldName = 'Quantity'
      end>
    OnFilterRecord = sdvDetailGclBillsFilterRecord
    OnGetText = sdvGclBillsGetText
    Left = 40
    Top = 312
  end
  object smpDetailDealBills: TsdMemoryProvider
    Left = 136
    Top = 192
  end
  object sddDetailDealBills: TsdDataSet
    Active = False
    Provider = smpDetailDealBills
    Left = 136
    Top = 248
    FieldListData = {
      0101044E616D6506024944094669656C644E616D650602494408446174615479
      70650203084461746153697A6502040549734B6579080F4E65656450726F6365
      73734E616D65090001044E616D65060742696C6C734944094669656C644E616D
      65060742696C6C7349440844617461547970650203084461746153697A650204
      0549734B6579080F4E65656450726F636573734E616D65090001044E616D6506
      064465616C4944094669656C644E616D6506064465616C494408446174615479
      70650203084461746153697A6502040549734B6579080F4E65656450726F6365
      73734E616D65090001044E616D650606425F436F6465094669656C644E616D65
      0606425F436F64650844617461547970650201084461746153697A6502320549
      734B6579080F4E65656450726F636573734E616D65090001044E616D6506044E
      616D65094669656C644E616D6506044E616D6508446174615479706502180844
      61746153697A6503C8000549734B6579080F4E65656450726F636573734E616D
      65090001044E616D650605556E697473094669656C644E616D650605556E6974
      730844617461547970650218084461746153697A6502140549734B6579080F4E
      65656450726F636573734E616D65090001044E616D6506055072696365094669
      656C644E616D6506055072696365084461746154797065020608446174615369
      7A6502080549734B6579080F4E65656450726F636573734E616D65090001044E
      616D6506085175616E74697479094669656C644E616D6506085175616E746974
      790844617461547970650206084461746153697A6502080549734B6579080F4E
      65656450726F636573734E616D65090001044E616D65060A546F74616C507269
      6365094669656C644E616D65060A546F74616C50726963650844617461547970
      650206084461746153697A6502080549734B6579080F4E65656450726F636573
      734E616D65090000}
  end
  object sdvDetailDealBills: TsdDataView
    Active = False
    DataSet = sddDetailDealBills
    Filtered = False
    Columns = <
      item
        FieldName = 'B_Code'
      end
      item
        FieldName = 'Name'
      end
      item
        FieldName = 'Units'
      end
      item
        FieldName = 'Price'
      end
      item
        FieldName = 'Quantity'
      end
      item
        FieldName = 'TotalPrice'
      end>
    OnFilterRecord = sdvDetailGclBillsFilterRecord
    OnGetText = sdvGclBillsGetText
    Left = 136
    Top = 312
  end
  object smpDetailBGLBills: TsdMemoryProvider
    Left = 240
    Top = 192
  end
  object sddDetailBGLBills: TsdDataSet
    Active = False
    Provider = smpDetailBGLBills
    Left = 240
    Top = 248
    FieldListData = {
      0101044E616D6506024944094669656C644E616D650602494408446174615479
      70650203084461746153697A6502040549734B6579080F4E65656450726F6365
      73734E616D65090001044E616D650609424742696C6C734944094669656C644E
      616D650609424742696C6C734944084461746154797065020308446174615369
      7A6502040549734B6579080F4E65656450726F636573734E616D65090001044E
      616D65060542474C4944094669656C644E616D65060542474C49440844617461
      547970650203084461746153697A6502040549734B6579080F4E65656450726F
      636573734E616D65090001044E616D65060742474C436F6465094669656C644E
      616D65060742474C436F64650844617461547970650218084461746153697A65
      02320549734B6579080F4E65656450726F636573734E616D65090001044E616D
      65060742474C4E616D65094669656C644E616D65060742474C4E616D65084461
      7461547970650218084461746153697A6503C8000549734B6579080F4E656564
      50726F636573734E616D65090001044E616D65060F42474C417070726F76616C
      436F6465094669656C644E616D65060F42474C417070726F76616C436F646508
      44617461547970650218084461746153697A6502320549734B6579080F4E6565
      6450726F636573734E616D65090001044E616D65060E42474C44726177696E67
      436F6465094669656C644E616D65060E42474C44726177696E67436F64650844
      617461547970650218084461746153697A6502320549734B6579080F4E656564
      50726F636573734E616D65090001044E616D6506085175616E74697479094669
      656C644E616D6506085175616E74697479084461746154797065020608446174
      6153697A6502080549734B6579080F4E65656450726F636573734E616D650900
      01044E616D65060A546F74616C5072696365094669656C644E616D65060A546F
      74616C50726963650844617461547970650206084461746153697A6502080549
      734B6579080F4E65656450726F636573734E616D65090001044E616D65060742
      696C6C734944094669656C644E616D65060742696C6C73494408446174615479
      70650203084461746153697A6502040549734B6579080F4E65656450726F6365
      73734E616D65090000}
  end
  object sdvDetailBGLBills: TsdDataView
    Active = False
    DataSet = sddDetailBGLBills
    Filtered = False
    Columns = <
      item
        FieldName = 'BGLCode'
      end
      item
        FieldName = 'BGLName'
      end
      item
        FieldName = 'BGLApprovalCode'
      end
      item
        FieldName = 'BGLDrawingCode'
      end
      item
        FieldName = 'Quantity'
      end
      item
        FieldName = 'TotalPrice'
      end>
    OnFilterRecord = sdvDetailGclBillsFilterRecord
    OnGetText = sdvGclBillsGetText
    Left = 240
    Top = 312
  end
end
