391 lines
12 KiB
Plaintext
391 lines
12 KiB
Plaintext
object MultiLevelDetailService: TMultiLevelDetailService
|
|
OldCreateOrder = True
|
|
SessionManager = MultiLevelDetailServer_DataModule.SessionManager
|
|
AcquireConnection = True
|
|
ServiceSchema = Schema
|
|
ServiceDataStreamer = DataStreamer
|
|
ExportedDataTables = <>
|
|
Left = 357
|
|
Top = 213
|
|
Height = 212
|
|
Width = 216
|
|
object DataStreamer: TDABinDataStreamer
|
|
Left = 32
|
|
Top = 8
|
|
end
|
|
object Schema: TDASchema
|
|
ConnectionManager = MultiLevelDetailServer_DataModule.ConnectionManager
|
|
DataDictionary = MultiLevelDetailServer_DataModule.DataDictionary
|
|
Datasets = <
|
|
item
|
|
Params = <>
|
|
Statements = <
|
|
item
|
|
Connection = 'Northwind'
|
|
TargetTable = 'Categories'
|
|
SQL =
|
|
'SELECT '#10' CategoryID, CategoryName, Description, Picture'#10' FRO' +
|
|
'M'#10' Categories'
|
|
StatementType = stSQL
|
|
ColumnMappings = <
|
|
item
|
|
DatasetField = 'CategoryID'
|
|
TableField = 'CategoryID'
|
|
end
|
|
item
|
|
DatasetField = 'CategoryName'
|
|
TableField = 'CategoryName'
|
|
end
|
|
item
|
|
DatasetField = 'Description'
|
|
TableField = 'Description'
|
|
end
|
|
item
|
|
DatasetField = 'Picture'
|
|
TableField = 'Picture'
|
|
end>
|
|
end>
|
|
Name = 'Categories'
|
|
Fields = <
|
|
item
|
|
Name = 'CategoryID'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
LogChanges = False
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = True
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'CategoryName'
|
|
DataType = datWideString
|
|
Size = 15
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'Description'
|
|
DataType = datMemo
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'Picture'
|
|
DataType = datBlob
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end>
|
|
BusinessRulesClient.ScriptLanguage = rslPascalScript
|
|
BusinessRulesServer.ScriptLanguage = rslPascalScript
|
|
end
|
|
item
|
|
Params = <
|
|
item
|
|
Name = 'CategoryID'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
ParamType = daptInput
|
|
end>
|
|
Statements = <
|
|
item
|
|
Connection = 'Northwind'
|
|
TargetTable = 'Products'
|
|
SQL =
|
|
'SELECT '#10' ProductID, ProductName, SupplierID, CategoryID, Quan' +
|
|
'tityPerUnit, '#10' UnitPrice, UnitsInStock, UnitsOnOrder, Reorder' +
|
|
'Level, '#10' Discontinued'#10'FROM'#10' Products'#10'WHERE'#10' [CategoryID' +
|
|
'] = :CategoryID'#10
|
|
StatementType = stSQL
|
|
ColumnMappings = <
|
|
item
|
|
DatasetField = 'ProductID'
|
|
TableField = 'ProductID'
|
|
end
|
|
item
|
|
DatasetField = 'ProductName'
|
|
TableField = 'ProductName'
|
|
end
|
|
item
|
|
DatasetField = 'SupplierID'
|
|
TableField = 'SupplierID'
|
|
end
|
|
item
|
|
DatasetField = 'CategoryID'
|
|
TableField = 'CategoryID'
|
|
end
|
|
item
|
|
DatasetField = 'QuantityPerUnit'
|
|
TableField = 'QuantityPerUnit'
|
|
end
|
|
item
|
|
DatasetField = 'UnitPrice'
|
|
TableField = 'UnitPrice'
|
|
end
|
|
item
|
|
DatasetField = 'UnitsInStock'
|
|
TableField = 'UnitsInStock'
|
|
end
|
|
item
|
|
DatasetField = 'UnitsOnOrder'
|
|
TableField = 'UnitsOnOrder'
|
|
end
|
|
item
|
|
DatasetField = 'ReorderLevel'
|
|
TableField = 'ReorderLevel'
|
|
end
|
|
item
|
|
DatasetField = 'Discontinued'
|
|
TableField = 'Discontinued'
|
|
end>
|
|
end>
|
|
Name = 'Products'
|
|
Fields = <
|
|
item
|
|
Name = 'ProductID'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
LogChanges = False
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = True
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'ProductName'
|
|
DataType = datWideString
|
|
Size = 40
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'SupplierID'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'CategoryID'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'QuantityPerUnit'
|
|
DataType = datWideString
|
|
Size = 20
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'UnitPrice'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'UnitsInStock'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'UnitsOnOrder'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'ReorderLevel'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'Discontinued'
|
|
DataType = datBoolean
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end>
|
|
BusinessRulesClient.ScriptLanguage = rslPascalScript
|
|
BusinessRulesServer.ScriptLanguage = rslPascalScript
|
|
end
|
|
item
|
|
Params = <
|
|
item
|
|
Name = 'ProductID'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
ParamType = daptInput
|
|
end>
|
|
Statements = <
|
|
item
|
|
Connection = 'Northwind'
|
|
TargetTable = 'Order Details'
|
|
SQL =
|
|
'SELECT '#10' OrderID, ProductID, UnitPrice, Quantity, Discount'#10' ' +
|
|
'FROM'#10' [Order Details]'#10'WHERE'#10' ProductID = :ProductID'#10
|
|
StatementType = stSQL
|
|
ColumnMappings = <
|
|
item
|
|
DatasetField = 'OrderID'
|
|
TableField = 'OrderID'
|
|
end
|
|
item
|
|
DatasetField = 'ProductID'
|
|
TableField = 'ProductID'
|
|
end
|
|
item
|
|
DatasetField = 'UnitPrice'
|
|
TableField = 'UnitPrice'
|
|
end
|
|
item
|
|
DatasetField = 'Quantity'
|
|
TableField = 'Quantity'
|
|
end
|
|
item
|
|
DatasetField = 'Discount'
|
|
TableField = 'Discount'
|
|
end>
|
|
end>
|
|
Name = 'OrderDetails'
|
|
Fields = <
|
|
item
|
|
Name = 'OrderID'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
LogChanges = False
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = True
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'ProductID'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
LogChanges = False
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = True
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'UnitPrice'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'Quantity'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'Discount'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end>
|
|
BusinessRulesClient.ScriptLanguage = rslPascalScript
|
|
BusinessRulesServer.ScriptLanguage = rslPascalScript
|
|
end>
|
|
Commands = <>
|
|
RelationShips = <
|
|
item
|
|
Name = 'FK_Products_Categories'
|
|
MasterDatasetName = 'Categories'
|
|
MasterFields = 'CategoryID'
|
|
DetailDatasetName = 'Products'
|
|
DetailFields = 'CategoryID'
|
|
end>
|
|
UpdateRules = <>
|
|
Left = 32
|
|
Top = 56
|
|
end
|
|
end
|