データ・ファイルおよびルール・ファイルからのアクティブ・データベース内での次元の作成を可能にします。
構文
EsbBuildDimension
(
hCtx, pRules, pData, pUser, ErrName
)
ByVal
hCtx
As Long
pRules
As ESB_OBJDEF_T
pData
As ESB_OBJDEF_T
pUser
As ESB_MBRUSER_T
ByVal
ErrName
As String
| パラメータ | 説明 |
|---|---|
hCtx |
VB APIコンテキスト・ハンドル。 |
pRules |
ルール・ファイル・オブジェクト定義構造体へのポインタ。 |
pData |
データ・ファイル・オブジェクト定義構造体へのポインタ。 |
pUser |
SQLユーザー構造体へのポインタ(データ・ソースがSQLデータベースの場合)。SQLユーザー構造体がNULLの場合は、SQL以外のデータ・ソースを示します。 |
ErrName |
ローカルに作成されるエラー出力ファイルの名前。 |
備考
pMbrUserがNULL以外の場合、SQLデータ・ソースとみなされます。
ルールまたはデータ・オブジェクト定義構造体のhCtxフィールドにサーバーのVB APIコンテキストを指定した場合は、現在アクティブなアプリケーションおよびデータベースに対するオブジェクトが存在している必要があります。
ルールまたはデータ・オブジェクト定義構造体のhCtxフィールドにローカルのVB APIコンテキストを指定した場合は、この構造体のFileNameを絶対パスにする必要があります。
データ・ソースのインポートの詳細は、EsbImportの説明を参照してください。
戻り値
なし。
アクセス
この関数を使用するには、指定されたデータベースに対して、呼出し元がデータベース・デザイン権限(ESB_PRIV_DBDESIGN)を持っている必要があります。
例
Declare Function EsbBuildDimension Lib "ESBAPIN" (ByVal hCtx As Long, Rules As ESB_OBJDEF_T,
Data As ESB_OBJDEF_T, User As ESB_MBRUSER_T,
ByVal ErrName As String) As Long
Sub ESB_BuildDimension ()
Dim sts As Long
Dim Rules As ESB_OBJDEF_T
Dim Data As ESB_OBJDEF_T
Dim User As ESB_MBRUSER_T
Dim ErrorName As String '*********************************
' Rules file resides at the server
'*********************************
Rules.hCtx = hCtx
Rules.Type = ESB_OBJTYPE_RULES
Rules.FileName = "Test" '********************************
' Data file resides at the server
'********************************
Data.hCtx = hCtx
Data.Type = ESB_OBJTYPE_TEXT
Data.FileName = "Data"
'********************************
' Specify file to redirect errors
' to if any
'********************************
ErrorName = "BUILDDIM.ERR" '*****************
' Build Dimensions
'*****************
sts = EsbBuildDimension (hCtx, Rules, Data, User, ErrorName) '***************************************************************************
'*
'* When a SQL data source is defined in the rules file, define
'* the variables in the ESB_OBJDEF_T Data structure as follows:
'* Data.hCtx = hCtx
'* Data.AppName = ""
'* Data.DbName = ""
'* Data.ObjType = ESB_OBJTYPE_NONE
'* Data.FileName = ""
'*
'* Also, provide strings for the variables in the ESB_MBRUSER_T
'* User structure; for example:
'* User.User = "Dbusernm"
'* User.Password = "Dbpasswd"
'*
'* Use a blank string for User and Password, if the SQL source
'* does not require user and password information; for example:
'* User.User = ""
'* User.Password = ""
'*
'* Also, define sts as follows:
'* sts = EsbBuildDimension (hCtx, Rules, Data, User, ErrorName)
'*
'**************************************************************************** End Sub
関連トピック