AddEventTypeAppointmentTest
open /web/guest/home/
waitForElementPresent link=Calendar Test Page
clickAtAndWait link=Calendar Test Page
clickAtAndWait //input[@value='Add Event']
type _8_title Test Event
type _8_description This is a Test Event.
clickAt _8_timeZoneSensitiveCheckbox
select _8_type label=Appointment
clickAtAndWait //input[@value='Save']
assertTextPresent Your request processed successfully.
assertText //table[@class='taglib-search-iterator']/tbody/tr[3]/td[2]/a Test Event