ReportName = Units Vendor Sources ReportGroup = Maintenance object ppReport1: TppReport AutoStop = False DataPipeline = daADOQueryDataView1.UnitSources 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 Vendor Sources' Template.DatabaseSettings.NameField = 'ReportName' Template.DatabaseSettings.TemplateField = 'NewDef' Template.FileName = 'Units Vendor Sources.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 = '' TextSearchSettings.Enabled = True Left = 218 Top = 155 Version = '7.03' mmColumnWidth = 0 DataPipelineName = 'UnitSources' object ppTitleBand1: TppTitleBand mmBottomOffset = 0 mmHeight = 11642 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 = 'Units Vendor Sources' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Name = 'TIMES NEW ROMAN' Font.Size = 14 Font.Style = [fsBold, fsItalic] Transparent = True mmHeight = 5715 mmLeft = 1323 mmTop = 1323 mmWidth = 44916 BandType = 1 end object ppDBText7: TppDBText UserName = 'DBText7' AutoSize = True DataField = 'CompanyName' DataPipeline = dpCompanyInfo Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Name = 'TIMES NEW ROMAN' Font.Size = 14 Font.Style = [fsBold, fsItalic] ParentDataPipeline = False TextAlignment = taRightJustified Transparent = True DataPipelineName = 'dpCompanyInfo' mmHeight = 5715 mmLeft = 169873 mmTop = 1323 mmWidth = 30946 BandType = 1 end object ppLabel12: TppLabel UserName = 'Params' Caption = 'RecordNumber: 2' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'TIMES NEW ROMAN' Font.Size = 10 Font.Style = [] Transparent = True mmHeight = 4149 mmLeft = 1323 mmTop = 7408 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 = 1588 mmLeft = 1323 mmTop = 5819 mmWidth = 200555 BandType = 0 end object ppLine2: TppLine UserName = 'Line2' Pen.Color = clNavy Pen.Width = 2 Weight = 1.5 mmHeight = 3969 mmLeft = 1323 mmTop = 794 mmWidth = 200555 BandType = 0 end object ppLabel2: TppLabel UserName = 'Label2' AutoSize = False Caption = 'Unit Number' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Name = 'TIMES NEW ROMAN' Font.Size = 11 Font.Style = [fsBold, fsItalic] Transparent = True mmHeight = 4763 mmLeft = 17727 mmTop = 1323 mmWidth = 27252 BandType = 0 end object ppLabel3: TppLabel UserName = 'Label3' AutoSize = False Caption = 'Vendor' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Name = 'TIMES NEW ROMAN' Font.Size = 11 Font.Style = [fsBold, fsItalic] Transparent = True mmHeight = 4763 mmLeft = 47361 mmTop = 1323 mmWidth = 78581 BandType = 0 end object ppLabel5: TppLabel UserName = 'Label5' AutoSize = False Caption = 'Part Number' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Name = 'TIMES NEW ROMAN' Font.Size = 11 Font.Style = [fsBold, fsItalic] Transparent = True mmHeight = 4763 mmLeft = 161396 mmTop = 1323 mmWidth = 34660 BandType = 0 end object ppLabel4: TppLabel UserName = 'Label4' AutoSize = False Caption = 'Price' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Name = 'TIMES NEW ROMAN' Font.Size = 11 Font.Style = [fsBold, fsItalic] TextAlignment = taRightJustified Transparent = True mmHeight = 4763 mmLeft = 129911 mmTop = 1323 mmWidth = 27517 BandType = 0 end end object ppDetailBand1: TppDetailBand mmBottomOffset = 0 mmHeight = 4233 mmPrintPosition = 0 object ppDBText2: TppDBText UserName = 'DBText2' DataField = 'Unit' DataPipeline = daADOQueryDataView1.UnitSources Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'ARIAL' Font.Size = 8 Font.Style = [] Transparent = True DataPipelineName = 'UnitSources' mmHeight = 3175 mmLeft = 17727 mmTop = 529 mmWidth = 27252 BandType = 4 end object ppDBText3: TppDBText UserName = 'DBText3' DataField = 'Vendor' DataPipeline = daADOQueryDataView1.UnitSources Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'ARIAL' Font.Size = 8 Font.Style = [] Transparent = True DataPipelineName = 'UnitSources' mmHeight = 3175 mmLeft = 47361 mmTop = 529 mmWidth = 79111 BandType = 4 end object ppDBText4: TppDBText UserName = 'DBText4' DataField = 'Price' DataPipeline = daADOQueryDataView1.UnitSources DisplayFormat = '$#,0.00;-$#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'ARIAL' Font.Size = 8 Font.Style = [] TextAlignment = taRightJustified Transparent = True DataPipelineName = 'UnitSources' mmHeight = 3175 mmLeft = 130969 mmTop = 529 mmWidth = 26458 BandType = 4 end object ppDBText5: TppDBText UserName = 'DBText5' DataField = 'PartNumber' DataPipeline = daADOQueryDataView1.UnitSources Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'ARIAL' Font.Size = 8 Font.Style = [] Transparent = True DataPipelineName = 'UnitSources' mmHeight = 3175 mmLeft = 161396 mmTop = 529 mmWidth = 41010 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 ppGroup1: TppGroup BreakName = 'Name' DataPipeline = daADOQueryDataView1.UnitSources OutlineSettings.CreateNode = True UserName = 'Group1' mmNewColumnThreshold = 0 mmNewPageThreshold = 0 DataPipelineName = 'UnitSources' object ppGroupHeaderBand1: TppGroupHeaderBand mmBottomOffset = 0 mmHeight = 5556 mmPrintPosition = 0 object ppDBText1: TppDBText UserName = 'DBText1' DataField = 'Name' DataPipeline = daADOQueryDataView1.UnitSources Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Name = 'TIMES NEW ROMAN' Font.Size = 9 Font.Style = [] Transparent = True DataPipelineName = 'UnitSources' mmHeight = 3725 mmLeft = 1323 mmTop = 1588 mmWidth = 128059 BandType = 3 GroupNo = 0 end end object ppGroupFooterBand1: TppGroupFooterBand mmBottomOffset = 0 mmHeight = 0 mmPrintPosition = 0 end end object daDataModule1: TdaDataModule object daADOQueryDataView1: TdaADOQueryDataView UserName = 'Query_UnitSources' Height = 278 Left = 10 NameColumnWidth = 105 SizeColumnWidth = 35 SortMode = 0 Top = 10 TypeColumnWidth = 52 Width = 200 AutoSearchTabOrder = 0 object UnitSources: TppChildDBPipeline AutoCreateFields = False UserName = 'UnitSources' 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 = 'Vendor' FieldName = 'Vendor' FieldLength = 50 IsDetail = True DisplayWidth = 50 Position = 2 TableName = 'Sources' end object ppField4: TppField FieldAlias = 'Price' FieldName = 'Price' FieldLength = 5 IsDetail = True DataType = dtDouble DisplayWidth = 5 Position = 3 TableName = 'Sources' end object ppField5: TppField FieldAlias = 'PartNumber' FieldName = 'PartNumber' FieldLength = 50 IsDetail = True DisplayWidth = 50 Position = 4 TableName = 'Sources' end object ppField6: TppField FieldAlias = 'Type' FieldName = 'Type' FieldLength = 1 IsDetail = True DisplayWidth = 1 Position = 5 TableName = 'Sources' end end object daSQL1: TdaSQL DatabaseName = 'ADO1' DatabaseType = dtMSSQLServer DataPipelineName = 'UnitSources' LinkColor = clMaroon MaxSQLFieldAliasLength = 25 SQLText.Strings = ( 'SELECT Units.Name, Units.Unit, Sources.Vendor, ' ' Sources.Price, Sources.PartNumber, ' ' Sources.Type' 'FROM Units Units INNER JOIN Sources Sources ON ' ' (Sources.Unit = Units.RecordNumber)' 'WHERE ( Sources.Type = '#39'U'#39' )' 'ORDER BY Units.Name') SQLType = sqSQL2 object daCriteria1: TdaCriteria ChildType = 7 Level = 0 Value = 'U' object TdaField Alias = 'Type' DisplayWidth = 1 FieldAlias = 'Type' FieldLength = 1 FieldName = 'Type' Mandatory = True SQLFieldName = 'Type' TableAlias = 'Sources' TableName = 'Sources' TableSQLAlias = 'Sources' end end 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 = 'Vendor' DisplayWidth = 50 FieldAlias = 'Vendor' FieldLength = 50 FieldName = 'Vendor' IsDetail = True SQLFieldName = 'Vendor' TableAlias = 'Sources' TableName = 'Sources' TableSQLAlias = 'Sources' end object daField4: TdaField Alias = 'Price' DataType = dtDouble DisplayWidth = 5 FieldAlias = 'Price' FieldLength = 5 FieldName = 'Price' IsDetail = True SQLFieldName = 'Price' TableAlias = 'Sources' TableName = 'Sources' TableSQLAlias = 'Sources' end object daField5: TdaField Alias = 'PartNumber' DisplayWidth = 50 FieldAlias = 'PartNumber' FieldLength = 50 FieldName = 'PartNumber' IsDetail = True SQLFieldName = 'PartNumber' TableAlias = 'Sources' TableName = 'Sources' TableSQLAlias = 'Sources' end object daField6: TdaField Alias = 'Type' DisplayWidth = 1 FieldAlias = 'Type' FieldLength = 1 FieldName = 'Type' IsDetail = True SQLFieldName = 'Type' TableAlias = 'Sources' TableName = 'Sources' TableSQLAlias = 'Sources' end object daField7: TdaField ChildType = 2 Alias = 'Name' DisplayWidth = 80 FieldAlias = 'Name' FieldLength = 80 FieldName = 'Name' SQLFieldName = 'Name' TableAlias = 'Units' TableName = 'Units' TableSQLAlias = 'Units' end object daTable1: TdaTable ChildType = 5 Alias = 'Units' JoinType = dajtNone SQLAlias = 'Units' TableAlias = 'Units' TableName = 'Units' end object daTable2: TdaTable ChildType = 5 Alias = 'Sources' SQLAlias = 'Sources' TableAlias = 'Sources' TableName = 'Sources' object daTableJoin1: TdaTableJoin ChildType = 6 object daField9: TdaField ChildType = 3 Alias = 'Unit' DataType = dtDouble DisplayWidth = 0 FieldAlias = 'Unit' FieldLength = 0 FieldName = 'Unit' SQLFieldName = 'Unit' TableAlias = 'Sources' TableName = 'Sources' TableSQLAlias = 'Sources' end object daField8: 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