Endpoint: String;
Endpoint: String;
The Endpoint property determines URL of the platform web service, which will be used to connect and work with repository.
Specify the URL, via which the platform web service is available, as a property value. For more details about forming an address see the Connecting to Web Service subsection.
Sub CreateDefinition;
Var
Man: IMetabaseManager;
Defs: IMetabaseDefinitions;
Definition: IMetabaseDefinition;
LogonData: IPrimaryServiceSPLD;
Begin
Man := MetabaseManagerFactory.Active;
Defs := Man.Definitions;
Definition := Defs.Add;
Definition.Id := "WebServie";
Definition.Name := "WebServie";
Definition.Authentication := AuthenticationMode.Password;
Definition.DriverId := "WSF";
Definition.SecurityPackage := "STANDARDSECURITYPACKAGE";
LogonData := Definition.LogonData As IPrimaryServiceSPLD;
LogonData.Endpoint := "http://test-srv:80/axis2/services/PP.SOM.Som";
LogonData.Metabase := "PPRepository";
Definition.Scope := MetabaseDefinitionScope.LocalMachine;
Definition.Save;
End Sub CreateDefinition;
Description of the repository is created after executing this example. This description is used to connect to repository via the web service located at the specified address. Actual connection is established to the repository, which description is registered in the web server and has the PPRepository identifier.
The requirements and result of the Fore.NET example execution match with those in the Fore example.
Imports Prognoz.Platform.Interop.Metabase;
Public Shared Sub CreateDefinition();
Var
ManCls: MetabaseManagerFactory = New MetabaseManagerFactoryClass();
Man: IMetabaseManager;
Defs: IMetabaseDefinitions;
Definition: IMetabaseDefinition;
LogonData: IPrimaryServiceSPLD;
Begin
Man := ManCls.Active;
Defs := Man.Definitions;
Definition := Defs.Add();
Definition.Id := "WebServie";
Definition.Name := "WebServie";
Definition.Authentication := AuthenticationMode.amPassword;
Definition.DriverId := "WSF";
Definition.SecurityPackage := "STANDARDSECURITYPACKAGE";
LogonData := Definition.LogonData As IPrimaryServiceSPLD;
LogonData.Endpoint := "http://test-srv:80/axis2/services/PP.SOM.Som";
LogonData.Metabase := "PPRepository";
Definition.Scope := MetabaseDefinitionScope.mdsLocalMachine;
Definition.Save();
End Sub;
See also: