inv_deptmonthclasssumqry.dfm

一个MRPII系统源代码版本

inherited Frm_Inv_DeptMonthClassSumQry: TFrm_Inv_DeptMonthClassSumQry
  Left = 199
  Top = 135
  Caption = #37096#38376#25910#21457#23384#20998#31867#27719#24635#34920
  PixelsPerInch = 96
  TextHeight = 12
  inherited Pnl_Title: TPanel
    Caption = #37096#38376#39046#26009#20998#31867#27719#24635
  end
  inherited Pnl_Head: TPanel
    inherited Lbl_OrderTitle: TLabel
      Left = 14
    end
    inherited Lbl_ConditionTitle: TLabel
      Left = 14
    end
    inherited Lbl_Order: TLabel
      Left = 72
      Top = 22
      Width = 102
      Caption = #20179#24211'/'#29289#26009#31867#21035#26631#35782
    end
  end
  inherited Pnl_Hint: TPanel
    Top = 532
    Height = 41
    inherited Image4: TImage
      Height = 41
    end
    object Label4: TLabel
      Left = 598
      Top = 16
      Width = 60
      Height = 12
      Caption = #27719#24635#37329#39069#65306
    end
    object Label1: TLabel
      Left = 16
      Top = 16
      Width = 294
      Height = 12
      Caption = #35828#26126#65306#25968#25454#21253#25324#36710#38388#39046#26009#12289#37329#39069#35843#25972#20986#24211#12289#20854#20182#20986#24211'130'
    end
    object Edit4: TEdit
      Left = 659
      Top = 11
      Width = 121
      Height = 18
      ImeName = #20013#25991' ('#31616#20307') - '#25340#38899#21152#21152
      ReadOnly = True
      TabOrder = 0
    end
  end
  inherited Pnl_Body: TPanel
    Height = 439
    inherited Image3: TImage
      Height = 439
    end
    inherited DBGridEh: TDBGridEh
      Height = 439
      Columns = <
        item
          EditButtons = <>
          FieldName = 'DeptCodeName'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #37096#38376#26631#35782
          Width = 178
        end
        item
          EditButtons = <>
          FieldName = 'ClassName'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #23384#36135#20998#31867
          Width = 142
        end
        item
          EditButtons = <>
          FieldName = 'qty'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #25968#37327
          Width = 101
        end
        item
          EditButtons = <>
          FieldName = 'Amount'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #37329#39069
          Width = 152
        end>
    end
  end
  inherited AdoQry_Tmp: TADOQuery
    Left = 413
    Top = 195
  end
  inherited ActionList: TActionList
    Left = 200
    Top = 232
  end
  inherited AdoQry_Main: TADOQuery
    ConnectionString = 
      'Provider=SQLOLEDB.1;Password=mdrcmrm;Persist Security Info=True;' +
      'User ID=mdrcmrm;Initial Catalog=mdrcmrm;Data Source=192.168.0.15' +
      '1;Use procedure for Prepare=1;Auto Translate=True;Packet Size=40' +
      '96;Workstation ID=XYB'
    CursorType = ctStatic
    SQL.Strings = (
      
        'select DeptCode as DeptCodeName,ItemClass.ClassName,sum(qty) as ' +
        'qty,sum(Amount) as Amount '
      'from Temp01 '
      'left join ItemClass on ItemClass.ClassCode=Temp01.ClassCode'
      'group by DeptCode,ItemClass.ClassName'
      'Order by DeptCode')
    Left = 328
  end
  inherited DataSource: TDataSource
    Left = 392
    Top = 257
  end
  inherited ExtPrintReport: TExtPrintReport
    TopBordermm = 10
    BottomBordermm = 10
    PaperType = ptNarrow
  end
  inherited PopuPmenu: TPopupMenu
    Left = 272
    Top = 257
  end
end