sy_ck_jyp.dfm

省级集邮品管理ERP

object Frm_SY_CK_JYP: TFrm_SY_CK_JYP
  Tag = 31201
  Left = 19
  Top = 62
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = '出库计划分配单制定'
  ClientHeight = 486
  ClientWidth = 725
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  OldCreateOrder = False
  Position = poOwnerFormCenter
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object XttxTitle: TRxLabel
    Left = 0
    Top = 0
    Width = 725
    Height = 24
    Align = alTop
    Alignment = taCenter
    Caption = '出库计划分配单制定'
    Font.Charset = GB2312_CHARSET
    Font.Color = clGreen
    Font.Height = -24
    Font.Name = '楷体_GB2312'
    Font.Style = [fsBold, fsUnderline]
    ParentFont = False
  end
  object pgc_LM: TPageControl
    Left = 0
    Top = 24
    Width = 725
    Height = 425
    ActivePage = tbs_Detail
    Align = alClient
    Style = tsFlatButtons
    TabOrder = 0
    object tbs_List: TTabSheet
      Caption = '列表'
      object Bevel2: TBevel
        Left = 0
        Top = 0
        Width = 717
        Height = 32
        Align = alClient
      end
      object lbl_color_0: TLabel
        Left = 117
        Top = 8
        Width = 70
        Height = 12
        AutoSize = False
        Color = clWhite
        ParentColor = False
      end
      object lbl_color_2: TLabel
        Left = 369
        Top = 8
        Width = 70
        Height = 12
        AutoSize = False
        Color = 16710385
        ParentColor = False
      end
      object lbl_color_1: TLabel
        Left = 622
        Top = 8
        Width = 70
        Height = 12
        AutoSize = False
        Color = 14803425
        ParentColor = False
      end
      object Label10: TLabel
        Left = 5
        Top = 8
        Width = 108
        Height = 12
        Caption = '未签批的计划分配单'
      end
      object Label13: TLabel
        Left = 256
        Top = 8
        Width = 108
        Height = 12
        Caption = '已签批的计划分配单'
      end
      object Label14: TLabel
        Left = 510
        Top = 8
        Width = 108
        Height = 12
        Caption = '已处理的计划分配单'
      end
      object dbg_List: TDBGridEh
        Left = 0
        Top = 32
        Width = 717
        Height = 363
        LineColor = clBlack
        SelectedFontColor = clHighlightText
        Align = alBottom
        DataSource = ds_List
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
        ReadOnly = True
        TabOrder = 0
        TitleFont.Charset = GB2312_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -12
        TitleFont.Name = '宋体'
        TitleFont.Style = []
        OnDrawColumnCell = dbg_ListDrawColumnCell
        OnDblClick = dbg_ListDblClick
        FooterFont.Charset = GB2312_CHARSET
        FooterFont.Color = clWindowText
        FooterFont.Height = -12
        FooterFont.Name = '宋体'
        FooterFont.Style = []
        FooterColor = clWindow
        CurrencyStyle.CurrencyFont.Charset = DEFAULT_CHARSET
        CurrencyStyle.CurrencyFont.Color = clWindowText
        CurrencyStyle.CurrencyFont.Height = -11
        CurrencyStyle.CurrencyFont.Name = 'MS Sans Serif'
        CurrencyStyle.CurrencyFont.Style = []
        CurrencyStyle.CurrencySymbol = '￥'
        CurrencyStyle.CompartColor = clSilver
        CurrencyStyle.KilobitColor = clGreen
        CurrencyStyle.RadixColor = clRed
        CurrencyStyle.ShowMinus = True
        CurrencyStyle.ShowZero = False
        CurrencyStyle.MinusColor = clRed
        CurrencyStyle.Layout = tlCenter
        CurrencyStyle.HeadFont.Charset = DEFAULT_CHARSET
        CurrencyStyle.HeadFont.Color = clWindowText
        CurrencyStyle.HeadFont.Height = -11
        CurrencyStyle.HeadFont.Name = '楷体_GB2312'
        CurrencyStyle.HeadFont.Style = []
        Columns = <
          item
            FieldName = 'CKJHDH'
            Title.Alignment = taCenter
            Title.Caption = '出库计划单号'
            Width = 74
            Footers = <>
          end
          item
            FieldName = 'PPMC'
            Title.Alignment = taCenter
            Title.Caption = '票品名称'
            Width = 114
            Footers = <>
          end
          item
            FieldName = 'CKXZMC'
            Title.Alignment = taCenter
            Title.Caption = '出库性质'
            Width = 65
            Footers = <>
          end
          item
            FieldName = 'ZBR'
            Title.Alignment = taCenter
            Title.Caption = '制表人'
            Width = 54
            Footers = <>
          end
          item
            FieldName = 'ZDRQ'
            Title.Alignment = taCenter
            Title.Caption = '制单日期'
            Width = 77
            Footers = <>
          end
          item
            FieldName = 'PZR'
            Title.Alignment = taCenter
            Title.Caption = '批准人'
            Width = 69
            Footers = <>
          end
          item
            FieldName = 'BZ'
            Title.Alignment = taCenter
            Title.Caption = '备注'
            Width = 192
            Footers = <>
          end>
      end
    end
    object tbs_Detail: TTabSheet
      Caption = '计划单详细信息'
      ImageIndex = 1
      object dbgEh_Detail: TDBGridEh
        Left = 0
        Top = 77
        Width = 608
        Height = 286
        LineColor = clBlack
        SelectedFontColor = clHighlightText
        Align = alClient
        DataSource = ds_Detail
        Options = [dgEditing, dgTitles, dgIndicator, dgColLines, dgRowLines, dgCancelOnExit]
        TabOrder = 1
        TitleFont.Charset = GB2312_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -12
        TitleFont.Name = '宋体'
        TitleFont.Style = []
        FooterRowCount = 1
        FooterFont.Charset = GB2312_CHARSET
        FooterFont.Color = clWindowText
        FooterFont.Height = -12
        FooterFont.Name = '宋体'
        FooterFont.Style = []
        FooterColor = clMenu
        SumList.Active = True
        OptionsEh = [dghFixed3D, dghFooter3D, dghHighlightFocus, dghClearSelection]
        OnGetFooterParams = dbgEh_DetailGetFooterParams
        CurrencyStyle.CurrencyFont.Charset = DEFAULT_CHARSET
        CurrencyStyle.CurrencyFont.Color = clWindowText
        CurrencyStyle.CurrencyFont.Height = -11
        CurrencyStyle.CurrencyFont.Name = 'MS Sans Serif'
        CurrencyStyle.CurrencyFont.Style = []
        CurrencyStyle.CurrencySymbol = '￥'
        CurrencyStyle.CompartColor = clSilver
        CurrencyStyle.KilobitColor = clGreen
        CurrencyStyle.RadixColor = clRed
        CurrencyStyle.ShowMinus = True
        CurrencyStyle.ShowZero = False
        CurrencyStyle.MinusColor = clRed
        CurrencyStyle.Layout = tlCenter
        CurrencyStyle.HeadFont.Charset = DEFAULT_CHARSET
        CurrencyStyle.HeadFont.Color = clWindowText
        CurrencyStyle.HeadFont.Height = -11
        CurrencyStyle.HeadFont.Name = '楷体_GB2312'
        CurrencyStyle.HeadFont.Style = []
        Columns = <
          item
            Color = 16776176
            FieldName = 'KFMC'
            ReadOnly = True
            Title.Alignment = taCenter
            Title.Caption = '库房'
            Width = 71
            Footer.Alignment = taCenter
            Footer.ValueType = fvtStaticText
            Footer.Value = '合计'
            Footers = <>
          end
          item
            Color = 16776176
            FieldName = 'DWMC'
            ReadOnly = True
            Title.Alignment = taCenter
            Title.Caption = '单位简称'
            Width = 91
            Footers = <>
          end
          item
            Color = 16776176
            FieldName = 'JJ'
            ReadOnly = True
            Title.Caption = '进价(元)'
            Width = 50
            Footers = <>
          end
          item
            FieldName = 'XJ'
            ReadOnly = True
            Title.Alignment = taCenter
            Title.Caption = '销价(元)'
            Width = 50
            Footers = <>
          end
          item
            FieldName = 'ZK'
            Title.Alignment = taCenter
            Title.Caption = '折扣%'
            Width = 35
            Footers = <>
          end
          item
            FieldName = 'JSJ'
            Title.Alignment = taCenter
            Title.Caption = '结算价(元)'
            Width = 50
            Footers = <>
          end
          item
            FieldName = 'FPSL'
            Title.Alignment = taCenter
            Title.Caption = '分配数量'
            Width = 59
            Footer.ValueType = fvtSum
            Footer.FieldName = 'FPSL'
            Footers = <>
          end
          item
            Color = 16776176
            FieldName = 'CKZJE'
            ReadOnly = True
            Title.Alignment = taCenter
            Title.Caption = '出库总金额(元)'
            Width = 76
            Footer.ValueType = fvtSum
            Footer.FieldName = 'CKZJE'
            Footers = <>
          end
          item
            Color = 16776176
            FieldName = 'JSJE'
            ReadOnly = True
            Title.Alignment = taCenter
            Title.Caption = '结算总金额(元)'
            Width = 76
            Footer.ValueType = fvtSum
            Footer.FieldName = 'JSJE'
            Footers = <>
          end>
      end
      object Panel4: TPanel
        Left = 0
        Top = 363
        Width = 717
        Height = 32
        Align = alBottom
        BevelOuter = bvNone
        TabOrder = 3
        object Label5: TLabel
          Left = 10
          Top = 10
          Width = 48
          Height = 12
          Caption = '制表人：'
          Transparent = True
        end
        object Label8: TLabel
          Left = 165
          Top = 10
          Width = 48
          Height = 12
          Caption = '批准人：'
          Transparent = True
        end
        object Label6: TLabel
          Left = 322
          Top = 10
          Width = 60
          Height = 12
          Caption = '制单日期：'
          Transparent = True
        end
        object Label7: TLabel
          Left = 521
          Top = 10
          Width = 72
          Height = 12
          Caption = '剩余库存量：'
          Transparent = True
        end
        object DBE_ZBR: TDBEdit
          Left = 60
          Top = 6
          Width = 90
          Height = 20
          Color = clSilver
          DataField = 'ZBR'
          DataSource = ds_List
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlue
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
          ReadOnly = True
          TabOrder = 0
        end
        object DBE_ZDRQ: TDBEdit
          Left = 385
          Top = 6
          Width = 90
          Height = 20
          Color = clSilver
          DataField = 'ZDRQ'
          DataSource = ds_List
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlue
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
          ReadOnly = True
          TabOrder = 2
        end
        object CE_KC: TCurrencyEdit
          Left = 592
          Top = 6
          Width = 90
          Height = 20
          AutoSize = False
          Color = clSilver