Requests information for a calendar notice.
Syntax
requestInfo(comments:string) : void
Parameter |
Description |
comments |
Comments regarding a request. |
Possible exception |
Value |
Text |
Description |
NotesError.NOTES_ERR_UNSUPPORTEDACTION |
4811 |
Unsupported action |
The method is attempting to apply an action
that is not valid for the entry. |
NotesError.NOTES_ERR_OVERWRITEDISALLOWED |
4813 |
This action is not allowed since it would
overwrite personal changes |
The action should be verified then reissued
with the overwrite flag set. |
NotesError.NOTES_ERR_IDNOTFOUND |
4814 |
Identifier not found |
The identifier for the NotesCalendarNotice object
does not identify a notice in the calendar. |
Examples
This button event requests information
for an invitation.var dbdir:NotesDbDirectory = session.getDbDirectory("");
var maildb:NotesDatabase = dbdir.openMailDatabase();
var cal:NotesCalendar = session.getCalendar(maildb);
var jdt:java.util.Calendar = new java.util.Calendar.getInstance();
jdt.set(2012, 1, 1, 1, 1, 1);
var dt1:NotesDateTime = session.createDateTime(jdt);
var dt2:NotesDateTime = session.createDateTime("Yesterday 02");
var invites:java.util.Vector = cal.getNewInvitations(dt1, dt2);
if (invites.size() > 0) {
var invite:NotesCalendarNotice = invites.firstElement();
invite.requestInfo("Need more info");
requestScope.status = "Invitation accepted\n";
} else {
requestScope.status = requestScope.status + "No invitation\n";
}
LotusScript® syntax
and examples
NotesCalendarNotice.RequestInfo(Byval comments As String)
This
agent requests information for an invitation.%Include "lsconst.lss"
Sub Initialize
Dim session As New NotesSession
Dim maildb As New NotesDatabase("", "")
Dim cal As NotesCalendar
Dim dt1 As NotesDateTime
Dim dt2 As NotesDateTime
Dim invites As Variant
Call maildb.Openmail()
Set cal = session.getCalendar(maildb)
Set dt1 = session.createdatetime("01/01/2012 00:00 AM")
Set dt2 = session.createdatetime("Yesterday 00:00 AM")
invites = cal.Getnewinvitations(dt1, dt2)
If IsEmpty(invites) Then
MessageBox "No invitation",, "Nothing"
Else
Dim invite As NotesCalendarNotice
Dim entry As NotesCalendarEntry
Set invite = invites(0)
MessageBox invite.Read(),, "Requesting information"
call invite.Requestinfo("Need more information")
End If
End Sub
Java™ syntax
and examples
void NotesCalendarNotice.requestInfo(String comments)
This
agent requests information for an invitation.import lotus.domino.*;
public class JavaAgent extends AgentBase {
public void NotesMain() {
try {
Session session = getSession();
AgentContext agentContext = session.getAgentContext();
// (Your code goes here)
DbDirectory dbdir = session.getDbDirectory("");
Database maildb = dbdir.openMailDatabase();
NotesCalendar cal = session.getCalendar(maildb);
java.util.Calendar jdt = java.util.Calendar.getInstance();
jdt.set(2012, 1, 1, 1, 1, 1);
DateTime dt1 = session.createDateTime(jdt);
DateTime dt2 = session.createDateTime("Yesterday 02");
java.util.Vector invites = cal.getNewInvitations(dt1, dt2);
Database db = agentContext.getCurrentDatabase();
// Create document to post results
Document doc = db.createDocument();
doc.appendItemValue("Form", "main");
doc.appendItemValue("subject", "Requesting info for invitation");
RichTextItem body = doc.createRichTextItem("body");
if (invites.size() == 0) body.appendText("No invitation");
else {
NotesCalendarNotice invite = (NotesCalendarNotice)invites.firstElement();
body.appendText(invite.read());
invite.requestInfo("Need more info");
}
doc.save(true, true);
} catch(Exception e) {
e.printStackTrace();
}
}
}