HypListDatabases
Oracle Smart View for OfficeのVBA関数、HypListDatabasesについて説明します。
クラウド・データ・プロバイダ・タイプ: Oracle Analytics Cloud - Essbase、Planning、Planning Modules、Financial Consolidation and Close、Tax Reporting
オンプレミス・データ・プロバイダ・タイプ: Oracle Essbase、Oracle Hyperion Planning
説明
HypListDatabases()では、要求したプロバイダにアプリケーションに存在するキューブ(データベース)のリストを取得します。
構文
HypListDatabases (vtURL, vtServerName, vtUserName, vtPassword, vtApplication, vtApplicationCubeList)
ByVal vtURL As Variant
ByVal vtServerName As Variant
ByVal vtUserName As Variant
ByVal vtPassword As Variant
ByVal vtApplication As Variant
ByRef vtApplicationCubeList As Variant
パラメータ
vtURL: プロバイダのURL
vtServerName: サーバー名
vtUserName: ユーザー名
vtPassword: パスワード
vtApplication: アプリケーション名
vtApplicationCubeList: キューブ(データベース)のリスト
戻り値
正常に終了した場合は0を戻し、それ以外の場合は該当するエラー・コードを戻します。
例
この例では、HypListApplications関数とHypListDatabases関数を組み合せて使用しています。
Sub test()
Dim url As Variant
Dim srv As Variant
Dim SSO As Variant
Dim username As Variant
Dim password As Variant
Dim app As Variant
Dim Applist As Variant
Dim AppDescList As Variant
Dim AppCubeList As Variant
'Essbase
url = "http://<server>:<port>/aps/SmartView"
app = "Sample"
srv = "EssbaseCluster-1"
username = "<username>"
password = "<password>"
ss = HypConnect("Sheet1", "admin", "ppp", "Conn123")
ss = HypListApplications(url, srv, <username>, <password>, Applist, AppDescList)
ss = HypListDatabases(url, srv, <username>, <password>, app, AppCubeList)
MsgBox (ss)
End Sub