IDalConnection.Triggers

Syntax

Triggers(TableName: String): IDalTriggers;

Parameters

TableName. Physical name of table in the database.

Description

The Triggers property returns the cursor containing system information about the specified table triggers.

Comments

If an empty row is specified as the value of the TableName property, the property returns the cursor containing the information about the fields of all the tables, which are in the database.

Fore Example

Sub UserProc;
Var
    Driver: IDalDriver;
    Connect: IDalConnection;
    TriggersCur: IDalTriggers;
    ConnectDesc: IDalConnectionDescriptor;
    ConnectDescParams: IDalConnectionDescriptorParams;
    ColFields: IDalCursorFields;
    ColField: IDalCursorField;
    i: Integer;
Begin
    Driver := New DalOrcl8Driver.Create;
    ConnectDesc := Driver.CreateDescriptor;
    ConnectDescParams := ConnectDesc.Params;
    ConnectDescParams.Find("User Name").Value := "User";
    ConnectDescParams.Find("Password").Value := "Password";
    ConnectDescParams.Find("Host BSTR").Value := "OrclServer";
    ConnectDescParams.Find("Schema").Value := "Repository";
    Connect := ConnectDesc.CreateConnection;
    //Parameters of DataTable table triggers
    TriggersCur := Connect.Triggers("DataTable");
    ColFields := TriggersCur.Fields;
    //View parameters and their values
    While Not TriggersCur.Eof Do
        i := i + 1;
        Debug.WriteLine("Parameter number: " + i.ToString);
        Debug.Indent;
        For Each ColField In ColFields Do
            Debug.WriteLine(ColField.Name + " = " + ColField.Value);
        End For;
        Debug.Unindent;
        TriggersCur.Next;
    End While;
    TriggersCur.Close;
    Connect.Close;
End Sub UserProc;

On executing the example the repository connection is established with specified location parameters. A cursor with parameters of DataTable table triggers is created based on the connection. Information about parameters and their values is displayed in the development environment console.

Fore Example

The requirements and result of the Fore.NET example execution match with those in the Fore example.

Imports Prognoz.Platform.Interop.Dal;
Imports Prognoz.Platform.PiLibNet.Utils;

Sub UserProc8();
Var
    Driver: DalOrcl8Driver = ComCreator.Instance.CoCreate<DalOrcl8DriverClass>();
    Connect: IDalConnection;
    TriggersCur: IDalTriggers;
    ConnectDesc: IDalConnectionDescriptor;
    ConnectDescParams: IDalConnectionDescriptorParams;
    ColFields: IDalCursorFields;
    ColField: IDalCursorField;
    i: Integer;
Begin
    ConnectDesc := Driver.CreateDescriptor();
    ConnectDescParams := ConnectDesc.Params;
    ConnectDescParams.Find("User Name").Value := "User";
    ConnectDescParams.Find("Password").Value := "Password";
    ConnectDescParams.Find("Host BSTR").Value := "OrclServer";
    ConnectDescParams.Find("Schema").Value := "Repository";
    Connect := ConnectDesc.CreateConnection();
    //Parameters of DataTable table triggers
    TriggersCur := Connect.Triggers["DataTable"];
    ColFields := TriggersCur.Fields;
    //View parameters and their values
    While Not TriggersCur.Eof() Do
        i := i + 1;
        System.Diagnostics.Debug.WriteLine("Parameter number: " + i.ToString());
        System.Diagnostics.Debug.Indent();
        For Each ColField In ColFields Do
            System.Diagnostics.Debug.WriteLine(ColField.Name + " = " + ColField.Value);
        End For;
        System.Diagnostics.Debug.Unindent();
        TriggersCur.Next();
    End While;
    TriggersCur.Close();
    Connect.Close();
End Sub;