# EsbArchiveEnd

Description

EsbArchiveEnd() restores the server to "read-write" mode after archiving is complete.

Syntax

    EsbArchiveEnd (hCtx, AppName, DbName)

    ByVal hCtx    As Long
    ByVal AppName As String
    ByVal DbName  As String

Parameters

hCtx | Essbase API context handle.
AppName | Name of archived application.
DbName | Name of archived database.

Return Value

None.

Notes

- After calling EsbArchiveBegin(), a call to EsbArchiveEnd() is required to restore "read-write" mode.

Access

The caller must have at least read access (ESB_PRIV_READ) to the database, and must select it as the active database using EsbSetActive().

Example

    Declare Function EsbArchiveEnd Lib "ESBAPIW" (ByVal hCtx As Long, ByVal AppName As String, ByVal DbName As String) As LongSub ESB_ArchiveEnd()
       Dim sts As Long
       Dim AppName As String
       Dim DbName As String
       AppName = "Sample"
       DbName = "Basic"
       '**** Archive End ***
       sts = EsbArchiveEnd (hCtx, AppName, DbName)
    End Sub

See Also

EsbArchiveBegin()
EsbRestore()