ap_invoice_d.dfm

一个MRPII系统源代码版本

inherited Frm_Ap_Invoice_D: TFrm_Ap_Invoice_D
  Left = -5
  Top = 89
  Caption = '发票对应的入库单明细'
  ClientHeight = 407
  ClientWidth = 768
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 12
  object Label1: TLabel [0]
    Left = 194
    Top = 21
    Width = 60
    Height = 12
    Caption = '仓库标识：'
  end
  object Label2: TLabel [1]
    Left = 365
    Top = 21
    Width = 60
    Height = 12
    Caption = '单据日期：'
  end
  object Label3: TLabel [2]
    Left = 573
    Top = 21
    Width = 60
    Height = 12
    Caption = '货币标识：'
  end
  object Lbl_WhName: TLabel [3]
    Left = 253
    Top = 21
    Width = 60
    Height = 12
    Caption = 'Lbl_WhName'
  end
  object Lbl_InvBillDate: TLabel [4]
    Left = 424
    Top = 21
    Width = 90
    Height = 12
    Caption = 'Lbl_InvBillDate'
  end
  object Lbl_CurrencyName: TLabel [5]
    Left = 632
    Top = 21
    Width = 96
    Height = 12
    Caption = 'Lbl_CurrencyName'
  end
  object Label4: TLabel [6]
    Left = 15
    Top = 21
    Width = 60
    Height = 12
    Caption = '入库单号：'
  end
  object Lbl_InvInBillNo: TLabel [7]
    Left = 73
    Top = 21
    Width = 90
    Height = 12
    Caption = 'Lbl_InvInBillNo'
  end
  inherited btn_ok: TButton
    Left = 538
    Top = 375
  end
  inherited btn_Cancel: TButton
    Left = 655
    Top = 375
  end
  object DBGridEh1: TDBGridEh [10]
    Left = 7
    Top = 39
    Width = 755
    Height = 321
    DataSource = DataSource1
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
    ReadOnly = True
    TabOrder = 2
    TitleFont.ChArset = GB2312_CHArSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -12
    TitleFont.Name = '宋体'
    TitleFont.Style = []
    FrozenCols = 2
    HorzScrollBar.Tracking = True
    VertScrollBar.Tracking = True
    Columns = <
      Item
        FieldName = 'ItemCodeName'
        Title.Alignment = taCenter
        Title.Caption = '物料标识'
        Width = 275
      end
      Item
        Alignment = taCenter
        FieldName = 'InvBillLineNo'
        Title.Alignment = taCenter
        Title.Caption = '行号'
        Width = 53
      end
      Item
        FieldName = 'PONo'
        Title.Alignment = taCenter
        Title.Caption = '采购订单号'
        Width = 61
      end
      Item
        Alignment = taCenter
        FieldName = 'POLineNo'
        Title.Alignment = taCenter
        Title.Caption = '采购订单行号'
        Width = 74
      end
      Item
        FieldName = 'MONo'
        Title.Alignment = taCenter
        Title.Caption = '生产订单号'
      end
      Item
        Alignment = taCenter
        FieldName = 'MoLineNo'
        Title.Alignment = taCenter
        Title.Caption = '生产订单行号'
        Width = 76
      end
      Item
        FieldName = 'BatchNo'
        Title.Alignment = taCenter
        Title.Caption = '批次号'
        Width = 46
      end
      Item
        Alignment = tArightJustify
        FieldName = 'InvBillSfcQty'
        Title.Alignment = taCenter
        Title.Caption = '拟入数量'
        Width = 51
      end
      Item
        Alignment = tArightJustify
        FieldName = 'InvBillQty'
        Title.Alignment = taCenter
        Title.Caption = '数量'
        Width = 32
      end
      Item
        Alignment = tArightJustify
        FieldName = 'InvBillNoTaxPriceC'
        Title.Alignment = taCenter
        Title.Caption = '未税价'
        Width = 44
      end
      Item
        Alignment = tArightJustify
        FieldName = 'InvBillNoTaxAmountC'
        Title.Alignment = taCenter
        Title.Caption = '未税金额'
        Width = 62
      end>
  end
  inherited AdoQry_Tmp: TAdoQuery
    EnableBCD = False
    Prepared = True
    Left = 176
    Top = 352
  end
  object DataSource1: TDataSource
    DataSet = AdoQry_Tmp
    Left = 96
    Top = 352
  end
end