tentativelyAccept (NotesCalendarNotice - JavaScript™)

Tentatively accepts a meeting notice.

Defined in

Syntax

tentativelyAccept(comments:string) : void


Parameter	Description
`comments`	Comments regarding a meeting change.


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 accepts a meeting.

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.tentativelyAccept("May not be able to make it");
	requestScope.status = "Invitation accepted\n";
} else {
	requestScope.status = requestScope.status + "No invitation\n";
}

LotusScript® syntax and examples

NotesCalendarNotice.Accept(Byval comments As String)

This agent accepts a meeting.

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
		Set invite = invites(0)
		MessageBox invite.Read(),, "Tentatively accepting invitation"
		Call invite.tentativelyAccept("May not be able to make it")
	End If
End Sub

Java™ syntax and examples

void NotesCalendarNotice.accept(String comments)

This agent accepts a meeting.

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", "Tentatively accepting 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.tentativelyAccept("May not be able to make it");
          }
          doc.save(true, true);
          
      } catch(Exception e) {
          e.printStackTrace();
      }
   }
}