Requests server to apply a list of outline change files.
Syntax
EsbPartitionApplyOtlChangeFile (hCtx, usFileNum, fileList) ByVal hCtx As Long ByVal usfilenum As Integer ByVal filelist As String
Parameter | Description |
---|---|
hCtx | Handle to API context. |
usFileNum | The number of outline change files. |
fileList | A string of filenames delimited by CR/LF. The size of the array is defined by usFileNum. |
Notes
Obtain filename by calling EsbPartitionGetOtlChanges.
Return Value
Returns zero if successful, error code if unsuccessful.
Access
Database Manager privilege is required.
Example
Public Sub ESB_PartitionApplyOtlChangeFile() Dim FileItems As Integer Dim Filelist As String Dim ProcState As ESB_PROCSTATE_T FileItems = 1 Filelist = "C:\ESSBASE\APP\SAMPPART\COMPANY\ESS00001.CHG" sts = EsbPartitionApplyOtlChangeFile(hCtx, FileItems, Filelist) If sts = 0 Then sts = EsbGetProcessState(hCtx, ProcState) Do Until ProcState.State = ESB_STATE_DONE sts = EsbGetProcessState(hCtx, ProcState) Loop End If End Sub
See Also