Pulls outline changes from a given source and stores them in a file.
Syntax
EsbPartitionGetOtlChanges (hCtx, MetaQuery, ChangeFile, szChangeFile) ByVal hCtx As Long MetaQuery As ESB_PARTOTL_QUERY_T ByVal ChangeFile As String ByVal szChangeFile As Integer
Parameter | Description |
---|---|
hCtx | API context handle. |
MetaQuery | Change query criteria. |
ChangeFile | Caller allocated change file and informational structure. |
szChangeFile | The size of the change file. |
Notes
Multiple files must be passed as a CR/LF delimited file list. You must use the path name on the server (as referenced by EsbGetOtlChanges()).
Return Value
Returns zero if successful, error code if unsuccessful.
Access
A call to this function requires Database Manager access privileges.
Example
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
See Also