EsbPartitionPutReplCells

Replicates all data cells that are identified in the replication partition from the selected source database to the target database.

Syntax

EsbPartitionPutReplCells (hCtx, ReplicatedRegion, HostAppDbList)
ByVal hCtx             As Long
      ReplicatedRegion As ESB_PART_REPL_T
ByVal HostAppDbList    As String

Parameter	Description
hCtx	API context handle.
ReplicatedPartition	Partition information.
HostAppDbList	List of database/applications on the host server.

Notes

This routine removes the file if it is empty after purging.

Return Value

Returns zero if successful; error code if unsuccessful.

Access

A call to this function requires Database Manager privilege.

Example

Public Sub ESB_PartitionPutReplCells()

   Dim ReplPartition As ESB_PART_REPL_T
   Dim HostAppDbList As String
   Dim ProcState     As ESB_PROCSTATE_T
   Dim ind, i        As Long
   
   
   ReplPartition.PartitionCount   = -1  'All areas
   ReplPartition.UpdatedOnly      = 0 'Updated only cells
   HostAppDbList                  = "localhost" & vbCrLf & _
                                    "Sampeast" & vbCrLf & _
                                    "East"
      
   sts = EsbPartitionPutReplCells(hCtx, ReplPartition, HostAppDbList)
   
   If sts = 0 Then
      sts = EsbGetProcessState(hCtx, ProcState)
      Do Until ProcState.State = ESB_STATE_DONE
         sts = EsbGetProcessState(hCtx, ProcState)
      Loop
   End If

End Sub