usercompcount.rtm

来自「一个电力企业的后台管理程序」· RTM 代码 · 共 270 行

object pprp_main: TppReport
  AutoStop = False
  DataPipeline = ppdbp_main
  PrinterSetup.BinName = 'Default'
  PrinterSetup.DocumentName = 'Report'
  PrinterSetup.PaperName = 'Letter'
  PrinterSetup.PrinterName = 'Default'
  PrinterSetup.mmMarginBottom = 6350
  PrinterSetup.mmMarginLeft = 6350
  PrinterSetup.mmMarginRight = 6350
  PrinterSetup.mmMarginTop = 6350
  PrinterSetup.mmPaperHeight = 279401
  PrinterSetup.mmPaperWidth = 215900
  Template.DatabaseSettings.DataPipeline = ppdbp_main
  Template.DatabaseSettings.NameField = 'TotalCount'
  Template.DatabaseSettings.TemplateField = 'TotalCount'
  Template.FileName = 'E:\Work\NewReport\REPORTMOD\USERCOMPCOUNT.rtm'
  Template.Format = ftASCII
  UserName = 'Report'
  DeviceType = 'Screen'
  Left = 98
  Top = 156
  Version = '5.0'
  mmColumnWidth = 0
  object ppHeaderBand1: TppHeaderBand
    mmBottomOffset = 0
    mmHeight = 24606
    mmPrintPosition = 0
    object ppShape1: TppShape
      UserName = 'Shape1'
      Shape = stRoundRect
      mmHeight = 13229
      mmLeft = 53711
      mmTop = 0
      mmWidth = 94986
      BandType = 0
    end
    object ppLabel1: TppLabel
      UserName = 'Label1'
      Caption = '投诉处理报表'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'Arial'
      Font.Size = 18
      Font.Style = [fsBold]
      Transparent = True
      mmHeight = 7408
      mmLeft = 82286
      mmTop = 3440
      mmWidth = 38100
      BandType = 0
    end
    object ppLabel2: TppLabel
      UserName = 'Label2'
      Caption = '投诉类型'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'Arial'
      Font.Size = 12
      Font.Style = []
      Transparent = True
      mmHeight = 4763
      mmLeft = 12965
      mmTop = 17463
      mmWidth = 16933
      BandType = 0
    end
    object ppLabel3: TppLabel
      UserName = 'Label3'
      Caption = '未处理数'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'Arial'
      Font.Size = 12
      Font.Style = []
      Transparent = True
      mmHeight = 4763
      mmLeft = 60854
      mmTop = 16933
      mmWidth = 16933
      BandType = 0
    end
    object ppLabel4: TppLabel
      UserName = 'Label4'
      Caption = '及时处理数'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'Arial'
      Font.Size = 12
      Font.Style = []
      Transparent = True
      mmHeight = 4763
      mmLeft = 96309
      mmTop = 16140
      mmWidth = 21167
      BandType = 0
    end
    object ppLabel5: TppLabel
      UserName = 'Label5'
      Caption = '超期处理数'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'Arial'
      Font.Size = 12
      Font.Style = []
      Transparent = True
      mmHeight = 4763
      mmLeft = 135202
      mmTop = 16669
      mmWidth = 21167
      BandType = 0
    end
    object ppLabel6: TppLabel
      UserName = 'Label6'
      Caption = '总数'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'Arial'
      Font.Size = 12
      Font.Style = []
      Transparent = True
      mmHeight = 4763
      mmLeft = 179917
      mmTop = 17198
      mmWidth = 8467
      BandType = 0
    end
  end
  object ppDetailBand1: TppDetailBand
    mmBottomOffset = 0
    mmHeight = 5821
    mmPrintPosition = 0
    object ppShape2: TppShape
      UserName = 'Shape2'
      ParentHeight = True
      mmHeight = 5821
      mmLeft = 0
      mmTop = 0
      mmWidth = 51329
      BandType = 4
    end
    object ppShape5: TppShape
      UserName = 'Shape5'
      ParentHeight = True
      mmHeight = 5821
      mmLeft = 51329
      mmTop = 0
      mmWidth = 37571
      BandType = 4
    end
    object ppShape3: TppShape
      UserName = 'Shape3'
      ParentHeight = True
      mmHeight = 5821
      mmLeft = 88900
      mmTop = 0
      mmWidth = 38894
      BandType = 4
    end
    object ppShape4: TppShape
      UserName = 'Shape4'
      ParentHeight = True
      mmHeight = 5821
      mmLeft = 127794
      mmTop = 0
      mmWidth = 38629
      BandType = 4
    end
    object ppDBText1: TppDBText
      UserName = 'DBText1'
      Alignment = taCenter
      DataField = 'TYPENAME'
      DataPipeline = ppdbp_main
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'Arial'
      Font.Size = 12
      Font.Style = []
      ParentDataPipeline = False
      Transparent = True
      mmHeight = 5292
      mmLeft = 265
      mmTop = 265
      mmWidth = 50800
      BandType = 4
    end
    object ppShape6: TppShape
      UserName = 'Shape6'
      ParentHeight = True
      mmHeight = 5821
      mmLeft = 166423
      mmTop = 0
      mmWidth = 35719
      BandType = 4
    end
    object CompNotCount: TppVariable
      UserName = 'CompNotCount'
      Alignment = taCenter
      CalcOrder = 0
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'Arial'
      Font.Size = 12
      Font.Style = []
      OnCalc = CompNotCountCalc
      Transparent = True
      mmHeight = 4763
      mmLeft = 55298
      mmTop = 529
      mmWidth = 28575
      BandType = 4
    end
    object CompInTime: TppVariable
      UserName = 'CompInTime'
      Alignment = taCenter
      CalcOrder = 1
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'Arial'
      Font.Size = 12
      Font.Style = []
      OnCalc = CompInTimeCalc
      Transparent = True
      mmHeight = 4763
      mmLeft = 96309
      mmTop = 529
      mmWidth = 23548
      BandType = 4
    end
    object CompOver: TppVariable
      UserName = 'CompOver'
      Alignment = taCenter
      CalcOrder = 2
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'Arial'
      Font.Size = 12
      Font.Style = []
      OnCalc = CompOverCalc
      Transparent = True
      mmHeight = 4763
      mmLeft = 136261
      mmTop = 529
      mmWidth = 20108
      BandType = 4
    end
    object CompAllCount: TppVariable
      UserName = 'CompAllCount'
      CalcOrder = 3
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'Arial'
      Font.Size = 12
      Font.Style = []
      OnCalc = CompAllCountCalc
      Transparent = True
      mmHeight = 4763
      mmLeft = 170921
      mmTop = 529
      mmWidth = 26723
      BandType = 4
    end
  end
  object ppFooterBand1: TppFooterBand
    mmBottomOffset = 0
    mmHeight = 13229
    mmPrintPosition = 0
  end
end