personinfoeditunit.dfm

学费管理系统,学校使用

          DataController.Summary.DefaultGroupSummaryItems = <>
          DataController.Summary.FooterSummaryItems = <>
          DataController.Summary.SummaryGroups = <>
          NavigatorButtons.ConfirmDelete = False
          OptionsData.CancelOnExit = False
          OptionsData.Deleting = False
          OptionsData.DeletingConfirmation = False
          OptionsData.Editing = False
          OptionsData.Inserting = False
          OptionsView.GroupByBox = False
          Styles.StyleSheet = mainform.GridTableViewStyleSheetDevExpress
          object cxGridDBColumn25: TcxGridDBColumn
            DataBinding.FieldName = #39033#30446
            Width = 72
          end
          object cxGridDBColumn26: TcxGridDBColumn
            DataBinding.FieldName = #24212#25910#37329#39069
            Width = 82
          end
          object cxGridDBColumn27: TcxGridDBColumn
            Caption = #23454#25910#37329#39069
            DataBinding.FieldName = #24050#25910#37329#39069
            Width = 83
          end
          object cxGridDBColumn28: TcxGridDBColumn
            DataBinding.FieldName = #20943#20813#37329#39069
            Width = 86
          end
          object cxGridDBColumn29: TcxGridDBColumn
            DataBinding.FieldName = #20943#20813#21517#31216
            Width = 219
          end
          object cxGridDBColumn30: TcxGridDBColumn
            DataBinding.FieldName = #36864#36153#37329#39069
            Width = 82
          end
          object cxGridDBColumn31: TcxGridDBColumn
            DataBinding.FieldName = #36864#36153#24773#20917
            Width = 222
          end
          object cxGridDBColumn32: TcxGridDBColumn
            DataBinding.FieldName = #27424#36153#37329#39069
          end
        end
        object cxGridLevel4: TcxGridLevel
          GridView = cxGridDBTableView4
        end
      end
    end
  end
  object oper_adoquery: TADOQuery
    Connection = dm.ADOConnection
    Parameters = <>
    Left = 200
    Top = 144
  end
  object ADOQuery1: TADOQuery
    Connection = dm.ADOConnection
    CursorType = ctStatic
    Parameters = <
      item
        Name = 'studentid1'
        Attributes = [paSigned]
        DataType = ftLargeint
        Precision = 19
        Size = 8
        Value = Null
      end
      item
        Name = 'studentid2'
        Attributes = [paSigned]
        DataType = ftLargeint
        Precision = 19
        Size = 8
        Value = Null
      end>
    SQL.Strings = (
      'select chargeitemid,'
      'case chargeitemid'
      'when 1 then '#39#23398#36153#39
      'when 2 then '#39#20303#23487#39
      'when 3 then '#39#20070#36153#39
      'when 4 then '#39#20445#38505#39
      'when 5 then '#39#29983#27963#29992#21697#39
      'when 6 then '#39#20445#35777#37329#39
      'end as '#39#39033#30446#39', '
      'quantum '#39#24212#25910#37329#39069#39','
      'fact as '#39#24050#25910#37329#39069#39','
      'derate as '#39#20943#20813#37329#39069#39','
      'deratename as '#39#20943#20813#21517#31216#39','
      'returnnum as '#39#36864#36153#37329#39069#39','
      'returnname as '#39#36864#36153#24773#20917#39','
      '(quantum-derate-( fact-returnnum)) as '#39#27424#36153#37329#39069#39
      ' from income'
      'where studentid=:studentid1'
      'and studyyear=1 '
      'union '
      'select 8,'
      #39#21512#35745#39','
      'sum(quantum) as '#39#24212#25910#37329#39069#39','
      'sum(fact) as '#39#24050#25910#37329#39069#39','
      'sum(derate) as '#39#20943#20813#37329#39069#39','
      #39#39' as '#39#20943#20813#21517#31216#39','
      'sum(returnnum) as '#39#36864#36153#37329#39069#39','
      #39#39' as '#39#36864#36153#24773#20917#39','
      '(sum(quantum)-sum(derate)-(sum(fact)-sum(returnnum))) as '#39#27424#36153#37329#39069#39
      ' from income'
      'where studentid=:studentid2'
      'and studyyear=1  order by chargeitemid')
    Left = 280
    Top = 169
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 280
    Top = 201
  end
  object DataSource2: TDataSource
    DataSet = ADOQuery2
    Left = 320
    Top = 201
  end
  object ADOQuery2: TADOQuery
    Connection = dm.ADOConnection
    CursorType = ctStatic
    Parameters = <
      item
        Name = 'studentid1'
        Attributes = [paSigned]
        DataType = ftLargeint
        Precision = 19
        Size = 8
        Value = Null
      end
      item
        Name = 'studentid2'
        Attributes = [paSigned]
        DataType = ftLargeint
        Precision = 19
        Size = 8
        Value = Null
      end>
    SQL.Strings = (
      'select chargeitemid,'
      'case chargeitemid'
      'when 1 then '#39#23398#36153#39
      'when 2 then '#39#20303#23487#39
      'when 3 then '#39#20070#36153#39
      'when 4 then '#39#20445#38505#39
      'when 5 then '#39#29983#27963#29992#21697#39
      'when 6 then '#39#20445#35777#37329#39
      'end as '#39#39033#30446#39', '
      'quantum '#39#24212#25910#37329#39069#39','
      'fact as '#39#24050#25910#37329#39069#39','
      'derate as '#39#20943#20813#37329#39069#39','
      'deratename as '#39#20943#20813#21517#31216#39','
      'returnnum as '#39#36864#36153#37329#39069#39','
      'returnname as '#39#36864#36153#24773#20917#39','
      '(quantum-derate-( fact-returnnum)) as '#39#27424#36153#37329#39069#39
      ' from income'
      'where studentid=:studentid1'
      'and studyyear=2 '
      'union '
      'select 8,'
      #39#21512#35745#39','
      'sum(quantum) as '#39#24212#25910#37329#39069#39','
      'sum(fact) as '#39#24050#25910#37329#39069#39','
      'sum(derate) as '#39#20943#20813#37329#39069#39','
      #39#39' as '#39#20943#20813#21517#31216#39','
      'sum(returnnum) as '#39#36864#36153#37329#39069#39','
      #39#39' as '#39#36864#36153#24773#20917#39','
      '(sum(quantum)-sum(derate)-(sum(fact)-sum(returnnum))) as '#39#27424#36153#37329#39069#39
      ' from income'
      'where studentid=:studentid2'
      'and studyyear=2  order by chargeitemid'
      '')
    Left = 320
    Top = 169
  end
  object ADOQuery3: TADOQuery
    Connection = dm.ADOConnection
    CursorType = ctStatic
    Parameters = <
      item
        Name = 'studentid1'
        Attributes = [paSigned]
        DataType = ftLargeint
        Precision = 19
        Size = 8
        Value = Null
      end
      item
        Name = 'studentid2'
        Attributes = [paSigned]
        DataType = ftLargeint
        Precision = 19
        Size = 8
        Value = Null
      end>
    SQL.Strings = (
      'select chargeitemid,'
      'case chargeitemid'
      'when 1 then '#39#23398#36153#39
      'when 2 then '#39#20303#23487#39
      'when 3 then '#39#20070#36153#39
      'when 4 then '#39#20445#38505#39
      'when 5 then '#39#29983#27963#29992#21697#39
      'when 6 then '#39#20445#35777#37329#39
      'end as '#39#39033#30446#39', '
      'quantum '#39#24212#25910#37329#39069#39','
      'fact as '#39#24050#25910#37329#39069#39','
      'derate as '#39#20943#20813#37329#39069#39','
      'deratename as '#39#20943#20813#21517#31216#39','
      'returnnum as '#39#36864#36153#37329#39069#39','
      'returnname as '#39#36864#36153#24773#20917#39','
      '(quantum-derate-( fact-returnnum)) as '#39#27424#36153#37329#39069#39
      ' from income'
      'where studentid=:studentid1'
      'and studyyear=3'
      'union '
      'select 8,'
      #39#21512#35745#39','
      'sum(quantum) as '#39#24212#25910#37329#39069#39','
      'sum(fact) as '#39#24050#25910#37329#39069#39','
      'sum(derate) as '#39#20943#20813#37329#39069#39','
      #39#39' as '#39#20943#20813#21517#31216#39','
      'sum(returnnum) as '#39#36864#36153#37329#39069#39','
      #39#39' as '#39#36864#36153#24773#20917#39','
      '(sum(quantum)-sum(derate)-(sum(fact)-sum(returnnum))) as '#39#27424#36153#37329#39069#39
      ' from income'
      'where studentid=:studentid2'
      'and studyyear=3  order by chargeitemid'
      '')
    Left = 360
    Top = 169
  end
  object DataSource3: TDataSource
    DataSet = ADOQuery3
    Left = 368
    Top = 193
  end
  object DataSource4: TDataSource
    DataSet = ADOQuery4
    Left = 392
    Top = 193
  end
  object ADOQuery4: TADOQuery
    Connection = dm.ADOConnection
    CursorType = ctStatic
    Parameters = <
      item
        Name = 'studentid1'
        Attributes = [paSigned]
        DataType = ftLargeint
        Precision = 19
        Size = 8
        Value = Null
      end
      item
        Name = 'studentid2'
        Attributes = [paSigned]
        DataType = ftLargeint
        Precision = 19
        Size = 8
        Value = Null
      end>
    SQL.Strings = (
      'select chargeitemid,'
      'case chargeitemid'
      'when 1 then '#39#23398#36153#39
      'when 2 then '#39#20303#23487#39
      'when 3 then '#39#20070#36153#39
      'when 4 then '#39#20445#38505#39
      'when 5 then '#39#29983#27963#29992#21697#39
      'when 6 then '#39#20445#35777#37329#39
      'end as '#39#39033#30446#39', '
      'quantum '#39#24212#25910#37329#39069#39','
      'fact as '#39#24050#25910#37329#39069#39','
      'derate as '#39#20943#20813#37329#39069#39','
      'deratename as '#39#20943#20813#21517#31216#39','
      'returnnum as '#39#36864#36153#37329#39069#39','
      'returnname as '#39#36864#36153#24773#20917#39','
      '(quantum-derate-( fact-returnnum)) as '#39#27424#36153#37329#39069#39
      ' from income'
      'where studentid=:studentid1'
      'and studyyear=4 '
      'union '
      'select 8,'
      #39#21512#35745#39','
      'sum(quantum) as '#39#24212#25910#37329#39069#39','
      'sum(fact) as '#39#24050#25910#37329#39069#39','
      'sum(derate) as '#39#20943#20813#37329#39069#39','
      #39#39' as '#39#20943#20813#21517#31216#39','
      'sum(returnnum) as '#39#36864#36153#37329#39069#39','
      #39#39' as '#39#36864#36153#24773#20917#39','
      '(sum(quantum)-sum(derate)-(sum(fact)-sum(returnnum))) as '#39#27424#36153#37329#39069#39
      ' from income'
      'where studentid=:studentid2'
      'and studyyear=4  order by chargeitemid'
      '')
    Left = 400
    Top = 169
  end
  object ADOQuery5: TADOQuery
    Connection = dm.ADOConnection
    CursorType = ctStatic
    Parameters = <
      item
        Name = 'studentid1'
        Attributes = [paSigned]
        DataType = ftLargeint
        Precision = 19
        Size = 8
        Value = Null
      end
      item
        Name = 'studentid2'
        Attributes = [paSigned]
        DataType = ftLargeint
        Precision = 19
        Size = 8
        Value = Null
      end>
    SQL.Strings = (
      'select chargeitemid,'
      'case chargeitemid'
      'when 1 then '#39#23398#36153#39
      'when 2 then '#39#20303#23487#39
      'when 3 then '#39#20070#36153#39
      'when 4 then '#39#20445#38505#39
      'when 5 then '#39#29983#27963#29992#21697#39
      'when 6 then '#39#20445#35777#37329#39
      'end as '#39#39033#30446#39', '
      'quantum '#39#24212#25910#37329#39069#39','
      'fact as '#39#24050#25910#37329#39069#39','
      'derate as '#39#20943#20813#37329#39069#39','
      'deratename as '#39#20943#20813#21517#31216#39','
      'returnnum as '#39#36864#36153#37329#39069#39','
      'returnname as '#39#36864#36153#24773#20917#39','
      '(quantum-derate-( fact-returnnum)) as '#39#27424#36153#37329#39069#39
      ' from income'
      'where studentid=:studentid1'
      'and studyyear=5 '
      'union '
      'select 8,'
      #39#21512#35745#39','
      'sum(quantum) as '#39#24212#25910#37329#39069#39','
      'sum(fact) as '#39#24050#25910#37329#39069#39','
      'sum(derate) as '#39#20943#20813#37329#39069#39','
      #39#39' as '#39#20943#20813#21517#31216#39','
      'sum(returnnum) as '#39#36864#36153#37329#39069#39','
      #39#39' as '#39#36864#36153#24773#20917#39','
      '(sum(quantum)-sum(derate)-(sum(fact)-sum(returnnum))) as '#39#27424#36153#37329#39069#39
      ' from income'
      'where studentid=:studentid2'
      'and studyyear=5  order by chargeitemid'
      '')
    Left = 432
    Top = 161
  end
  object DataSource5: TDataSource
    DataSet = ADOQuery5
    Left = 432
    Top = 193
  end
end