Create and Send outlook appointment via NAV classic

pawanp

Here's an example on how to create and send outlook appointment in NAV classic

Automation variables
"Application" : 'Microsoft Outlook 12.0 Object Library'.Application
"Appointment Item" : 'Microsoft Outlook 12.0 Object Library'.AppointmentItem
"Namespace" : 'Microsoft Outlook 12.0 Object Library'.Namespace

CREATE(Application);

Namespace := Application.GetNamespace('MAPI');
Namespace.Logon;

"Appointment Item" := Application.CreateItem(1);
"Appointment Item".StartUTC(TODAY);
"Appointment Item".Subject := 'NAV Test Appointment';
"Appointment Item".Body := 'This is a test appointment send from NAV';
"Appointment Item".Duration :=  60;
"Appointment Item".ReminderMinutesBeforeStart := 1;
"Appointment Item".ReminderSet := TRUE;
"Appointment Item".RequiredAttendees := 'test@testdomain.com';
"Appointment Item".MeetingStatus := 1;
"Appointment Item".Save;
"Appointment Item".Send;

"Namespace".Logoff;
Clear(Application);

will91

How can I check if the appointment already exist in the calendar before sending a new one?

pawanp

will91 wrote:

How can I check if the appointment already exist in the calendar before sending a new one?

Application 'Microsoft Outlook 11.0 Object Library'.Application
Appointment Item 'Microsoft Outlook 11.0 Object Library'.AppointmentItem
Namespace 'Microsoft Outlook 11.0 Object Library'.NameSpace
oCalendar 'Microsoft Outlook 11.0 Object Library'.MAPIFolder
oItems 'Microsoft Outlook 11.0 Object Library'.Items

CREATE(Application);

Namespace := Application.GetNamespace('MAPI');
Namespace.Logon;

oCalendar := Namespace.GetDefaultFolder(9);
oItems := oCalendar.Items;

"Appointment Item" := oItems.GetFirst;


MESSAGE("Appointment Item".Subject);
MESSAGE("Appointment Item".Organizer);
MESSAGE("Appointment Item".Subject);
MESSAGE("Appointment Item".Body);
MESSAGE("Appointment Item".Location);
MESSAGE(FORMAT("Appointment Item".Start));

tameemabdullah

i tried this and even though it creates the outlook meeting invite, the start time of the meeting invite cannot be set?

"Appointment Item".StartUTC(TODAY) will only allow the setting of a DATE and not DATETIME

Has anyone got any idea why we cannot set the time of the meeting using this Outlook automation variable?