object DASampleService: TDASampleService OldCreateOrder = True SessionManager = ServerDataModule.SessionManager EventRepository = ServerDataModule.EventRepository ServiceSchema = Schema ServiceDataStreamer = DataStreamer AllowExecuteSQL = True AllowWhereSQL = True AllowExecuteCommands = True ExportedDataTables = <> BeforeProcessDeltas = DataAbstractServiceBeforeProcessDeltas AfterProcessDeltas = DataAbstractServiceAfterProcessDeltas AfterGetDatasetData = DataAbstractServiceAfterGetDatasetData BeforeExecuteCommand = DataAbstractServiceBeforeExecuteCommand ValidateDatasetAccess = DataAbstractServiceValidateDatasetAccess ValidateCommandExecution = DataAbstractServiceValidateCommandExecution ValidateDirectSQLAccess = DataAbstractServiceValidateDirectSQLAccess Height = 165 Width = 769 object DataStreamer: TDABin2DataStreamer Left = 32 Top = 8 end object Schema: TDASchema ConnectionManager = ServerDataModule.ConnectionManager DataDictionary = ServerDataModule.DataDictionary Datasets = < item Params = <> Statements = < item Connection = 'PCTrade.FB' ConnectionType = 'Interbase' TargetTable = 'CLIENTS' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'ClientId' TableField = 'CLIENT_ID' end item DatasetField = 'ClientName' TableField = 'CLIENT_NAME' end item DatasetField = 'ContactPhone' TableField = 'CLIENT_PHONE' end item DatasetField = 'ContactAddress' TableField = 'CLIENT_ADDRESS' end item DatasetField = 'AdditionalInfo' TableField = 'CLIENT_REMARKS' end item DatasetField = 'ClientDiscount' TableField = 'CLIENT_DISCOUNT' end> end item Connection = 'PCTrade.SQLite.AnyDAC' ConnectionType = 'SQLite' TargetTable = 'Customers' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'ClientId' TableField = 'Id' end item DatasetField = 'ClientName' TableField = 'Name' end item DatasetField = 'ContactPhone' TableField = 'Phone' end item DatasetField = 'ContactAddress' TableField = 'Address' end item DatasetField = 'AdditionalInfo' TableField = 'Remarks' end item DatasetField = 'ClientDiscount' TableField = 'Discount' end> end item Connection = 'PCTrade.MSSQL' ConnectionType = 'MSSQL' TargetTable = 'Customers' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'ClientId' TableField = 'Id' end item DatasetField = 'ClientName' TableField = 'Name' end item DatasetField = 'ContactPhone' TableField = 'Phone' end item DatasetField = 'ContactAddress' TableField = 'Address' end item DatasetField = 'AdditionalInfo' TableField = 'Remarks' end item DatasetField = 'ClientDiscount' TableField = 'Discount' end> end> Name = 'Clients' Fields = < item Name = 'ClientId' DataType = datString Size = 38 Required = True InPrimaryKey = True end item Name = 'ClientName' DataType = datWideString Size = 120 Required = True end item Name = 'ContactPhone' DataType = datWideString Size = 50 end item Name = 'ContactAddress' DataType = datWideString Size = 255 end item Name = 'AdditionalInfo' DataType = datWideMemo end item Name = 'ClientDiscount' DataType = datFloat DefaultValue = '0' Required = True end> end item Params = <> Statements = < item Connection = 'PCTrade.SQLite.AnyDAC' ConnectionType = 'SQLite' TargetTable = 'Orders' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'OrderId' TableField = 'Id' end item DatasetField = 'OrderDate' TableField = 'OrderDate' end item DatasetField = 'OrderStatus' TableField = 'OrderStatus' end item DatasetField = 'Client' TableField = 'CustomerId' end> end item Connection = 'PCTrade.FB' ConnectionType = 'Interbase' TargetTable = 'ORDERS' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'OrderId' TableField = 'ORDER_ID' end item DatasetField = 'OrderDate' TableField = 'ORDER_DATE' end item DatasetField = 'OrderStatus' TableField = 'ORDER_STATUS' end item DatasetField = 'Client' TableField = 'CLIENT_ID' end> end item Connection = 'PCTrade.MSSQL' ConnectionType = 'MSSQL' TargetTable = 'Orders' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'OrderId' TableField = 'Id' end item DatasetField = 'OrderDate' TableField = 'OrderDate' end item DatasetField = 'OrderStatus' TableField = 'OrderStatus' end item DatasetField = 'Client' TableField = 'CustomerId' end> end> Name = 'Orders' Fields = < item Name = 'OrderId' DataType = datAutoInc GeneratorName = 'ORDERS_ORDER_ID_GEN' Required = True InPrimaryKey = True end item Name = 'OrderDate' DataType = datDateTime Required = True end item Name = 'OrderStatus' DataType = datByte Required = True end item Name = 'Client' DataType = datString Size = 38 Required = True end> end item Params = <> Statements = < item Connection = 'PCTrade.SQLite.AnyDAC' ConnectionType = 'SQLite' TargetTable = 'OrderDetails' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'DetailId' TableField = 'Id' end item DatasetField = 'Order' TableField = 'OrderId' end item DatasetField = 'Product' TableField = 'ProductId' end item DatasetField = 'Provider' TableField = 'SupplierId' end item DatasetField = 'Quantity' TableField = 'Qty' end item DatasetField = 'Price' TableField = 'Price' end item DatasetField = 'Total' TableField = 'Total' end> end item Connection = 'PCTrade.FB' ConnectionType = 'Interbase' TargetTable = 'ORDER_DETAILS' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'DetailId' TableField = 'DETAIL_ID' end item DatasetField = 'Order' TableField = 'ORDER_ID' end item DatasetField = 'Product' TableField = 'PROD_ID' end item DatasetField = 'Provider' TableField = 'SUPP_ID' end item DatasetField = 'Quantity' TableField = 'QTY' end item DatasetField = 'Price' TableField = 'PRICE' end item DatasetField = 'Total' TableField = 'TOTAL' end> end item Connection = 'PCTrade.MSSQL' ConnectionType = 'MSSQL' TargetTable = 'OrderDetails' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'DetailId' TableField = 'Id' end item DatasetField = 'Order' TableField = 'OrderId' end item DatasetField = 'Product' TableField = 'ProductId' end item DatasetField = 'Provider' TableField = 'SupplierId' end item DatasetField = 'Quantity' TableField = 'Qty' end item DatasetField = 'Price' TableField = 'Price' end item DatasetField = 'Total' TableField = 'Total' end> end> Name = 'OrderDetails' Fields = < item Name = 'DetailId' DataType = datAutoInc GeneratorName = 'ORDER_DETAILS_DETAIL_ID_GEN' Required = True InPrimaryKey = True end item Name = 'Order' DataType = datInteger Required = True end item Name = 'Product' DataType = datString Size = 38 Required = True end item Name = 'Provider' DataType = datString Size = 38 Required = True end item Name = 'Quantity' DataType = datFloat Required = True end item Name = 'Price' DataType = datDecimal Required = True end item Name = 'Total' DataType = datDecimal LogChanges = False Required = True end> end item Params = <> Statements = < item Connection = 'PCTrade.SQLite.AnyDAC' ConnectionType = 'SQLite' TargetTable = 'ProductGroups' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'GroupId' TableField = 'Id' end item DatasetField = 'GroupName' TableField = 'Name' end> end item Connection = 'PCTrade.MSSQL' ConnectionType = 'MSSQL' TargetTable = 'ProductGroups' SQL = 'SELECT '#10' [Id], [Name]'#10' FROM'#10' ProductGroups'#10' WHERE {Where' + '}'#10 StatementType = stSQL ColumnMappings = < item DatasetField = 'GroupId' TableField = 'Id' end item DatasetField = 'GroupName' TableField = 'Name' end> end item Connection = 'PCTrade.FB' ConnectionType = 'Interbase' TargetTable = 'PROD_GROUPS' SQL = 'SELECT '#10' "GROUP_ID", "GROUP_NAME"'#10' FROM'#10' PROD_GROUPS'#10' WH' + 'ERE {Where}'#10 StatementType = stSQL ColumnMappings = < item DatasetField = 'GroupId' TableField = 'GROUP_ID' end item DatasetField = 'GroupName' TableField = 'GROUP_NAME' end> end> Name = 'Groups' Fields = < item Name = 'GroupId' DataType = datInteger Required = True InPrimaryKey = True end item Name = 'GroupName' DataType = datWideString Size = 120 Required = True end> end item Params = <> Statements = < item Connection = 'PCTrade.SQLite.AnyDAC' ConnectionType = 'SQLite' TargetTable = 'Products' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'ProductId' TableField = 'Id' end item DatasetField = 'ProductGroup' TableField = 'GroupId' end item DatasetField = 'ProductCode' TableField = 'PCode' end item DatasetField = 'ProductName' TableField = 'Name' end item DatasetField = 'ProductWarranty' TableField = 'Warranty' end item DatasetField = 'ProductDetails' TableField = 'Remarks' end item DatasetField = 'ProductSeller' TableField = 'VendorId' end item DatasetField = 'IsObsolete' TableField = 'Obsolete' end> end item Connection = 'PCTrade.MSSQL' ConnectionType = 'MSSQL' TargetTable = 'Products' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'ProductId' TableField = 'Id' end item DatasetField = 'ProductGroup' TableField = 'GroupId' end item DatasetField = 'ProductCode' TableField = 'PCode' end item DatasetField = 'ProductName' TableField = 'Name' end item DatasetField = 'ProductWarranty' TableField = 'Warranty' end item DatasetField = 'ProductDetails' TableField = 'Remarks' end item DatasetField = 'ProductSeller' TableField = 'VendorId' end item DatasetField = 'IsObsolete' TableField = 'Obsolete' end> end item Connection = 'PCTrade.FB' ConnectionType = 'Interbase' TargetTable = 'PRODUCTS' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'ProductId' TableField = 'PROD_ID' end item DatasetField = 'ProductGroup' TableField = 'PROD_GROUP' end item DatasetField = 'ProductName' TableField = 'PROD_NAME' end item DatasetField = 'ProductWarranty' TableField = 'PROD_WARRANTY' end item DatasetField = 'ProductDetails' TableField = 'PROD_REMARKS' end item DatasetField = 'ProductSeller' TableField = 'PROD_VENDOR' end item DatasetField = 'IsObsolete' TableField = 'PROD_IS_OBSOLETE' end item DatasetField = 'ProductCode' TableField = 'PROD_CODE' end> end> Name = 'Products' Fields = < item Name = 'ProductId' DataType = datWideString Size = 38 Required = True InPrimaryKey = True end item Name = 'ProductGroup' DataType = datInteger Required = True end item Name = 'ProductCode' DataType = datString Size = 50 Required = True end item Name = 'ProductName' DataType = datWideString Size = 255 Required = True end item Name = 'ProductWarranty' DataType = datByte end item Name = 'ProductDetails' DataType = datBlob BlobType = dabtMemo end item Name = 'ProductSeller' DataType = datWideString Size = 38 end item Name = 'IsObsolete' DataType = datSmallInt Required = True end> end item Params = <> Statements = < item Connection = 'PCTrade.SQLite.AnyDAC' ConnectionType = 'SQLite' TargetTable = 'Vendors' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'DealerId' TableField = 'Id' end item DatasetField = 'DealerName' TableField = 'Name' end item DatasetField = 'DealerUrl' TableField = 'VendorSite' end> end item Connection = 'PCTrade.MSSQL' ConnectionType = 'MSSQL' TargetTable = 'Vendors' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'DealerId' TableField = 'Id' end item DatasetField = 'DealerName' TableField = 'Name' end item DatasetField = 'DealerUrl' TableField = 'VendorSite' end> end item Connection = 'PCTrade.FB' ConnectionType = 'Interbase' TargetTable = 'PROD_VENDORS' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'DealerId' TableField = 'VENDOR_ID' end item DatasetField = 'DealerName' TableField = 'VENDOR_NAME' end item DatasetField = 'DealerUrl' TableField = 'VENDOR_WWW' end> end> Name = 'Dealers' Fields = < item Name = 'DealerId' DataType = datWideString Size = 38 Required = True InPrimaryKey = True end item Name = 'DealerName' DataType = datWideString Size = 120 Required = True end item Name = 'DealerUrl' DataType = datWideString Size = 255 end> end item Params = <> Statements = < item Connection = 'PCTrade.SQLite.AnyDAC' ConnectionType = 'SQLite' TargetTable = 'Prices' SQL = 'SELECT [pl].[ProductID], [pl].[StartDate], [pl].[Price]'#10'FROM [pr' + 'icelist] [pl]'#10' INNER JOIN'#10' ('#10' SELECT [ProductI' + 'D], max([StartDate]) as StartDate'#10#9' FROM [pricelist]'#10#9' GROUP' + ' BY [ProductID]'#10' ) [lastdates]'#10' ON [pl].[productid] =' + ' [lastdates].[productid]'#10' AND [pl].[startdate] = [lastdates' + '].[startdate]'#10'ORDER BY [pl].[ProductID]'#10 StatementType = stSQL ColumnMappings = < item DatasetField = 'Product' TableField = 'ProductId' end item DatasetField = 'Price' TableField = 'Price' end item DatasetField = 'StartDate' TableField = 'StartDate' end> end item Connection = 'PCTrade.FB' ConnectionType = 'Interbase' TargetTable = 'PRICES' SQL = 'SELECT "PL"."PROD_ID", "PL"."START_DATE", "PL"."PRICE"'#10'FROM "PRI' + 'CES" "PL"'#10' INNER JOIN'#10' ('#10' SELECT "PROD_ID", ma' + 'x("START_DATE") as START_DATE'#10#9' FROM "PRICES"'#10#9' GROUP BY "PR' + 'OD_ID"'#10' ) "LASTDATES"'#10' ON "PL"."PROD_ID" = "LASTDATES' + '"."PROD_ID"'#10' AND "PL"."START_DATE" = "LASTDATES"."START_DAT' + 'E"'#10'ORDER BY "PL"."PROD_ID"'#10 StatementType = stSQL ColumnMappings = < item DatasetField = 'Product' TableField = 'PROD_ID' end item DatasetField = 'StartDate' TableField = 'START_DATE' end item DatasetField = 'Price' TableField = 'PRICE' end> end item Connection = 'PCTrade.MSSQL' ConnectionType = 'MSSQL' TargetTable = 'PriceList' SQL = 'SELECT [pl].[ProductID], [pl].[StartDate], [pl].[Price]'#10'FROM [pr' + 'icelist] [pl]'#10' INNER JOIN'#10' ('#10' SELECT [ProductI' + 'D], max([StartDate]) as StartDate'#10#9' FROM [pricelist]'#10#9' GROUP' + ' BY [ProductID]'#10' ) [lastdates]'#10' ON [pl].[productid] =' + ' [lastdates].[productid]'#10' AND [pl].[startdate] = [lastdates' + '].[startdate]'#10'ORDER BY [pl].[ProductID]'#10 StatementType = stSQL ColumnMappings = < item DatasetField = 'StartDate' TableField = 'StartDate' end item DatasetField = 'Price' TableField = 'Price' end item DatasetField = 'Product' TableField = 'ProductId' end> end> Name = 'Prices' Fields = < item Name = 'Product' DataType = datWideString Size = 38 Required = True InPrimaryKey = True end item Name = 'StartDate' DataType = datDateTime Required = True InPrimaryKey = True end item Name = 'Price' DataType = datFloat Required = True end> end item Params = <> Statements = < item Connection = 'PCTrade.FB' ConnectionType = 'Interbase' TargetTable = 'SUPPLIERS' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'ProviderId' TableField = 'SUPP_ID' end item DatasetField = 'ProviderName' TableField = 'SUPP_NAME' end item DatasetField = 'ProviderPhone' TableField = 'SUPP_PHONE' end item DatasetField = 'ProviderAddress' TableField = 'SUPP_ADDRESS' end item DatasetField = 'ProviderRemarks' TableField = 'SUPP_REMARKS' end> end item Connection = 'PCTrade.SQLite.AnyDAC' ConnectionType = 'SQLite' TargetTable = 'Supplier' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'ProviderId' TableField = 'Id' end item DatasetField = 'ProviderName' TableField = 'Name' end item DatasetField = 'ProviderPhone' TableField = 'Phone' end item DatasetField = 'ProviderAddress' TableField = 'Address' end item DatasetField = 'ProviderRemarks' TableField = 'Remarks' end> end item Connection = 'PCTrade.MSSQL' ConnectionType = 'MSSQL' TargetTable = 'Suppliers' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'ProviderId' TableField = 'Id' end item DatasetField = 'ProviderName' TableField = 'Name' end item DatasetField = 'ProviderPhone' TableField = 'Phone' end item DatasetField = 'ProviderAddress' TableField = 'Address' end item DatasetField = 'ProviderRemarks' TableField = 'Remarks' end> end> Name = 'Providers' Fields = < item Name = 'ProviderId' DataType = datWideString Size = 38 Required = True InPrimaryKey = True end item Name = 'ProviderName' DataType = datWideString Size = 120 Required = True end item Name = 'ProviderPhone' DataType = datWideString Size = 50 end item Name = 'ProviderAddress' DataType = datWideString Size = 255 end item Name = 'ProviderRemarks' DataType = datWideMemo end> end item Params = <> Statements = < item Connection = 'PCTrade.MSSQL' ConnectionType = 'MSSQL' TargetTable = 'Employees' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'WorkerID' TableField = 'EmployeeID' end item DatasetField = 'WorkerLastName' TableField = 'LastName' end item DatasetField = 'WorkerFirstName' TableField = 'FirstName' end item DatasetField = 'WorkerBirthDate' TableField = 'BirthDate' end item DatasetField = 'WorkerHireDate' TableField = 'HireDate' end item DatasetField = 'WorkerPosition' TableField = 'Position' end item DatasetField = 'WorkerAddress' TableField = 'Address' end item DatasetField = 'WorkerCity' TableField = 'City' end item DatasetField = 'WorkerZip' TableField = 'PostalCode' end item DatasetField = 'WorkerCountry' TableField = 'Country' end item DatasetField = 'WorkerPhone' TableField = 'HomePhone' end item DatasetField = 'WorkerPhoto' TableField = 'Photo' end item DatasetField = 'WorkerNotes' TableField = 'Notes' end> end item Connection = 'PCTrade.FB' ConnectionType = 'Interbase' TargetTable = 'SALESMEN' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'WorkerID' TableField = 'ID' end item DatasetField = 'WorkerLastName' TableField = 'LASTNAME' end item DatasetField = 'WorkerFirstName' TableField = 'FIRSTNAME' end item DatasetField = 'WorkerBirthDate' TableField = 'BIRTHDATE' end item DatasetField = 'WorkerHireDate' TableField = 'HIREDATE' end item DatasetField = 'WorkerPosition' TableField = 'TITLE' end item DatasetField = 'WorkerAddress' TableField = 'ADDRESS' end item DatasetField = 'WorkerCity' TableField = 'CITY' end item DatasetField = 'WorkerZip' TableField = 'POSTALCODE' end item DatasetField = 'WorkerCountry' TableField = 'COUNTRY' end item DatasetField = 'WorkerPhone' TableField = 'PHONE' end item DatasetField = 'WorkerPhoto' TableField = 'PHOTO' end item DatasetField = 'WorkerNotes' TableField = 'REMARKS' end> end item Connection = 'PCTrade.SQLite.AnyDAC' ConnectionType = 'SQLite' TargetTable = 'Employees' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'WorkerID' TableField = 'Id' end item DatasetField = 'WorkerLastName' TableField = 'LastName' end item DatasetField = 'WorkerFirstName' TableField = 'FirstName' end item DatasetField = 'WorkerBirthDate' TableField = 'BirthDate' end item DatasetField = 'WorkerHireDate' TableField = 'HireDate' end item DatasetField = 'WorkerPosition' TableField = 'Job' end item DatasetField = 'WorkerAddress' TableField = 'Address' end item DatasetField = 'WorkerCity' TableField = 'City' end item DatasetField = 'WorkerZip' TableField = 'PostalCode' end item DatasetField = 'WorkerCountry' TableField = 'Country' end item DatasetField = 'WorkerPhone' TableField = 'HomePhone' end item DatasetField = 'WorkerPhoto' TableField = 'Photo' end item DatasetField = 'WorkerNotes' TableField = 'Notes' end> end> Name = 'Workers' Fields = < item Name = 'WorkerID' DataType = datLargeAutoInc GeneratorName = 'SALESMEN_ID_GEN' Required = True InPrimaryKey = True end item Name = 'WorkerLastName' DataType = datWideString Size = 20 Required = True DisplayLabel = 'LastName' end item Name = 'WorkerFirstName' DataType = datWideString Size = 10 Required = True DisplayLabel = 'FirstName' end item Name = 'WorkerBirthDate' DataType = datDateTime DisplayLabel = 'BirthDate' end item Name = 'WorkerHireDate' DataType = datDateTime DisplayLabel = 'HireDate' end item Name = 'WorkerPosition' DataType = datWideString Size = 30 DisplayLabel = 'Position' end item Name = 'WorkerAddress' DataType = datWideString Size = 60 DisplayLabel = 'Address' end item Name = 'WorkerCity' DataType = datWideString Size = 15 DisplayLabel = 'City' end item Name = 'WorkerZip' DataType = datWideString Size = 10 DisplayLabel = 'Zip' end item Name = 'WorkerCountry' DataType = datWideString Size = 15 DisplayLabel = 'Country' end item Name = 'WorkerPhone' DataType = datWideString Size = 24 DisplayLabel = 'Phone' end item Name = 'WorkerPhoto' DataType = datBlob DisplayLabel = 'Photo' end item Name = 'WorkerNotes' DataType = datWideMemo BlobType = dabtMemo DisplayLabel = 'Notes' end> end item Params = <> Statements = < item Connection = 'PCTrade.FB' ConnectionType = 'Interbase' TargetTable = 'PROD_VENDORS' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'SellerId' TableField = 'VENDOR_ID' end item DatasetField = 'SellerName' TableField = 'VENDOR_NAME' end item DatasetField = 'SellerSite' TableField = 'VENDOR_WWW' end item DatasetField = 'SellerCode' TableField = 'VENDOR_CODE' end> end item Connection = 'PCTrade.MSSQL' ConnectionType = 'MSSQL' TargetTable = 'Vendors' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'SellerId' TableField = 'Id' end item DatasetField = 'SellerName' TableField = 'Name' end item DatasetField = 'SellerSite' TableField = 'VendorSite' end item DatasetField = 'SellerCode' TableField = 'VCode' end> end item Connection = 'PCTrade.SQLite.AnyDAC' ConnectionType = 'SQLite' TargetTable = 'Vendors' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'SellerId' TableField = 'Id' end item DatasetField = 'SellerName' TableField = 'Name' end item DatasetField = 'SellerSite' TableField = 'VendorSite' end item DatasetField = 'SellerCode' TableField = 'VCode' end> end> Name = 'Sellers' Fields = < item Name = 'SellerId' DataType = datWideString Size = 38 Required = True InPrimaryKey = True end item Name = 'SellerName' DataType = datWideString Size = 100 Required = True end item Name = 'SellerSite' DataType = datWideString Size = 255 end item Name = 'SellerCode' DataType = datWideString Size = 10 Required = True end> end item Params = <> Statements = < item Connection = 'PCTrade.FB' ConnectionType = 'Interbase' TargetTable = 'SALESMEN' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'Id' TableField = 'ID' end item DatasetField = 'LastName' TableField = 'LASTNAME' end item DatasetField = 'FirstName' TableField = 'FIRSTNAME' end item DatasetField = 'BirthDate' TableField = 'BIRTHDATE' end item DatasetField = 'Position' TableField = 'TITLE' end item DatasetField = 'Address' TableField = 'ADDRESS' end item DatasetField = 'Phone' TableField = 'PHONE' end> end item Connection = 'PCTrade.SQLite.AnyDAC' ConnectionType = 'SQLite' TargetTable = 'Employees' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'Id' TableField = 'Id' end item DatasetField = 'LastName' TableField = 'LastName' end item DatasetField = 'FirstName' TableField = 'FirstName' end item DatasetField = 'BirthDate' TableField = 'BirthDate' end item DatasetField = 'Position' TableField = 'HireDate' end item DatasetField = 'Address' TableField = 'Address' end item DatasetField = 'Phone' TableField = 'HomePhone' end> end item Connection = 'PCTrade.MSSQL' ConnectionType = 'MSSQL' TargetTable = 'Employees' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'Id' TableField = 'EmployeeID' end item DatasetField = 'LastName' TableField = 'LastName' end item DatasetField = 'FirstName' TableField = 'FirstName' end item DatasetField = 'BirthDate' TableField = 'BirthDate' end item DatasetField = 'Position' TableField = 'Position' end item DatasetField = 'Address' TableField = 'Address' end item DatasetField = 'Phone' TableField = 'HomePhone' end> end> Name = 'BPWorkers' Fields = < item Name = 'Id' DataType = datAutoInc GeneratorName = 'SALESMEN_ID_GEN' Required = True InPrimaryKey = True end item Name = 'LastName' DataType = datWideString Size = 20 Required = True end item Name = 'FirstName' DataType = datWideString Size = 10 Required = True end item Name = 'BirthDate' DataType = datDateTime end item Name = 'Position' DataType = datWideString Size = 30 end item Name = 'Address' DataType = datWideString Size = 60 end item Name = 'Phone' DataType = datWideString Size = 24 end> end item Params = <> Statements = < item Connection = 'PCTrade.FB' ConnectionType = 'Interbase' TargetTable = 'SUPPLIERS' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'Id' TableField = 'SUPP_ID' end item DatasetField = 'Name' TableField = 'SUPP_NAME' end item DatasetField = 'Phone' TableField = 'SUPP_PHONE' end item DatasetField = 'Address' TableField = 'SUPP_ADDRESS' end> end item Connection = 'PCTrade.SQLite.AnyDAC' ConnectionType = 'SQLite' TargetTable = 'SUPPLIER' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'Id' TableField = 'Id' end item DatasetField = 'Name' TableField = 'Name' end item DatasetField = 'Phone' TableField = 'Phone' end item DatasetField = 'Address' TableField = 'Address' end> end item Connection = 'PCTrade.MSSQL' ConnectionType = 'MSSQL' TargetTable = 'Suppliers' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'Id' TableField = 'Id' end item DatasetField = 'Name' TableField = 'Name' end item DatasetField = 'Phone' TableField = 'Phone' end item DatasetField = 'Address' TableField = 'Address' end> end> Name = 'BPProviders' Fields = < item Name = 'Id' DataType = datString Size = 38 Required = True InPrimaryKey = True end item Name = 'Name' DataType = datWideString Size = 120 Required = True end item Name = 'Phone' DataType = datWideString Size = 50 end item Name = 'Address' DataType = datWideString Size = 255 end> end item Params = <> Statements = < item Connection = 'PCTrade.FB' ConnectionType = 'Interbase' TargetTable = 'CLIENTS' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'Id' TableField = 'CLIENT_ID' end item DatasetField = 'Name' TableField = 'CLIENT_NAME' end item DatasetField = 'Phone' TableField = 'CLIENT_PHONE' end item DatasetField = 'Address' TableField = 'CLIENT_ADDRESS' end item DatasetField = 'Remarks' TableField = 'CLIENT_REMARKS' end item DatasetField = 'Discount' TableField = 'CLIENT_DISCOUNT' end> end item Connection = 'PCTrade.SQLite.AnyDAC' ConnectionType = 'SQLite' TargetTable = 'Customers' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'Id' TableField = 'Id' end item DatasetField = 'Name' TableField = 'Name' end item DatasetField = 'Phone' TableField = 'Phone' end item DatasetField = 'Address' TableField = 'Address' end item DatasetField = 'Remarks' TableField = 'Remarks' end item DatasetField = 'Discount' TableField = 'Discount' end> end item Connection = 'PCTrade.MSSQL' ConnectionType = 'MSSQL' TargetTable = 'Customers' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'Id' TableField = 'Id' end item DatasetField = 'Name' TableField = 'Name' end item DatasetField = 'Phone' TableField = 'Phone' end item DatasetField = 'Address' TableField = 'Address' end item DatasetField = 'Remarks' TableField = 'Remarks' end item DatasetField = 'Discount' TableField = 'Discount' end> end> Name = 'BPClients' Fields = < item Name = 'Id' DataType = datString Size = 38 Required = True InPrimaryKey = True end item Name = 'Name' DataType = datWideString Size = 120 Required = True end item Name = 'Phone' DataType = datWideString Size = 50 end item Name = 'Address' DataType = datWideString Size = 255 end item Name = 'Remarks' DataType = datWideMemo end item Name = 'Discount' DataType = datFloat Required = True end> end> JoinDataTables = <> UnionDataTables = < item Params = <> Statements = <> Name = 'UnionAddresses' Fields = < item Name = 'Id' DataType = datWideString Size = 38 InPrimaryKey = True end item Name = 'Name' DataType = datWideString Size = 120 end item Name = 'ContactPhone' DataType = datWideString Size = 50 end item Name = 'ContactAddress' DataType = datWideString Size = 255 end> SourceTables = < item Name = 'Providers' ColumnMappings = < item DatasetField = 'Id' TableField = 'ProviderId' end item DatasetField = 'Name' TableField = 'ProviderName' end item DatasetField = 'ContactPhone' TableField = 'ProviderPhone' end item DatasetField = 'ContactAddress' TableField = 'ProviderAddress' end> IsReadOnly = False end item Name = 'Clients' ColumnMappings = < item DatasetField = 'Id' TableField = 'ClientId' end item DatasetField = 'Name' TableField = 'ClientName' end item DatasetField = 'ContactPhone' TableField = 'ContactPhone' end item DatasetField = 'ContactAddress' TableField = 'ContactAddress' end> IsReadOnly = False end> end> Commands = < item Params = < item Name = 'LastName' DataType = datWideString Size = 20 Value = '' end item Name = 'FirstName' DataType = datWideString Size = 10 Value = '' end item Name = 'BirthDate' DataType = datDateTime Value = '' end item Name = 'Position' DataType = datWideString Size = 30 Value = '' end item Name = 'Address' DataType = datWideString Size = 60 Value = '' end item Name = 'Phone' DataType = datWideString Size = 24 Value = '' end> Statements = < item Connection = 'PCTrade.FB' ConnectionType = 'Interbase' TargetTable = 'SALESMEN' SQL = 'INSERT INTO SALESMEN (LASTNAME, FIRSTNAME, BIRTHDATE, TITLE, ADD' + 'RESS, PHONE)'#10'VALUES (:LastName, :FirstName, :BirthDate, :Positio' + 'n, :Address, :Phone)'#10 StatementType = stSQL ColumnMappings = <> end item Connection = 'PCTrade.SQLite.AnyDAC' ConnectionType = 'SQLite' TargetTable = 'Employees' SQL = '-- Called schema command "Insert_BPWorkers"'#10'INSERT'#10' INTO "Emplo' + 'yees"'#10' ("LastName", "FirstName", "BirthDate", "HireDate", "Ad' + 'dress", '#10' "HomePhone")'#10' VALUES'#10' (:LastName, :FirstName, ' + ':BirthDate, :Position, :Address, '#10' :Phone)'#10 StatementType = stSQL ColumnMappings = <> end item Connection = 'PCTrade.MSSQL' ConnectionType = 'MSSQL' TargetTable = 'Employees' SQL = '-- Called schema command "Insert_BPWorkers"'#10'INSERT'#10' INTO "Emplo' + 'yees"'#10' ("LastName", "FirstName", "BirthDate", "Position", "Ad' + 'dress", '#10' "HomePhone")'#10' VALUES'#10' (:LastName, :FirstName, ' + ':BirthDate, :Position, :Address, '#10' :Phone)'#10 StatementType = stSQL ColumnMappings = <> end> Name = 'Insert_BPWorkers' end item Params = < item Name = 'OLD_Id' DataType = datAutoInc Value = '' end> Statements = < item Connection = 'PCTrade.FB' ConnectionType = 'Interbase' TargetTable = 'SALESMEN' SQL = 'DELETE FROM SALESMEN WHERE (ID = :OLD_Id)'#10 StatementType = stSQL ColumnMappings = <> end item Connection = 'PCTrade.SQLite.AnyDAC' ConnectionType = 'SQLite' TargetTable = 'Employees' SQL = '-- Called schema command "Delete_BPWorkers"'#10'DELETE '#10' FROM'#10' "' + 'Employees"'#10' WHERE'#10' ("Id" = :OLD_Id)'#10 StatementType = stSQL ColumnMappings = <> end item Connection = 'PCTrade.MSSQL' ConnectionType = 'MSSQL' TargetTable = 'Employees' SQL = '-- Called schema command "Delete_BPWorkers"'#10'DELETE '#10' FROM'#10' "' + 'Employees"'#10' WHERE'#10' ("EmployeeID" = :OLD_Id)'#10 StatementType = stSQL ColumnMappings = <> end> Name = 'Delete_BPWorkers' end item Params = < item Name = 'LastName' DataType = datWideString Size = 20 Value = '' end item Name = 'FirstName' DataType = datWideString Size = 10 Value = '' end item Name = 'BirthDate' DataType = datDateTime Value = '' end item Name = 'Position' DataType = datWideString Size = 30 Value = '' end item Name = 'Address' DataType = datWideString Size = 60 Value = '' end item Name = 'Phone' DataType = datWideString Size = 24 Value = '' end item Name = 'OLD_Id' DataType = datAutoInc Value = '' end> Statements = < item Connection = 'PCTrade.FB' ConnectionType = 'Interbase' TargetTable = 'SALESMEN' SQL = 'UPDATE SALESMEN'#10' SET '#10' LASTNAME = :LastName,'#10' FIRSTNAME =' + ' :FirstName,'#10' BIRTHDATE = :BirthDate,'#10' TITLE = :Position,'#10 + ' ADDRESS = :Address,'#10' PHONE = :Phone'#10' WHERE'#10' (ID = :OL' + 'D_Id)'#10 StatementType = stSQL ColumnMappings = <> end item Connection = 'PCTrade.SQLite.AnyDAC' ConnectionType = 'SQLite' TargetTable = 'Employees' SQL = '-- Called schema command "Update_BPWorkers"'#10'UPDATE "Employees"'#10' ' + ' SET '#10' "LastName" = :LastName, '#10' "FirstName" = :FirstName,' + ' '#10' "BirthDate" = :BirthDate, '#10' "HireDate" = :Position, '#10' ' + ' "Address" = :Address, '#10' "HomePhone" = :Phone'#10' WHERE'#10' ("' + 'Id" = :OLD_Id)'#10 StatementType = stSQL ColumnMappings = <> end item Connection = 'PCTrade.MSSQL' ConnectionType = 'MSSQL' TargetTable = 'Employees' SQL = '-- Called schema command "Update_BPWorkers"'#10'UPDATE "Employees"'#10' ' + ' SET '#10' "LastName" = :LastName, '#10' "FirstName" = :FirstName,' + ' '#10' "BirthDate" = :BirthDate, '#10' "Position" = :Position, '#10' ' + ' "Address" = :Address, '#10' "HomePhone" = :Phone'#10' WHERE'#10' ("' + 'EmployeeID" = :OLD_Id)'#10 StatementType = stSQL ColumnMappings = <> end> Name = 'Update_BPWorkers' end> RelationShips = < item Name = 'FK_PRODUCTS_PROD_GROUPS' MasterDatasetName = 'Groups' MasterFields = 'GroupId' DetailDatasetName = 'Products' DetailFields = 'ProductGroup' RelationshipType = rtForeignKey end item Name = 'FK_PRODUCTS_PROD_VENDORS' MasterDatasetName = 'Dealers' MasterFields = 'DealerId' DetailDatasetName = 'Products' DetailFields = 'ProductSeller' RelationshipType = rtForeignKey end item Name = 'Products_OrderDetails' MasterDatasetName = 'Products' MasterFields = 'ProductId' DetailDatasetName = 'OrderDetails' DetailFields = 'Product' RelationshipType = rtForeignKey end item Name = 'FK_Prices_Products' MasterDatasetName = 'Products' MasterFields = 'ProductId' DetailDatasetName = 'Prices' DetailFields = 'Product' RelationshipType = rtForeignKey end item Name = 'FK_OrderDetails_Orders' MasterDatasetName = 'Orders' MasterFields = 'OrderId' DetailDatasetName = 'OrderDetails' DetailFields = 'Order' RelationshipType = rtForeignKey end item Name = 'FK_Orders_Clients' MasterDatasetName = 'Clients' MasterFields = 'ClientId' DetailDatasetName = 'Orders' DetailFields = 'Client' RelationshipType = rtForeignKey end> UpdateRules = <> OnGetSQL = SchemaGetSQL Version = 0 Left = 32 Top = 56 end object bpBPWorkers: TDABusinessProcessor OnBeforeProcessDelta = BusinessProcessorBeforeProcessDelta OnGenerateSQL = BusinessProcessorGenerateSQL Schema = Schema InsertCommandName = 'Insert_BPWorkers' DeleteCommandName = 'Delete_BPWorkers' UpdateCommandName = 'Update_BPWorkers' ReferencedDataset = 'BPWorkers' ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands] UpdateMode = updWhereKeyOnly Left = 128 Top = 8 end object bpBPClients: TDABusinessProcessor OnBeforeProcessDelta = BusinessProcessorBeforeProcessDelta OnBeforeProcessChange = bpBPClientsBeforeProcessChange OnGenerateSQL = BusinessProcessorGenerateSQL Schema = Schema ReferencedDataset = 'BPClients' ProcessorOptions = [poAutoGenerateInsert, poAutoGenerateUpdate, poAutoGenerateDelete, poAutoGenerateRefreshDataset, poPrepareCommands] UpdateMode = updWhereKeyOnly Left = 200 Top = 8 end object bpBPProviders: TDABusinessProcessor OnBeforeProcessDelta = BusinessProcessorBeforeProcessDelta OnGenerateSQL = BusinessProcessorGenerateSQL Schema = Schema ReferencedDataset = 'BPProviders' ProcessorOptions = [poAutoGenerateInsert, poAutoGenerateUpdate, poAutoGenerateDelete, poAutoGenerateRefreshDataset, poPrepareCommands] UpdateMode = updWhereKeyOnly Left = 280 Top = 8 end object bpClients: TDABusinessProcessor OnBeforeProcessDelta = BusinessProcessorBeforeProcessDelta OnGenerateSQL = BusinessProcessorGenerateSQL Schema = Schema ReferencedDataset = 'Clients' ProcessorOptions = [poAutoGenerateInsert, poAutoGenerateUpdate, poAutoGenerateDelete, poAutoGenerateRefreshDataset, poPrepareCommands] UpdateMode = updWhereKeyOnly Left = 128 Top = 64 end object bpDealers: TDABusinessProcessor OnBeforeProcessDelta = BusinessProcessorBeforeProcessDelta OnGenerateSQL = BusinessProcessorGenerateSQL Schema = Schema ReferencedDataset = 'Dealers' ProcessorOptions = [poAutoGenerateInsert, poAutoGenerateUpdate, poAutoGenerateDelete, poAutoGenerateRefreshDataset, poPrepareCommands] UpdateMode = updWhereKeyOnly Left = 184 Top = 64 end object bpGroups: TDABusinessProcessor OnBeforeProcessDelta = BusinessProcessorBeforeProcessDelta OnGenerateSQL = BusinessProcessorGenerateSQL Schema = Schema ReferencedDataset = 'Groups' ProcessorOptions = [poAutoGenerateInsert, poAutoGenerateUpdate, poAutoGenerateDelete, poAutoGenerateRefreshDataset, poPrepareCommands] UpdateMode = updWhereKeyOnly Left = 240 Top = 64 end object bpOrderDetails: TDABusinessProcessor OnBeforeProcessDelta = BusinessProcessorBeforeProcessDelta OnGenerateSQL = BusinessProcessorGenerateSQL Schema = Schema ReferencedDataset = 'OrderDetails' ProcessorOptions = [poAutoGenerateInsert, poAutoGenerateUpdate, poAutoGenerateDelete, poAutoGenerateRefreshDataset, poPrepareCommands] UpdateMode = updWhereKeyOnly Left = 304 Top = 64 end object bpOrders: TDABusinessProcessor OnBeforeProcessDelta = BusinessProcessorBeforeProcessDelta OnGenerateSQL = BusinessProcessorGenerateSQL Schema = Schema ReferencedDataset = 'Orders' ProcessorOptions = [poAutoGenerateInsert, poAutoGenerateUpdate, poAutoGenerateDelete, poAutoGenerateRefreshDataset, poPrepareCommands] UpdateMode = updWhereKeyOnly Left = 376 Top = 64 end object bpPrices: TDABusinessProcessor OnBeforeProcessDelta = BusinessProcessorBeforeProcessDelta OnGenerateSQL = BusinessProcessorGenerateSQL Schema = Schema ReferencedDataset = 'Prices' ProcessorOptions = [poAutoGenerateInsert, poAutoGenerateUpdate, poAutoGenerateDelete, poAutoGenerateRefreshDataset, poPrepareCommands] UpdateMode = updWhereKeyOnly Left = 440 Top = 64 end object bpProducts: TDABusinessProcessor OnBeforeProcessDelta = BusinessProcessorBeforeProcessDelta OnGenerateSQL = BusinessProcessorGenerateSQL Schema = Schema ReferencedDataset = 'Products' ProcessorOptions = [poAutoGenerateInsert, poAutoGenerateUpdate, poAutoGenerateDelete, poAutoGenerateRefreshDataset, poPrepareCommands] UpdateMode = updWhereKeyOnly Left = 504 Top = 64 end object bpProviders: TDABusinessProcessor OnBeforeProcessDelta = BusinessProcessorBeforeProcessDelta OnGenerateSQL = BusinessProcessorGenerateSQL Schema = Schema ReferencedDataset = 'Providers' ProcessorOptions = [poAutoGenerateInsert, poAutoGenerateUpdate, poAutoGenerateDelete, poAutoGenerateRefreshDataset, poPrepareCommands] UpdateMode = updWhereKeyOnly Left = 568 Top = 64 end object bpSellers: TDABusinessProcessor OnBeforeProcessDelta = BusinessProcessorBeforeProcessDelta OnGenerateSQL = BusinessProcessorGenerateSQL Schema = Schema ReferencedDataset = 'Sellers' ProcessorOptions = [poAutoGenerateInsert, poAutoGenerateUpdate, poAutoGenerateDelete, poAutoGenerateRefreshDataset, poPrepareCommands] UpdateMode = updWhereKeyOnly Left = 632 Top = 64 end object bpWorkers: TDABusinessProcessor OnBeforeProcessDelta = BusinessProcessorBeforeProcessDelta OnGenerateSQL = BusinessProcessorGenerateSQL Schema = Schema ReferencedDataset = 'Workers' ProcessorOptions = [poAutoGenerateInsert, poAutoGenerateUpdate, poAutoGenerateDelete, poAutoGenerateRefreshDataset, poPrepareCommands] UpdateMode = updWhereKeyOnly Left = 696 Top = 64 end end