IMetabaseUpdateSqlNode.Database

Syntax

Database: Integer;

Description

The Database property determines a key of database, SQL query is executed to connect with it.

Comments

If the property is not set, SQL query will be executed for the current repository connection.

Example

Executing the example requires that the repository contains a table with the Table_1 identifier and a database with the BD identifier. The schema, on which this database is configured, contains a table with the LOG_TABLE physical name. This table stores a history of execution of any actions. The table has the ACTION and DATE_ACTION fields that will display action description and date of the occurred action.

Sub Main;

Var

Mb: IMetabase;

Db: IMetabaseObject;

Mu: IMetabaseUpdate;

Root: IMetabaseUpdateFolderNode;

SQLNode: IMetabaseUpdateSqlNode;

DNode: IMetabaseUpdateDataObjectNode;

Begin

Mb := MetabaseClass.Active;

Db := Mb.ItemById("BD").Bind;

Mu := Mb.CreateUpdate;

Root := Mu.RootFolder;

DNode := Root.Add(MetabaseUpdateNodeType.DataObject) As IMetabaseUpdateDataObjectNode;

DNode.Object := MB.ItemById("Table_1");

DNode.UpdatePart := MetabaseObjectUpdatePart.DataMetadata;

SQLNode := Root.Add(MetabaseUpdateNodeType.Sql) As IMetabaseUpdateSQLNode;

SQLNode.Label := "SQL";

SqlNode.Sql((Db As IDatabase).DriverId) := "Insert Into Log_Table (ACTION,DATE_ACTION) Values('Update table Table_1',sysdate)";

SqlNode.Database := Db.Key;

Mu.SaveToFileNF("c:\Update.pefx");

End Sub Main;

After executing the example a new update is created. Data and metadata of the Table_1 table are added to update. An SQL command is also added to update. On executing this SQL command a new record that contains information about the Table_1 table update is added to the Log_Table table. The SQL command is executed within DB server, on which the BD database is configured.