EsbSetGlobalState() sets the server global state structure which contains parameters for system administration.
EsbSetGlobalState (hCtx, pGlobal)
ByVal hCtx As Long pGlobal As ESB_GLOBAL_T
hCtx | Essbase VB API context handle. |
pGlobal | Pointer to global state structure. |
Declare Function EsbSetGlobalState Lib "ESBAPIW" (ByVal hCtx As Long, Global As ESB_GLOBAL_T) As Long Sub ESB_SetGlobalState () Dim sts As Long Dim pGlobal As ESB_GLOBAL_T pGlobal.Security = ESB_TRUE pGlobal.Logins = ESB_TRUE pGlobal.Access = ESB_ACCESS_APPCREATE pGlobal.Validity = 14 pGlobal.Currency = ESB_FALSE pGlobal.PwMin = 6 pGlobal.InactivityTime = 300 pGlobal.InactivityCheck = 40 '***************** ' Set Global State '***************** sts = EsbSetGlobalState (hCtx, pGlobal) End SubEsbGetGlobalState()