SharePointUrl: String;
Свойство SharePointUrl определяет сайт SharePoint для обсуждения.
Группу обсуждения SharePoint определяет свойство IMetabase.SharePointDiscussionName.
Для выполнения примера предполагается наличие в репозитории аналитической панели с идентификатором «A2A7685E53B694BC4B3A144AD09E4D869».
Добавьте ссылку на системную сборку Metabase.
Sub UserProc;
Var
Mb: Imetabase;
SPUrl, SPDiscussionName: String;
AdHocObjDescr: IMetabaseObjectDescriptor;
AdHocObj: IMetabaseObject;
Begin
Mb := MetabaseClass.Active;
SPUrl := Mb.SharePointUrl;
SPDiscussionName := Mb.SharePointDiscussionName;
If ((SPUrl <> "") And (SPDiscussionName <> "")) Then
AdHocObjDescr := Mb.ItemById("A2A7685E53B694BC4B3A144AD09E4D869");
Debug.WriteLine("Сайт SharePoint для обсуждения: " + SPUrl);
Debug.WriteLine("Группа обсуждения SharePoint: " + SPDiscussionName);
AdHocObj := AdHocObjDescr.Edit;
AdHocObj.Url := "Lists/Team%20Discussion/Report%20discussion%20World%20Bank%20Time%20Series";
AdHocObj.Save;
End If;
End Sub UserProc;
После выполнения примера для аналитической панели будет задан URL-адрес для публикации на сайте SharePoint.
См. также: