Beispiel "Menübefehl wird ausgeführt"

Beschreibung:

Reagieren auf einen bestimmten Menübefehl.

VBScript:

Dim dataItems

dataItems = Split(WScript.Event.Data, "|", -1, 1)

Dim menuID

menuID = dataItems(0)

Dim relationContainerID

relationContainerID = dataItems(1)

If (relationContainerID = "ID.Aktivitäten.CompanyID#{45F5CAD2-73A1-4D48-B21E-F38D27093D12}") Then

MsgBox "Sie dürfen hier im Aktivitäten-Container keinen neuen Datensatz anlegen. Daher wird die Aktion nun abgebrochen.", vbOKOnly + vbInformation, "Hinweis/Info"

    WScript.Event.Cancel = True

End If

C#-Script:

string[] dataItems = Event.Data.Split('|');

if (dataItems.Length > 1)

{

    string menuID = dataItems[0];

    string relationContainerID = dataItems[1];

if (relationContainerID == "ID.Aktivitäten.CompanyID#{45F5CAD2-73A1-4D48-B21E-F38D27093D12}")

    {

MessageBox.Show("Sie dürfen im Aktivitäten-Container keinen neuen Datensatz anlegen. Daher wird die Aktion nun abgebrochen.", cRM.AppTitle + " - Hinweis/Info", MessageBoxButtons.OK, MessageBoxIcon.Information);

        Event.Cancel = true;

    }

}

TypeScript:

import {

    cRM,

    WScript

} from "./sdk/combitCRM.SDK.WindowsClient.v13";

let dataItems : string[] = WScript.Event.Data.split('|');

if (dataItems.length > 1)

{

    let menuID = dataItems[0];

    let relationContainerID = dataItems[1];

    if (relationContainerID == "ID.Aktivitäten.CompanyID#{45F5CAD2-73A1-4D48

       -B21E-F38D27093D12}")

    {

cRM.DialogMessageBox("Sie dürfen im Aktivitäten-Container keinen neuen Datensatz anlegen. Daher wird die Aktion nun abgebrochen.", cRM.AppTitle + " - Hinweis/Info" , MessageBoxButtons.OK, MessageBoxIcon.Information);

        WScript.Event.Cancel = true;

    }

}