how to make nexusdatabse available in the report designer?
i use danexusdb in place of the original ff2 file and the report designer
in the code area ignores nexus.
I can't read my old report. It always refuse the datansename and the
database is on the form.
find xxx in the message.
object rpt: TppReport
AutoStop = False
DataPipeline = T_Contenu
PrinterSetup.BinName = 'Default'
PrinterSetup.DocumentName = 'Report'
PrinterSetup.PaperName = 'A4'
PrinterSetup.PrinterName = 'Default'
PrinterSetup.mmMarginBottom = 6350
PrinterSetup.mmMarginLeft = 6350
PrinterSetup.mmMarginRight = 6350
PrinterSetup.mmMarginTop = 6350
PrinterSetup.mmPaperHeight = 297000
PrinterSetup.mmPaperWidth = 210000
PrinterSetup.PaperSize = 9
SaveAsTemplate = True
Template.DatabaseSettings.DataPipeline = ppItem
Template.DatabaseSettings.Name = 'Exp?ditions vers Gissigheim'
Template.DatabaseSettings.NameField = 'Name'
Template.DatabaseSettings.TemplateField = 'Template'
Template.FileName = 'D:\lienard\sources_cli\scg\reportsd4\exped vers
scg.rtm'
Template.Format = ftASCII
Units = utMillimeters
AllowPrintToFile = True
DeviceType = 'Screen'
ShowAutoSearchDialog = True
TextFileName = 'G:\Gissigheim\Exped Gissigheim.TXT'
TextFileType = ftTab
Left = 232
Top = 144
Version = '5.51'
mmColumnWidth = 0
object ppHeaderBand1: TppHeaderBand
Save = True
mmBottomOffset = 0
mmHeight = 17992
mmPrintPosition = 0
object ppLabel1: TppLabel
UserName = 'Label1'
Caption = 'Exp?ditions du'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 22
Font.Style = []
Transparent = True
mmHeight = 9313
mmLeft = 51435
mmTop = 2328
mmWidth = 51012
BandType = 0
end
object ppLabel2: TppLabel
UserName = 'Label2'
SaveOrder = 0
Save = True
Caption = 'Palette ID'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
Transparent = True
mmHeight = 4022
mmLeft = 423
mmTop = 13547
mmWidth = 15663
BandType = 0
end
object ppLabel3: TppLabel
UserName = 'Label3'
SaveOrder = 1
Save = True
Caption = 'Etat Palette'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
Transparent = True
mmHeight = 4022
mmLeft = 16722
mmTop = 13758
mmWidth = 18415
BandType = 0
end
object ppLabel4: TppLabel
UserName = 'Label4'
SaveOrder = 2
Save = True
Caption = 'Date ?tat'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
Transparent = True
mmHeight = 4022
mmLeft = 35560
mmTop = 13758
mmWidth = 14393
BandType = 0
end
object ppLabel5: TppLabel
UserName = 'Label5'
SaveOrder = 3
Save = True
Caption = 'Item ID'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
Transparent = True
mmHeight = 4022
mmLeft = 52917
mmTop = 13758
mmWidth = 11642
BandType = 0
end
object ppLabel6: TppLabel
UserName = 'Label6'
SaveOrder = 4
Save = True
Caption = 'No Article'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
Transparent = True
mmHeight = 4022
mmLeft = 80222
mmTop = 13758
mmWidth = 15452
BandType = 0
end
object ppLabel7: TppLabel
UserName = 'Label7'
SaveOrder = 5
Save = True
Caption = 'No Bloc'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
Transparent = True
mmHeight = 4022
mmLeft = 97579
mmTop = 13547
mmWidth = 12488
BandType = 0
end
object ppLabel8: TppLabel
UserName = 'Label8'
SaveOrder = 6
Save = True
Caption = 'NoSerie'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
Transparent = True
mmHeight = 4022
mmLeft = 116417
mmTop = 13335
mmWidth = 12700
BandType = 0
end
object ppLabel9: TppLabel
UserName = 'Label9'
SaveOrder = 7
Save = True
Caption = 'ZRE'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
Transparent = True
mmHeight = 4022
mmLeft = 138007
mmTop = 13335
mmWidth = 7197
BandType = 0
end
object ppLabel10: TppLabel
UserName = 'Label10'
SaveOrder = 8
Save = True
Caption = 'ZATE'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
Transparent = True
mmHeight = 4022
mmLeft = 160232
mmTop = 13335
mmWidth = 9102
BandType = 0
end
object ppDBText3: TppDBText
UserName = 'DBText3'
SaveOrder = 9
Save = True
DataField = 'DateStatus'
DataPipeline = T_Contenu
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 22
Font.Style = []
Transparent = True
mmHeight = 9313
mmLeft = 103929
mmTop = 2117
mmWidth = 80222
BandType = 0
end
end
object ppDetailBand1: TppDetailBand
Save = True
mmBottomOffset = 0
mmHeight = 6562
mmPrintPosition = 0
object ppDBText1: TppDBText
UserName = 'DBText1'
SaveOrder = 0
Save = True
DataField = 'IdPalette'
DataPipeline = T_Contenu
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
Transparent = True
mmHeight = 4233
mmLeft = 2117
mmTop = 635
mmWidth = 13758
BandType = 4
end
object ppDBText2: TppDBText
UserName = 'DBText2'
SaveOrder = 1
Save = True
DataField = 'IdStatus'
DataPipeline = Palette
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
ParentDataPipeline = False
Transparent = True
mmHeight = 4233
mmLeft = 17145
mmTop = 635
mmWidth = 15875
BandType = 4
end
object ppDBText4: TppDBText
UserName = 'DBText4'
SaveOrder = 3
Save = True
DataField = 'IdItem'
DataPipeline = T_Item
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
ParentDataPipeline = False
Transparent = True
mmHeight = 4233
mmLeft = 53128
mmTop = 635
mmWidth = 25823
BandType = 4
end
object ppDBText5: TppDBText
UserName = 'DBText5'
SaveOrder = 4
Save = True
DataField = 'NoArticle'
DataPipeline = T_Item
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
ParentDataPipeline = False
Transparent = True
mmHeight = 4233
mmLeft = 80433
mmTop = 635
mmWidth = 16087
BandType = 4
end
object ppDBText6: TppDBText
UserName = 'DBText6'
SaveOrder = 5
Save = True
DataField = 'NoMainBody'
DataPipeline = T_Item
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
ParentDataPipeline = False
Transparent = True
mmHeight = 4233
mmLeft = 97790
mmTop = 635
mmWidth = 16722
BandType = 4
end
object ppDBText7: TppDBText
UserName = 'DBText7'
SaveOrder = 6
Save = True
DataField = 'NoSerie'
DataPipeline = T_Item
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
ParentDataPipeline = False
Transparent = True
mmHeight = 4233
mmLeft = 116629
mmTop = 635
mmWidth = 20320
BandType = 4
end
object ppDBText8: TppDBText
UserName = 'DBText8'
SaveOrder = 7
Save = True
DataField = 'Zare'
DataPipeline = T_Item
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
ParentDataPipeline = False
Transparent = True
mmHeight = 4233
mmLeft = 138007
mmTop = 847
mmWidth = 20320
BandType = 4
end
object ppDBText9: TppDBText
UserName = 'DBText9'
SaveOrder = 8
Save = True
DataField = 'Zate'
DataPipeline = T_Item
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
ParentDataPipeline = False
Transparent = True
mmHeight = 4233
mmLeft = 159809
mmTop = 635
mmWidth = 20108
BandType = 4
end
object ppDBText10: TppDBText
UserName = 'DBText10'
SaveOrder = 2
Save = True
DataField = 'DateStatus'
DataPipeline = Palette
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
ParentDataPipeline = False
Transparent = True
mmHeight = 4233
mmLeft = 34290
mmTop = 635
mmWidth = 17357
BandType = 4
end
end
object ppFooterBand1: TppFooterBand
mmBottomOffset = 0
mmHeight = 13123
mmPrintPosition = 0
end
object daDataModule1: TdaDataModule
object danxQueryDataView1: TdanxQueryDataView
Report = rpt
UserName = 'Query_Palette'
Height = 329
Left = 10
NameColumnWidth = 105
SizeColumnWidth = 35
SortMode = 0
Top = 10
TypeColumnWidth = 52
Width = 216
AutoSearchTabOrder = 0
object Palette: TppChildDBPipeline
AutoCreateFields = False
UserName = 'Palette'
object ppField1: TppField
FieldAlias = 'Palette Unique ID'
FieldName = 'IdPalette'
FieldLength = 0
DataType = dtInteger
DisplayWidth = 10
Position = 0
TableName = 't_palette'
end
object ppField2: TppField
FieldAlias = 'Date de cr?ation Palette'
FieldName = 'DtCreation'
FieldLength = 0
DataType = dtDateTime
DisplayWidth = 10
Position = 1
Sortable = False
TableName = 't_palette'
end
object ppField3: TppField
FieldAlias = 'Cr?ateur de la palette'
FieldName = 'UserCreation'
FieldLength = 8
DisplayWidth = 10
Position = 2
TableName = 't_palette'
end
object ppField4: TppField
FieldAlias = 'Top imprim?e (future use)'
FieldName = 'Printed'
FieldLength = 0
DataType = dtBoolean
DisplayWidth = 10
Position = 3
TableName = 't_palette'
end
object ppField5: TppField
FieldAlias = 'Etat de la palette'
FieldName = 'IdStatus'
FieldLength = 8
DisplayWidth = 10
Position = 4
TableName = 't_palette'
end
object ppField6: TppField
FieldAlias = 'Date de l'#39'?tat'
FieldName = 'DateStatus'
FieldLength = 0
DataType = dtDateTime
DisplayWidth = 10
Position = 5
TableName = 't_palette'
end
object ppField7: TppField
FieldAlias = 'Description de la palette'
FieldName = 'Description'
FieldLength = 64
DisplayWidth = 10
Position = 6
TableName = 't_palette'
end
object ppField8: TppField
FieldAlias = 'Terminal cr?ateur de la palette'
FieldName = 'TermID'
FieldLength = 0
DataType = dtInteger
DisplayWidth = 10
Position = 7
TableName = 't_palette'
end
end
object daSQL1: TdaSQL
DatabaseName = 'dtbDD'
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
DataPipelineName = 'Palette'
LinkColor = clMaroon
MaxSQLFieldAliasLength = 25
SQLText.Strings = (
'SELECT t_palette.IdPalette, t_palette.DtCreation, '
' t_palette.UserCreation, t_palette.Printed, '
' t_palette.IdStatus, t_palette.DateStatus, '
' t_palette.Description, t_palette.TermID'
'FROM t_palette t_palette'
'WHERE ( t_palette.IdStatus = '#39'CREATED'#39' )')
SQLType = sqSQL1
object TdaCriteria
ChildType = 7
Level = 0
Value = 'CREATED'
object TdaField
Alias = 'Etat de la palette'
DisplayWidth = 10
FieldAlias = 'Etat de la palette'
FieldLength = 8
FieldName = 'IdStatus'
SQLFieldName = 'IdStatus'
TableAlias = 'Palette'
TableName = 't_palette'
TableSQLAlias = 't_palette'
end
end
object TdaCriteria
ChildType = 7
Level = 0
object TdaField
Alias = 'Date de l'#39'?tat'
AutoSearch = True
DataType = dtDateTime
DisplayWidth = 10
FieldAlias = 'Date de l'#39'?tat'
FieldLength = 0
FieldName = 'DateStatus'
Mandatory = True
SQLFieldName = 'DateStatus'
TableAlias = 'Palette'
TableName = 't_palette'
TableSQLAlias = 't_palette'
end
end
object TdaField
Alias = 'Palette Unique ID'
DataType = dtInteger
DisplayWidth = 10
FieldAlias = 'Palette Unique ID'
FieldLength = 0
FieldName = 'IdPalette'
SQLFieldName = 'IdPalette'
TableAlias = 'Palette'
TableName = 't_palette'
TableSQLAlias = 't_palette'
end
object TdaField
Alias = 'Date de cr?ation Palette'
DataType = dtDateTime
DisplayWidth = 10
FieldAlias = 'Date de cr?ation Palette'
FieldLength = 0
FieldName = 'DtCreation'
Sortable = False
SQLFieldName = 'DtCreation'
TableAlias = 'Palette'
TableName = 't_palette'
TableSQLAlias = 't_palette'
end
object TdaField
Alias = 'Cr?ateur de la palette'
DisplayWidth = 10
FieldAlias = 'Cr?ateur de la palette'
FieldLength = 8
FieldName = 'UserCreation'
SQLFieldName = 'UserCreation'
TableAlias = 'Palette'
TableName = 't_palette'
TableSQLAlias = 't_palette'
end
object TdaField
Alias = 'Top imprim?e (future use)'
DataType = dtBoolean
DisplayWidth = 10
FieldAlias = 'Top imprim?e (future use)'
FieldLength = 0
FieldName = 'Printed'
SQLFieldName = 'Printed'
TableAlias = 'Palette'
TableName = 't_palette'
TableSQLAlias = 't_palette'
end
object TdaField
Alias = 'Etat de la palette'
DisplayWidth = 10
FieldAlias = 'Etat de la palette'
FieldLength = 8
FieldName = 'IdStatus'
SQLFieldName = 'IdStatus'
TableAlias = 'Palette'
TableName = 't_palette'
TableSQLAlias = 't_palette'
end
object TdaField
Alias = 'Date de l'#39'?tat'
DataType = dtDateTime
DisplayWidth = 10
FieldAlias = 'Date de l'#39'?tat'
FieldLength = 0
FieldName = 'DateStatus'
SQLFieldName = 'DateStatus'
TableAlias = 'Palette'
TableName = 't_palette'
TableSQLAlias = 't_palette'
end
object TdaField
Alias = 'Description de la palette'
DisplayWidth = 10
FieldAlias = 'Description de la palette'
FieldLength = 64
FieldName = 'Description'
SQLFieldName = 'Description'
TableAlias = 'Palette'
TableName = 't_palette'
TableSQLAlias = 't_palette'
end
object TdaField
Alias = 'Terminal cr?ateur de la palette'
DataType = dtInteger
DisplayWidth = 10
FieldAlias = 'Terminal cr?ateur de la palette'
FieldLength = 0
FieldName = 'TermID'
SQLFieldName = 'TermID'
TableAlias = 'Palette'
TableName = 't_palette'
TableSQLAlias = 't_palette'
end
object TdaTable
ChildType = 5
Alias = 'Palette'
JoinType = dajtNone
SQLAlias = 't_palette'
TableAlias = 'Palette'
TableName = 't_palette'
end
end
end
object danxQueryDataView2: TdanxQueryDataView
Report = rpt
UserName = 'Query_T_Contenu'
Height = 129
Left = 276
NameColumnWidth = 105
SizeColumnWidth = 35
SortMode = 0
Top = 10
TypeColumnWidth = 52
Width = 200
AutoSearchTabOrder = 0
MasterDataViewUserName = 'Query_Palette'
object T_Contenu: TppChildDBPipeline
AutoCreateFields = False
MasterDataPipeline = Palette
UserName = 'T_Contenu'
object ppField9: TppField
FieldAlias = 'Idpalette'
FieldName = 'IdPalette'
FieldLength = 0
DataType = dtInteger
DisplayWidth = 10
Position = 0
TableName = 't_contenu'
end
object ppField10: TppField
FieldAlias = 'Iditem'
FieldName = 'IdItem'
FieldLength = 13
DisplayWidth = 10
Position = 1
TableName = 't_contenu'
end
object ppMasterFieldLink1: TppMasterFieldLink
MasterFieldName = 'IdPalette'
DetailFieldName = 'IdPalette'
DetailSortOrder = soAscending
end
end
object daSQL2: TdaSQL
DatabaseName = 'dtbDD'
DataPipelineName = 'T_Contenu'
LinkColor = clNavy
MaxSQLFieldAliasLength = 25
SQLText.Strings = (
'SELECT t_contenu.IdPalette, t_contenu.IdItem'
'FROM t_contenu t_contenu')
SQLType = sqSQL1
object TdaField
Alias = 'Idpalette'
DataType = dtInteger
DisplayWidth = 10
FieldAlias = 'Idpalette'
FieldLength = 0
FieldName = 'IdPalette'
SQLFieldName = 'IdPalette'
TableAlias = 'T Contenu'
TableName = 't_contenu'
TableSQLAlias = 't_contenu'
end
object TdaField
Alias = 'Iditem'
DisplayWidth = 10
FieldAlias = 'Iditem'
FieldLength = 13
FieldName = 'IdItem'
SQLFieldName = 'IdItem'
TableAlias = 'T Contenu'
TableName = 't_contenu'
TableSQLAlias = 't_contenu'
end
object TdaTable
ChildType = 5
Alias = 'T Contenu'
JoinType = dajtNone
SQLAlias = 't_contenu'
TableAlias = 'T Contenu'
TableName = 't_contenu'
end
object TdaSQLLink
ChildType = 9
object TdaField
ChildType = 10
Alias = 'Palette Unique ID'
DataType = dtInteger
DisplayWidth = 10
FieldAlias = 'Palette Unique ID'
FieldLength = 0
FieldName = 'IdPalette'
SQLFieldName = 'IdPalette'
TableAlias = 'Palette'
TableName = 't_palette'
TableSQLAlias = 't_palette'
end
object TdaField
ChildType = 11
Alias = 'Idpalette'
DataType = dtInteger
DisplayWidth = 10
FieldAlias = 'Idpalette'
FieldLength = 0
FieldName = 'IdPalette'
SQLFieldName = 'IdPalette'
TableAlias = 'T Contenu'
TableName = 't_contenu'
TableSQLAlias = 't_contenu'
end
end
end
end
object danxQueryDataView3: TdanxQueryDataView
Report = rpt
UserName = 'Query_T_Item'
Height = 316
Left = 526
NameColumnWidth = 105
SizeColumnWidth = 35
SortMode = 0
Top = 10
TypeColumnWidth = 52
Width = 200
AutoSearchTabOrder = 0
MasterDataViewUserName = 'Query_T_Contenu'
object T_Item: TppChildDBPipeline
AutoCreateFields = False
MasterDataPipeline = T_Contenu
UserName = 'T_Item'
object ppField11: TppField
FieldAlias = 'Iditem'
FieldName = 'IdItem'
FieldLength = 13
DisplayWidth = 10
Position = 0
TableName = 't_item'
end
object ppField12: TppField
FieldAlias = 'Zate'
FieldName = 'Zate'
FieldLength = 10
DisplayWidth = 10
Position = 1
TableName = 't_item'
end
object ppField13: TppField
FieldAlias = 'Zare'
FieldName = 'Zare'
FieldLength = 10
DisplayWidth = 10
Position = 2
TableName = 't_item'
end
object ppField14: TppField
FieldAlias = 'Cdpaysa'
FieldName = 'CdPaysA'
FieldLength = 2
DisplayWidth = 10
Position = 3
TableName = 't_item'
end
object ppField15: TppField
FieldAlias = 'Cdpaysn'
FieldName = 'CdPaysN'
FieldLength = 2
DisplayWidth = 10
Position = 4
TableName = 't_item'
end
object ppField16: TppField
FieldAlias = 'Noarticle'
FieldName = 'NoArticle'
FieldLength = 8
DisplayWidth = 10
Position = 5
TableName = 't_item'
end
object ppField17: TppField
FieldAlias = 'Noserie'
FieldName = 'NoSerie'
FieldLength = 10
DisplayWidth = 10
Position = 6
TableName = 't_item'
end
object ppField18: TppField
FieldAlias = 'Nomainbody'
FieldName = 'NoMainBody'
FieldLength = 8
DisplayWidth = 10
Position = 7
TableName = 't_item'
end
object ppField19: TppField
FieldAlias = 'Descriptionde'
FieldName = 'DescriptionDE'
FieldLength = 64
DisplayWidth = 10
Position = 8
TableName = 't_item'
end
object ppField20: TppField
FieldAlias = 'Descriptionfo'
FieldName = 'DescriptionFO'
FieldLength = 64
DisplayWidth = 10
Position = 9
TableName = 't_item'
end
object ppField21: TppField
FieldAlias = 'Idstatus'
FieldName = 'IdStatus'
FieldLength = 8
DisplayWidth = 10
Position = 10
TableName = 't_item'
end
object ppField22: TppField
FieldAlias = 'Datestatus'
FieldName = 'DateStatus'
FieldLength = 0
DisplayWidth = 10
Position = 11
TableName = 't_item'
end
object ppField23: TppField
FieldAlias = 'Accessoiresback'
FieldName = 'AccessoiresBack'
FieldLength = 0
DataType = dtInteger
DisplayWidth = 10
Position = 12
TableName = 't_item'
end
object ppMasterFieldLink2: TppMasterFieldLink
MasterFieldName = 'IdPalette_2'
DetailFieldName = 'IdPalette_2'
DetailSortOrder = soAscending
end
object ppMasterFieldLink3: TppMasterFieldLink
MasterFieldName = 'IdItem'
DetailFieldName = 'IdItem'
DetailSortOrder = soAscending
end
end
object daSQL3: TdaSQL
DatabaseName = 'dtbDD'
DataPipelineName = 'T_Item'
LinkColor = clGreen
MaxSQLFieldAliasLength = 25
SQLText.Strings = (
'SELECT t_item.IdItem, t_item.Zate, t_item.Zare, '
' t_item.CdPaysA, t_item.CdPaysN, '
' t_item.NoArticle, t_item.NoSerie, '
' t_item.NoMainBody, t_item.DescriptionDE, '
' t_item.DescriptionFO, t_item.IdStatus, '
' t_item.DateStatus, t_item.AccessoiresBack'
'FROM t_item t_item')
SQLType = sqSQL1
object TdaField
Alias = 'Iditem'
DisplayWidth = 10
FieldAlias = 'Iditem'
FieldLength = 13
FieldName = 'IdItem'
SQLFieldName = 'IdItem'
TableAlias = 'T Item'
TableName = 't_item'
TableSQLAlias = 't_item'
end
object TdaField
Alias = 'Zate'
DisplayWidth = 10
FieldAlias = 'Zate'
FieldLength = 10
FieldName = 'Zate'
SQLFieldName = 'Zate'
TableAlias = 'T Item'
TableName = 't_item'
TableSQLAlias = 't_item'
end
object TdaField
Alias = 'Zare'
DisplayWidth = 10
FieldAlias = 'Zare'
FieldLength = 10
FieldName = 'Zare'
SQLFieldName = 'Zare'
TableAlias = 'T Item'
TableName = 't_item'
TableSQLAlias = 't_item'
end
object TdaField
Alias = 'Cdpaysa'
DisplayWidth = 10
FieldAlias = 'Cdpaysa'
FieldLength = 2
FieldName = 'CdPaysA'
SQLFieldName = 'CdPaysA'
TableAlias = 'T Item'
TableName = 't_item'
TableSQLAlias = 't_item'
end
object TdaField
Alias = 'Cdpaysn'
DisplayWidth = 10
FieldAlias = 'Cdpaysn'
FieldLength = 2
FieldName = 'CdPaysN'
SQLFieldName = 'CdPaysN'
TableAlias = 'T Item'
TableName = 't_item'
TableSQLAlias = 't_item'
end
object TdaField
Alias = 'Noarticle'
DisplayWidth = 10
FieldAlias = 'Noarticle'
FieldLength = 8
FieldName = 'NoArticle'
SQLFieldName = 'NoArticle'
TableAlias = 'T Item'
TableName = 't_item'
TableSQLAlias = 't_item'
end
object TdaField
Alias = 'Noserie'
DisplayWidth = 10
FieldAlias = 'Noserie'
FieldLength = 10
FieldName = 'NoSerie'
SQLFieldName = 'NoSerie'
TableAlias = 'T Item'
TableName = 't_item'
TableSQLAlias = 't_item'
end
object TdaField
Alias = 'Nomainbody'
DisplayWidth = 10
FieldAlias = 'Nomainbody'
FieldLength = 8
FieldName = 'NoMainBody'
SQLFieldName = 'NoMainBody'
TableAlias = 'T Item'
TableName = 't_item'
TableSQLAlias = 't_item'
end
object TdaField
Alias = 'Descriptionde'
DisplayWidth = 10
FieldAlias = 'Descriptionde'
FieldLength = 64
FieldName = 'DescriptionDE'
SQLFieldName = 'DescriptionDE'
TableAlias = 'T Item'
TableName = 't_item'
TableSQLAlias = 't_item'
end
object TdaField
Alias = 'Descriptionfo'
DisplayWidth = 10
FieldAlias = 'Descriptionfo'
FieldLength = 64
FieldName = 'DescriptionFO'
SQLFieldName = 'DescriptionFO'
TableAlias = 'T Item'
TableName = 't_item'
TableSQLAlias = 't_item'
end
object TdaField
Alias = 'Idstatus'
DisplayWidth = 10
FieldAlias = 'Idstatus'
FieldLength = 8
FieldName = 'IdStatus'
SQLFieldName = 'IdStatus'
TableAlias = 'T Item'
TableName = 't_item'
TableSQLAlias = 't_item'
end
object TdaField
Alias = 'Datestatus'
DisplayWidth = 10
FieldAlias = 'Datestatus'
FieldLength = 0
FieldName = 'DateStatus'
SQLFieldName = 'DateStatus'
TableAlias = 'T Item'
TableName = 't_item'
TableSQLAlias = 't_item'
end
object TdaField
Alias = 'Accessoiresback'
DataType = dtInteger
DisplayWidth = 10
FieldAlias = 'Accessoiresback'
FieldLength = 0
FieldName = 'AccessoiresBack'
SQLFieldName = 'AccessoiresBack'
TableAlias = 'T Item'
TableName = 't_item'
TableSQLAlias = 't_item'
end
object TdaTable
ChildType = 5
Alias = 'T Item'
JoinType = dajtNone
SQLAlias = 't_item'
TableAlias = 'T Item'
TableName = 't_item'
end
object TdaSQLLink
ChildType = 9
object TdaField
ChildType = 10
Alias = 'Iditem'
DisplayWidth = 10
FieldAlias = 'Iditem'
FieldLength = 13
FieldName = 'IdItem'
SQLFieldName = 'IdItem'
TableAlias = 'T Contenu'
TableName = 't_contenu'
TableSQLAlias = 't_contenu'
end
object TdaField
ChildType = 11
Alias = 'Iditem'
DisplayWidth = 10
FieldAlias = 'Iditem'
FieldLength = 13
FieldName = 'IdItem'
SQLFieldName = 'IdItem'
TableAlias = 'T Item'
TableName = 't_item'
TableSQLAlias = 't_item'
end
end
end
end
end
end
the form in ascii form
object fListeEtats: TfListeEtats
Left = 270
Top = 421
Width = 696
Height = 480
Caption = 'fListeEtats'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnCreate = FormCreate
OnDestroy = FormDestroy
PixelsPerInch = 120
TextHeight = 16
object bReportExplorer: TButton
Left = 69
Top = 305
Width = 129
Height = 31
Caption = 'bReportExplorer'
TabOrder = 0
OnClick = bReportExplorerClick
end
object tFolder: TnxTable
ActiveRuntime = True
ActiveDesigntime = True
Database = SCGCS.dtbSCG
Timeout = 10000
TableName = 'rbFolder'
Left = 24
Top = 32
end
object dsFolder: TDataSource
DataSet = tFolder
Left = 72
Top = 32
end
object ppFolder: TppDBPipeline
DataSource = dsFolder
UserName = 'Folder'
Visible = False
Left = 120
Top = 32
end
object tItem: TnxTable
ActiveRuntime = True
ActiveDesigntime = True
Database = SCGCS.dtbSCG
Timeout = 10000
TableName = 'rbItem'
Left = 24
Top = 88
end
object dsItem: TDataSource
DataSet = tItem
Left = 72
Top = 88
end
object Designer: TppDesigner
AllowDataSettingsChange = True
Caption = 'ReportBuilder'
DataSettings.DatabaseName = 'dtbDD'
DataSettings.SessionType = 'FlashFilerSession'
DataSettings.AllowEditSQL = False
DataSettings.DatabaseType = dtParadox
DataSettings.DataDictionary = dd
DataSettings.IsCaseSensitive = True
DataSettings.SQLType = sqSQL1
DataSettings.UseDataDictionary = True
Position = poScreenCenter
Report = rpt
IniStorageType = 'IniFile'
IniStorageName = '($WINSYS)\RBuilder.ini'
WindowHeight = 400
WindowLeft = 100
WindowTop = 50
WindowWidth = 600
OnCreate = DesignerCreate
Left = 232
Top = 88
end
object RptExplorer: TppReportExplorer
Designer = Designer
FolderFieldNames.FolderId = 'FolderId'
FolderFieldNames.Name = 'Name'
FolderFieldNames.ParentId = 'ParentId'
FolderPipeline = ppFolder
ItemFieldNames.Deleted = 'Deleted'
ItemFieldNames.FolderId = 'FolderId'
ItemFieldNames.ItemId = 'ItemId'
ItemFieldNames.Modified = 'Modified'
ItemFieldNames.Name = 'Name'
ItemFieldNames.Size = 'Size'
ItemFieldNames.Template = 'Template'
ItemFieldNames.ItemType = 'ItemType'
ItemPipeline = ppItem
FormCaption = 'Report Explorer'
FormPosition = poScreenCenter
FormHeight = 400
FormLeft = 100
FormTop = 50
FormWidth = 600
OnCreate = RptExplorerCreate
Left = 232
Top = 40
end
object rpt: TppReport
PrinterSetup.BinName = 'Default'
PrinterSetup.DocumentName = 'Report'
PrinterSetup.PaperName = 'A4'
PrinterSetup.PrinterName = 'Default'
PrinterSetup.mmMarginBottom = 6350
PrinterSetup.mmMarginLeft = 6350
PrinterSetup.mmMarginRight = 6350
PrinterSetup.mmMarginTop = 6350
PrinterSetup.mmPaperHeight = 297000
PrinterSetup.mmPaperWidth = 210000
PrinterSetup.PaperSize = 9
Units = utMillimeters
DeviceType = 'Screen'
OutlineSettings.CreateNode = True
OutlineSettings.CreatePageNodes = True
OutlineSettings.Enabled = False
OutlineSettings.Visible = False
TextSearchSettings.DefaultString = ''
TextSearchSettings.Enabled = False
Left = 232
Top = 144
Version = '7.03'
mmColumnWidth = 0
object ppHeaderBand1: TppHeaderBand
mmBottomOffset = 0
mmHeight = 13229
mmPrintPosition = 0
end
object ppDetailBand1: TppDetailBand
mmBottomOffset = 0
mmHeight = 13229
mmPrintPosition = 0
end
object ppFooterBand1: TppFooterBand
mmBottomOffset = 0
mmHeight = 13229
mmPrintPosition = 0
end
object daDataModule1: TdaDataModule
end
end
object dd: TppDataDictionary
AutoJoin = True
BuilderSettings.DatabaseName = 'dtbDD'
BuilderSettings.SessionType = 'FlashFilerSession'
FieldFieldNames.AutoSearch = 'AutoSearch'
FieldFieldNames.DataType = 'DataType'
FieldFieldNames.FieldName = 'FieldName'
FieldFieldNames.FieldAlias = 'FieldAlias'
FieldFieldNames.Mandatory = 'Mandatory'
FieldFieldNames.Searchable = 'Searchable'
FieldFieldNames.Selectable = 'Selectable'
FieldFieldNames.Sortable = 'Sortable'
FieldFieldNames.TableName = 'TableName'
FieldPipeline = ppField
JoinFieldNames.TableName1 = 'TableName1'
JoinFieldNames.TableName2 = 'TableName2'
JoinFieldNames.JoinType = 'JoinType'
JoinFieldNames.FieldNames1 = 'FieldNames1'
JoinFieldNames.FieldNames2 = 'FieldNames2'
JoinFieldNames.Operators = 'Operators'
JoinPipeline = ppJoin
TableFieldNames.TableName = 'TableName'
TableFieldNames.TableAlias = 'TableAlias'
TablePipeline = ppTable
UserName = 'dd'
ValidateFieldNames = False
ValidateTableNames = False
Left = 304
Top = 88
end
object tTable: TnxTable
ActiveRuntime = True
ActiveDesigntime = True
Session = SCGCS.nxSession1
AliasName = 'SCG'
Timeout = 10000
TableName = 'rbTable'
Left = 384
Top = 32
end
object dsTable: TDataSource
DataSet = tTable
Left = 432
Top = 32
end
object ppTable: TppDBPipeline
DataSource = dsTable
UserName = 'Table'
Visible = False
Left = 480
Top = 32
end
object tField: TnxTable
ActiveRuntime = True
ActiveDesigntime = True
Session = SCGCS.nxSession1
AliasName = 'SCG'
Timeout = 10000
TableName = 'rbField'
Left = 384
Top = 96
end
object dsField: TDataSource
DataSet = tField
Left = 432
Top = 96
end
object tJoin: TnxTable
ActiveRuntime = True
ActiveDesigntime = True
Session = SCGCS.nxSession1
AliasName = 'SCG'
Timeout = 10000
TableName = 'rbJoin'
Left = 384
Top = 160
end
object dsJoin: TDataSource
DataSet = tJoin
Left = 432
Top = 160
end
object ppField: TppDBPipeline
DataSource = dsField
UserName = 'Field'
Visible = False
Left = 480
Top = 96
end
object ppJoin: TppDBPipeline
DataSource = dsJoin
UserName = 'Join'
Visible = False
Left = 480
Top = 160
end
object ppItem: TppDBPipeline
DataSource = dsItem
UserName = 'Item'
Visible = False
Left = 120
Top = 88
end
object dtbDD: TnxDatabase
ActiveRuntime = True
ActiveDesigntime = True
Session = SCGCS.nxSession1
AliasName = 'SCG'
Left = 232
Top = 208
end
end
regards
Didier
in the code area ignores nexus.
I can't read my old report. It always refuse the datansename and the
database is on the form.
find xxx in the message.
object rpt: TppReport
AutoStop = False
DataPipeline = T_Contenu
PrinterSetup.BinName = 'Default'
PrinterSetup.DocumentName = 'Report'
PrinterSetup.PaperName = 'A4'
PrinterSetup.PrinterName = 'Default'
PrinterSetup.mmMarginBottom = 6350
PrinterSetup.mmMarginLeft = 6350
PrinterSetup.mmMarginRight = 6350
PrinterSetup.mmMarginTop = 6350
PrinterSetup.mmPaperHeight = 297000
PrinterSetup.mmPaperWidth = 210000
PrinterSetup.PaperSize = 9
SaveAsTemplate = True
Template.DatabaseSettings.DataPipeline = ppItem
Template.DatabaseSettings.Name = 'Exp?ditions vers Gissigheim'
Template.DatabaseSettings.NameField = 'Name'
Template.DatabaseSettings.TemplateField = 'Template'
Template.FileName = 'D:\lienard\sources_cli\scg\reportsd4\exped vers
scg.rtm'
Template.Format = ftASCII
Units = utMillimeters
AllowPrintToFile = True
DeviceType = 'Screen'
ShowAutoSearchDialog = True
TextFileName = 'G:\Gissigheim\Exped Gissigheim.TXT'
TextFileType = ftTab
Left = 232
Top = 144
Version = '5.51'
mmColumnWidth = 0
object ppHeaderBand1: TppHeaderBand
Save = True
mmBottomOffset = 0
mmHeight = 17992
mmPrintPosition = 0
object ppLabel1: TppLabel
UserName = 'Label1'
Caption = 'Exp?ditions du'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 22
Font.Style = []
Transparent = True
mmHeight = 9313
mmLeft = 51435
mmTop = 2328
mmWidth = 51012
BandType = 0
end
object ppLabel2: TppLabel
UserName = 'Label2'
SaveOrder = 0
Save = True
Caption = 'Palette ID'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
Transparent = True
mmHeight = 4022
mmLeft = 423
mmTop = 13547
mmWidth = 15663
BandType = 0
end
object ppLabel3: TppLabel
UserName = 'Label3'
SaveOrder = 1
Save = True
Caption = 'Etat Palette'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
Transparent = True
mmHeight = 4022
mmLeft = 16722
mmTop = 13758
mmWidth = 18415
BandType = 0
end
object ppLabel4: TppLabel
UserName = 'Label4'
SaveOrder = 2
Save = True
Caption = 'Date ?tat'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
Transparent = True
mmHeight = 4022
mmLeft = 35560
mmTop = 13758
mmWidth = 14393
BandType = 0
end
object ppLabel5: TppLabel
UserName = 'Label5'
SaveOrder = 3
Save = True
Caption = 'Item ID'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
Transparent = True
mmHeight = 4022
mmLeft = 52917
mmTop = 13758
mmWidth = 11642
BandType = 0
end
object ppLabel6: TppLabel
UserName = 'Label6'
SaveOrder = 4
Save = True
Caption = 'No Article'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
Transparent = True
mmHeight = 4022
mmLeft = 80222
mmTop = 13758
mmWidth = 15452
BandType = 0
end
object ppLabel7: TppLabel
UserName = 'Label7'
SaveOrder = 5
Save = True
Caption = 'No Bloc'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
Transparent = True
mmHeight = 4022
mmLeft = 97579
mmTop = 13547
mmWidth = 12488
BandType = 0
end
object ppLabel8: TppLabel
UserName = 'Label8'
SaveOrder = 6
Save = True
Caption = 'NoSerie'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
Transparent = True
mmHeight = 4022
mmLeft = 116417
mmTop = 13335
mmWidth = 12700
BandType = 0
end
object ppLabel9: TppLabel
UserName = 'Label9'
SaveOrder = 7
Save = True
Caption = 'ZRE'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
Transparent = True
mmHeight = 4022
mmLeft = 138007
mmTop = 13335
mmWidth = 7197
BandType = 0
end
object ppLabel10: TppLabel
UserName = 'Label10'
SaveOrder = 8
Save = True
Caption = 'ZATE'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
Transparent = True
mmHeight = 4022
mmLeft = 160232
mmTop = 13335
mmWidth = 9102
BandType = 0
end
object ppDBText3: TppDBText
UserName = 'DBText3'
SaveOrder = 9
Save = True
DataField = 'DateStatus'
DataPipeline = T_Contenu
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 22
Font.Style = []
Transparent = True
mmHeight = 9313
mmLeft = 103929
mmTop = 2117
mmWidth = 80222
BandType = 0
end
end
object ppDetailBand1: TppDetailBand
Save = True
mmBottomOffset = 0
mmHeight = 6562
mmPrintPosition = 0
object ppDBText1: TppDBText
UserName = 'DBText1'
SaveOrder = 0
Save = True
DataField = 'IdPalette'
DataPipeline = T_Contenu
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
Transparent = True
mmHeight = 4233
mmLeft = 2117
mmTop = 635
mmWidth = 13758
BandType = 4
end
object ppDBText2: TppDBText
UserName = 'DBText2'
SaveOrder = 1
Save = True
DataField = 'IdStatus'
DataPipeline = Palette
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
ParentDataPipeline = False
Transparent = True
mmHeight = 4233
mmLeft = 17145
mmTop = 635
mmWidth = 15875
BandType = 4
end
object ppDBText4: TppDBText
UserName = 'DBText4'
SaveOrder = 3
Save = True
DataField = 'IdItem'
DataPipeline = T_Item
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
ParentDataPipeline = False
Transparent = True
mmHeight = 4233
mmLeft = 53128
mmTop = 635
mmWidth = 25823
BandType = 4
end
object ppDBText5: TppDBText
UserName = 'DBText5'
SaveOrder = 4
Save = True
DataField = 'NoArticle'
DataPipeline = T_Item
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
ParentDataPipeline = False
Transparent = True
mmHeight = 4233
mmLeft = 80433
mmTop = 635
mmWidth = 16087
BandType = 4
end
object ppDBText6: TppDBText
UserName = 'DBText6'
SaveOrder = 5
Save = True
DataField = 'NoMainBody'
DataPipeline = T_Item
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
ParentDataPipeline = False
Transparent = True
mmHeight = 4233
mmLeft = 97790
mmTop = 635
mmWidth = 16722
BandType = 4
end
object ppDBText7: TppDBText
UserName = 'DBText7'
SaveOrder = 6
Save = True
DataField = 'NoSerie'
DataPipeline = T_Item
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
ParentDataPipeline = False
Transparent = True
mmHeight = 4233
mmLeft = 116629
mmTop = 635
mmWidth = 20320
BandType = 4
end
object ppDBText8: TppDBText
UserName = 'DBText8'
SaveOrder = 7
Save = True
DataField = 'Zare'
DataPipeline = T_Item
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
ParentDataPipeline = False
Transparent = True
mmHeight = 4233
mmLeft = 138007
mmTop = 847
mmWidth = 20320
BandType = 4
end
object ppDBText9: TppDBText
UserName = 'DBText9'
SaveOrder = 8
Save = True
DataField = 'Zate'
DataPipeline = T_Item
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
ParentDataPipeline = False
Transparent = True
mmHeight = 4233
mmLeft = 159809
mmTop = 635
mmWidth = 20108
BandType = 4
end
object ppDBText10: TppDBText
UserName = 'DBText10'
SaveOrder = 2
Save = True
DataField = 'DateStatus'
DataPipeline = Palette
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Arial'
Font.Size = 10
Font.Style = []
ParentDataPipeline = False
Transparent = True
mmHeight = 4233
mmLeft = 34290
mmTop = 635
mmWidth = 17357
BandType = 4
end
end
object ppFooterBand1: TppFooterBand
mmBottomOffset = 0
mmHeight = 13123
mmPrintPosition = 0
end
object daDataModule1: TdaDataModule
object danxQueryDataView1: TdanxQueryDataView
Report = rpt
UserName = 'Query_Palette'
Height = 329
Left = 10
NameColumnWidth = 105
SizeColumnWidth = 35
SortMode = 0
Top = 10
TypeColumnWidth = 52
Width = 216
AutoSearchTabOrder = 0
object Palette: TppChildDBPipeline
AutoCreateFields = False
UserName = 'Palette'
object ppField1: TppField
FieldAlias = 'Palette Unique ID'
FieldName = 'IdPalette'
FieldLength = 0
DataType = dtInteger
DisplayWidth = 10
Position = 0
TableName = 't_palette'
end
object ppField2: TppField
FieldAlias = 'Date de cr?ation Palette'
FieldName = 'DtCreation'
FieldLength = 0
DataType = dtDateTime
DisplayWidth = 10
Position = 1
Sortable = False
TableName = 't_palette'
end
object ppField3: TppField
FieldAlias = 'Cr?ateur de la palette'
FieldName = 'UserCreation'
FieldLength = 8
DisplayWidth = 10
Position = 2
TableName = 't_palette'
end
object ppField4: TppField
FieldAlias = 'Top imprim?e (future use)'
FieldName = 'Printed'
FieldLength = 0
DataType = dtBoolean
DisplayWidth = 10
Position = 3
TableName = 't_palette'
end
object ppField5: TppField
FieldAlias = 'Etat de la palette'
FieldName = 'IdStatus'
FieldLength = 8
DisplayWidth = 10
Position = 4
TableName = 't_palette'
end
object ppField6: TppField
FieldAlias = 'Date de l'#39'?tat'
FieldName = 'DateStatus'
FieldLength = 0
DataType = dtDateTime
DisplayWidth = 10
Position = 5
TableName = 't_palette'
end
object ppField7: TppField
FieldAlias = 'Description de la palette'
FieldName = 'Description'
FieldLength = 64
DisplayWidth = 10
Position = 6
TableName = 't_palette'
end
object ppField8: TppField
FieldAlias = 'Terminal cr?ateur de la palette'
FieldName = 'TermID'
FieldLength = 0
DataType = dtInteger
DisplayWidth = 10
Position = 7
TableName = 't_palette'
end
end
object daSQL1: TdaSQL
DatabaseName = 'dtbDD'
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
DataPipelineName = 'Palette'
LinkColor = clMaroon
MaxSQLFieldAliasLength = 25
SQLText.Strings = (
'SELECT t_palette.IdPalette, t_palette.DtCreation, '
' t_palette.UserCreation, t_palette.Printed, '
' t_palette.IdStatus, t_palette.DateStatus, '
' t_palette.Description, t_palette.TermID'
'FROM t_palette t_palette'
'WHERE ( t_palette.IdStatus = '#39'CREATED'#39' )')
SQLType = sqSQL1
object TdaCriteria
ChildType = 7
Level = 0
Value = 'CREATED'
object TdaField
Alias = 'Etat de la palette'
DisplayWidth = 10
FieldAlias = 'Etat de la palette'
FieldLength = 8
FieldName = 'IdStatus'
SQLFieldName = 'IdStatus'
TableAlias = 'Palette'
TableName = 't_palette'
TableSQLAlias = 't_palette'
end
end
object TdaCriteria
ChildType = 7
Level = 0
object TdaField
Alias = 'Date de l'#39'?tat'
AutoSearch = True
DataType = dtDateTime
DisplayWidth = 10
FieldAlias = 'Date de l'#39'?tat'
FieldLength = 0
FieldName = 'DateStatus'
Mandatory = True
SQLFieldName = 'DateStatus'
TableAlias = 'Palette'
TableName = 't_palette'
TableSQLAlias = 't_palette'
end
end
object TdaField
Alias = 'Palette Unique ID'
DataType = dtInteger
DisplayWidth = 10
FieldAlias = 'Palette Unique ID'
FieldLength = 0
FieldName = 'IdPalette'
SQLFieldName = 'IdPalette'
TableAlias = 'Palette'
TableName = 't_palette'
TableSQLAlias = 't_palette'
end
object TdaField
Alias = 'Date de cr?ation Palette'
DataType = dtDateTime
DisplayWidth = 10
FieldAlias = 'Date de cr?ation Palette'
FieldLength = 0
FieldName = 'DtCreation'
Sortable = False
SQLFieldName = 'DtCreation'
TableAlias = 'Palette'
TableName = 't_palette'
TableSQLAlias = 't_palette'
end
object TdaField
Alias = 'Cr?ateur de la palette'
DisplayWidth = 10
FieldAlias = 'Cr?ateur de la palette'
FieldLength = 8
FieldName = 'UserCreation'
SQLFieldName = 'UserCreation'
TableAlias = 'Palette'
TableName = 't_palette'
TableSQLAlias = 't_palette'
end
object TdaField
Alias = 'Top imprim?e (future use)'
DataType = dtBoolean
DisplayWidth = 10
FieldAlias = 'Top imprim?e (future use)'
FieldLength = 0
FieldName = 'Printed'
SQLFieldName = 'Printed'
TableAlias = 'Palette'
TableName = 't_palette'
TableSQLAlias = 't_palette'
end
object TdaField
Alias = 'Etat de la palette'
DisplayWidth = 10
FieldAlias = 'Etat de la palette'
FieldLength = 8
FieldName = 'IdStatus'
SQLFieldName = 'IdStatus'
TableAlias = 'Palette'
TableName = 't_palette'
TableSQLAlias = 't_palette'
end
object TdaField
Alias = 'Date de l'#39'?tat'
DataType = dtDateTime
DisplayWidth = 10
FieldAlias = 'Date de l'#39'?tat'
FieldLength = 0
FieldName = 'DateStatus'
SQLFieldName = 'DateStatus'
TableAlias = 'Palette'
TableName = 't_palette'
TableSQLAlias = 't_palette'
end
object TdaField
Alias = 'Description de la palette'
DisplayWidth = 10
FieldAlias = 'Description de la palette'
FieldLength = 64
FieldName = 'Description'
SQLFieldName = 'Description'
TableAlias = 'Palette'
TableName = 't_palette'
TableSQLAlias = 't_palette'
end
object TdaField
Alias = 'Terminal cr?ateur de la palette'
DataType = dtInteger
DisplayWidth = 10
FieldAlias = 'Terminal cr?ateur de la palette'
FieldLength = 0
FieldName = 'TermID'
SQLFieldName = 'TermID'
TableAlias = 'Palette'
TableName = 't_palette'
TableSQLAlias = 't_palette'
end
object TdaTable
ChildType = 5
Alias = 'Palette'
JoinType = dajtNone
SQLAlias = 't_palette'
TableAlias = 'Palette'
TableName = 't_palette'
end
end
end
object danxQueryDataView2: TdanxQueryDataView
Report = rpt
UserName = 'Query_T_Contenu'
Height = 129
Left = 276
NameColumnWidth = 105
SizeColumnWidth = 35
SortMode = 0
Top = 10
TypeColumnWidth = 52
Width = 200
AutoSearchTabOrder = 0
MasterDataViewUserName = 'Query_Palette'
object T_Contenu: TppChildDBPipeline
AutoCreateFields = False
MasterDataPipeline = Palette
UserName = 'T_Contenu'
object ppField9: TppField
FieldAlias = 'Idpalette'
FieldName = 'IdPalette'
FieldLength = 0
DataType = dtInteger
DisplayWidth = 10
Position = 0
TableName = 't_contenu'
end
object ppField10: TppField
FieldAlias = 'Iditem'
FieldName = 'IdItem'
FieldLength = 13
DisplayWidth = 10
Position = 1
TableName = 't_contenu'
end
object ppMasterFieldLink1: TppMasterFieldLink
MasterFieldName = 'IdPalette'
DetailFieldName = 'IdPalette'
DetailSortOrder = soAscending
end
end
object daSQL2: TdaSQL
DatabaseName = 'dtbDD'
DataPipelineName = 'T_Contenu'
LinkColor = clNavy
MaxSQLFieldAliasLength = 25
SQLText.Strings = (
'SELECT t_contenu.IdPalette, t_contenu.IdItem'
'FROM t_contenu t_contenu')
SQLType = sqSQL1
object TdaField
Alias = 'Idpalette'
DataType = dtInteger
DisplayWidth = 10
FieldAlias = 'Idpalette'
FieldLength = 0
FieldName = 'IdPalette'
SQLFieldName = 'IdPalette'
TableAlias = 'T Contenu'
TableName = 't_contenu'
TableSQLAlias = 't_contenu'
end
object TdaField
Alias = 'Iditem'
DisplayWidth = 10
FieldAlias = 'Iditem'
FieldLength = 13
FieldName = 'IdItem'
SQLFieldName = 'IdItem'
TableAlias = 'T Contenu'
TableName = 't_contenu'
TableSQLAlias = 't_contenu'
end
object TdaTable
ChildType = 5
Alias = 'T Contenu'
JoinType = dajtNone
SQLAlias = 't_contenu'
TableAlias = 'T Contenu'
TableName = 't_contenu'
end
object TdaSQLLink
ChildType = 9
object TdaField
ChildType = 10
Alias = 'Palette Unique ID'
DataType = dtInteger
DisplayWidth = 10
FieldAlias = 'Palette Unique ID'
FieldLength = 0
FieldName = 'IdPalette'
SQLFieldName = 'IdPalette'
TableAlias = 'Palette'
TableName = 't_palette'
TableSQLAlias = 't_palette'
end
object TdaField
ChildType = 11
Alias = 'Idpalette'
DataType = dtInteger
DisplayWidth = 10
FieldAlias = 'Idpalette'
FieldLength = 0
FieldName = 'IdPalette'
SQLFieldName = 'IdPalette'
TableAlias = 'T Contenu'
TableName = 't_contenu'
TableSQLAlias = 't_contenu'
end
end
end
end
object danxQueryDataView3: TdanxQueryDataView
Report = rpt
UserName = 'Query_T_Item'
Height = 316
Left = 526
NameColumnWidth = 105
SizeColumnWidth = 35
SortMode = 0
Top = 10
TypeColumnWidth = 52
Width = 200
AutoSearchTabOrder = 0
MasterDataViewUserName = 'Query_T_Contenu'
object T_Item: TppChildDBPipeline
AutoCreateFields = False
MasterDataPipeline = T_Contenu
UserName = 'T_Item'
object ppField11: TppField
FieldAlias = 'Iditem'
FieldName = 'IdItem'
FieldLength = 13
DisplayWidth = 10
Position = 0
TableName = 't_item'
end
object ppField12: TppField
FieldAlias = 'Zate'
FieldName = 'Zate'
FieldLength = 10
DisplayWidth = 10
Position = 1
TableName = 't_item'
end
object ppField13: TppField
FieldAlias = 'Zare'
FieldName = 'Zare'
FieldLength = 10
DisplayWidth = 10
Position = 2
TableName = 't_item'
end
object ppField14: TppField
FieldAlias = 'Cdpaysa'
FieldName = 'CdPaysA'
FieldLength = 2
DisplayWidth = 10
Position = 3
TableName = 't_item'
end
object ppField15: TppField
FieldAlias = 'Cdpaysn'
FieldName = 'CdPaysN'
FieldLength = 2
DisplayWidth = 10
Position = 4
TableName = 't_item'
end
object ppField16: TppField
FieldAlias = 'Noarticle'
FieldName = 'NoArticle'
FieldLength = 8
DisplayWidth = 10
Position = 5
TableName = 't_item'
end
object ppField17: TppField
FieldAlias = 'Noserie'
FieldName = 'NoSerie'
FieldLength = 10
DisplayWidth = 10
Position = 6
TableName = 't_item'
end
object ppField18: TppField
FieldAlias = 'Nomainbody'
FieldName = 'NoMainBody'
FieldLength = 8
DisplayWidth = 10
Position = 7
TableName = 't_item'
end
object ppField19: TppField
FieldAlias = 'Descriptionde'
FieldName = 'DescriptionDE'
FieldLength = 64
DisplayWidth = 10
Position = 8
TableName = 't_item'
end
object ppField20: TppField
FieldAlias = 'Descriptionfo'
FieldName = 'DescriptionFO'
FieldLength = 64
DisplayWidth = 10
Position = 9
TableName = 't_item'
end
object ppField21: TppField
FieldAlias = 'Idstatus'
FieldName = 'IdStatus'
FieldLength = 8
DisplayWidth = 10
Position = 10
TableName = 't_item'
end
object ppField22: TppField
FieldAlias = 'Datestatus'
FieldName = 'DateStatus'
FieldLength = 0
DisplayWidth = 10
Position = 11
TableName = 't_item'
end
object ppField23: TppField
FieldAlias = 'Accessoiresback'
FieldName = 'AccessoiresBack'
FieldLength = 0
DataType = dtInteger
DisplayWidth = 10
Position = 12
TableName = 't_item'
end
object ppMasterFieldLink2: TppMasterFieldLink
MasterFieldName = 'IdPalette_2'
DetailFieldName = 'IdPalette_2'
DetailSortOrder = soAscending
end
object ppMasterFieldLink3: TppMasterFieldLink
MasterFieldName = 'IdItem'
DetailFieldName = 'IdItem'
DetailSortOrder = soAscending
end
end
object daSQL3: TdaSQL
DatabaseName = 'dtbDD'
DataPipelineName = 'T_Item'
LinkColor = clGreen
MaxSQLFieldAliasLength = 25
SQLText.Strings = (
'SELECT t_item.IdItem, t_item.Zate, t_item.Zare, '
' t_item.CdPaysA, t_item.CdPaysN, '
' t_item.NoArticle, t_item.NoSerie, '
' t_item.NoMainBody, t_item.DescriptionDE, '
' t_item.DescriptionFO, t_item.IdStatus, '
' t_item.DateStatus, t_item.AccessoiresBack'
'FROM t_item t_item')
SQLType = sqSQL1
object TdaField
Alias = 'Iditem'
DisplayWidth = 10
FieldAlias = 'Iditem'
FieldLength = 13
FieldName = 'IdItem'
SQLFieldName = 'IdItem'
TableAlias = 'T Item'
TableName = 't_item'
TableSQLAlias = 't_item'
end
object TdaField
Alias = 'Zate'
DisplayWidth = 10
FieldAlias = 'Zate'
FieldLength = 10
FieldName = 'Zate'
SQLFieldName = 'Zate'
TableAlias = 'T Item'
TableName = 't_item'
TableSQLAlias = 't_item'
end
object TdaField
Alias = 'Zare'
DisplayWidth = 10
FieldAlias = 'Zare'
FieldLength = 10
FieldName = 'Zare'
SQLFieldName = 'Zare'
TableAlias = 'T Item'
TableName = 't_item'
TableSQLAlias = 't_item'
end
object TdaField
Alias = 'Cdpaysa'
DisplayWidth = 10
FieldAlias = 'Cdpaysa'
FieldLength = 2
FieldName = 'CdPaysA'
SQLFieldName = 'CdPaysA'
TableAlias = 'T Item'
TableName = 't_item'
TableSQLAlias = 't_item'
end
object TdaField
Alias = 'Cdpaysn'
DisplayWidth = 10
FieldAlias = 'Cdpaysn'
FieldLength = 2
FieldName = 'CdPaysN'
SQLFieldName = 'CdPaysN'
TableAlias = 'T Item'
TableName = 't_item'
TableSQLAlias = 't_item'
end
object TdaField
Alias = 'Noarticle'
DisplayWidth = 10
FieldAlias = 'Noarticle'
FieldLength = 8
FieldName = 'NoArticle'
SQLFieldName = 'NoArticle'
TableAlias = 'T Item'
TableName = 't_item'
TableSQLAlias = 't_item'
end
object TdaField
Alias = 'Noserie'
DisplayWidth = 10
FieldAlias = 'Noserie'
FieldLength = 10
FieldName = 'NoSerie'
SQLFieldName = 'NoSerie'
TableAlias = 'T Item'
TableName = 't_item'
TableSQLAlias = 't_item'
end
object TdaField
Alias = 'Nomainbody'
DisplayWidth = 10
FieldAlias = 'Nomainbody'
FieldLength = 8
FieldName = 'NoMainBody'
SQLFieldName = 'NoMainBody'
TableAlias = 'T Item'
TableName = 't_item'
TableSQLAlias = 't_item'
end
object TdaField
Alias = 'Descriptionde'
DisplayWidth = 10
FieldAlias = 'Descriptionde'
FieldLength = 64
FieldName = 'DescriptionDE'
SQLFieldName = 'DescriptionDE'
TableAlias = 'T Item'
TableName = 't_item'
TableSQLAlias = 't_item'
end
object TdaField
Alias = 'Descriptionfo'
DisplayWidth = 10
FieldAlias = 'Descriptionfo'
FieldLength = 64
FieldName = 'DescriptionFO'
SQLFieldName = 'DescriptionFO'
TableAlias = 'T Item'
TableName = 't_item'
TableSQLAlias = 't_item'
end
object TdaField
Alias = 'Idstatus'
DisplayWidth = 10
FieldAlias = 'Idstatus'
FieldLength = 8
FieldName = 'IdStatus'
SQLFieldName = 'IdStatus'
TableAlias = 'T Item'
TableName = 't_item'
TableSQLAlias = 't_item'
end
object TdaField
Alias = 'Datestatus'
DisplayWidth = 10
FieldAlias = 'Datestatus'
FieldLength = 0
FieldName = 'DateStatus'
SQLFieldName = 'DateStatus'
TableAlias = 'T Item'
TableName = 't_item'
TableSQLAlias = 't_item'
end
object TdaField
Alias = 'Accessoiresback'
DataType = dtInteger
DisplayWidth = 10
FieldAlias = 'Accessoiresback'
FieldLength = 0
FieldName = 'AccessoiresBack'
SQLFieldName = 'AccessoiresBack'
TableAlias = 'T Item'
TableName = 't_item'
TableSQLAlias = 't_item'
end
object TdaTable
ChildType = 5
Alias = 'T Item'
JoinType = dajtNone
SQLAlias = 't_item'
TableAlias = 'T Item'
TableName = 't_item'
end
object TdaSQLLink
ChildType = 9
object TdaField
ChildType = 10
Alias = 'Iditem'
DisplayWidth = 10
FieldAlias = 'Iditem'
FieldLength = 13
FieldName = 'IdItem'
SQLFieldName = 'IdItem'
TableAlias = 'T Contenu'
TableName = 't_contenu'
TableSQLAlias = 't_contenu'
end
object TdaField
ChildType = 11
Alias = 'Iditem'
DisplayWidth = 10
FieldAlias = 'Iditem'
FieldLength = 13
FieldName = 'IdItem'
SQLFieldName = 'IdItem'
TableAlias = 'T Item'
TableName = 't_item'
TableSQLAlias = 't_item'
end
end
end
end
end
end
the form in ascii form
object fListeEtats: TfListeEtats
Left = 270
Top = 421
Width = 696
Height = 480
Caption = 'fListeEtats'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnCreate = FormCreate
OnDestroy = FormDestroy
PixelsPerInch = 120
TextHeight = 16
object bReportExplorer: TButton
Left = 69
Top = 305
Width = 129
Height = 31
Caption = 'bReportExplorer'
TabOrder = 0
OnClick = bReportExplorerClick
end
object tFolder: TnxTable
ActiveRuntime = True
ActiveDesigntime = True
Database = SCGCS.dtbSCG
Timeout = 10000
TableName = 'rbFolder'
Left = 24
Top = 32
end
object dsFolder: TDataSource
DataSet = tFolder
Left = 72
Top = 32
end
object ppFolder: TppDBPipeline
DataSource = dsFolder
UserName = 'Folder'
Visible = False
Left = 120
Top = 32
end
object tItem: TnxTable
ActiveRuntime = True
ActiveDesigntime = True
Database = SCGCS.dtbSCG
Timeout = 10000
TableName = 'rbItem'
Left = 24
Top = 88
end
object dsItem: TDataSource
DataSet = tItem
Left = 72
Top = 88
end
object Designer: TppDesigner
AllowDataSettingsChange = True
Caption = 'ReportBuilder'
DataSettings.DatabaseName = 'dtbDD'
DataSettings.SessionType = 'FlashFilerSession'
DataSettings.AllowEditSQL = False
DataSettings.DatabaseType = dtParadox
DataSettings.DataDictionary = dd
DataSettings.IsCaseSensitive = True
DataSettings.SQLType = sqSQL1
DataSettings.UseDataDictionary = True
Position = poScreenCenter
Report = rpt
IniStorageType = 'IniFile'
IniStorageName = '($WINSYS)\RBuilder.ini'
WindowHeight = 400
WindowLeft = 100
WindowTop = 50
WindowWidth = 600
OnCreate = DesignerCreate
Left = 232
Top = 88
end
object RptExplorer: TppReportExplorer
Designer = Designer
FolderFieldNames.FolderId = 'FolderId'
FolderFieldNames.Name = 'Name'
FolderFieldNames.ParentId = 'ParentId'
FolderPipeline = ppFolder
ItemFieldNames.Deleted = 'Deleted'
ItemFieldNames.FolderId = 'FolderId'
ItemFieldNames.ItemId = 'ItemId'
ItemFieldNames.Modified = 'Modified'
ItemFieldNames.Name = 'Name'
ItemFieldNames.Size = 'Size'
ItemFieldNames.Template = 'Template'
ItemFieldNames.ItemType = 'ItemType'
ItemPipeline = ppItem
FormCaption = 'Report Explorer'
FormPosition = poScreenCenter
FormHeight = 400
FormLeft = 100
FormTop = 50
FormWidth = 600
OnCreate = RptExplorerCreate
Left = 232
Top = 40
end
object rpt: TppReport
PrinterSetup.BinName = 'Default'
PrinterSetup.DocumentName = 'Report'
PrinterSetup.PaperName = 'A4'
PrinterSetup.PrinterName = 'Default'
PrinterSetup.mmMarginBottom = 6350
PrinterSetup.mmMarginLeft = 6350
PrinterSetup.mmMarginRight = 6350
PrinterSetup.mmMarginTop = 6350
PrinterSetup.mmPaperHeight = 297000
PrinterSetup.mmPaperWidth = 210000
PrinterSetup.PaperSize = 9
Units = utMillimeters
DeviceType = 'Screen'
OutlineSettings.CreateNode = True
OutlineSettings.CreatePageNodes = True
OutlineSettings.Enabled = False
OutlineSettings.Visible = False
TextSearchSettings.DefaultString = ''
TextSearchSettings.Enabled = False
Left = 232
Top = 144
Version = '7.03'
mmColumnWidth = 0
object ppHeaderBand1: TppHeaderBand
mmBottomOffset = 0
mmHeight = 13229
mmPrintPosition = 0
end
object ppDetailBand1: TppDetailBand
mmBottomOffset = 0
mmHeight = 13229
mmPrintPosition = 0
end
object ppFooterBand1: TppFooterBand
mmBottomOffset = 0
mmHeight = 13229
mmPrintPosition = 0
end
object daDataModule1: TdaDataModule
end
end
object dd: TppDataDictionary
AutoJoin = True
BuilderSettings.DatabaseName = 'dtbDD'
BuilderSettings.SessionType = 'FlashFilerSession'
FieldFieldNames.AutoSearch = 'AutoSearch'
FieldFieldNames.DataType = 'DataType'
FieldFieldNames.FieldName = 'FieldName'
FieldFieldNames.FieldAlias = 'FieldAlias'
FieldFieldNames.Mandatory = 'Mandatory'
FieldFieldNames.Searchable = 'Searchable'
FieldFieldNames.Selectable = 'Selectable'
FieldFieldNames.Sortable = 'Sortable'
FieldFieldNames.TableName = 'TableName'
FieldPipeline = ppField
JoinFieldNames.TableName1 = 'TableName1'
JoinFieldNames.TableName2 = 'TableName2'
JoinFieldNames.JoinType = 'JoinType'
JoinFieldNames.FieldNames1 = 'FieldNames1'
JoinFieldNames.FieldNames2 = 'FieldNames2'
JoinFieldNames.Operators = 'Operators'
JoinPipeline = ppJoin
TableFieldNames.TableName = 'TableName'
TableFieldNames.TableAlias = 'TableAlias'
TablePipeline = ppTable
UserName = 'dd'
ValidateFieldNames = False
ValidateTableNames = False
Left = 304
Top = 88
end
object tTable: TnxTable
ActiveRuntime = True
ActiveDesigntime = True
Session = SCGCS.nxSession1
AliasName = 'SCG'
Timeout = 10000
TableName = 'rbTable'
Left = 384
Top = 32
end
object dsTable: TDataSource
DataSet = tTable
Left = 432
Top = 32
end
object ppTable: TppDBPipeline
DataSource = dsTable
UserName = 'Table'
Visible = False
Left = 480
Top = 32
end
object tField: TnxTable
ActiveRuntime = True
ActiveDesigntime = True
Session = SCGCS.nxSession1
AliasName = 'SCG'
Timeout = 10000
TableName = 'rbField'
Left = 384
Top = 96
end
object dsField: TDataSource
DataSet = tField
Left = 432
Top = 96
end
object tJoin: TnxTable
ActiveRuntime = True
ActiveDesigntime = True
Session = SCGCS.nxSession1
AliasName = 'SCG'
Timeout = 10000
TableName = 'rbJoin'
Left = 384
Top = 160
end
object dsJoin: TDataSource
DataSet = tJoin
Left = 432
Top = 160
end
object ppField: TppDBPipeline
DataSource = dsField
UserName = 'Field'
Visible = False
Left = 480
Top = 96
end
object ppJoin: TppDBPipeline
DataSource = dsJoin
UserName = 'Join'
Visible = False
Left = 480
Top = 160
end
object ppItem: TppDBPipeline
DataSource = dsItem
UserName = 'Item'
Visible = False
Left = 120
Top = 88
end
object dtbDD: TnxDatabase
ActiveRuntime = True
ActiveDesigntime = True
Session = SCGCS.nxSession1
AliasName = 'SCG'
Left = 232
Top = 208
end
end
regards
Didier
This discussion has been closed.
Comments
I was not aware of a daNexusdb Dade plugin and nothing like that has been
tested here. I would suggest contacting the Nexus guys and see if they can
provide some insite on how to use their plugin.
--
Nico Cizik
Digital Metaphors
http://www.digital-metaphors.com