Called when new global index is created
Public Function CreateIndex(IndexProp() As Byte,
Optional CheckExistenceOnly As String) As Long
Parameters
|
In/out |
Name |
Data type |
Description |
|
In,Out |
IndexProp |
Byte[TagIndex] |
Index of document,with which the associated version comment is being changed |
|
In |
CheckExistenceOnly |
String |
This is an optional argument to check if this index already exist |
Description
This function is called form local and shared cabinet,It is called when a new global index is created. It returns back the properties of the index which have been set.
Return value
|
Name |
Description |
|
NG_SUCCESS |
In case of success |
|
-1 |
Invalid operation |
|
-2 |
Invalid operation in read only cabinet |
|
-3 |
Cabinet not connected |
|
-48 |
Index already present |
|
-51 |
Index already present with a different attribute |
Example
Dim IndexProp As Byte
Dim IndexInfo As TagIndex
Dim lRetVal As Long
IndexInfo.IndexId = 12
IndexInfo.IndexFlag = “G”
IndexInfo.Name = “Remark”
IndexInfo.Type = 6
Redim IndexProp(Len(IndexInfo))
Call CopyMemory(IndexProp(0),IndexInfo,Len(IndexInfo))
lRetVal=gPDb(miCurCabId). CreateIndex (IndexProp)
if lRetVal <> NG_SUCCESS Then
MsgBox gPDb(miCurCabId).ErrDescription, vbInformation
Screen.MousePointer = vbNormal
End if