ISharedParams.DefaultBehaviour

DefaultBehaviour: IDefaultBehaviour;

DefaultBehaviour: Prognoz.Platform.Interop.KeFore.DefaultBehaviour;

Sub UserProc;
Var
    Mb: IMetabase;
    SP: ISharedParams;
    DB: IDefaultBehaviour;
Begin
    // Получим текущий репозиторий
    Mb := MetabaseClass.Active;
    // Установим табличный тип отображения карточки элемента в настройках по умолчанию
    SP := Mb.SpecialObject(MetabaseSpecialObject.SharedParams).Edit As ISharedParams;
    //Зададим настройки по умолчанию
    DB := SP.DefaultBehaviour;
    // Установим табличный тип отображения карточки элемента в настройках по умолчанию
    DB.RDSElementCard := RdsElementCardStyle.PropertyList;
    // Установим табличный тип отображения карточки элемента в настройках по умолчанию
    DB.TreatEmptySelectionAsFull := True;
    (SP As IMetabaseObject).Save;
End Sub UserProc;

Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.KeFore;
…
Public Shared Sub Main(Params: StartParams);
Var     
    Mb: IMetabase;     
    SP: ISharedParams;
    DB: IDefaultBehaviour;
Begin
    // Получим текущий репозиторий
    Mb := Params.Metabase;    
    // Установим табличный тип отображения карточки элемента в настройках по умолчанию
    SP := Mb.SpecialObject[Prognoz.Platform.Interop.Metabase.MetabaseSpecialObject.msoSharedParams].Edit() As ISharedParams;
    //Зададим настройки по умолчанию
    DB := SP.DefaultBehaviour;
    // Установим табличный тип отображения карточки элемента в настройках по умолчанию
    DB.RDSElementCard := RdsElementCardStyle.recsPropertyList;
    // Установим табличный тип отображения карточки элемента в настройках по умолчанию
    DB.TreatEmptySelectionAsFull:= true;
    (SP As IMetabaseObject).Save();
End Sub;