object ServiceMethods_Service: TServiceMethods_Service OldCreateOrder = True OnCreate = DataAbstractServiceCreate OnDestroy = DataAbstractServiceDestroy OnActivate = DataAbstractServiceActivate OnDeactivate = DataAbstractServiceDeactivate AcquireConnection = False ServiceSchema = DASchema ServiceDataStreamer = BinDataStreamer ExportedDataTables = <> BeforeAcquireConnection = DataAbstractServiceBeforeAcquireConnection AfterAcquireConnection = DataAbstractServiceAfterAcquireConnection BeforeReleaseConnection = DataAbstractServiceBeforeReleaseConnection AfterReleaseConnection = DataAbstractServiceAfterReleaseConnection OnAcquireConnectionFailure = DataAbstractServiceAcquireConnectionFailure BeforeProcessDeltas = DataAbstractServiceBeforeProcessDeltas AfterProcessDeltas = DataAbstractServiceAfterProcessDeltas OnProcessDeltasError = DataAbstractServiceProcessDeltasError BeforeGetDatasetSchema = DataAbstractServiceBeforeGetDatasetSchema BeforeGetDatasetData = DataAbstractServiceBeforeGetDatasetData AfterGetDatasetSchema = DataAbstractServiceAfterGetDatasetSchema AfterGetDatasetData = DataAbstractServiceAfterGetDatasetData OnBusinessProcessorAutoCreated = DataAbstractServiceBusinessProcessorAutoCreated BeforeExecuteCommand = DataAbstractServiceBeforeExecuteCommand AfterExecuteCommand = DataAbstractServiceAfterExecuteCommand OnGetSchemaAsXMLEvent = DataAbstractServiceGetSchemaAsXMLEvent ValidateDatasetAccess = DataAbstractServiceValidateDatasetAccess ValidateCommandExecution = DataAbstractServiceValidateCommandExecution ValidateDirectSQLAccess = DataAbstractServiceValidateDirectSQLAccess OnUpdateDataBeginTransaction = DataAbstractServiceUpdateDataBeginTransaction OnUpdateDataCommitTransaction = DataAbstractServiceUpdateDataCommitTransaction OnUpdateDataRollBackTransaction = DataAbstractServiceUpdateDataRollBackTransaction Left = 576 Top = 180 Height = 300 Width = 300 object BinDataStreamer: TDABinDataStreamer Left = 29 Top = 10 end object DASchema: TDASchema ConnectionManager = ServiceMethods_ServerMainForm.ConnectionManager Datasets = < item Params = <> Statements = < item Connection = 'Northwind' TargetTable = 'Customers' SQL = 'SELECT '#10' CustomerID, CompanyName, ContactName, ContactTitle, ' + #10' Address, City, Region, PostalCode, Country, Phone, '#10' Fax' + #10' FROM'#10' Customers' StatementType = stSQL ColumnMappings = < item DatasetField = 'CustomerID' TableField = 'CustomerID' end item DatasetField = 'CompanyName' TableField = 'CompanyName' end item DatasetField = 'ContactName' TableField = 'ContactName' end item DatasetField = 'ContactTitle' TableField = 'ContactTitle' end item DatasetField = 'Address' TableField = 'Address' end item DatasetField = 'City' TableField = 'City' end item DatasetField = 'Region' TableField = 'Region' end item DatasetField = 'PostalCode' TableField = 'PostalCode' end item DatasetField = 'Country' TableField = 'Country' end item DatasetField = 'Phone' TableField = 'Phone' end item DatasetField = 'Fax' TableField = 'Fax' end> end> Name = 'Customers' Fields = < item Name = 'CustomerID' DataType = datWideString Size = 5 LogChanges = False InPrimaryKey = True end item Name = 'CompanyName' DataType = datWideString Size = 40 end item Name = 'ContactName' DataType = datWideString Size = 30 end item Name = 'ContactTitle' DataType = datWideString Size = 30 end item Name = 'Address' DataType = datWideString Size = 60 end item Name = 'City' DataType = datWideString Size = 15 end item Name = 'Region' DataType = datWideString Size = 15 end item Name = 'PostalCode' DataType = datWideString Size = 10 end item Name = 'Country' DataType = datWideString Size = 15 end item Name = 'Phone' DataType = datWideString Size = 24 end item Name = 'Fax' DataType = datWideString Size = 24 end> end item Params = < item Name = 'CustomerID' DataType = datWideString Size = 5 ParamType = daptInput end> Statements = < item Connection = 'Northwind' TargetTable = 'Orders' SQL = 'SELECT OrderID, CustomerID, EmployeeID, OrderDate, RequiredDate,' + ' ShippedDate, ShipVia, Freight, ShipName, ShipAddress, ShipCity,' + ' ShipRegion, ShipPostalCode, ShipCountry FROM Orders Where Custo' + 'merID = :CustomerID' StatementType = stSQL ColumnMappings = < item DatasetField = 'OrderID' TableField = 'OrderID' end item DatasetField = 'CustomerID' TableField = 'CustomerID' end item DatasetField = 'EmployeeID' TableField = 'EmployeeID' end item DatasetField = 'OrderDate' TableField = 'OrderDate' end item DatasetField = 'RequiredDate' TableField = 'RequiredDate' end item DatasetField = 'ShippedDate' TableField = 'ShippedDate' end item DatasetField = 'ShipVia' TableField = 'ShipVia' end item DatasetField = 'Freight' TableField = 'Freight' end item DatasetField = 'ShipName' TableField = 'ShipName' end item DatasetField = 'ShipAddress' TableField = 'ShipAddress' end item DatasetField = 'ShipCity' TableField = 'ShipCity' end item DatasetField = 'ShipRegion' TableField = 'ShipRegion' end item DatasetField = 'ShipPostalCode' TableField = 'ShipPostalCode' end item DatasetField = 'ShipCountry' TableField = 'ShipCountry' end> end> Name = 'Orders' Fields = < item Name = 'OrderID' DataType = datInteger LogChanges = False InPrimaryKey = True end item Name = 'CustomerID' DataType = datWideString Size = 5 end item Name = 'EmployeeID' DataType = datInteger end item Name = 'OrderDate' DataType = datDateTime end item Name = 'RequiredDate' DataType = datDateTime end item Name = 'ShippedDate' DataType = datDateTime end item Name = 'ShipVia' DataType = datInteger end item Name = 'Freight' DataType = datFloat end item Name = 'ShipName' DataType = datWideString Size = 40 end item Name = 'ShipAddress' DataType = datWideString Size = 60 end item Name = 'ShipCity' DataType = datWideString Size = 15 end item Name = 'ShipRegion' DataType = datWideString Size = 15 end item Name = 'ShipPostalCode' DataType = datWideString Size = 10 end item Name = 'ShipCountry' DataType = datWideString Size = 15 end> end> JoinDataTables = <> UnionDataTables = <> Commands = < item Params = < item Name = 'CUSTOMERS_CNT' DataType = datInteger ParamType = daptOutput end> Statements = < item Connection = 'Northwind' SQL = 'SELECT :CUSTOMERS_CNT = count(*) from customers'#10 StatementType = stSQL ColumnMappings = <> end> Name = 'CustomersCount' end item Params = < item Name = 'CustomerID' DataType = datWideString Size = 5 ParamType = daptInput end item Name = 'CustomerID' DataType = datWideString Size = 5 ParamType = daptInput end> Statements = < item Connection = 'Northwind' TargetTable = 'Orders' SQL = 'update orders set CustomerID = :CustomerID where CustomerID = :C' + 'ustomerID'#10 StatementType = stSQL ColumnMappings = <> end> Name = 'UpdateOrders' end> RelationShips = <> UpdateRules = <> Version = 0 Left = 29 Top = 55 end end