sfc_qry_mounitmnrequestauditing.dfm

一个MRPII系统源代码版本

inherited Frm_Sfc_Qry_MoUnitMnRequestAuditing: TFrm_Sfc_Qry_MoUnitMnRequestAuditing
  Left = 185
  Top = 151
  Caption = 'MO合并领料查询'
  ClientHeight = 473
  ClientWidth = 831
  PixelsPerInch = 96
  TextHeight = 12
  inherited ControlBar: TControlBar
    Width = 831
    inherited ToolBar: TToolBar
      inherited ToolButton7: TToolButton
        Visible = False
      end
      inherited TlBtn_InsertLine: TToolButton
        Visible = False
      end
      inherited TlBtn_Modify: TToolButton
        Visible = False
      end
      inherited TlBtn_DeleteLine: TToolButton
        Visible = False
      end
      inherited ToolButton6: TToolButton
        Visible = False
      end
      inherited ToolButton2: TToolButton
        Visible = False
      end
      inherited ToolButton3: TToolButton
        Visible = False
      end
    end
  end
  inherited Pnl_Title: TPanel
    Width = 831
    Caption = 'MO合并领料查询'
    inherited Image2: TImage
      Width = 831
      Stretch = True
    end
  end
  inherited Pnl_Head: TPanel
    Width = 831
    Height = 80
    inherited Image1: TImage
      Width = 831
      Height = 80
      Stretch = True
    end
    object Label1: TLabel
      Left = 44
      Top = 6
      Width = 36
      Height = 12
      Caption = '仓库：'
      TransParent = True
    end
    object Label3: TLabel
      Left = 20
      Top = 27
      Width = 60
      Height = 12
      Caption = '领料部门：'
      TransParent = True
    end
    object Label12: TLabel
      Left = 44
      Top = 50
      Width = 36
      Height = 12
      Caption = '备注：'
      TransParent = True
    end
    object Label5: TLabel
      Left = 281
      Top = 27
      Width = 36
      Height = 12
      Caption = '班别：'
      TransParent = True
    end
    object Label2: TLabel
      Left = 280
      Top = 6
      Width = 36
      Height = 12
      Caption = '货位：'
      TransParent = True
    end
    object Label7: TLabel
      Left = 496
      Top = 6
      Width = 48
      Height = 12
      Caption = '仓管员：'
      TransParent = True
    end
    object Label4: TLabel
      Left = 660
      Top = 6
      Width = 48
      Height = 12
      Caption = '单据号：'
      TransParent = True
    end
    object Label6: TLabel
      Left = 672
      Top = 27
      Width = 36
      Height = 12
      Caption = '日期：'
      TransParent = True
    end
    object cmbbx_WhCode: TComboBox
      Left = 81
      Top = 0
      Width = 159
      Height = 20
      Style = csDropDownList
      Enabled = False
      ItemHeight = 12
      TabOrder = 0
    end
    object Edt_Dept: TExtEdit
      Left = 80
      Top = 23
      Width = 159
      Height = 20
      Enabled = False
      TabOrder = 1
    end
    object edt_memo: TExtEdit
      Left = 80
      Top = 46
      Width = 395
      Height = 20
      TabOrder = 2
    end
    object cmbbx_Shift: TComboBox
      Left = 317
      Top = 23
      Width = 159
      Height = 20
      Style = csDropDownList
      Enabled = False
      ItemHeight = 12
      TabOrder = 3
    end
    object cmbbx_WhPositionCode: TComboBox
      Left = 317
      Top = 0
      Width = 159
      Height = 20
      Style = csDropDownList
      Enabled = False
      ItemHeight = 12
      TabOrder = 4
    end
    object cmbbx_WhEmployee: TComboBox
      Left = 544
      Top = 0
      Width = 89
      Height = 20
      Style = csDropDownList
      Enabled = False
      ItemHeight = 12
      TabOrder = 5
    end
    object edt_Billno: TExtEdit
      Left = 707
      Top = 0
      Width = 81
      Height = 20
      TabStop = False
      Enabled = False
      ParentShowHint = False
      ReadOnly = True
      ShowHint = False
      TabOrder = 6
    end
    object medt_Date: TMaskEdit
      Left = 707
      Top = 23
      Width = 81
      Height = 20
      EditMask = '9999.99.99;1; '
      MaxLength = 10
      TabOrder = 7
      Text = '    .  .  '
    end
    object Button2: TButton
      Left = 496
      Top = 45
      Width = 113
      Height = 25
      Caption = '预览明细单据'
      TabOrder = 8
      OnClick = Button2Click
    end
    object Button1: TButton
      Left = 624
      Top = 45
      Width = 113
      Height = 25
      Caption = '列印明细单据'
      TabOrder = 9
      OnClick = Button1Click
    end
  end
  inherited Pnl_Hint: TPanel
    Top = 447
    Width = 831
    inherited Image4: TImage
      Width = 831
      Stretch = True
    end
  end
  inherited Pnl_Body: TPanel
    Top = 137
    Width = 831
    Height = 310
    inherited Image3: TImage
      Width = 831
      Height = 310
    end
    inherited DBGridEh: TDBGridEh
      Width = 831
      Height = 310
      Columns = <
        Item
          FieldName = 'MoNo'
          PickList.Strings = ()
          Title.Caption = '生产订单号'
          Width = 65
          KeyList.Strings = ()
        end
        Item
          FieldName = 'MoLineNo'
          PickList.Strings = ()
          Title.Caption = '订单行号'
          Width = 54
          KeyList.Strings = ()
        end
        Item
          FieldName = 'ItemCode'
          PickList.Strings = ()
          Title.Caption = '物料代码'
          Width = 63
          KeyList.Strings = ()
        end
        Item
          FieldName = 'ItemName'
          PickList.Strings = ()
          Title.Caption = '物料描述'
          Width = 134
          KeyList.Strings = ()
        end
        Item
          FieldName = 'UomName'
          PickList.Strings = ()
          Title.Caption = '单位'
          Width = 32
          KeyList.Strings = ()
        end
        Item
          FieldName = 'InvBillSfcQty'
          PickList.Strings = ()
          Title.Caption = '请领数量'
          Width = 52
          KeyList.Strings = ()
        end
        Item
          FieldName = 'MoRealQty'
          PickList.Strings = ()
          Title.Caption = '实领数量'
          Width = 53
          KeyList.Strings = ()
        end
        Item
          FieldName = 'BatchNo'
          PickList.Strings = ()
          Title.Caption = '批号'
          Width = 31
          KeyList.Strings = ()
        end
        Item
          FieldName = 'BillLineRemArk'
          PickList.Strings = ()
          Title.Caption = '备注'
          Width = 71
          KeyList.Strings = ()
        end>
    end
  end
  inherited ActionList: TActionList
    Left = 184
    Top = 288
  end
  inherited DataSource: TDataSource
    Left = 344
    Top = 305
  end
  inherited ExtPrintReport: TExtPrintReport
    LeftBOrdermm = 5
    RightBOrdermm = 5
    Left = 152
    Top = 249
  end
end