productunit.dfm

用友系统二次开发 存货管理 客户管理 订货审核 退货审核 铺货计划 调货计划

        ParentFont = False
        Properties.Alignment.Horz = taLeftJustify
        Style.BorderStyle = ebsFlat
        Style.Font.Charset = DEFAULT_CHARSET
        Style.Font.Color = clBlue
        Style.Font.Height = -11
        Style.Font.Name = 'MS Sans Serif'
        Style.Font.Style = []
        Height = 17
        Width = 81
      end
      object cxDBLabel14: TcxDBLabel
        Left = 400
        Top = 96
        DataBinding.DataField = 'iInvSCost'
        DataBinding.DataSource = dsQueryInv
        ParentFont = False
        Properties.Alignment.Horz = taLeftJustify
        Style.BorderStyle = ebsFlat
        Style.Font.Charset = DEFAULT_CHARSET
        Style.Font.Color = clBlue
        Style.Font.Height = -11
        Style.Font.Name = 'MS Sans Serif'
        Style.Font.Style = []
        Height = 17
        Width = 81
      end
      object ColorListBox: TcxListBox
        Left = 496
        Top = 32
        Width = 73
        Height = 97
        ItemHeight = 13
        ParentFont = False
        Style.BorderStyle = cbsFlat
        Style.Color = clBtnFace
        Style.Font.Charset = DEFAULT_CHARSET
        Style.Font.Color = clBlue
        Style.Font.Height = -11
        Style.Font.Name = 'MS Sans Serif'
        Style.Font.Style = []
        TabOrder = 30
      end
      object cxLabel15: TcxLabel
        Left = 496
        Top = 16
        Caption = #39068#33394#65306
      end
      object cxLabel16: TcxLabel
        Left = 576
        Top = 16
        Caption = #23610#30721#65306
      end
      object SizeListBox: TcxListBox
        Left = 576
        Top = 32
        Width = 73
        Height = 97
        ItemHeight = 13
        ParentFont = False
        Style.BorderStyle = cbsFlat
        Style.Color = clBtnFace
        Style.Font.Charset = DEFAULT_CHARSET
        Style.Font.Color = clBlue
        Style.Font.Height = -11
        Style.Font.Name = 'MS Sans Serif'
        Style.Font.Style = []
        TabOrder = 33
      end
    end
  end
  object RzSizePanel2: TRzSizePanel
    Left = 653
    Top = 0
    Width = 229
    Height = 606
    Align = alRight
    HotSpotVisible = True
    Side = sdRight
    SizeBarWidth = 7
    TabOrder = 2
    object RzGroupBar2: TRzGroupBar
      Left = 8
      Top = 65
      Width = 221
      Height = 381
      GroupBorderSize = 8
      UseGradients = True
      Align = alClient
      Color = clBtnShadow
      ParentColor = False
      TabOrder = 0
    end
    object Panel5: TPanel
      Left = 8
      Top = 33
      Width = 221
      Height = 32
      Align = alTop
      BevelInner = bvRaised
      BevelOuter = bvLowered
      TabOrder = 1
      object RB_NK: TcxRadioButton
        Left = 64
        Top = 8
        Width = 65
        Height = 17
        Hint = '( right(cInvCCode,2) in ('#39'81'#39','#39'82'#39','#39'84'#39','#39'87'#39','#39'88'#39','#39'12'#39','#39'13'#39'))'
        Caption = #20869#35044#31995
        TabOrder = 0
        OnClick = LoadProductlistExecute
      end
      object RB_WX: TcxRadioButton
        Left = 8
        Top = 8
        Width = 57
        Height = 17
        Hint = '( right(cInvCCode,2) in ('#39'80'#39','#39'83'#39','#39'11'#39'))'
        Caption = #25991#33016#31995
        Checked = True
        TabOrder = 1
        TabStop = True
        OnClick = LoadProductlistExecute
      end
      object RB_HK: TcxRadioButton
        Left = 120
        Top = 8
        Width = 41
        Height = 17
        Hint = 
          '( right(cInvCCode,2) in ('#39'86'#39','#39'14'#39','#39'15'#39','#39'16'#39','#39'17'#39','#39'18'#39','#39'19'#39','#39'20'#39 +
          ','#39'21'#39'))'
        Caption = #30418#35044
        TabOrder = 2
        OnClick = LoadProductlistExecute
      end
      object RB_QT: TcxRadioButton
        Left = 168
        Top = 8
        Width = 41
        Height = 17
        Hint = 
          '( right(cInvCCode,2) in ('#39'89'#39','#39'90'#39','#39'91'#39','#39'92'#39','#39'93'#39','#39'94'#39','#39'95'#39','#39'96'#39 +
          ','#39'97'#39','#39'98'#39','#39'99'#39'))'
        Caption = #20854#23427
        TabOrder = 3
        OnClick = LoadProductlistExecute
      end
    end
    object Panel2: TPanel
      Left = 8
      Top = 65
      Width = 221
      Height = 381
      Align = alClient
      BevelInner = bvRaised
      BevelOuter = bvLowered
      TabOrder = 2
      object ListProd: TListBox
        Left = 2
        Top = 2
        Width = 217
        Height = 377
        Align = alClient
        BevelInner = bvNone
        BevelOuter = bvNone
        BorderStyle = bsNone
        Color = clBtnFace
        ItemHeight = 13
        TabOrder = 0
        OnDblClick = ListProdDblClick
      end
    end
    object Panel3: TPanel
      Left = 8
      Top = 0
      Width = 221
      Height = 33
      Align = alTop
      BevelInner = bvRaised
      BevelOuter = bvLowered
      TabOrder = 3
      object RB_PF: TcxRadioButton
        Left = 63
        Top = 8
        Width = 41
        Height = 17
        Hint = '( cInvCCode like '#39'10%'#39')'
        Caption = #25209#21457
        Checked = True
        TabOrder = 0
        TabStop = True
        OnClick = LoadProductlistExecute
      end
      object RB_LS: TcxRadioButton
        Left = 119
        Top = 8
        Width = 50
        Height = 17
        Hint = '( cInvCCode like '#39'20%'#39')'
        Caption = #36830#38145
        TabOrder = 1
        OnClick = LoadProductlistExecute
      end
    end
    object Panel4: TPanel
      Left = 8
      Top = 446
      Width = 221
      Height = 160
      Align = alBottom
      BevelInner = bvRaised
      BevelOuter = bvLowered
      TabOrder = 4
      object CB_SD: TcxCheckBox
        Left = 8
        Top = 104
        Caption = ' '#26032#27454
        TabOrder = 0
        OnClick = LoadProductlistExecute
        Width = 25
      end
      object SDate: TRzDateTimePicker
        Left = 35
        Top = 104
        Width = 78
        Height = 21
        Date = 39588.717902592600000000
        Format = 'yyyy-MM-dd'
        Time = 39588.717902592600000000
        TabOrder = 1
        FrameVisible = True
      end
      object cxLabel18: TcxLabel
        Left = 116
        Top = 106
        Caption = '=>'
      end
      object EDate: TRzDateTimePicker
        Left = 131
        Top = 104
        Width = 81
        Height = 21
        Date = 39588.717902592600000000
        Format = 'yyyy-MM-dd'
        Time = 39588.717902592600000000
        TabOrder = 3
        FrameVisible = True
      end
      object CB_LN: TcxCheckBox
        Left = 126
        Top = 80
        Hint = '(cInvABC IS NULL)'
        Caption = '  '#19981#20998#31867
        TabOrder = 4
        OnClick = LoadProductlistExecute
        Width = 65
      end
      object CB_LD: TcxCheckBox
        Left = 126
        Top = 64
        Hint = '(cInvABC = '#39'D'#39')'
        Caption = '  D'#31867
        TabOrder = 5
        OnClick = LoadProductlistExecute
        Width = 49
      end
      object CB_LB: TcxCheckBox
        Left = 126
        Top = 48
        Hint = '(cInvABC = '#39'B'#39')'
        Caption = '  B'#31867
        TabOrder = 6
        OnClick = LoadProductlistExecute
        Width = 49
      end
      object CB_LE: TcxCheckBox
        Left = 8
        Top = 80
        Hint = '(cInvABC = '#39'E'#39')'
        Caption = '  E'#31867
        TabOrder = 7
        OnClick = LoadProductlistExecute
        Width = 49
      end
      object CB_LC: TcxCheckBox
        Left = 8
        Top = 64
        Hint = '(cInvABC = '#39'C'#39')'
        Caption = '  C'#31867
        TabOrder = 8
        OnClick = LoadProductlistExecute
        Width = 49
      end
      object CB_LA: TcxCheckBox
        Left = 8
        Top = 48
        Hint = '(cInvABC = '#39'A'#39')'
        Caption = '  A'#31867
        TabOrder = 9
        OnClick = LoadProductlistExecute
        Width = 49
      end
      object CB_SB: TcxCheckBox
        Left = 8
        Top = 24
        Hint = '(Not cInvDefine16 IS NULL)'
        Caption = '  '#20572#37319#21830#21697
        TabOrder = 10
        OnClick = LoadProductlistExecute
        Width = 81
      end
      object CB_NP: TcxCheckBox
        Left = 8
        Top = 8
        Hint = '(dSDate > GetDate() - 61)'
        Caption = '  '#26032#27454#20135#21697
        TabOrder = 11
        OnClick = LoadProductlistExecute
        Width = 81
      end
      object CB_SS: TcxCheckBox
        Left = 126
        Top = 24
        Hint = '(cInvName like '#39'%[S]%'#39')'
        Caption = '  '#27733#22836#21830#21697
        TabOrder = 12
        OnClick = LoadProductlistExecute
        Width = 81
      end
      object CB_ZG: TcxCheckBox
        Left = 126
        Top = 8
        Hint = '(cInvName Like '#39'%'#26032#25919#31574#20135#21697'%'#39')'
        Caption = '  '#26032#25919#31574#20135#21697
        TabOrder = 13
        OnClick = LoadProductlistExecute
        Width = 89
      end
      object QueryText: TEdit
        Left = 35
        Top = 131
        Width = 176
        Height = 19
        BevelInner = bvNone
        BevelOuter = bvNone
        Ctl3D = False
        ParentCtl3D = False
        TabOrder = 14
        OnChange = LoadProductlistExecute
      end
    end
  end
  object dsQueryInv: TDataSource
    DataSet = QueryInv
    Left = 424
    Top = 8
  end
  object DS_TranData: TDataSource
    Left = 552
    Top = 560
  end
  object ActionList1: TActionList
    Left = 583
    Top = 546
    object LoadProductlist: TAction
      Caption = #35835#21462#20135#21697#36164#26009
      OnExecute = LoadProductlistExecute
    end
    object QueryProduct: TAction
      Caption = 'QueryProduct'
    end
    object ChangeState: TAction
      Caption = 'ChangeState'
      OnExecute = ChangeStateExecute
    end
    object AddSalePlan: TAction
      Caption = #38138#36135#35745#21010
      OnExecute = AddSalePlanExecute
    end
    object AddReturnPlan: TAction
      Caption = #35843#36135#35745#21010
      OnExecute = AddReturnPlanExecute
    end
    object AA_SaleReturn: TAction
      Caption = #20801#38144#20801#36864
      OnExecute = AA_SaleReturnExecute
    end
    object AF_SaleReturn: TAction
      Caption = #20801#38144#38480#36864
      OnExecute = AF_SaleReturnExecute
    end
    object FA_SaleReturn: TAction
      Caption = #38480#38144#20801#36864
      OnExecute = FA_SaleReturnExecute
    end
    object FF_SaleReturn: TAction
      Caption = #38480#38144#38480#36864
      OnExecute = FF_SaleReturnExecute
    end
  end
  object QueryInv: TADODataSet
    Connection = DM.Conn_UF
    AfterClose = QueryInvAfterClose
    CommandTimeout = 900
    Parameters = <>
    Left = 450
    Top = 10
  end
  object pmTran: TPopupMenu
    Left = 454
    Top = 558
    object N31: TMenuItem
      Caption = #22686#21152#35745#21010
      object N32: TMenuItem
        Tag = 301
        Action = AddSalePlan
      end
      object N33: TMenuItem
        Action = AddReturnPlan
      end
      object N28: TMenuItem
        Caption = '-'
      end
      object N29: TMenuItem
        Caption = #38138#36135#19981#36873#23458#25143
        OnClick = N29Click
      end
    end
    object N30: TMenuItem
      Caption = '-'
    end
    object N22: TMenuItem
      Caption = #20462#25913#29366#24577
      object N23: TMenuItem
        Action = AA_SaleReturn
      end
      object N24: TMenuItem
        Action = AF_SaleReturn
      end
      object N25: TMenuItem
        Caption = '-'
      end
      object N27: TMenuItem
        Action = FA_SaleReturn
      end
      object N26: TMenuItem
        Action = FF_SaleReturn
      end
    end
  end
  object Plan: TPopupMenu
    Left = 430
    Top = 208
    object N34: TMenuItem
      Caption = #26410#38144#23458#25143#21152#20837#24403#21069#35745#21010
      OnClick = N34Click
    end
    object N35: TMenuItem
      Caption = '-'
    end
    object N36: TMenuItem
      Caption = #21024#38500#24403#21069#35745#21010
      OnClick = N36Click
    end
  end
  object SALE: TADODataSet
    Connection = DM.Conn_UF
    CursorType = ctStatic
    AfterClose = QueryInvAfterClose
    CommandText = 'EP_InvAnalyse '#39'80adj11900'#39
    CommandTimeout = 900
    Parameters = <>
    Left = 490
    Top = 562
  end
  object DSSALE: TDataSource
    DataSet = SALE
    Left = 520
    Top = 560
  end
end