EsbBuildDimFile

アクティブなデータベース・アウトラインに対するメンバーの追加または削除に使用する、データ・ファイルを作成します。EsbBuildDimensionを参照してください。

構文

            EsbBuildDimFile
             (
            hCtx, RulesObj, DataObj, MbrUser, 
ErrorName, fOverwriteErrorFile
            )
ByVal 
            hCtx
                         As Long
      
            pRules
                       As ESB_OBJDEF_T
      
            pData
                        As ESB_OBJDEF_T
      
            pUser
                        As ESB_MBRUSER_T
ByVal 
            ErrName
                      As String
ByVal 
            ErrFileOverwrite
             As Integer

パラメータ	説明
hCtx	APIコンテキスト・ハンドル。
RulesObj	ルール・ファイル・オブジェクト定義構造体へのポインタ。
DataObj	データ・ファイル・オブジェクト定義構造体へのポインタ。
MbrUser	SQLユーザー構造体(データ・ソースがSQLデータベースの場合)。構造体がNULLの場合は、SQL以外のデータ・ソースです。
ErrorName	クライアントでのエラー出力ファイルの名前。
fOverwriteErrorFile	この関数によって既存のファイルErrorFileが上書きされるかどうかを示すブール値。

備考

MbrUserがNULL以外の場合、SQLデータ・ソースとみなされます。
EsbImportの説明に、データ・ソースのインポートに関する情報があります。
データベースは、アクティブ・データベースである必要があります。EsbSetActiveの説明を参照してください。
EsbBuildDimStartは、EsbBuildDimFile()を使用する前に呼び出しておく必要があります。
再構築を行う前に繰り返しEsbBuildDimFile()を呼び出し、複数のルール・ファイルまたはデータ・ファイル(あるいはその両方)を使用してアウトラインにメンバーを追加できます。
EsbBuildDimFile()の呼出しが完了した後、データベースを再構築する必要があります。
再構築後、アウトラインのロックを解除する必要があります。

戻り値

正常終了の場合は0が戻されます。

アクセス

この関数を使用するには、指定したデータベースに対してデータベース・デザイン権限(ESB_PRIV_DBDESIGN)を持っている必要があります。

例

         Declare Function EsbBuild   Dimension 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_BuildDimFile()
   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"
   '**********************************
   ' For a non SQL data source provide
   ' empty strings in User structure
   '********************************** 
   User.User = ""
   User.Password = ""

   '********************************
   ' Specify file to redirect errors 
   ' to if any 
   '******************************** 
   ErrorName = "BUILDDIM.ERR"

   '*****************
   ' Build Dimensions
   '*****************

   sts = EsbBuildDimFile (hCtx, Rules, Data, User, ErrorName) 
End Sub