sal_qry_saleplanofsaleranalyse.dfm

一个MRPII系统源代码版本

inherited Frm_Sal_Qry_SalePlanOfSalerAnalyse: TFrm_Sal_Qry_SalePlanOfSalerAnalyse
  Left = 62
  Top = 113
  Caption = '营销业务员销售计划执行分析'
  PixelsPerInch = 96
  TextHeight = 12
  inherited Pnl_Title: TPanel
    Caption = '营销业务员销售计划执行分析'
  end
  inherited Pnl_Head: TPanel
    inherited Lbl_OrderTitle: TLabel
      Top = 22
    end
    inherited Lbl_Order: TLabel
      Top = 22
      Width = 114
      Caption = '年份/营销业务员代码'
    end
  end
  inherited Pnl_Body: TPanel
    inherited DBGridEh: TDBGridEh
      FrozenCols = 2
      UseMultiTitle = True
      Columns = <
        Item
          FieldName = 'PlanYear'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'SaleEmployeeCode'
          PickList.Strings = ()
          Visible = False
          KeyList.Strings = ()
        end
        Item
          FieldName = 'EmployeeName'
          PickList.Strings = ()
          Visible = False
          KeyList.Strings = ()
        end
        Item
          FieldName = 'Employeeflag'
          PickList.Strings = ()
          Width = 98
          KeyList.Strings = ()
        end
        Item
          FieldName = 'Plansum_Year'
          PickList.Strings = ()
          Width = 53
          KeyList.Strings = ()
        end
        Item
          FieldName = 'rationsum_Year'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'realSaleAmount'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'DiffAmount'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'ratePlan'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'DiffrationAmount'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'rateration'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'Plansum_1'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'rationsum_1'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'realSaleAmount_1'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'DiffAmount1'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'ratePlan1'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'DiffrationAmount1'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'rateration1'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'Plansum_2'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'rationsum_2'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'realSaleAmount_2'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'DiffAmount2'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'ratePlan2'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'DiffrationAmount2'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'rateration2'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'Plansum_3'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'rationsum_3'
          PickList.Strings = ()
          Width = 72
          KeyList.Strings = ()
        end
        Item
          FieldName = 'realSaleAmount_3'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'DiffAmount3'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'ratePlan3'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'DiffrationAmount3'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'rateration3'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'Plansum_4'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'rationsum_4'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'realSaleAmount_4'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'DiffAmount4'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'ratePlan4'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'DiffrationAmount4'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'rateration4'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'Plansum_5'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'rationsum_5'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'realSaleAmount_5'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'DiffAmount5'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'ratePlan5'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'DiffrationAmount5'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'rateration5'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'Plansum_6'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'rationsum_6'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'realSaleAmount_6'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'DiffAmount6'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'ratePlan6'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'DiffrationAmount6'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'rateration6'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'Plansum_7'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'rationsum_7'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'realSaleAmount_7'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'DiffAmount7'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'ratePlan7'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'DiffrationAmount7'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'rateration7'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item
          FieldName = 'Plansum_8'
          PickList.Strings = ()
          KeyList.Strings = ()
        end
        Item