EsbPartitionGetOtlChanges

指定したソースからアウトラインの変更を取り込み、ファイルに保管します。

構文

            EsbPartitionGetOtlChanges
             (
            hCtx, MetaQuery, ChangeFile, szChangeFile
            )
ByVal 
            hCtx
                     As Long
      
            MetaQuery
                As ESB_PARTOTL_QUERY_T
ByVal 
            ChangeFile
               As String
ByVal 
            szChangeFile
             As Integer

パラメータ	説明
hCtx	APIコンテキスト・ハンドル。
MetaQuery	変更クエリー条件。
ChangeFile	呼出し元で割り当てた変更ファイルおよび情報構造体。
szChangeFile	変更ファイルのサイズ。

備考

複数のファイルをCR/LFで区切られたファイル・リストとして渡す必要があります。サーバー上のパス名を使用する必要があります(EsbGetOtlChanges()で参照される)。

戻り値

正常終了の場合は0が戻されます。それ以外の場合はエラー・コードが戻されます。

アクセス

この関数を呼び出すには、データベース・マネージャのアクセス権限が必要です。

例

         Public Sub ESB_PartitionGetOtlChanges()   Dim PartQuery As ESB_PARTOTL_QUERY_T
   Const SizeofChangeFile = 150
   Dim ChangeFile As String * SizeofChangeFile
   
   PartQuery.OperationType = ESB_PARTITION_OP_REPLICATED
   PartQuery.HostDatabase.HostName = "Dscharton2"   PartQuery.HostDatabase.AppName = "Sampeast"
   PartQuery.HostDatabase.DbName = "East"
      PartQuery.MetaFilter.TimeStamp = _
      DateDiff("s", #1/1/70#, #6/18/97#)   PartQuery.MetaFilter.DimFilter = ESB_PARTITION_OTLDIM_ALL
   PartQuery.MetaFilter.MbrFilter = ESB_PARTITION_OTLMBR_ALL
   PartQuery.MetaFilter.MbrAttrFilter = _   
                                ESB_PARTITION_OTLMBRATTR_ALL
   
   sts = EsbPartitionGetOtlChanges(hCtx, PartQuery, _ 
                           ChangeFile, SizeofChangeFile)   If sts = 0 Then MsgBox ChangeFile
 
End Sub