unit_queryreckoningm.dfm

delphi开发的中国移动大客户管理系统,后台数据库为oracle

inherited Frm_QueryReckoningM: TFrm_QueryReckoningM
  Caption = '月账单增减量查询'
  PixelsPerInch = 96
  TextHeight = 14
  inherited Panel1: TPanel
    inherited PageControl1: TPageControl
      inherited TabSheet1: TTabSheet
        inherited Panel6: TPanel
          inherited ScrollBox_GR: TScrollBox
            inherited PanelGR_base1: TPanel
              Height = 169
              object Label6: TLabel
                Left = 110
                Top = 29
                Width = 14
                Height = 14
                Caption = '年'
              end
              object Label8: TLabel
                Left = 189
                Top = 29
                Width = 14
                Height = 14
                Caption = '月'
              end
              object Label9: TLabel
                Left = 110
                Top = 81
                Width = 14
                Height = 14
                Caption = '至'
              end
              object Label11: TLabel
                Left = 28
                Top = 81
                Width = 14
                Height = 14
                Caption = '从'
              end
              object Label10: TLabel
                Left = 8
                Top = 4
                Width = 63
                Height = 14
                Caption = '出帐日期:'
              end
              object spiGR_CalcMonthYear: TFlatSpinEditInteger
                Left = 40
                Top = 25
                Width = 65
                Height = 21
                ColorFlat = clBtnFace
                AutoSize = False
                MaxValue = 9999
                MinValue = 1900
                TabOrder = 0
                Value = 2002
                OnChange = spiGR_ZWSJBeginChange
              end
              object spiGR_CalcMonthMon: TFlatSpinEditInteger
                Left = 128
                Top = 25
                Width = 57
                Height = 21
                ColorFlat = clBtnFace
                AutoSize = False
                MaxValue = 12
                MinValue = 1
                TabOrder = 1
                Value = 8
              end
              object cbGR_TotalRate: TFlatCheckBox
                Left = 8
                Top = 54
                Width = 145
                Height = 17
                Caption = '消费增减(百分比)'
                TabOrder = 2
                TabStop = True
                OnClick = cbGR_TotalRateClick
              end
              object spiGR_TotalRateBegin: TFlatSpinEditInteger
                Left = 44
                Top = 77
                Width = 61
                Height = 21
                ColorFlat = clActiveBorder
                AutoSize = False
                Enabled = False
                Increment = 10
                MaxValue = 9999
                MinValue = -9999
                TabOrder = 3
                Value = 20
                OnChange = spiGR_ZWSJBeginChange
              end
              object spiGR_TotalRateEnd: TFlatSpinEditInteger
                Left = 128
                Top = 77
                Width = 61
                Height = 21
                ColorFlat = clActiveBorder
                AutoSize = False
                Enabled = False
                Increment = 10
                MaxValue = 9999
                MinValue = 0
                TabOrder = 4
                Value = 100
              end
            end
            inherited PanelGR_Stuff: TPanel
              Top = 557
            end
            inherited PanelGRBTN_highlevel: TPanel
              Top = 635
            end
            inherited PanelGR_highlevel2: TPanel
              Top = 849
            end
            inherited PanelGR_highlevel: TPanel
              Top = 951
            end
            inherited PanelGR_highlevel1: TPanel
              Top = 680
            end
            inherited PanelGR_SelectOrder: TPanel
              Top = 290
            end
            inherited PanelGRBTN_SelectOrder: TPanel
              Top = 245
            end
          end
        end
      end
    end
  end
  inherited Panel2: TPanel
    inherited Panel3: TPanel
      inherited FlatButton2: TFlatButton
        OnClick = FlatButton2Click
      end
      inherited FlatButton3: TFlatButton
        OnClick = FlatButton3Click
      end
    end
    inherited dbgGR: TDBGrid
      Columns = <
        item
          Expanded = False
          FieldName = 'row_num'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '序号'
          Width = 50
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'SID_C'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '手机号码'
          Width = 90
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'NAME'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '客户姓名'
          Width = 60
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DJDM_DESC'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '消费层次'
          Width = 60
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'CALCMONTH'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '时间'
          Width = 60
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'LTOTALFEE'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '上月消费'
          Width = 60
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'TOTALFEE'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '本月消费'
          Width = 60
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DTOTALFEE'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '消费差额'
          Width = 60
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'TOTALRATE'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '差额比例'
          Width = 60
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'LCOPEFEE'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '上月应缴'
          Width = 60
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'COPEFEE'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '本月应缴'
          Width = 60
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DCOPEFEE'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '应缴金额差额'
          Width = 90
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'COPERATE'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '应缴金额差额比例'
          Width = 90
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'LCITYFEE'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '上月市话费'
          Width = 60
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'CITYFEE'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '本月市话费'
          Width = 60
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DCITYFEE'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '市话差额'
          Width = 60
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'CITYRATE'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '市话差额比例'
          Width = 60
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'LCOUNINLONGFEE'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '上月国内长途'
          Width = 90
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'COUNINLONGFEE'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '本月国内长途'
          Width = 90
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DCOUNINLONGFEE'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '国内长途差额'
          Width = 90
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'COUNINLONGRATE'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '国内长途差额比例'
          Width = 90
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'LINTERLONGFEE'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '上月国际长途'
          Width = 90
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'INTERLONGFEE'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '本月国际长途'
          Width = 90
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DINTERLONGFEE'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '国际长途差额'
          Width = 90