IMobilePublishAdhocReport.FullScreenMode

Fore Syntax

FullScreenMode: Boolean;

Fore.NET Syntax

FullScreenMode: boolean;

Description

The FullScreenMode property determines whether dashboard blocks are displayed after publication in full-screen mode of blocks.

Comments

Available values:

Fore Example

Executing the example requires that the repository contains a mobile application container with the MA_PUB_ADHOC identifier containing a dashboard with the 19799 key.

Add links to the Metabase, Mobile system assemblies.

Sub UserProc;
Var
    MB: IMetabase;
    Mobile: IMobileApplication;
    Publicator: IMobileApplicationPublicator;
    PubObjs: IMobileApplicationPublishObjects;
    PubObj: IMobileApplicationPublishObject;
    PObj: IMobilePublishObject;
    AdhocPObj: IMobilePublishAdhocReport;
    Res: MobilePublishObjectResult;
Begin
    // Get repository
    MB := MetabaseClass.Active;
    // Get mobile application
    Mobile := MB.ItemById("MA_PUB_ADHOC").Bind As IMobileApplication;
    // Create a mobile application publisher
    Publicator := Mobile.CreatePublicator;
    // Get collection of published objects
    PubObjs := Publicator.Items;
    // Get published dashboard by key
    PubObj := PubObjs.ItemByKey(19869);
    PObj := PubObj.PublishObject;
    AdhocPObj := PObj As IMobilePublishAdhocReport;
    { Dashboard is opened in full-screen mode starting with the first block,
      after publication on a mobile device }

    AdhocPObj.FullScreenMode := True;
    { Display information about use as a data source in the console window for
     dashboard}

    If AdhocPObj.UseOnlyInAnalyticDashboard Then
        Debug.WriteLine
        ("Published dashboard is used as a data source for other dashboard");
    Else
        Debug.WriteLine
        ("Published dashboard is not used as a data source for other dashboard");
    End If;
    // Set publication path
    PObj.ExportPath := "C:\" + PObj.Object.Id + ".zip";
    // Publish dashboard
    Res := PObj.Publish;
    // Display result in the console window
    If (Res As Integer) = 0 Then Debug.WriteLine("Publication was successful");
        Debug.WriteLine("Publication path: " + PubObj.ExportPath);
            ElseDebug.WriteLine("Error occurred on publishing");
                End If;
End Sub UserProc;

After executing the example:

Fore.NET Example

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

Imports Prognoz.Platform.Interop.Mobile;

Public Shared Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    Mobile: IMobileApplication;
    Publicator: IMobileApplicationPublicator;
    PubObjs: IMobileApplicationPublishObjects;
    PubObj: IMobileApplicationPublishObject;
    PObj: IMobilePublishObject;
    AdhocPObj: IMobilePublishAdhocReport;
    Res: MobilePublishObjectResult;
Begin
    // Get repository
    MB := Params.Metabase;
    // Get mobile application
    Mobile := MB.ItemById["MA_PUB_ADHOC"].Bind() As IMobileApplication;
    // Create a mobile application publisher
    Publicator := Mobile.CreatePublicator();
    // Get collection of published objects
    PubObjs := Publicator.Items;
    // Get published dashboard by key
    PubObj := PubObjs.ItemByKey[19799];
    PObj := PubObj.PublishObject;
    AdhocPObj := PObj As IMobilePublishAdhocReport;
    { Dashboard is opened in full-screen mode starting with the first block,
      after publication on a mobile device }

    AdhocPObj.FullScreenMode := True;
    { Display information about use as a data source in the console window for
     dashboard}

    If AdhocPObj.UseOnlyInAnalyticDashboard Then
        System.Diagnostics.Debug.WriteLine
        ("Published dashboard is used as a data source for other dashboard");
    Else
        System.Diagnostics.Debug.WriteLine
        ("Published dashboard is not used as a data source for other dashboard");
    End If;
    // Set publication path
    PObj.ExportPath := "C:\" + PObj.Object.Id + ".zip";
    // Publish dashboard
    Res := PObj.Publish(Null);
    // Display result in the console window
    If (Res As Integer) = 0 Then System.Diagnostics.Debug.WriteLine("Publication was successful");
        System.Diagnostics.Debug.WriteLine("Publication path: " + PubObj.ExportPath);
            Else System.Diagnostics.Debug.WriteLine("Error occurred on publishing");
                End If;
End Sub;

See also:

IMobilePublishAdhocReport