DS6JIEFENG/月结对账/u_rp_op_ttl.dfm

object frm_rp_op_ttl: Tfrm_rp_op_ttl
  Left = 75
  Top = 143
  Width = 1186
  Height = 642
  Align = alClient
  Caption = #32508#21512#32479#35745
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 12
  object main_pool: TPanel
    Left = 0
    Top = 0
    Width = 1170
    Height = 604
    Align = alClient
    BevelInner = bvLowered
    TabOrder = 0
    object Panel1: TPanel
      Left = 2
      Top = 2
      Width = 1166
      Height = 29
      Align = alTop
      BevelInner = bvLowered
      TabOrder = 0
      object Label11: TLabel
        Left = 20
        Top = 9
        Width = 48
        Height = 12
        Caption = #24320#33337#26085#26399
        Transparent = True
      end
      object Label12: TLabel
        Left = 178
        Top = 9
        Width = 12
        Height = 12
        Caption = #33267
        Transparent = True
      end
      object Label1: TLabel
        Left = 319
        Top = 9
        Width = 48
        Height = 12
        Caption = #36134#40836#26085#26399
        Transparent = True
      end
      object Label213: TLabel
        Left = 488
        Top = 10
        Width = 48
        Height = 12
        Caption = #22996#25176#21333#20301
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        Transparent = True
      end
      object bsSkinButton1: TbsSkinButton
        Left = 828
        Top = 2
        Width = 75
        Height = 25
        TabOrder = 0
        SkinDataName = 'button'
        DefaultFont.Charset = DEFAULT_CHARSET
        DefaultFont.Color = clWindowText
        DefaultFont.Height = 14
        DefaultFont.Name = 'Arial'
        DefaultFont.Style = []
        DefaultWidth = 0
        DefaultHeight = 0
        UseSkinFont = True
        RepeatMode = False
        RepeatInterval = 100
        AllowAllUp = False
        TabStop = True
        CanFocused = True
        Down = False
        GroupIndex = 0
        Caption = #26816#32034#25968#25454
        NumGlyphs = 2
        Spacing = 1
        OnClick = bsSkinButton1Click
      end
      object bsSkinButton2: TbsSkinButton
        Left = 906
        Top = 1
        Width = 75
        Height = 25
        TabOrder = 1
        SkinDataName = 'button'
        DefaultFont.Charset = DEFAULT_CHARSET
        DefaultFont.Color = clWindowText
        DefaultFont.Height = 14
        DefaultFont.Name = 'Arial'
        DefaultFont.Style = []
        DefaultWidth = 0
        DefaultHeight = 0
        UseSkinFont = True
        RepeatMode = False
        RepeatInterval = 100
        AllowAllUp = False
        TabStop = True
        CanFocused = True
        Down = False
        GroupIndex = 0
        Caption = #23384#20026#25991#20214
        NumGlyphs = 2
        Spacing = 1
        OnClick = bsSkinButton2Click
      end
      object bsSkinButton3: TbsSkinButton
        Left = 984
        Top = 1
        Width = 75
        Height = 25
        TabOrder = 2
        SkinDataName = 'button'
        DefaultFont.Charset = DEFAULT_CHARSET
        DefaultFont.Color = clWindowText
        DefaultFont.Height = 14
        DefaultFont.Name = 'Arial'
        DefaultFont.Style = []
        DefaultWidth = 0
        DefaultHeight = 0
        UseSkinFont = True
        RepeatMode = False
        RepeatInterval = 100
        AllowAllUp = False
        TabStop = True
        CanFocused = True
        Down = False
        GroupIndex = 0
        Caption = #25171#21360
        NumGlyphs = 2
        Spacing = 1
        OnClick = bsSkinButton3Click
      end
      object bsSkinButton4: TbsSkinButton
        Left = 1063
        Top = 0
        Width = 75
        Height = 25
        TabOrder = 3
        SkinDataName = 'button'
        DefaultFont.Charset = DEFAULT_CHARSET
        DefaultFont.Color = clWindowText
        DefaultFont.Height = 14
        DefaultFont.Name = 'Arial'
        DefaultFont.Style = []
        DefaultWidth = 0
        DefaultHeight = 0
        UseSkinFont = True
        RepeatMode = False
        RepeatInterval = 100
        AllowAllUp = False
        TabStop = True
        CanFocused = True
        Down = False
        GroupIndex = 0
        Caption = #20851#38381
        NumGlyphs = 2
        Spacing = 1
        OnClick = bsSkinButton4Click
      end
      object wwDBDateTimePicker1: TwwDBDateTimePicker
        Left = 72
        Top = 5
        Width = 102
        Height = 20
        CalendarAttributes.Font.Charset = DEFAULT_CHARSET
        CalendarAttributes.Font.Color = clWindowText
        CalendarAttributes.Font.Height = -11
        CalendarAttributes.Font.Name = 'MS Sans Serif'
        CalendarAttributes.Font.Style = []
        Epoch = 1950
        ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
        ShowButton = True
        TabOrder = 4
      end
      object wwDBDateTimePicker2: TwwDBDateTimePicker
        Left = 194
        Top = 5
        Width = 117
        Height = 20
        CalendarAttributes.Font.Charset = DEFAULT_CHARSET
        CalendarAttributes.Font.Color = clWindowText
        CalendarAttributes.Font.Height = -11
        CalendarAttributes.Font.Name = 'MS Sans Serif'
        CalendarAttributes.Font.Style = []
        Epoch = 1950
        ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
        ShowButton = True
        TabOrder = 5
      end
      object wwDBDateTimePicker3: TwwDBDateTimePicker
        Left = 371
        Top = 6
        Width = 110
        Height = 20
        CalendarAttributes.Font.Charset = DEFAULT_CHARSET
        CalendarAttributes.Font.Color = clWindowText
        CalendarAttributes.Font.Height = -11
        CalendarAttributes.Font.Name = 'MS Sans Serif'
        CalendarAttributes.Font.Style = []
        Epoch = 1950
        ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
        ShowButton = True
        TabOrder = 6
      end
      object RxDBLookupCombo57: TRxDBLookupCombo
        Left = 540
        Top = 4
        Width = 170
        Height = 20
        DropDownCount = 20
        DropDownWidth = 200
        DisplayAllFields = True
        Color = clWhite
        DisplayEmpty = '<'#26080'>'
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
        LookupField = #23458#25143#31616#31216
        LookupDisplay = #20195#30721';'#23458#25143#31616#31216
        LookupSource = frm_data_share.t_crm_client_weituo1
        ParentFont = False
        TabOrder = 7
      end
      object CheckBox1: TCheckBox
        Left = 719
        Top = 6
        Width = 97
        Height = 17
        Caption = #26174#31034#36153#29992#26126#32454
        TabOrder = 8
      end
    end
    object dxDBGrid2: TdxDBGrid
      Left = 2
      Top = 31
      Width = 1166
      Height = 543
      Bands = <
        item
        end>
      DefaultLayout = True
      HeaderPanelRowCount = 1
      KeyField = 'ORDNO'
      ShowGroupPanel = True
      ShowSummaryFooter = True
      SummaryGroups = <
        item
          DefaultGroup = True
          SummaryItems = <
            item
              ColumnName = 'dxDBGrid2Column8'
              SummaryType = cstCount
            end
            item
              ColumnName = 'dxDBGrid2Column12'
              SummaryType = cstSum
            end
            item
              ColumnName = 'dxDBGrid2Column14'
              SummaryType = cstSum
            end
            item
              ColumnName = 'dxDBGrid2Column18'
              SummaryType = cstCount
            end>
          Name = 'dxDBGrid2SummaryGroup2'
        end>
      SummarySeparator = ', '
      Align = alClient
      Color = clWhite
      TabOrder = 1
      DataSource = memtbl1
      Filter.Active = True
      Filter.Criteria = {00000000}
      OptionsDB = [edgoCancelOnExit, edgoCanDelete, edgoCanInsert, edgoCanNavigation, edgoConfirmDelete, edgoLoadAllRecords, edgoUseBookmarks]
      ShowRowFooter = True
      object dxDBGrid2Column8: TdxDBGridColumn
        HeaderAlignment = taCenter
        ReadOnly = True
        Width = 100
        BandIndex = 0
        RowIndex = 0
        FieldName = #23458#25143#21517#31216
      end
      object dxDBGrid2Column19: TdxDBGridColumn
        HeaderAlignment = taCenter
        ReadOnly = True
        Width = 110
        BandIndex = 0
        RowIndex = 0
        FieldName = #36134#21333#21040#26399#26085
      end
      object dxDBGrid2Column18: TdxDBGridColumn
        HeaderAlignment = taCenter
        ReadOnly = True
        Width = 100
        BandIndex = 0
        RowIndex = 0
        FieldName = #23458#25143#36134#26399
        SummaryFooterType = cstCount
        SummaryType = cstCount
      end
      object dxDBGrid2Column3: TdxDBGridColumn
        HeaderAlignment = taCenter
        ReadOnly = True
        Width = 100
        BandIndex = 0
        RowIndex = 0
        FieldName = #24320#33337#26085#26399
      end
      object dxDBGrid2Column17: TdxDBGridColumn
        HeaderAlignment = taCenter
        ReadOnly = True
        Width = 100
        BandIndex = 0
        RowIndex = 0
        FieldName = #33337#21517
      end
      object dxDBGrid2Column13: TdxDBGridColumn
        HeaderAlignment = taCenter
        ReadOnly = True
        Width = 100
        BandIndex = 0
        RowIndex = 0
        FieldName = #33322#27425
      end
      object dxDBGrid2Column16: TdxDBGridColumn
        HeaderAlignment = taCenter
        ReadOnly = True
        Width = 100
        BandIndex = 0
        RowIndex = 0
        FieldName = #20027#25552#21333#21495
      end
      object dxDBGrid2Column12: TdxDBGridColumn
        HeaderAlignment = taCenter
        ReadOnly = True
        Width = 74
        BandIndex = 0
        RowIndex = 0
        FieldName = 'USD'
        SummaryFooterType = cstSum
      end
      object dxDBGrid2Column14: TdxDBGridColumn
        HeaderAlignment = taCenter
        ReadOnly = True
        Width = 68
        BandIndex = 0
        RowIndex = 0
        FieldName = 'RMB'
        SummaryFooterType = cstSum
      end
      object dxDBGrid2Column9: TdxDBGridColumn
        HeaderAlignment = taCenter
        ReadOnly = True
        Width = 100
        BandIndex = 0
        RowIndex = 0
        FieldName = #36153#29992#21517#31216
      end
      object dxDBGrid2Column10: TdxDBGridColumn
        HeaderAlignment = taCenter
        Width = 100
        BandIndex = 0
        RowIndex = 0
        FieldName = #37329#39069
      end
      object dxDBGrid2Column11: TdxDBGridColumn
        HeaderAlignment = taCenter
        ReadOnly = True
        Width = 76
        BandIndex = 0
        RowIndex = 0
        FieldName = #24065#21035
      end
    end
    object Panel2: TPanel
      Left = 2
      Top = 574
      Width = 1166
      Height = 28
      Align = alBottom
      TabOrder = 2
    end
  end
  object XPMenu1: TXPMenu
    Font.Charset = GB2312_CHARSET
    Font.Color = clMenuText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    Color = 15189677
    IconBackColor = 15189677
    MenuBarColor = 15189677
    SelectColor = 14139102
    SelectBorderColor = clHighlight
    SelectFontColor = clMenuText
    DisabledColor = clInactiveCaption
    SeparatorColor = 13485965
    CheckedColor = clHighlight
    IconWidth = 24
    DrawSelect = True
    UseSystemColors = False
    OverrideOwnerDraw = False
    Gradient = True
    FlatMenu = True
    AutoDetect = True
    Active = True
    Left = 513
    Top = 178
  end
  object ADOQueryFee: TADOQuery
    Connection = frm_main.db
    Parameters = <>
    Left = 120
    Top = 360
  end
  object ADOQuerySelect: TADOQuery
    Connection = frm_main.db
    Parameters = <>
    SQL.Strings = (
      
        'select fee.'#23458#25143#21517#31216',fee.'#24065#21035',t_export.'#25597#36135#20154',t_export.'#22996#25176#32534#21495',v_y_li_bill.'#22996#25176 +
        #21333#20301',v_y_li_bill.'#24212#25910#37329#39069',v_y_li_bill.'#24212#20184#37329#39069',v_y_li_bill.'#24212#24471#21033#28070
      
        ',case when  v_y_li_bill.'#24212#25910#37329#39069'<>0 then  v_y_li_bill.'#24212#24471#21033#28070'/v_y_li_bi' +
        'll.'#24212#25910#37329#39069' else 0 end as '#21033#28070#29575
      ',sum(fee.'#37329#39069'*fee.'#27719#29575') '#37329#39069',sum(fee.'#32467#31639#37329#39069'*fee.'#27719#29575') '#32467#31639#37329#39069
      'from t_ch_accept  fee'
      'left Join t_export on  t_export.'#36816#32534#21495'=fee.'#36816#32534#21495
      'left Join v_y_li_bill on  v_y_li_bill.'#36816#32534#21495'=fee.'#36816#32534#21495
      'where t_export.'#24320#33337#26085#26399'>='#39'2012-12-23'#39'and t_export.'#24320#33337#26085#26399'<='#39'2012-01-22'#39
      
        'group by  fee.'#23458#25143#21517#31216',fee.'#24065#21035',t_export.'#25597#36135#20154',t_export.'#22996#25176#32534#21495',v_y_li_bill' +
        '.'#22996#25176#21333#20301',v_y_li_bill.'#24212#25910#37329#39069',v_y_li_bill.'#24212#20184#37329#39069',v_y_li_bill.'#24212#24471#21033#28070
      
        ',case when  v_y_li_bill.'#24212#25910#37329#39069'<>0 then  v_y_li_bill.'#24212#24471#21033#28070'/v_y_li_bi' +
        'll.'#24212#25910#37329#39069' else 0 end ')
    Left = 208
    Top = 328
  end
  object memtbl1: TDataSource
    DataSet = memtbl
    Left = 264
    Top = 224
  end
  object SaveDialog: TSaveDialog
    Left = 328
    Top = 264
  end
  object ADOQuerysum: TADOQuery
    Connection = dbsub
    Parameters = <>
    SQL.Strings = (
      '            Select'
      '           sum('#27611#21033#28070') '#27611#21033#28070
      '           from v_op_bscard'
      '           where '#20027#25552#21333#21495'=:'#20027#25552#21333#21495' and '#36153#29992#29366#24577'='#39#36153#29992#23553#24080#39)
    Left = 392
    Top = 328
  end
  object memtbl: TkbmMemTable
    DesignActivation = True
    AttachedAutoRefresh = True
    AttachMaxCount = 1
    FieldDefs = <
      item
        Name = #25597#36135#20154
        DataType = ftString
        Size = 20
      end
      item
        Name = #20027#25552#21333#21495
        DataType = ftString
        Size = 20
      end
      item
        Name = #24320#33337#26085#26399
        DataType = ftString
        Size = 20
      end
      item
        Name = #32467#31639#26085#26399
        DataType = ftString
        Size = 20
      end
      item
        Name = #27611#21033#28070
        DataType = ftFloat
      end
      item
        Name = #36229#26399#22825#25968
        DataType = ftInteger
      end
      item
        Name = #21327#35758#22825#25968
        DataType = ftInteger
      end
      item
        Name = #32534#21495
        DataType = ftString
        Size = 20
      end
      item
        Name = #23454#38469#36229#26399#22825#25968
        DataType = ftInteger
      end
      item
        Name = #22996#25176#21333#20301
        DataType = ftString
        Size = 20
      end
      item
        Name = #36229#26399#26376
        DataType = ftString
        Size = 10
      end
      item
        Name = #25552#25104#27604#20363
        DataType = ftFloat
      end
      item
        Name = #25552#25104
        DataType = ftFloat
      end>
    IndexDefs = <>
    SortOptions = []
    PersistentBackup = False
    ProgressFlags = [mtpcLoad, mtpcSave, mtpcCopy]
    FilterOptions = []
    Version = '3.05'
    LanguageID = 0
    SortID = 0
    SubLanguageID = 1
    LocaleID = 1024
    Left = 695
    Top = 303
    object memtblORDNO: TIntegerField
      FieldName = 'ORDNO'
    end
    object memtblch_id: TIntegerField
      FieldName = 'ch_id'
    end
    object memtblField: TStringField
      FieldName = #32534#21495
    end
    object memtblField2: TStringField
      FieldName = #22996#25176#21333#20301
    end
    object memtblField3: TStringField
      FieldName = #20027#25552#21333#21495
    end
    object memtblField4: TDateField
      FieldName = #24320#33337#26085#26399
    end
    object memtblField5: TStringField
      FieldName = #33337#21517
      Size = 60
    end
    object memtblField6: TStringField
      FieldName = #33322#27425
    end
    object memtblField7: TStringField
      FieldName = #21368#36135#28207
      Size = 60
    end
    object memtblField8: TStringField
      FieldName = #30446#30340#22320
      Size = 60
    end
    object memtblField9: TStringField
      FieldName = #23458#25143#21517#31216
    end
    object memtblField10: TStringField
      FieldName = #36153#29992#21517#31216
    end
    object memtblField11: TFloatField
      FieldName = #37329#39069
    end
    object memtblField12: TStringField
      FieldName = #24065#21035
    end
    object memtblField13: TStringField
      FieldName = #26631#20934
      Size = 60
    end
    object memtblField14: TStringField
      FieldName = #23458#25143#36134#26399
      Size = 100
    end
    object memtblField15: TDateField
      FieldName = #36134#21333#21040#26399#26085
    end
    object memtblUSD: TFloatField
      FieldName = 'USD'
    end
    object memtblRMB: TFloatField
      FieldName = 'RMB'
    end
  end
  object dbsub: TADOConnection
    ConnectionString = 
      'Provider=SQLOLEDB.1;Password=ds20040201;Persist Security Info=Tr' +
      'ue;User ID=sa;Initial Catalog=dongshengdata_jf;Data Source=LJP\S' +
      'QL2005;Use Procedure for Prepare=1;Auto Translate=True;Packet Si' +
      'ze=4096;Workstation ID=LJP;Use Encryption for Data=False;Tag wit' +
      'h column collation when possible=False'
    ConnectionTimeout = 30
    LoginPrompt = False
    Provider = 'SQLOLEDB.1'
    Left = 644
    Top = 263
  end
end