FileMaker - Crear Evento en Calendario con AppleScript

Tell application "FileMaker Pro Advanced"

	activate

	set v_DateStart to field "CalendarioFecha" of current record

	set v_DateEnd to v_DateStart

	set v_HoraStart to field "calendarioHora"

	set v_Titulo to field "Nombre Organizacion" of current record

	set v_Desc to "Pruebas...."

end tell

set DateStart_text to date v_DateStart

set DateEnd_text to date v_DateStart

set HoraStart_Text to v_HoraStart as string

set HoraEnd_Text to v_HoraStart

set Dia_Txt to (DateStart_text & " " & HoraStart_Text) as string

set Dia to date Dia_Txt

tell application "Calendar"

	tell calendar "Belmo"

		set NuevoEvento to make new event

		set eventoUid to uid of NuevoEvento

		tell NuevoEvento

			set start date to Dia

			set summary to v_Titulo

			set description to v_Desc

			set location to ""

			set allday event to false

		end tell