HypExecuteMDXEx

データ・プロバイダ・タイプ: Oracle Essbase

説明

HypExecuteMDXEx()は、結果をデータ構造に出力するがワークシート上には表示しないMDXクエリーを実行します。(クエリー結果をワークシート上に表示したい場合は、かわりにHypExecuteQueryを使用します。)

構文

      HypExecuteMDXEx 
(
ByVal vtSheetName As Variant,
ByVal vtQuery As Variant, 
ByVal vtBoolHideData As Variant,
ByVal vtBoolDataLess As Variant,
ByVal vtBoolNeedStatus As Variant,
ByVal vtMbrIDType As Variant, 
ByVal vtAliasTable As Variant, 
ByRef outResult As MDX_AXES_NATIVE
) As Long

   

パラメータ

vtSheetName: 関数を実行するワークシートの名前。vtSheetNameがNullまたはEmptyの場合、アクティブ・ワークシートが使用されます。

vtQuery: 実行するMDXクエリー。

vtBoolHideData: 結果でデータを非表示にするか表示するかを示すブール・フラグ

vtBoolDataLess: 結果でデータを取得するか回避するかを示すブール・フラグ

vtBoolNeedStatus: 結果でステータス情報を取得するか回避するかを示すブール・フラグ。

vtMbrIDType: 結果のメンバー・タイプ識別子(名前または別名)

vtAliasTable: 使用する別名テーブル。

outResult: タイプがMDX_AXESの構造へのポインタ。クエリーの出力を含みます。(このAPIでのデータ型およびサポートされる関数については、HypExecuteMDXExに固有のデータ型を参照してください。)

戻り値

正常に終了した場合は0を戻し、それ以外の場合は該当するエラー・コードを戻します。

HypExecuteMDXExに固有のデータ型

次のデータ型は、HypExecuteMDXExにのみ適用されます:

MDX_CELL: セルに対応するデータ型

MDX_PROPERTY: メンバーおよび次元に関するプロパティを含むデータ型

MDX_MEMBER: メンバー情報のデータ型

MDX_DIMENSION: 次元情報のデータ型

MDX_CLUSTER: クラスタ情報のデータ型

MDX_AXIS: 軸を表すデータ型

MDX_AXES: 軸およびセルの集合を含む、ルート・レベル構造

MDX_AXES_NATIVE: HypExecuteMDXExの出力パラメータとして使用されるデータ型。この構造は、GetVBCompatibleMDXStructureを使用してMDX_AXESに変換する必要があります。

例

      Sub GetVBCompatibleMDXStructure(ByRef inStruct As MDX_AXES_NATIVE, ByRef outStruct As MDX_AXES)

Public Declare Function HypExecuteMDXEx Lib "HsAddin" (ByVal vtSheetName As Variant, ByVal vtQuery As Variant, ByVal vtBoolHideData As Variant, ByVal vtBoolDataLess As Variant, ByVal vtBoolNeedStatus As Variant, ByVal vtMbrIDType As Variant, ByVal vtAliasTable As Variant, ByRef outResult As MDX_AXES_NATIVE) As Long

Sub Example_HypExecuteMDXEx()

Dim Query As Variant
Dim vtBoolHideData As Variant
Dim vtBoolDataLess As Variant
Dim vtBoolNeedStatus As Variant
Dim vtMbrIDType As Variant
Dim vtAliasTable As Variant
Dim result_Native As MDX_AXES_NATIVE
Dim result_VBCompatible As MDX_AXES

Query = "select {Jan} on COLUMNS, {Profit} on ROWS from Sample.Basic"
vtBoolHideData = True
vtBoolDataLess = True
vtBoolNeedStatus = True
vtMbrIDType = "alias"
vtAliasTable = "none"

sts = HypConnect(Empty, "
      UserName
      ", "
      Password
      ", "SB")

If sts = 0 Then

sts = HypExecuteMDXEx(Empty, Query, vtBoolHideData, vtBoolDataLess, vtBoolNeedStatus, vtMbrIDType, vtAliasTable, result_Native)
sts = GetVBCompatibleMDXStructure(result_Native, result_VBCompatible)
sts = HypDisconnect(Empty, True)
Else
End If
End Sub