Function Wrapper to Retrieve a Document's UNID for the current ViewEntry.
%REM
Function GetEntryDocUNID
Description: Returns UNID for a ViewEntry
%END REM
Function GetEntryDocUNID(vE As NotesViewEntry) As String
Dim vDoc As NotesDocument ' entry's document
GetEntryDocUNID = 0
If (vE Is Nothing) Then
Exit Function
End If
Set vDoc = vE.Document
If (vDoc Is Nothing) Then
Exit Function
End If
GetEntryDocUNID = vDoc.Universalid
End Function
previous page
|