ReportName = Units Service History
ReportGroup = Maintenance
object ppReport1: TppReport
  AutoStop = False
  DataPipeline = daADOQueryDataView1.ServiceHistory
  NoDataBehaviors = [ndBlankReport]
  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
  PrinterSetup.PaperSize = 1
  SaveAsTemplate = True
  Template.DatabaseSettings.DataPipeline = dpReports
  Template.DatabaseSettings.Name = 'Units Service History'
  Template.DatabaseSettings.NameField = 'ReportName'
  Template.DatabaseSettings.TemplateField = 'NewDef'
  Template.FileName = 'Units Service History.rtm'
  Template.SaveTo = stDatabase
  Template.Format = ftASCII
  AllowPrintToFile = True
  DeviceType = 'Screen'
  OutlineSettings.CreateNode = True
  OutlineSettings.CreatePageNodes = True
  OutlineSettings.Enabled = False
  OutlineSettings.Visible = True
  PreviewFormSettings.ZoomSetting = zs100Percent
  TextSearchSettings.DefaultString = '<FindText>'
  TextSearchSettings.Enabled = True
  Left = 218
  Top = 155
  Version = '7.03'
  mmColumnWidth = 0
  DataPipelineName = 'ServiceHistory'
  object ppTitleBand1: TppTitleBand
    mmBottomOffset = 0
    mmHeight = 14023
    mmPrintPosition = 0
    object ppLine1: TppLine
      UserName = 'Line1'
      Pen.Color = clNavy
      Pen.Width = 2
      Weight = 1.5
      mmHeight = 3969
      mmLeft = 1323
      mmTop = 1323
      mmWidth = 200555
      BandType = 1
    end
    object ppLabel1: TppLabel
      UserName = 'Label1'
      Caption = 'Unit Service History'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Name = 'TIMES NEW ROMAN'
      Font.Size = 16
      Font.Style = [fsBold, fsItalic]
      Transparent = True
      mmHeight = 6562
      mmLeft = 1323
      mmTop = 2117
      mmWidth = 47244
      BandType = 1
    end
    object ppDBText6: TppDBText
      UserName = 'DBText6'
      AutoSize = True
      DataField = 'CompanyName'
      DataPipeline = dpCompanyInfo
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Name = 'TIMES NEW ROMAN'
      Font.Size = 16
      Font.Style = [fsBold, fsItalic]
      ParentDataPipeline = False
      TextAlignment = taRightJustified
      Transparent = True
      DataPipelineName = 'dpCompanyInfo'
      mmHeight = 6562
      mmLeft = 166868
      mmTop = 2117
      mmWidth = 35010
      BandType = 1
    end
    object ppLabel12: TppLabel
      UserName = 'Params'
      Caption = 'RecordNumber: 5'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'TIMES NEW ROMAN'
      Font.Size = 10
      Font.Style = []
      Transparent = True
      mmHeight = 4149
      mmLeft = 1323
      mmTop = 9260
      mmWidth = 25315
      BandType = 1
    end
  end
  object ppHeaderBand1: TppHeaderBand
    mmBottomOffset = 0
    mmHeight = 7408
    mmPrintPosition = 0
    object ppLine3: TppLine
      UserName = 'Line3'
      Pen.Color = clNavy
      Pen.Width = 2
      Weight = 1.5
      mmHeight = 3969
      mmLeft = 1323
      mmTop = 6085
      mmWidth = 200555
      BandType = 0
    end
    object ppLine2: TppLine
      UserName = 'Line2'
      Pen.Color = clNavy
      Pen.Width = 2
      Weight = 1.5
      mmHeight = 3969
      mmLeft = 1323
      mmTop = 1323
      mmWidth = 200555
      BandType = 0
    end
    object ppLabel2: TppLabel
      UserName = 'Label2'
      Caption = 'Service Description'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Name = 'TIMES NEW ROMAN'
      Font.Size = 11
      Font.Style = [fsBold, fsItalic]
      Transparent = True
      mmHeight = 4530
      mmLeft = 12965
      mmTop = 1323
      mmWidth = 31369
      BandType = 0
    end
    object ppLabel3: TppLabel
      UserName = 'Label3'
      AutoSize = False
      Caption = 'Performed'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Name = 'TIMES NEW ROMAN'
      Font.Size = 11
      Font.Style = [fsBold, fsItalic]
      Transparent = True
      mmHeight = 4763
      mmLeft = 96838
      mmTop = 1323
      mmWidth = 18785
      BandType = 0
    end
    object ppLabel4: TppLabel
      UserName = 'Label4'
      AutoSize = False
      Caption = 'Performed By'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Name = 'TIMES NEW ROMAN'
      Font.Size = 11
      Font.Style = [fsBold, fsItalic]
      Transparent = True
      mmHeight = 4763
      mmLeft = 121973
      mmTop = 1323
      mmWidth = 23283
      BandType = 0
    end
    object ppLabel5: TppLabel
      UserName = 'Label5'
      AutoSize = False
      Caption = 'Work Order'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Name = 'TIMES NEW ROMAN'
      Font.Size = 11
      Font.Style = [fsBold, fsItalic]
      Transparent = True
      mmHeight = 4763
      mmLeft = 161132
      mmTop = 1323
      mmWidth = 20108
      BandType = 0
    end
  end
  object ppDetailBand1: TppDetailBand
    mmBottomOffset = 0
    mmHeight = 4233
    mmPrintPosition = 0
    object ppDBText1: TppDBText
      UserName = 'DBText1'
      DataField = 'Service'
      DataPipeline = daADOQueryDataView1.ServiceHistory
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'ARIAL'
      Font.Size = 8
      Font.Style = []
      Transparent = True
      DataPipelineName = 'ServiceHistory'
      mmHeight = 3260
      mmLeft = 12965
      mmTop = 529
      mmWidth = 80433
      BandType = 4
    end
    object ppDBText2: TppDBText
      UserName = 'DBText2'
      DataField = 'Performed'
      DataPipeline = daADOQueryDataView1.ServiceHistory
      DisplayFormat = 'mm/dd/yyyy'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'ARIAL'
      Font.Size = 8
      Font.Style = []
      Transparent = True
      DataPipelineName = 'ServiceHistory'
      mmHeight = 3260
      mmLeft = 96838
      mmTop = 529
      mmWidth = 18785
      BandType = 4
    end
    object ppDBText3: TppDBText
      UserName = 'DBText3'
      DataField = 'PerformedBy'
      DataPipeline = daADOQueryDataView1.ServiceHistory
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'ARIAL'
      Font.Size = 8
      Font.Style = []
      Transparent = True
      DataPipelineName = 'ServiceHistory'
      mmHeight = 3175
      mmLeft = 121973
      mmTop = 529
      mmWidth = 38100
      BandType = 4
    end
    object ppDBText4: TppDBText
      UserName = 'DBText4'
      DataField = 'WorkOrder'
      DataPipeline = daADOQueryDataView1.ServiceHistory
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'ARIAL'
      Font.Size = 8
      Font.Style = []
      Transparent = True
      DataPipelineName = 'ServiceHistory'
      mmHeight = 3260
      mmLeft = 161132
      mmTop = 529
      mmWidth = 20108
      BandType = 4
    end
  end
  object ppFooterBand1: TppFooterBand
    mmBottomOffset = 0
    mmHeight = 7144
    mmPrintPosition = 0
    object ppLine4: TppLine
      UserName = 'Line4'
      Pen.Color = clGray
      Pen.Width = 2
      Weight = 1.5
      mmHeight = 3969
      mmLeft = 1323
      mmTop = 5821
      mmWidth = 200555
      BandType = 8
    end
    object ppSystemVariable1: TppSystemVariable
      UserName = 'SystemVariable1'
      VarType = vtPrintDateTime
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Name = 'TIMES NEW ROMAN'
      Font.Size = 9
      Font.Style = []
      Transparent = True
      mmHeight = 4487
      mmLeft = 1323
      mmTop = 1323
      mmWidth = 17187
      BandType = 8
    end
    object ppSystemVariable2: TppSystemVariable
      UserName = 'SystemVariable2'
      VarType = vtPageNoDesc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Name = 'TIMES NEW ROMAN'
      Font.Size = 9
      Font.Style = []
      TextAlignment = taRightJustified
      Transparent = True
      mmHeight = 4487
      mmLeft = 184680
      mmTop = 1323
      mmWidth = 17187
      BandType = 8
    end
  end
  object ppSummaryBand1: TppSummaryBand
    mmBottomOffset = 0
    mmHeight = 7408
    mmPrintPosition = 0
    object ppDBCalc2: TppDBCalc
      UserName = 'DBCalc2'
      AutoSize = True
      DataField = 'Service'
      DataPipeline = daADOQueryDataView1.ServiceHistory
      DisplayFormat = 'Total Number of Records: ######0'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Name = 'TIMES NEW ROMAN'
      Font.Size = 9
      Font.Style = []
      Transparent = True
      DBCalcType = dcCount
      DataPipelineName = 'ServiceHistory'
      mmHeight = 3725
      mmLeft = 12435
      mmTop = 2910
      mmWidth = 19431
      BandType = 7
    end
  end
  object ppGroup1: TppGroup
    BreakName = 'Name'
    DataPipeline = daADOQueryDataView1.ServiceHistory
    OutlineSettings.CreateNode = True
    UserName = 'Group1'
    mmNewColumnThreshold = 0
    mmNewPageThreshold = 0
    DataPipelineName = 'ServiceHistory'
    object ppGroupHeaderBand1: TppGroupHeaderBand
      mmBottomOffset = 0
      mmHeight = 6350
      mmPrintPosition = 0
      object ppDBText5: TppDBText
        UserName = 'DBText5'
        AutoSize = True
        DataField = 'Name'
        DataPipeline = daADOQueryDataView1.ServiceHistory
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Name = 'TIMES NEW ROMAN'
        Font.Size = 9
        Font.Style = [fsBold, fsItalic]
        Transparent = True
        DataPipelineName = 'ServiceHistory'
        mmHeight = 3683
        mmLeft = 1323
        mmTop = 1323
        mmWidth = 7832
        BandType = 3
        GroupNo = 0
      end
    end
    object ppGroupFooterBand1: TppGroupFooterBand
      mmBottomOffset = 0
      mmHeight = 5556
      mmPrintPosition = 0
      object ppDBCalc1: TppDBCalc
        UserName = 'DBCalc1'
        AutoSize = True
        DataField = 'Service'
        DataPipeline = daADOQueryDataView1.ServiceHistory
        DisplayFormat = 'Total Services This Unit: ######0'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Name = 'TIMES NEW ROMAN'
        Font.Size = 9
        Font.Style = []
        ResetGroup = ppGroup1
        Transparent = True
        DBCalcType = dcCount
        DataPipelineName = 'ServiceHistory'
        mmHeight = 3725
        mmLeft = 12435
        mmTop = 1058
        mmWidth = 19431
        BandType = 5
        GroupNo = 0
      end
    end
  end
  object daDataModule1: TdaDataModule
    object daADOQueryDataView1: TdaADOQueryDataView
      UserName = 'Query_ServiceHistory'
      Height = 260
      Left = 10
      NameColumnWidth = 105
      SizeColumnWidth = 35
      SortMode = 0
      Top = 10
      TypeColumnWidth = 52
      Width = 241
      AutoSearchTabOrder = 0
      object ServiceHistory: TppChildDBPipeline
        AutoCreateFields = False
        UserName = 'ServiceHistory'
        object ppField1: TppField
          FieldAlias = 'Name'
          FieldName = 'Name'
          FieldLength = 80
          DisplayWidth = 80
          Position = 0
          TableName = 'Units'
        end
        object ppField2: TppField
          FieldAlias = 'Unit'
          FieldName = 'Unit'
          FieldLength = 25
          DisplayWidth = 25
          Position = 1
          TableName = 'Units'
        end
        object ppField3: TppField
          FieldAlias = 'Company'
          FieldName = 'Company'
          FieldLength = 50
          IsDetail = True
          DisplayWidth = 50
          Position = 2
          TableName = 'Servhist'
        end
        object ppField4: TppField
          FieldAlias = 'CostEstimate'
          FieldName = 'CostEstimate'
          FieldLength = 5
          IsDetail = True
          DataType = dtDouble
          DisplayWidth = 5
          Position = 3
          TableName = 'Servhist'
        end
        object ppField5: TppField
          FieldAlias = 'LaborCost'
          FieldName = 'LaborCost'
          FieldLength = 5
          IsDetail = True
          DataType = dtDouble
          DisplayWidth = 5
          Position = 4
          TableName = 'Servhist'
        end
        object ppField6: TppField
          FieldAlias = 'LaborEstimate'
          FieldName = 'LaborEstimate'
          FieldLength = 5
          IsDetail = True
          DataType = dtDouble
          DisplayWidth = 5
          Position = 5
          TableName = 'Servhist'
        end
        object ppField7: TppField
          FieldAlias = 'PerformedBy'
          FieldName = 'PerformedBy'
          FieldLength = 35
          IsDetail = True
          DisplayWidth = 35
          Position = 6
          TableName = 'Servhist'
        end
        object ppField8: TppField
          FieldAlias = 'Performed'
          FieldName = 'Performed'
          FieldLength = 0
          IsDetail = True
          DataType = dtDateTime
          DisplayWidth = 0
          Position = 7
          TableName = 'Servhist'
        end
        object ppField9: TppField
          FieldAlias = 'Service'
          FieldName = 'Service'
          FieldLength = 50
          IsDetail = True
          DisplayWidth = 50
          Position = 8
          TableName = 'Servhist'
        end
        object ppField10: TppField
          FieldAlias = 'WorkOrder'
          FieldName = 'WorkOrder'
          FieldLength = 0
          IsDetail = True
          DataType = dtDouble
          DisplayWidth = 0
          Position = 9
          TableName = 'Servhist'
        end
      end
      object daSQL1: TdaSQL
        DatabaseName = 'ADO1'
        DatabaseType = dtMSSQLServer
        DataPipelineName = 'ServiceHistory'
        LinkColor = clMaroon
        MaxSQLFieldAliasLength = 25
        SQLText.Strings = (
          'SELECT Units.Name, Units.Unit, Servhist.Company, '
          '       Servhist.CostEstimate, Servhist.LaborCost, '
          '       Servhist.LaborEstimate, '
          '       Servhist.PerformedBy, Servhist.Performed, '
          '       Servhist.Service, Servhist.WorkOrder'
          'FROM Units Units INNER JOIN Servhist Servhist ON '
          '     (Servhist.Unit = Units.RecordNumber)'
          'ORDER BY Units.Name, Servhist.Performed')
        SQLType = sqSQL2
        object daField1: TdaField
          Alias = 'Name'
          DisplayWidth = 80
          FieldAlias = 'Name'
          FieldLength = 80
          FieldName = 'Name'
          SQLFieldName = 'Name'
          TableAlias = 'Units'
          TableName = 'Units'
          TableSQLAlias = 'Units'
        end
        object daField2: TdaField
          Alias = 'Unit'
          DisplayWidth = 25
          FieldAlias = 'Unit'
          FieldLength = 25
          FieldName = 'Unit'
          SQLFieldName = 'Unit'
          TableAlias = 'Units'
          TableName = 'Units'
          TableSQLAlias = 'Units'
        end
        object daField3: TdaField
          Alias = 'Company'
          DisplayWidth = 50
          FieldAlias = 'Company'
          FieldLength = 50
          FieldName = 'Company'
          IsDetail = True
          SQLFieldName = 'Company'
          TableAlias = 'Servhist'
          TableName = 'Servhist'
          TableSQLAlias = 'Servhist'
        end
        object daField4: TdaField
          Alias = 'CostEstimate'
          DataType = dtDouble
          DisplayWidth = 5
          FieldAlias = 'CostEstimate'
          FieldLength = 5
          FieldName = 'CostEstimate'
          IsDetail = True
          SQLFieldName = 'CostEstimate'
          TableAlias = 'Servhist'
          TableName = 'Servhist'
          TableSQLAlias = 'Servhist'
        end
        object daField5: TdaField
          Alias = 'LaborCost'
          DataType = dtDouble
          DisplayWidth = 5
          FieldAlias = 'LaborCost'
          FieldLength = 5
          FieldName = 'LaborCost'
          IsDetail = True
          SQLFieldName = 'LaborCost'
          TableAlias = 'Servhist'
          TableName = 'Servhist'
          TableSQLAlias = 'Servhist'
        end
        object daField6: TdaField
          Alias = 'LaborEstimate'
          DataType = dtDouble
          DisplayWidth = 5
          FieldAlias = 'LaborEstimate'
          FieldLength = 5
          FieldName = 'LaborEstimate'
          IsDetail = True
          SQLFieldName = 'LaborEstimate'
          TableAlias = 'Servhist'
          TableName = 'Servhist'
          TableSQLAlias = 'Servhist'
        end
        object daField7: TdaField
          Alias = 'PerformedBy'
          DisplayWidth = 35
          FieldAlias = 'PerformedBy'
          FieldLength = 35
          FieldName = 'PerformedBy'
          IsDetail = True
          SQLFieldName = 'PerformedBy'
          TableAlias = 'Servhist'
          TableName = 'Servhist'
          TableSQLAlias = 'Servhist'
        end
        object daField8: TdaField
          Alias = 'Performed'
          DataType = dtDateTime
          DisplayWidth = 0
          FieldAlias = 'Performed'
          FieldLength = 0
          FieldName = 'Performed'
          IsDetail = True
          SQLFieldName = 'Performed'
          TableAlias = 'Servhist'
          TableName = 'Servhist'
          TableSQLAlias = 'Servhist'
        end
        object daField9: TdaField
          Alias = 'Service'
          DisplayWidth = 50
          FieldAlias = 'Service'
          FieldLength = 50
          FieldName = 'Service'
          IsDetail = True
          SQLFieldName = 'Service'
          TableAlias = 'Servhist'
          TableName = 'Servhist'
          TableSQLAlias = 'Servhist'
        end
        object daField10: TdaField
          Alias = 'WorkOrder'
          DataType = dtDouble
          DisplayWidth = 0
          FieldAlias = 'WorkOrder'
          FieldLength = 0
          FieldName = 'WorkOrder'
          IsDetail = True
          SQLFieldName = 'WorkOrder'
          TableAlias = 'Servhist'
          TableName = 'Servhist'
          TableSQLAlias = 'Servhist'
        end
        object daField11: TdaField
          ChildType = 2
          Alias = 'Name'
          DisplayWidth = 80
          FieldAlias = 'Name'
          FieldLength = 80
          FieldName = 'Name'
          SQLFieldName = 'Name'
          TableAlias = 'Units'
          TableName = 'Units'
          TableSQLAlias = 'Units'
        end
        object daField12: TdaField
          ChildType = 2
          Alias = 'Performed'
          DataType = dtDateTime
          DisplayWidth = 0
          FieldAlias = 'Performed'
          FieldLength = 0
          FieldName = 'Performed'
          SQLFieldName = 'Performed'
          TableAlias = 'Servhist'
          TableName = 'Servhist'
          TableSQLAlias = 'Servhist'
        end
        object daTable1: TdaTable
          ChildType = 5
          Alias = 'Units'
          JoinType = dajtNone
          SQLAlias = 'Units'
          TableAlias = 'Units'
          TableName = 'Units'
        end
        object daTable2: TdaTable
          ChildType = 5
          Alias = 'Servhist'
          SQLAlias = 'Servhist'
          TableAlias = 'Servhist'
          TableName = 'Servhist'
          object daTableJoin1: TdaTableJoin
            ChildType = 6
            object daField14: TdaField
              ChildType = 3
              Alias = 'Unit'
              DataType = dtDouble
              DisplayWidth = 0
              FieldAlias = 'Unit'
              FieldLength = 0
              FieldName = 'Unit'
              SQLFieldName = 'Unit'
              TableAlias = 'Servhist'
              TableName = 'Servhist'
              TableSQLAlias = 'Servhist'
            end
            object daField13: TdaField
              ChildType = 4
              Alias = 'RecordNumber'
              DataType = dtDouble
              DisplayWidth = 0
              FieldAlias = 'RecordNumber'
              FieldLength = 0
              FieldName = 'RecordNumber'
              SQLFieldName = 'RecordNumber'
              TableAlias = 'Units'
              TableName = 'Units'
              TableSQLAlias = 'Units'
            end
          end
        end
      end
    end
  end
  object ppParameterList1: TppParameterList
  end
end