Вот документация для DocumentContext . Вы можете определить, что происходит в процессе устранения. Вы не работаете из представления, до того, как придет новая почта или из браузера. Это означает, что DocumentContext не установлен для вашего агента.
Вы можете сделать что-то подобное в событии PostSave:
Sub Postsave(Source As Notesuidocument)
Dim ns As New NotesSession, agent As NotesAgent
Set agent=ns.CurrentDatabase.GetAgent("PostSave Agent")
Call agent.Run(Source.Document.NoteID)
End Sub
Затем сделайте это в своем агенте, чтобы получить переданный документ:
Database db = agentContext.getCurrentDatabase();
Agent agent = agentContext.getCurrentAgent();
Document doc = db.getDocumentByID(agent.getParameterDocID());