IMetabaseCustomClass.ImplementationCoreAssembly

The ImplementationCoreAssembly property determines an assembly containing implementation of the class without visual dependencies, which will handle operations of the custom class.

Comments

The property is used on setting up the custom class object, work with which is executed in the web application. As the value of this property, it is necessary to specify description of a repository unit/assembly. The class is set in the ImplementationCoreClass property.

Example

Executing the example requires that the repository contains a unit with the M_WEB_OPERATIONS identifier. The class for handling operations of objects of the custom classes is implemented in this module.

Class WebOperationsClass: Object
    Sub Open(MDesc: IMetabaseObjectDescriptor);
    Begin
        // Handle the Open operation
    End Sub Open;

    Sub Edit(MDesc: IMetabaseObjectDescriptor);
    Begin
        // Handle the Edit operation
    End Sub Edit;

    Sub OpenWithParams(Descr: IMetabaseObjectDescriptor; Params: IMetabaseObjectParamValues);
    Begin
        // Handle the Open operation for parametric objects
    End Sub OpenWithParams;

    Sub EditWithParams(Descr: IMetabaseObjectDescriptor; Params: IMetabaseObjectParamValues);
    Begin
        // Handle the Edit operation for parametric objects
    End Sub EditWithParams;

    Sub Delete(MDesc: IMetabaseObjectDescriptor);
    Begin
        // Handle the Delete operation
    End Sub Delete;

    Sub Paste(MDesc: IMetabaseObjectDescriptor);
    Begin
        // Handle the Paste operation
    End Sub Paste;

    // Other operation handlers
    //...
End Class WebOperationsClass;

Sub UserProc;
Var
    Mb: IMetabase;
    CustomClassExtender: IMetabaseCustomExtender;
    CustomClass: IMetabaseCustomClass;
Begin
    Mb := MetabaseClass.Active;
    // Get custom class container
    CustomClassExtender := Mb.SpecialObject(MetabaseSpecialObject.CustomExtender).Edit As IMetabaseCustomExtender;
    // Add a custom class
    CustomClass := CustomClassExtender.Classes.Add;
    CustomClass.Id := "UserObjectClassForWeb";
    CustomClass.Name := "Test object for Web";
    CustomClass.ImplementationCoreAssembly := MB.ItemById("M_WEB_OPERATIONS");
    CustomClass.ImplementationCoreClass := "WebOperationsClass";
    // Save changes
    (CustomClassExtender As IMetabaseObject).Save;
End Sub UserProc;

After executing the example a new object class will be created in the custom classes container. Basic properties will be determined for the class. The OperationsClass class will be specified as an operation handler.

IMetabaseCustomClass.ImplementationCoreAssembly

Syntax

Description

Comments

Example