git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.SDAC@3 6f543ec7-021b-7e4c-98c9-62eafc7fb9a8
1160 lines
31 KiB
Plaintext
1160 lines
31 KiB
Plaintext
object myEndUserSolution: TmyEndUserSolution
|
|
Left = 244
|
|
Top = 44
|
|
AutoScroll = False
|
|
Caption = 'EndUser: MSSQLServer via SDAC'
|
|
ClientHeight = 579
|
|
ClientWidth = 427
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
Icon.Data = {
|
|
0000010001002020100000000000E80200001600000028000000200000004000
|
|
0000010004000000000080020000000000000000000000000000000000000000
|
|
0000000080000080000000808000800000008000800080800000C0C0C0008080
|
|
80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
|
|
0000000000000000000000000000000000000000000000000000000000000000
|
|
0000000000000000000000000000000000000000000000000000000000000000
|
|
0000000000000000000000000000000000000000000000000000000000000000
|
|
0000000000000000000000000000000000000000000000000884000000000000
|
|
000083BBBBB34003BBBBB800000000000004BBBBBBBB308BBBBBBB0000000000
|
|
00003BBBBBB3403BBBBBB3000000000000000BBBBBB404BBBBBB300000000000
|
|
000003BBBBB008BBBBBB800000000000000003BBBBB003BBBBBB000000000000
|
|
000003BBBBB48BBBBBB3000000000000000003BBBBBBBBBBBB30000000000000
|
|
000003BBBBBBBBBBB800000000000000000003BBBBB33BBBBB80000000000000
|
|
000003BBBBB003BBBBB4000000000000000003BBBBB003BBBBB8000000000000
|
|
000003BBBBB003BBBBB300000000000000000BBBBBB84BBBBBB8000000000000
|
|
00043BBBBBBBBBBBBBB00000000000000004BBBBBBBBBBBBB340000000000000
|
|
0000433888883338400000000000000000000000000000000000000000000000
|
|
0000000000000000000000000000000000000000000000000000000000000000
|
|
0000000000000000000000000000000000000000000000000000000000000000
|
|
000000000000000000000000000000000000000000000000000000000000FFFF
|
|
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF8FFFF00
|
|
603FFE00403FFF00403FFF80807FFF81807FFF8180FFFF8000FFFF8001FFFF80
|
|
03FFFF8001FFFF8180FFFF8180FFFF8180FFFF8000FFFE0001FFFE0001FFFF00
|
|
07FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
|
|
OldCreateOrder = True
|
|
Position = poScreenCenter
|
|
ShowHint = True
|
|
OnCreate = FormCreate
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
object Shape8: TShape
|
|
Left = 181
|
|
Top = 454
|
|
Width = 2
|
|
Height = 28
|
|
Brush.Style = bsClear
|
|
Pen.Width = 2
|
|
Shape = stRoundRect
|
|
Visible = False
|
|
end
|
|
object Shape20: TShape
|
|
Left = 181
|
|
Top = 362
|
|
Width = 2
|
|
Height = 25
|
|
Brush.Style = bsClear
|
|
Pen.Width = 2
|
|
Shape = stRoundRect
|
|
Visible = False
|
|
end
|
|
object Shape7: TShape
|
|
Left = 222
|
|
Top = 327
|
|
Width = 38
|
|
Height = 2
|
|
Brush.Style = bsClear
|
|
Pen.Width = 2
|
|
Shape = stRoundRect
|
|
Visible = False
|
|
end
|
|
object Shape26: TShape
|
|
Left = 181
|
|
Top = 258
|
|
Width = 2
|
|
Height = 81
|
|
Brush.Style = bsClear
|
|
Pen.Width = 2
|
|
Shape = stRoundRect
|
|
Visible = False
|
|
end
|
|
object Shape25: TShape
|
|
Left = 93
|
|
Top = 220
|
|
Width = 56
|
|
Height = 2
|
|
Brush.Style = bsClear
|
|
Pen.Width = 2
|
|
Shape = stRoundRect
|
|
Visible = False
|
|
end
|
|
object Shape24: TShape
|
|
Left = 94
|
|
Top = 263
|
|
Width = 56
|
|
Height = 2
|
|
Brush.Style = bsClear
|
|
Pen.Width = 2
|
|
Shape = stRoundRect
|
|
Visible = False
|
|
end
|
|
object Shape1: TShape
|
|
Left = 254
|
|
Top = 295
|
|
Width = 103
|
|
Height = 72
|
|
Brush.Color = clRed
|
|
Shape = stRoundRect
|
|
Visible = False
|
|
end
|
|
object Shape4: TShape
|
|
Left = 7
|
|
Top = 246
|
|
Width = 103
|
|
Height = 72
|
|
Brush.Color = clYellow
|
|
Shape = stRoundRect
|
|
Visible = False
|
|
end
|
|
object Shape11: TShape
|
|
Left = 253
|
|
Top = 205
|
|
Width = 103
|
|
Height = 72
|
|
Brush.Color = clNavy
|
|
Shape = stRoundRect
|
|
Visible = False
|
|
end
|
|
object Label6: TLabel
|
|
Left = 277
|
|
Top = 210
|
|
Width = 55
|
|
Height = 13
|
|
Caption = 'Database'
|
|
Color = clBlack
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWhite
|
|
Font.Height = -12
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = [fsBold]
|
|
ParentColor = False
|
|
ParentFont = False
|
|
Transparent = True
|
|
Visible = False
|
|
end
|
|
object Shape12: TShape
|
|
Left = 254
|
|
Top = 226
|
|
Width = 102
|
|
Height = 1
|
|
Brush.Color = clBlack
|
|
Visible = False
|
|
end
|
|
object Shape9: TShape
|
|
Left = 130
|
|
Top = 386
|
|
Width = 103
|
|
Height = 72
|
|
Brush.Color = clTeal
|
|
Shape = stRoundRect
|
|
Visible = False
|
|
end
|
|
object Label5: TLabel
|
|
Left = 137
|
|
Top = 391
|
|
Width = 89
|
|
Height = 13
|
|
Caption = 'Data Dictionary'
|
|
Color = clWhite
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlack
|
|
Font.Height = -12
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = [fsBold]
|
|
ParentColor = False
|
|
ParentFont = False
|
|
Transparent = True
|
|
Visible = False
|
|
end
|
|
object Shape10: TShape
|
|
Left = 131
|
|
Top = 407
|
|
Width = 102
|
|
Height = 1
|
|
Visible = False
|
|
end
|
|
object Shape6: TShape
|
|
Left = 130
|
|
Top = 294
|
|
Width = 103
|
|
Height = 72
|
|
Brush.Color = clBlue
|
|
Shape = stRoundRect
|
|
Visible = False
|
|
end
|
|
object Label7: TLabel
|
|
Left = 156
|
|
Top = 299
|
|
Width = 51
|
|
Height = 13
|
|
Caption = 'Designer'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWhite
|
|
Font.Height = -12
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
Transparent = True
|
|
Visible = False
|
|
end
|
|
object Shape5: TShape
|
|
Left = 131
|
|
Top = 315
|
|
Width = 101
|
|
Height = 1
|
|
Visible = False
|
|
end
|
|
object Label8: TLabel
|
|
Left = 43
|
|
Top = 251
|
|
Width = 31
|
|
Height = 13
|
|
Caption = 'Items'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlack
|
|
Font.Height = -12
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
Transparent = True
|
|
Visible = False
|
|
end
|
|
object Shape3: TShape
|
|
Left = 8
|
|
Top = 267
|
|
Width = 101
|
|
Height = 1
|
|
Visible = False
|
|
end
|
|
object Label1: TLabel
|
|
Left = 286
|
|
Top = 300
|
|
Width = 39
|
|
Height = 13
|
|
Caption = 'Report'
|
|
Color = clBlack
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWhite
|
|
Font.Height = -12
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = [fsBold]
|
|
ParentColor = False
|
|
ParentFont = False
|
|
Transparent = True
|
|
Visible = False
|
|
end
|
|
object Shape2: TShape
|
|
Left = 255
|
|
Top = 316
|
|
Width = 101
|
|
Height = 1
|
|
Brush.Color = clBlack
|
|
Visible = False
|
|
end
|
|
object Shape15: TShape
|
|
Left = 8
|
|
Top = 165
|
|
Width = 103
|
|
Height = 72
|
|
Brush.Color = clLime
|
|
Shape = stRoundRect
|
|
Visible = False
|
|
end
|
|
object Label2: TLabel
|
|
Left = 38
|
|
Top = 170
|
|
Width = 42
|
|
Height = 13
|
|
Caption = 'Folders'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlack
|
|
Font.Height = -12
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
Transparent = True
|
|
Visible = False
|
|
end
|
|
object Shape16: TShape
|
|
Left = 8
|
|
Top = 185
|
|
Width = 102
|
|
Height = 1
|
|
Visible = False
|
|
end
|
|
object Shape22: TShape
|
|
Left = 130
|
|
Top = 205
|
|
Width = 103
|
|
Height = 72
|
|
Brush.Color = clFuchsia
|
|
Shape = stRoundRect
|
|
Visible = False
|
|
end
|
|
object Label10: TLabel
|
|
Left = 158
|
|
Top = 210
|
|
Width = 47
|
|
Height = 13
|
|
Caption = 'Explorer'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlack
|
|
Font.Height = -12
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
Transparent = True
|
|
Visible = False
|
|
end
|
|
object Shape23: TShape
|
|
Left = 131
|
|
Top = 226
|
|
Width = 101
|
|
Height = 1
|
|
Visible = False
|
|
end
|
|
object Shape29: TShape
|
|
Left = 66
|
|
Top = 467
|
|
Width = 2
|
|
Height = 16
|
|
Brush.Style = bsClear
|
|
Pen.Width = 2
|
|
Shape = stRoundRect
|
|
Visible = False
|
|
end
|
|
object Shape18: TShape
|
|
Left = 16
|
|
Top = 477
|
|
Width = 103
|
|
Height = 72
|
|
Brush.Color = clAqua
|
|
Shape = stRoundRect
|
|
Visible = False
|
|
end
|
|
object Shape17: TShape
|
|
Left = 291
|
|
Top = 467
|
|
Width = 2
|
|
Height = 17
|
|
Brush.Style = bsClear
|
|
Pen.Width = 2
|
|
Shape = stRoundRect
|
|
Visible = False
|
|
end
|
|
object Shape13: TShape
|
|
Left = 132
|
|
Top = 478
|
|
Width = 103
|
|
Height = 72
|
|
Brush.Color = clAqua
|
|
Shape = stRoundRect
|
|
Visible = False
|
|
end
|
|
object Label3: TLabel
|
|
Left = 166
|
|
Top = 483
|
|
Width = 34
|
|
Height = 13
|
|
Caption = 'Fields'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlack
|
|
Font.Height = -12
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
Transparent = True
|
|
Visible = False
|
|
end
|
|
object Shape14: TShape
|
|
Left = 133
|
|
Top = 499
|
|
Width = 102
|
|
Height = 1
|
|
Visible = False
|
|
end
|
|
object Label9: TLabel
|
|
Left = 48
|
|
Top = 482
|
|
Width = 39
|
|
Height = 13
|
|
Caption = 'Tables'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlack
|
|
Font.Height = -12
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
Transparent = True
|
|
Visible = False
|
|
end
|
|
object Shape19: TShape
|
|
Left = 17
|
|
Top = 498
|
|
Width = 102
|
|
Height = 1
|
|
Visible = False
|
|
end
|
|
object Shape21: TShape
|
|
Left = 245
|
|
Top = 477
|
|
Width = 103
|
|
Height = 72
|
|
Brush.Color = clAqua
|
|
Shape = stRoundRect
|
|
Visible = False
|
|
end
|
|
object Shape27: TShape
|
|
Left = 246
|
|
Top = 498
|
|
Width = 102
|
|
Height = 1
|
|
Visible = False
|
|
end
|
|
object Label4: TLabel
|
|
Left = 280
|
|
Top = 482
|
|
Width = 30
|
|
Height = 13
|
|
Caption = 'Joins'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlack
|
|
Font.Height = -12
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
Transparent = True
|
|
Visible = False
|
|
end
|
|
object Shape28: TShape
|
|
Left = 67
|
|
Top = 467
|
|
Width = 226
|
|
Height = 2
|
|
Brush.Style = bsClear
|
|
Pen.Width = 2
|
|
Shape = stRoundRect
|
|
Visible = False
|
|
end
|
|
object btnLaunch: TButton
|
|
Left = 342
|
|
Top = 165
|
|
Width = 75
|
|
Height = 25
|
|
Caption = 'Launch'
|
|
TabOrder = 0
|
|
OnClick = btnLaunchClick
|
|
end
|
|
object Memo1: TMemo
|
|
Left = 7
|
|
Top = 5
|
|
Width = 411
|
|
Height = 150
|
|
Lines.Strings = (
|
|
'End-User Reporting using MSSQLServer with the SDAC'
|
|
|
|
'----------------------------------------------------------------' +
|
|
'---------------------------')
|
|
ReadOnly = True
|
|
TabOrder = 1
|
|
end
|
|
object pnlStatusBar: TPanel
|
|
Left = 0
|
|
Top = 561
|
|
Width = 427
|
|
Height = 18
|
|
Align = alBottom
|
|
Alignment = taLeftJustify
|
|
TabOrder = 2
|
|
end
|
|
object btCreate: TButton
|
|
Left = 120
|
|
Top = 165
|
|
Width = 75
|
|
Height = 25
|
|
Caption = 'Create'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
TabOrder = 3
|
|
OnClick = btCreateClick
|
|
end
|
|
object btDrop: TButton
|
|
Left = 200
|
|
Top = 165
|
|
Width = 75
|
|
Height = 25
|
|
Caption = 'Drop'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
TabOrder = 4
|
|
OnClick = btDropClick
|
|
end
|
|
object seDatabase: TMSConnection
|
|
Database = 'SDACDemos'
|
|
Authentication = auServer
|
|
Username = 'Sa'
|
|
Server = 'server'
|
|
Left = 289
|
|
Top = 233
|
|
end
|
|
object tblTable: TMSTable
|
|
TableName = 'RB_TABLE'
|
|
Connection = seDatabase
|
|
Left = 21
|
|
Top = 508
|
|
end
|
|
object dsTable: TDataSource
|
|
DataSet = tblTable
|
|
Left = 52
|
|
Top = 508
|
|
end
|
|
object plTable: TppDBPipeline
|
|
DataSource = dsTable
|
|
UserName = 'Table'
|
|
Visible = False
|
|
Left = 85
|
|
Top = 508
|
|
end
|
|
object tblField: TMSTable
|
|
TableName = 'RB_FIELD'
|
|
Connection = seDatabase
|
|
Left = 137
|
|
Top = 509
|
|
end
|
|
object dsField: TDataSource
|
|
DataSet = tblField
|
|
Left = 169
|
|
Top = 509
|
|
end
|
|
object plField: TppDBPipeline
|
|
DataSource = dsField
|
|
UserName = 'Field'
|
|
Visible = False
|
|
Left = 201
|
|
Top = 508
|
|
end
|
|
object ppDataDictionary: TppDataDictionary
|
|
AutoJoin = True
|
|
BuilderSettings.DatabaseName = 'seDatabase'
|
|
BuilderSettings.SessionType = 'SDACSession'
|
|
FieldFieldNames.AutoSearch = 'AUTOSEARCH'
|
|
FieldFieldNames.DataType = 'DATATYPE'
|
|
FieldFieldNames.FieldName = 'FIELD_NAME'
|
|
FieldFieldNames.FieldAlias = 'FIELD_ALIAS'
|
|
FieldFieldNames.Mandatory = 'MANDATORY'
|
|
FieldFieldNames.Searchable = 'SEARCHABLE'
|
|
FieldFieldNames.Selectable = 'SORTABLE'
|
|
FieldFieldNames.Sortable = 'SORTABLE'
|
|
FieldFieldNames.TableName = 'table_name'
|
|
FieldPipeline = plField
|
|
JoinFieldNames.TableName1 = 'TABLE_NAME1'
|
|
JoinFieldNames.TableName2 = 'TABLE_NAME2'
|
|
JoinFieldNames.JoinType = 'JOIN_TYPE'
|
|
JoinFieldNames.FieldNames1 = 'FIELD_NAMES1'
|
|
JoinFieldNames.FieldNames2 = 'FIELD_NAMES2'
|
|
JoinFieldNames.Operators = 'OPERATORS'
|
|
JoinPipeline = plJoin
|
|
TableFieldNames.TableName = 'TABLE_NAME'
|
|
TableFieldNames.TableAlias = 'TABLE_ALIAS'
|
|
TablePipeline = plTable
|
|
UserName = 'DataDictionary'
|
|
UseTableOwnerName = True
|
|
ValidateFieldNames = False
|
|
ValidateTableNames = False
|
|
Left = 169
|
|
Top = 416
|
|
end
|
|
object ppDesigner: TppDesigner
|
|
AllowDataSettingsChange = True
|
|
Caption = 'ReportBuilder Pro'
|
|
DataSettings.DatabaseName = 'seDatabase'
|
|
DataSettings.SessionType = 'SDACSession'
|
|
DataSettings.AllowEditSQL = True
|
|
DataSettings.DatabaseType = dtMSSQLServer
|
|
DataSettings.DataDictionary = ppDataDictionary
|
|
DataSettings.GuidCollationType = gcString
|
|
DataSettings.IsCaseSensitive = True
|
|
DataSettings.SQLType = sqSQL1
|
|
DataSettings.UseDataDictionary = True
|
|
Position = poScreenCenter
|
|
Report = ppReport
|
|
IniStorageType = 'IniFile'
|
|
IniStorageName = '($WINSYS)\RBuilder.ini'
|
|
WindowHeight = 400
|
|
WindowLeft = 100
|
|
WindowTop = 50
|
|
WindowWidth = 600
|
|
Left = 170
|
|
Top = 323
|
|
end
|
|
object tblItem: TMSTable
|
|
TableName = 'RB_ITEM'
|
|
Connection = seDatabase
|
|
Left = 14
|
|
Top = 277
|
|
end
|
|
object dsItem: TDataSource
|
|
DataSet = tblItem
|
|
Left = 46
|
|
Top = 278
|
|
end
|
|
object plItem: TppDBPipeline
|
|
DataSource = dsItem
|
|
RefreshAfterPost = True
|
|
UserName = 'plItem'
|
|
Visible = False
|
|
Left = 77
|
|
Top = 278
|
|
end
|
|
object ppReport: TppReport
|
|
AutoStop = False
|
|
DataPipeline = SDACQueryDataView1.plDept
|
|
PrinterSetup.BinName = 'Default'
|
|
PrinterSetup.DocumentName = 'Report'
|
|
PrinterSetup.PaperName = 'Letter 8 1/2 x 11 in'
|
|
PrinterSetup.PrinterName = 'Default'
|
|
PrinterSetup.mmMarginBottom = 6350
|
|
PrinterSetup.mmMarginLeft = 6350
|
|
PrinterSetup.mmMarginRight = 6350
|
|
PrinterSetup.mmMarginTop = 6350
|
|
PrinterSetup.mmPaperHeight = 279401
|
|
PrinterSetup.mmPaperWidth = 215900
|
|
PrinterSetup.PaperSize = 1
|
|
Template.DatabaseSettings.DataPipeline = plItem
|
|
Template.DatabaseSettings.Name = 'Dept'
|
|
Template.DatabaseSettings.NameField = 'Name'
|
|
Template.DatabaseSettings.TemplateField = 'Template'
|
|
Template.FileName = 'D:\NDF\Delphi\odac3\Demos\ReportBuilder\Reports\Dept.rtm'
|
|
Template.SaveTo = stDatabase
|
|
Units = utScreenPixels
|
|
DeviceType = 'Screen'
|
|
OutlineSettings.CreateNode = True
|
|
OutlineSettings.CreatePageNodes = True
|
|
OutlineSettings.Enabled = False
|
|
OutlineSettings.Visible = False
|
|
TextSearchSettings.DefaultString = '<FindText>'
|
|
TextSearchSettings.Enabled = False
|
|
Left = 289
|
|
Top = 326
|
|
Version = '9.01'
|
|
mmColumnWidth = 0
|
|
DataPipelineName = 'plDept'
|
|
object ppTitleBand1: TppTitleBand
|
|
mmBottomOffset = 0
|
|
mmHeight = 13229
|
|
mmPrintPosition = 0
|
|
object ppLabel1: TppLabel
|
|
UserName = 'Label1'
|
|
Border.BorderPositions = []
|
|
Border.Color = clBlack
|
|
Border.Style = psSolid
|
|
Border.Visible = False
|
|
Border.Weight = 1.000000000000000000
|
|
Caption = 'Departaments'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clNavy
|
|
Font.Name = 'Arial'
|
|
Font.Size = 20
|
|
Font.Style = [fsBold, fsItalic]
|
|
Transparent = True
|
|
mmHeight = 8467
|
|
mmLeft = 77788
|
|
mmTop = 1852
|
|
mmWidth = 47625
|
|
BandType = 1
|
|
end
|
|
object ppSystemVariable1: TppSystemVariable
|
|
UserName = 'SystemVariable1'
|
|
Border.BorderPositions = []
|
|
Border.Color = clBlack
|
|
Border.Style = psSolid
|
|
Border.Visible = False
|
|
Border.Weight = 1.000000000000000000
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlack
|
|
Font.Name = 'Arial'
|
|
Font.Size = 8
|
|
Font.Style = []
|
|
Transparent = True
|
|
mmHeight = 3704
|
|
mmLeft = 188384
|
|
mmTop = 529
|
|
mmWidth = 14288
|
|
BandType = 1
|
|
end
|
|
end
|
|
object ppHeaderBand1: TppHeaderBand
|
|
mmBottomOffset = 0
|
|
mmHeight = 7673
|
|
mmPrintPosition = 0
|
|
object ppLabel2: TppLabel
|
|
UserName = 'Label2'
|
|
Border.BorderPositions = []
|
|
Border.Color = clBlack
|
|
Border.Style = psSolid
|
|
Border.Visible = False
|
|
Border.Weight = 1.000000000000000000
|
|
Caption = 'Number'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlack
|
|
Font.Name = 'Arial'
|
|
Font.Size = 10
|
|
Font.Style = [fsBold]
|
|
Transparent = True
|
|
mmHeight = 4233
|
|
mmLeft = 7673
|
|
mmTop = 529
|
|
mmWidth = 13229
|
|
BandType = 0
|
|
end
|
|
object ppLabel3: TppLabel
|
|
UserName = 'Label3'
|
|
Border.BorderPositions = []
|
|
Border.Color = clBlack
|
|
Border.Style = psSolid
|
|
Border.Visible = False
|
|
Border.Weight = 1.000000000000000000
|
|
Caption = 'Name'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlack
|
|
Font.Name = 'Arial'
|
|
Font.Size = 10
|
|
Font.Style = [fsBold]
|
|
Transparent = True
|
|
mmHeight = 4233
|
|
mmLeft = 26988
|
|
mmTop = 529
|
|
mmWidth = 9790
|
|
BandType = 0
|
|
end
|
|
object ppLabel4: TppLabel
|
|
UserName = 'Label4'
|
|
Border.BorderPositions = []
|
|
Border.Color = clBlack
|
|
Border.Style = psSolid
|
|
Border.Visible = False
|
|
Border.Weight = 1.000000000000000000
|
|
Caption = 'Location'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlack
|
|
Font.Name = 'Arial'
|
|
Font.Size = 10
|
|
Font.Style = [fsBold]
|
|
Transparent = True
|
|
mmHeight = 4233
|
|
mmLeft = 81492
|
|
mmTop = 794
|
|
mmWidth = 14552
|
|
BandType = 0
|
|
end
|
|
object ppShape1: TppShape
|
|
UserName = 'Shape1'
|
|
mmHeight = 265
|
|
mmLeft = 4498
|
|
mmTop = 6085
|
|
mmWidth = 191294
|
|
BandType = 0
|
|
end
|
|
end
|
|
object ppDetailBand1: TppDetailBand
|
|
mmBottomOffset = 0
|
|
mmHeight = 6615
|
|
mmPrintPosition = 0
|
|
object ppDBText1: TppDBText
|
|
UserName = 'DBText1'
|
|
Border.BorderPositions = []
|
|
Border.Color = clBlack
|
|
Border.Style = psSolid
|
|
Border.Visible = False
|
|
Border.Weight = 1.000000000000000000
|
|
DataField = 'DEPTNO'
|
|
DataPipeline = SDACQueryDataView1.plDept
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlack
|
|
Font.Name = 'Arial'
|
|
Font.Size = 10
|
|
Font.Style = []
|
|
Transparent = True
|
|
DataPipelineName = 'plDept'
|
|
mmHeight = 4233
|
|
mmLeft = 7673
|
|
mmTop = 1323
|
|
mmWidth = 17198
|
|
BandType = 4
|
|
end
|
|
object ppDBText2: TppDBText
|
|
UserName = 'DBText2'
|
|
Border.BorderPositions = []
|
|
Border.Color = clBlack
|
|
Border.Style = psSolid
|
|
Border.Visible = False
|
|
Border.Weight = 1.000000000000000000
|
|
DataField = 'DNAME'
|
|
DataPipeline = SDACQueryDataView1.plDept
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlack
|
|
Font.Name = 'Arial'
|
|
Font.Size = 10
|
|
Font.Style = []
|
|
Transparent = True
|
|
DataPipelineName = 'plDept'
|
|
mmHeight = 4233
|
|
mmLeft = 27252
|
|
mmTop = 1323
|
|
mmWidth = 52123
|
|
BandType = 4
|
|
end
|
|
object ppDBText3: TppDBText
|
|
UserName = 'DBText3'
|
|
Border.BorderPositions = []
|
|
Border.Color = clBlack
|
|
Border.Style = psSolid
|
|
Border.Visible = False
|
|
Border.Weight = 1.000000000000000000
|
|
DataField = 'LOC'
|
|
DataPipeline = SDACQueryDataView1.plDept
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlack
|
|
Font.Name = 'Arial'
|
|
Font.Size = 10
|
|
Font.Style = []
|
|
Transparent = True
|
|
DataPipelineName = 'plDept'
|
|
mmHeight = 4233
|
|
mmLeft = 81756
|
|
mmTop = 1323
|
|
mmWidth = 31750
|
|
BandType = 4
|
|
end
|
|
end
|
|
object daDataModule1: TdaDataModule
|
|
object SDACQueryDataView1: TdaSDACQueryDataView
|
|
UserName = 'Query_Dept'
|
|
Height = 305
|
|
Left = 10
|
|
NameColumnWidth = 105
|
|
SizeColumnWidth = 35
|
|
SortMode = 0
|
|
Top = 10
|
|
TypeColumnWidth = 52
|
|
Width = 242
|
|
AutoSearchTabOrder = 0
|
|
object plDept: TppChildDBPipeline
|
|
AutoCreateFields = False
|
|
UserName = 'plDept'
|
|
Left = 200
|
|
Top = 272
|
|
object ppField1: TppField
|
|
FieldAlias = 'Deptno'
|
|
FieldName = 'DEPTNO'
|
|
FieldLength = 0
|
|
DataType = dtInteger
|
|
DisplayWidth = 0
|
|
Position = 0
|
|
TableName = 'DEPT'
|
|
end
|
|
object ppField2: TppField
|
|
FieldAlias = 'Dname'
|
|
FieldName = 'DNAME'
|
|
FieldLength = 0
|
|
DisplayWidth = 0
|
|
Position = 1
|
|
TableName = 'DEPT'
|
|
end
|
|
object ppField3: TppField
|
|
FieldAlias = 'Loc'
|
|
FieldName = 'LOC'
|
|
FieldLength = 0
|
|
DisplayWidth = 0
|
|
Position = 2
|
|
TableName = 'DEPT'
|
|
end
|
|
end
|
|
object daSQL1: TdaSQL
|
|
DatabaseName = 'seDatabase'
|
|
DatabaseType = dtMSSQLServer
|
|
DataPipelineName = 'plDept'
|
|
LinkColor = clBlack
|
|
MaxSQLFieldAliasLength = 25
|
|
SQLText.Strings = (
|
|
'SELECT DEPT.DEPTNO, DEPT.DNAME, DEPT.LOC'
|
|
'FROM SCOTT.DEPT DEPT'
|
|
'ORDER BY DEPT.DEPTNO')
|
|
SQLType = sqSQL1
|
|
object TdaField
|
|
Alias = 'Deptno'
|
|
DataType = dtInteger
|
|
DisplayWidth = 0
|
|
FieldAlias = 'Deptno'
|
|
FieldLength = 0
|
|
FieldName = 'DEPTNO'
|
|
SQLFieldName = 'DEPTNO'
|
|
TableAlias = 'Dept'
|
|
TableName = 'DEPT'
|
|
TableSQLAlias = 'DEPT'
|
|
end
|
|
object TdaField
|
|
Alias = 'Dname'
|
|
DisplayWidth = 0
|
|
FieldAlias = 'Dname'
|
|
FieldLength = 0
|
|
FieldName = 'DNAME'
|
|
SQLFieldName = 'DNAME'
|
|
TableAlias = 'Dept'
|
|
TableName = 'DEPT'
|
|
TableSQLAlias = 'DEPT'
|
|
end
|
|
object TdaField
|
|
Alias = 'Loc'
|
|
DisplayWidth = 0
|
|
FieldAlias = 'Loc'
|
|
FieldLength = 0
|
|
FieldName = 'LOC'
|
|
SQLFieldName = 'LOC'
|
|
TableAlias = 'Dept'
|
|
TableName = 'DEPT'
|
|
TableSQLAlias = 'DEPT'
|
|
end
|
|
object TdaField
|
|
ChildType = 2
|
|
Alias = 'Deptno'
|
|
DataType = dtInteger
|
|
DisplayWidth = 0
|
|
FieldAlias = 'Deptno'
|
|
FieldLength = 0
|
|
FieldName = 'DEPTNO'
|
|
SQLFieldName = 'DEPTNO'
|
|
TableAlias = 'Dept'
|
|
TableName = 'DEPT'
|
|
TableSQLAlias = 'DEPT'
|
|
end
|
|
object TdaTable
|
|
ChildType = 5
|
|
Alias = 'Dept'
|
|
JoinType = dajtNone
|
|
OwnerName = 'SCOTT'
|
|
SQLAlias = 'DEPT'
|
|
TableAlias = 'Dept'
|
|
TableName = 'DEPT'
|
|
end
|
|
end
|
|
end
|
|
end
|
|
end
|
|
object tblFolder: TMSTable
|
|
TableName = 'RB_FOLDER'
|
|
Connection = seDatabase
|
|
Left = 12
|
|
Top = 195
|
|
end
|
|
object dsFolder: TDataSource
|
|
DataSet = tblFolder
|
|
Left = 43
|
|
Top = 195
|
|
end
|
|
object plFolder: TppDBPipeline
|
|
DataSource = dsFolder
|
|
RefreshAfterPost = True
|
|
UserName = 'plFolder'
|
|
Visible = False
|
|
Left = 75
|
|
Top = 196
|
|
end
|
|
object ppReportExplorer: TppReportExplorer
|
|
Designer = ppDesigner
|
|
FolderFieldNames.FolderId = 'FOLDER_ID'
|
|
FolderFieldNames.Name = 'FOLDER_NAME'
|
|
FolderFieldNames.ParentId = 'PARENT_ID'
|
|
FolderPipeline = plFolder
|
|
ItemFieldNames.Deleted = 'DELETED'
|
|
ItemFieldNames.FolderId = 'FOLDER_ID'
|
|
ItemFieldNames.ItemId = 'ITEM_ID'
|
|
ItemFieldNames.Modified = 'MODIFIED'
|
|
ItemFieldNames.Name = 'ITEM_NAME'
|
|
ItemFieldNames.Size = 'ITEM_SIZE'
|
|
ItemFieldNames.Template = 'TEMPLATE'
|
|
ItemFieldNames.ItemType = 'ITEM_TYPE'
|
|
ItemPipeline = plItem
|
|
FormCaption = 'Report Explorer'
|
|
FormIcon.Data = {
|
|
0000010001002020100000000000E80200001600000028000000200000004000
|
|
0000010004000000000080020000000000000000000000000000000000000000
|
|
0000000080000080000000808000800000008000800080800000C0C0C0008080
|
|
80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
|
|
0000000000000000000000000000000000000000000000000000000000000000
|
|
0000000000000000000000000000000000000000000000000000000000000000
|
|
0000000000000000000000000000000000000000000000000000000000000000
|
|
0000000000000000000000000000000000000000000000000884000000000000
|
|
000083BBBBB34003BBBBB800000000000004BBBBBBBB308BBBBBBB0000000000
|
|
00003BBBBBB3403BBBBBB3000000000000000BBBBBB404BBBBBB300000000000
|
|
000003BBBBB008BBBBBB800000000000000003BBBBB003BBBBBB000000000000
|
|
000003BBBBB48BBBBBB3000000000000000003BBBBBBBBBBBB30000000000000
|
|
000003BBBBBBBBBBB800000000000000000003BBBBB33BBBBB80000000000000
|
|
000003BBBBB003BBBBB4000000000000000003BBBBB003BBBBB8000000000000
|
|
000003BBBBB003BBBBB300000000000000000BBBBBB84BBBBBB8000000000000
|
|
00043BBBBBBBBBBBBBB00000000000000004BBBBBBBBBBBBB340000000000000
|
|
0000433888883338400000000000000000000000000000000000000000000000
|
|
0000000000000000000000000000000000000000000000000000000000000000
|
|
0000000000000000000000000000000000000000000000000000000000000000
|
|
000000000000000000000000000000000000000000000000000000000000FFFF
|
|
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF8FFFF00
|
|
603FFE00403FFF00403FFF80807FFF81807FFF8180FFFF8000FFFF8001FFFF80
|
|
03FFFF8001FFFF8180FFFF8180FFFF8180FFFF8000FFFE0001FFFE0001FFFF00
|
|
07FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
|
|
FormPosition = poScreenCenter
|
|
FormHeight = 400
|
|
FormLeft = 100
|
|
FormTop = 50
|
|
FormWidth = 600
|
|
Left = 168
|
|
Top = 235
|
|
end
|
|
object tblJoin: TMSTable
|
|
TableName = 'RB_JOIN'
|
|
Connection = seDatabase
|
|
Left = 251
|
|
Top = 510
|
|
end
|
|
object dsJoin: TDataSource
|
|
DataSet = tblJoin
|
|
Left = 282
|
|
Top = 511
|
|
end
|
|
object plJoin: TppDBPipeline
|
|
DataSource = dsJoin
|
|
RefreshAfterPost = True
|
|
UserName = 'plJoin'
|
|
Visible = False
|
|
Left = 314
|
|
Top = 510
|
|
end
|
|
object sqCreate: TMSQuery
|
|
Connection = seDatabase
|
|
SQL.Strings = (
|
|
'CREATE TABLE [dbo].[RB_FIELD] ('
|
|
#9'[TABLE_NAME] [varchar] (60) NOT NULL ,'
|
|
#9'[FIELD_NAME] [varchar] (60) NOT NULL ,'
|
|
#9'[FIELD_ALIAS] [varchar] (60) NULL ,'
|
|
#9'[DATATYPE] [varchar] (60) NULL ,'
|
|
#9'[SELECTABLE] [varchar] (1) NULL ,'
|
|
#9'[SEARCHABLE] [varchar] (1) NULL ,'
|
|
#9'[SORTABLE] [varchar] (1) NULL ,'
|
|
#9'[AUTOSEARCH] [varchar] (1) NULL ,'
|
|
#9'[MANDATORY] [varchar] (1) NULL '
|
|
') ON [PRIMARY]'
|
|
''
|
|
'CREATE TABLE [dbo].[RB_FOLDER] ('
|
|
#9'[FOLDER_ID] [int] IDENTITY (1, 1) NOT NULL ,'
|
|
#9'[FOLDER_NAME] [char] (60) NULL ,'
|
|
#9'[PARENT_ID] [int] NULL '
|
|
') ON [PRIMARY]'
|
|
''
|
|
'CREATE TABLE [dbo].[RB_ITEM] ('
|
|
#9'[ITEM_ID] [int] IDENTITY (1, 1) NOT NULL ,'
|
|
#9'[FOLDER_ID] [int] NULL ,'
|
|
#9'[ITEM_NAME] [char] (60) NULL ,'
|
|
#9'[ITEM_SIZE] [int] NULL ,'
|
|
#9'[ITEM_TYPE] [int] NULL ,'
|
|
#9'[MODIFIED] [int] NULL ,'
|
|
#9'[DELETED] [int] NULL ,'
|
|
#9'[TEMPLATE] [text] NULL '
|
|
') ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]'
|
|
''
|
|
'CREATE TABLE [dbo].[RB_JOIN] ('
|
|
#9'[TABLE_NAME1] [varchar] (60) NOT NULL ,'
|
|
#9'[TABLE_NAME2] [varchar] (60) NOT NULL ,'
|
|
#9'[JOIN_TYPE] [varchar] (60) NULL ,'
|
|
#9'[FIELD_NAMES1] [varchar] (255) NULL ,'
|
|
#9'[OPERATORS] [varchar] (60) NULL ,'
|
|
#9'[FIELD_NAMES2] [varchar] (60) NULL '
|
|
') ON [PRIMARY]'
|
|
''
|
|
'CREATE TABLE [dbo].[RB_TABLE] ('
|
|
#9'[TABLE_NAME] [varchar] (60) NOT NULL ,'
|
|
#9'[TABLE_ALIAS] [varchar] (60) NULL '
|
|
') ON [PRIMARY]'
|
|
''
|
|
'/*ALTER TABLE [dbo].[RB_FOLDER] WITH NOCHECK ADD '
|
|
#9'CONSTRAINT [PK_RB_FOLDER] PRIMARY KEY CLUSTERED '
|
|
#9'('
|
|
#9#9'[FOLDER_ID]'
|
|
#9') ON [PRIMARY] '
|
|
''
|
|
'ALTER TABLE [dbo].[RB_ITEM] WITH NOCHECK ADD '
|
|
#9'CONSTRAINT [PK_RB_ITEM] PRIMARY KEY CLUSTERED '
|
|
#9'('
|
|
#9#9'[ITEM_ID]'
|
|
#9') ON [PRIMARY] '
|
|
''
|
|
'ALTER TABLE [dbo].[RB_TABLE] WITH NOCHECK ADD '
|
|
#9'CONSTRAINT [PK_RB_TABLE] PRIMARY KEY CLUSTERED '
|
|
#9'('
|
|
#9#9'[TABLE_NAME]'
|
|
#9') ON [PRIMARY] '
|
|
''
|
|
'*/')
|
|
Debug = True
|
|
Left = 8
|
|
Top = 336
|
|
end
|
|
object sqDrop: TMSQuery
|
|
Connection = seDatabase
|
|
SQL.Strings = (
|
|
|
|
'if exists (select * from dbo.sysobjects where id = object_id(N'#39'[' +
|
|
'dbo].[RB_FIELD]'#39') and OBJECTPROPERTY(id, N'#39'IsUserTable'#39') = 1)'
|
|
'drop table [dbo].[RB_FIELD]'
|
|
''
|
|
|
|
'if exists (select * from dbo.sysobjects where id = object_id(N'#39'[' +
|
|
'dbo].[RB_FOLDER]'#39') and OBJECTPROPERTY(id, N'#39'IsUserTable'#39') = 1)'
|
|
'drop table [dbo].[RB_FOLDER]'
|
|
''
|
|
|
|
'if exists (select * from dbo.sysobjects where id = object_id(N'#39'[' +
|
|
'dbo].[RB_ITEM]'#39') and OBJECTPROPERTY(id, N'#39'IsUserTable'#39') = 1)'
|
|
'drop table [dbo].[RB_ITEM]'
|
|
''
|
|
|
|
'if exists (select * from dbo.sysobjects where id = object_id(N'#39'[' +
|
|
'dbo].[RB_JOIN]'#39') and OBJECTPROPERTY(id, N'#39'IsUserTable'#39') = 1)'
|
|
'drop table [dbo].[RB_JOIN]'
|
|
''
|
|
|
|
'if exists (select * from dbo.sysobjects where id = object_id(N'#39'[' +
|
|
'dbo].[RB_TABLE]'#39') and OBJECTPROPERTY(id, N'#39'IsUserTable'#39') = 1)'
|
|
'drop table [dbo].[RB_TABLE]')
|
|
Debug = True
|
|
Left = 40
|
|
Top = 336
|
|
end
|
|
object MyTable1: TMSTable
|
|
TableName = 'rb_folder'
|
|
Connection = seDatabase
|
|
Left = 12
|
|
Top = 195
|
|
end
|
|
end
|