sal_qry_chginfobackshiporderh.dfm

一个MRPII系统源代码版本

inherited Frm_Sal_Qry_ChgInfoBackShipOrderH: TFrm_Sal_Qry_ChgInfoBackShipOrderH
  Left = -4
  Top = -4
  Caption = '销售退货表头操作日志'
  ClientHeight = 553
  ClientWidth = 800
  PixelsPerInch = 96
  TextHeight = 12
  inherited ControlBar: TControlBar
    Width = 800
  end
  inherited Pnl_Title: TPanel
    Width = 800
    Caption = '销售退货表头操作日志'
    inherited Image2: TImage
      Width = 800
    end
  end
  inherited Pnl_Head: TPanel
    Width = 800
    inherited Image1: TImage
      Width = 800
    end
    inherited Lbl_Condition: TLabel
      Width = 24
      Caption = '全部'
    end
    inherited Lbl_Order: TLabel
      Width = 102
      Caption = '销售客户/操作日期'
    end
  end
  inherited Pnl_Hint: TPanel
    Top = 527
    Width = 800
    inherited Image4: TImage
      Width = 800
    end
  end
  inherited Pnl_Body: TPanel
    Width = 800
    Height = 430
    inherited Image3: TImage
      Width = 800
      Height = 430
    end
    inherited DBGridEh: TDBGridEh
      Width = 800
      Height = 430
      FrozenCols = 3
      Columns = <
        Item
          FieldName = 'CustomerCode'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '销售客户代码'
          Width = 40
          Visible = False
          KeyList.Strings = ()
        end
        Item
          FieldName = 'customerName'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '销售客户名称'
          Width = 40
          Visible = False
          KeyList.Strings = ()
        end
        Item
          FieldName = 'CustomerB'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '销售客户标识'
          Width = 100
          KeyList.Strings = ()
        end
        Item
          FieldName = 'BackShipNo'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '销售退货单号'
          Width = 76
          KeyList.Strings = ()
        end
        Item
          FieldName = 'SaleTypeCode'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '销售类型代码'
          Visible = False
          KeyList.Strings = ()
        end
        Item
          FieldName = 'SaleTypeName'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '销售类型名称'
          Width = 40
          Visible = False
          KeyList.Strings = ()
        end
        Item
          FieldName = 'SaleTypeB'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '销售类型标识'
          Width = 80
          KeyList.Strings = ()
        end
        Item
          FieldName = 'SaleDeptCode'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '销售部门代码'
          Width = 40
          Visible = False
          KeyList.Strings = ()
        end
        Item
          FieldName = 'DeptName'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '销售部门名称'
          Width = 40
          Visible = False
          KeyList.Strings = ()
        end
        Item
          FieldName = 'DeptB'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '销售部门标识'
          Width = 85
          KeyList.Strings = ()
        end
        Item
          FieldName = 'SaleEmployeeCode'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '营销业务员代码'
          Width = 40
          Visible = False
          KeyList.Strings = ()
        end
        Item
          FieldName = 'EmployeeName'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '营销业务员名称'
          Width = 40
          Visible = False
          KeyList.Strings = ()
        end
        Item
          FieldName = 'SaleEmployeeB'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '营销业务员标识'
          Width = 98
          KeyList.Strings = ()
        end
        Item
          FieldName = 'CurrencyCode'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '货币代码'
          Width = 40
          Visible = False
          KeyList.Strings = ()
        end
        Item
          FieldName = 'CurrencyName'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '货币名称'
          Width = 40
          Visible = False
          KeyList.Strings = ()
        end
        Item
          FieldName = 'CurrencyB'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '货币标识'
          KeyList.Strings = ()
        end
        Item
          FieldName = 'TaxRate_Percent'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '销售税率'
          KeyList.Strings = ()
        end
        Item
          FieldName = 'PayTermCode'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '付款条款代码'
          Width = 40
          Visible = False
          KeyList.Strings = ()
        end
        Item
          FieldName = 'PayTermName'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '付款条款名称'
          Width = 40
          Visible = False
          KeyList.Strings = ()
        end
        Item
          FieldName = 'PayTermB'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '付款条款标识'
          Width = 87
          KeyList.Strings = ()
        end
        Item
          FieldName = 'CreateEmployeeCode'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '制单人员代码'
          Width = 40
          Visible = False
          KeyList.Strings = ()
        end
        Item
          FieldName = 'EmployeeName_1'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '制单人员名称'
          Width = 40
          Visible = False
          KeyList.Strings = ()
        end
        Item
          FieldName = 'CreateEmployeeB'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '制单人员标识'
          Width = 86
          KeyList.Strings = ()
        end
        Item
          FieldName = 'ShipModeCode'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '发货方式代码'
          Visible = False
          KeyList.Strings = ()
        end
        Item
          FieldName = 'ShipModeName'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '发货方式名称'
          Width = 40
          Visible = False
          KeyList.Strings = ()
        end
        Item
          FieldName = 'ShipModeB'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '发货方式标识'
          Width = 93
          KeyList.Strings = ()
        end
        Item
          FieldName = 'ShipAddresSCode'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '发货地址代码'
          Visible = False
          KeyList.Strings = ()
        end
        Item
          FieldName = 'ShipAddressName'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '发货地址名称'
          Width = 40
          Visible = False
          KeyList.Strings = ()
        end
        Item
          FieldName = 'CustomerShipAddressB'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '发货地址'
          Width = 66
          KeyList.Strings = ()
        end
        Item
          FieldName = 'RemArk'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '备注1'
          Width = 79
          KeyList.Strings = ()
        end
        Item
          FieldName = 'RemArk1'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '备注2'
          Width = 76
          KeyList.Strings = ()
        end
        Item
          FieldName = 'ChgType'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '操作类型'
          Width = 73
          KeyList.Strings = ()
        end
        Item
          FieldName = 'ChgEmployeeCode'