GetLinkedObjectList
Returns the list of all objects linked with notes
GetLinkedObjectList(ByVal lNoteIndex As Long,
bObjectList() As Byte,
ByRef lObjectCount As Long) As Long
Parameters
In/out |
Name |
Data type |
Description |
In |
LNoteIndex |
Long |
Index of notes of which linked objects are to fetched |
Out |
BObjectList |
Byte[TagObjectIndexTypeInfo] |
List of linked objects as return parameter |
Out |
LObjectCount |
Long |
Number of objects linked |
Description
This function is called in WhiteHall. It is used to fetch the list of all objects linked with notes.
Return value
Name |
Description |
NG_SUCCESS |
In case of success |
-3 |
Cabinet not connected |
Example
Dim lNoteIndex As Long
Dim bObjectList() As Byte
Dim lObjectCount As Long
Dim lRetval As Long
lNoteIndex = 34
lRetVal=gPDb(miCurCabId).GetLinkedObjectList(lNoteIndex,bObjectList,lObjectCount)
if lRetVal <> NG_SUCCESS Then
MsgBox gPDb(miCurCabId).ErrDescription, vbInformation
Screen.MousePointer = vbNormal
Endif