Monkeybread Software - MBS FileMaker Plugin: Events Create Event

Components	All	New	MacOS		Windows		Linux		iOS
Examples	Mac & Win		Server	Client	Guides	Statistic	FMM	Blog	Deprecated	Old

MBS FileMaker Plugin Example Databases

Events Create Event

All examples are included with download of MBS FileMaker Plugin.

Events Create Event.fmp12

Overview
Tables	1
Relationships	0
Layouts	1
Scripts	4
Value Lists	0
Custom Functions	0
Custom Menus	24

File Options
Default custom menu set	[Standard FileMaker Menus]
When opening file
Minimum allowed version	12.0
Login using	Account Name; Account= Admin
Allow user to save password	Off
Require iOS passcode	Off
Switch to layout	Off
Hide all toolbars	Off
Script triggers
OnFirstWindowOpen	Off
OnLastWindowClose	Off
OnWindowOpen	Off
OnWindowClose	Off
OnFileAVPlayerChange	Off
Thumbnail Settings
Generate Thumbnails	On; Temporary

Tables

Table Name	Statistics	Occurrences in Relationship Graph
Test	15 fields defined, 1 record	Test

Fields

Table Name: Test - 15 Fields
Field Name	Type	Options	Comments	On Layouts	In Relationships	In Scripts	In Value Lists
Calendar	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		Test		Create Event
AllDay	Normal, Number	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		Test		Create Event
StartDate	Normal, Timestamp	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		Test		Create Event SetDates
EndDate	Normal, Timestamp	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		Test		Create Event SetDates
Notes	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		Test		Create Event
TimeZone	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		Test		Create Event
Title	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		Test		Create Event
URL	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		Test		Create Event
AlarmSound	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		Test		Create Event
AlarmProximity	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		Test		Create Event
AlarmLocationTitle	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		Test		Create Event
AlarmLocationGeoLat	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		Test		Create Event
AlarmLocationGeoLong	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		Test		Create Event
Location	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		Test		Create Event
AlarmLocationRadius	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		Test		Create Event

Layout Objects: Test

Regular Fields

Field Name: Test::Calendar

Layout Name:

Test

Top: 60 pt
Left: 160 pt
Bottom: 81 pt
Right: 413 pt

Anchoring: Left, Top

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: Default for Data Type
Go to next field using: Tab key

Yes

Field Name: Test::AllDay

Layout Name:

Test

Top: 83 pt
Left: 160 pt
Bottom: 104 pt
Right: 413 pt

Anchoring: Left, Top

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: Default for Data Type
Go to next field using: Tab key

Yes

Field Name: Test::StartDate

Layout Name:

Test

Top: 106 pt
Left: 160 pt
Bottom: 127 pt
Right: 401 pt

Anchoring: Left, Top

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: Default for Data Type
Go to next field using: Tab key

Yes

Field Name: Test::EndDate

Layout Name:

Test

Top: 129 pt
Left: 160 pt
Bottom: 150 pt
Right: 401 pt

Anchoring: Left, Top

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: Default for Data Type
Go to next field using: Tab key

Yes

Field Name: Test::Notes

Layout Name:

Test

Top: 152 pt
Left: 160 pt
Bottom: 173 pt
Right: 413 pt

Anchoring: Left, Top

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: Default for Data Type
Go to next field using: Tab key

Yes

Field Name: Test::TimeZone

Layout Name:

Test

Top: 175 pt
Left: 160 pt
Bottom: 196 pt
Right: 413 pt

Anchoring: Left, Top

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: Default for Data Type
Go to next field using: Tab key

Yes

Field Name: Test::Title

Layout Name:

Test

Top: 198 pt
Left: 160 pt
Bottom: 219 pt
Right: 413 pt

Anchoring: Left, Top

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: Default for Data Type
Go to next field using: Tab key

Yes

Field Name: Test::URL

Layout Name:

Test

Top: 221 pt
Left: 160 pt
Bottom: 242 pt
Right: 413 pt

Anchoring: Left, Top

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: Default for Data Type
Go to next field using: Tab key

Yes

Field Name: Test::AlarmSound

Layout Name:

Test

Top: 278 pt
Left: 160 pt
Bottom: 299 pt
Right: 413 pt

Anchoring: Left, Top

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: Default for Data Type
Go to next field using: Tab key

Yes

Field Name: Test::AlarmProximity

Layout Name:

Test

Top: 301 pt
Left: 160 pt
Bottom: 322 pt
Right: 413 pt

Anchoring: Left, Top

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: Default for Data Type
Go to next field using: Tab key

Yes

Field Name: Test::AlarmLocationTitle

Layout Name:

Test

Top: 324 pt
Left: 160 pt
Bottom: 345 pt
Right: 413 pt

Anchoring: Left, Top

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: Default for Data Type
Go to next field using: Tab key

Yes

Field Name: Test::AlarmLocationGeoLat

Layout Name:

Test

Top: 347 pt
Left: 160 pt
Bottom: 368 pt
Right: 413 pt

Anchoring: Left, Top

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: Default for Data Type
Go to next field using: Tab key

Yes

Field Name: Test::AlarmLocationGeoLong

Layout Name:

Test

Top: 370 pt
Left: 160 pt
Bottom: 391 pt
Right: 413 pt

Anchoring: Left, Top

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: Default for Data Type
Go to next field using: Tab key

Yes

Field Name: Test::Location

Layout Name:

Test

Top: 244 pt
Left: 160 pt
Bottom: 265 pt
Right: 413 pt

Anchoring: Left, Top

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: Default for Data Type
Go to next field using: Tab key

Yes

Field Name: Test::AlarmLocationRadius

Layout Name:

Test

Top: 393 pt
Left: 160 pt
Bottom: 414 pt
Right: 413 pt

Anchoring: Left, Top

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: Default for Data Type
Go to next field using: Tab key

Type:

Text: Create Event

Layout Name:

Test

Top: 496 pt
Left: 443 pt
Bottom: 522 pt
Right: 560 pt

Anchoring: Left, Top

Perform Script [ “Create Event” ]

Scripts:

Create Event

Button Properties

Coordinates

Script/Script Step

Type:

Text: Authorize

Layout Name:

Test

Top: 496 pt
Left: 310 pt
Bottom: 522 pt
Right: 427 pt

Anchoring: Left, Top

Perform Script [ “Authorize” ]

Scripts:

Authorize

Button Properties

Coordinates

Script/Script Step

Type:

Text: Set Dates

Layout Name:

Test

Top: 497 pt
Left: 177 pt
Bottom: 523 pt
Right: 294 pt

Anchoring: Left, Top

Perform Script [ “SetDates” ]

Scripts:

SetDates

Next Script: [SetDates]

Script Name	Create Event
Run script with full access privileges	Off
Include In Menu	Yes
Layouts that use this script	Test
Scripts that use this script
Script Definition
Script Steps	Set Variable [ $item; Value:MBS( "Events.NewEvent" ) ] Set Variable [ $calendar; Value:Test::Calendar ] If [ IsEmpty(Test::Calendar) ] Set Variable [ $calendar; Value:MBS( "Events.defaultCalendarForNewEvents" ) ] End If Set Variable [ $r; Value:MBS( "Events.Item.SetCalendar"; $item; $calendar ) ] Set Variable [ $r; Value:MBS( "Events.Item.SetLocation"; $item; Test::Location ) ] Set Variable [ $r; Value:MBS( "Events.Item.SetTitle"; $item; Test::Title ) ] Set Variable [ $r; Value:MBS( "Events.Item.SetURL"; $item; Test::URL ) ] Set Variable [ $r; Value:MBS( "Events.Event.SetAllDay"; $item; Test::AllDay ) ] Set Variable [ $r; Value:MBS( "Events.Item.SetNotes"; $item; Test::Notes ) ] If [ IsEmpty(Test::TimeZone) ] #we don't set it Else Set Variable [ $r; Value:MBS( "Events.Item.SetTimezone"; $item; Test::TimeZone ) ] End If If [ not IsEmpty(Test::StartDate) ] Set Variable [ $r; Value:MBS( "Events.Event.SetStartDate"; $item; Test::StartDate ) ] End If If [ not IsEmpty(Test::EndDate) ] Set Variable [ $r; Value:MBS( "Events.Event.SetEndDate"; $item; Test::EndDate ) ] End If If [ not IsEmpty(Test::AlarmSound) or not IsEmpty(Test::AlarmLocationTitle) or not IsEmpty(Test::AlarmLocationGeoLat) ] Set Variable [ $alarm; Value:MBS( "Events.NewAlarm" ) ] If [ not IsEmpty(Test::AlarmSound) ] Set Variable [ $r; Value:MBS( "Events.Alarm.SetSound"; $alarm; Test::AlarmSound ) ] End If If [ not IsEmpty(Test::AlarmLocationTitle) ] Set Variable [ $l; Value:MBS( "Events.StructuredLocation.NewLocationWithTitle"; Test::AlarmLocationTitle ) ] Set Variable [ $r; Value:MBS( "Events.StructuredLocation.SetRadius"; $l; Test::AlarmLocationRadius ) ] Set Variable [ $r; Value:MBS( "Events.StructuredLocation.SetGeoLocation"; $l; Test::AlarmLocationGeoLat; Test::AlarmLocationGeoLong ) ] Set Variable [ $r; Value:MBS( "Events.Alarm.SetStructuredLocation"; $alarm; $l) ] Set Variable [ $r; Value:MBS( "Events.Alarm.SetProximity"; $alarm; Test::AlarmProximity ) ] End If Set Variable [ $r; Value:MBS( "Events.Item.AddAlarm"; $item; $alarm ) ] End If Set Variable [ $r; Value:MBS( "Events.SaveEvent"; $item ; "this"; 1 ) ] Show Custom Dialog [ Title: "Saved Event"; Message: $r; Default Button: “OK”, Commit: “Yes” ]
Fields used in this script	Test::Calendar Test::Location Test::Title Test::URL Test::AllDay Test::Notes Test::TimeZone Test::StartDate Test::EndDate Test::AlarmSound Test::AlarmLocationTitle Test::AlarmLocationGeoLat Test::AlarmLocationRadius Test::AlarmLocationGeoLong Test::AlarmProximity
Scripts used in this script
Layouts used in this script
Tables used in this script	Test
Table occurrences used by this script	Test
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [Create Event]

Next Script: [Authorize]

Script Name	SetDates
Run script with full access privileges	Off
Include In Menu	Yes
Layouts that use this script	Test
Scripts that use this script
Script Definition
Script Steps	Set Variable [ $now; Value:Get(CurrentHostTimestamp) ] Set Field [ Test::StartDate; $now + 10 * 60 ] Set Field [ Test::EndDate; $now + 30 * 60 ]
Fields used in this script	Test::StartDate Test::EndDate
Scripts used in this script
Layouts used in this script
Tables used in this script	Test
Table occurrences used by this script	Test
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [SetDates]

Next Script: [Create Calendar]

Script Name	Authorize
Run script with full access privileges	Off
Include In Menu	Yes
Layouts that use this script	Test
Scripts that use this script
Script Definition
Script Steps	Set Variable [ $r; Value:MBS("Events.AuthorizationStatusForEntityType"; "Events") ] If [ MBS("IsError") ] Show Custom Dialog [ Title: "We have a problem"; Message: MBS("Text.RemovePrefix"; $r; "[MBS] "); Default Button: “OK”, Commit: “Yes”; Button 2: “Abbrechen”, Commit: “No” ] Else If [ $r = "NotDetermined" ] Set Variable [ $r; Value:MBS( "Events.requestAccessToEntityType"; "Events" ) ] If [ $r = "Wait" ] #dialog is showing. Else If [ $r = "OK" ] Show Custom Dialog [ Title: "Success"; Message: "We are authorized and ready to go."; Default Button: “OK”, Commit: “Yes”; Button 2: “Abbrechen”, Commit: “No” ] Else Show Custom Dialog [ Title: "We have a problem"; Message: $r; Default Button: “OK”, Commit: “Yes”; Button 2: “Abbrechen”, Commit: “No” ] End If Else If [ $r = "Restricted" ] Show Custom Dialog [ Title: "Success"; Message: "We are authorized for a restricted access and ready to go."; Default Button: “OK”, Commit: “Yes”; Button 2: “Abbrechen”, Commit: “No” ] Else If [ $r = "Denied" ] Show Custom Dialog [ Title: "Problem"; Message: "We are denied for calendar access. Please go to system preferences and enable us."; Default Button: “OK”, Commit: “Yes”; Button 2: “Abbrechen”, Commit: “No” ] Else If [ $r = "Authorized" ] Show Custom Dialog [ Title: "Success"; Message: "We are authorized and ready to go."; Default Button: “OK”, Commit: “Yes”; Button 2: “Abbrechen”, Commit: “No” ] Else Show Custom Dialog [ Title: "We have a problem"; Message: $r; Default Button: “OK”, Commit: “Yes”; Button 2: “Abbrechen”, Commit: “No” ] End If
Fields used in this script
Scripts used in this script
Layouts used in this script
Tables used in this script
Table occurrences used by this script
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [Authorize]

Script Name	Create Calendar
Run script with full access privileges	Off
Include In Menu	Yes
Layouts that use this script
Scripts that use this script
Script Definition
Script Steps	#We need a source to add the new calendar to. I prefer local, but newer macOS doesn't have it, so we use caldav for iCloud Set Variable [ $source; Value:MBS( "Events.SourceWithType"; "local" ) ] If [ IsEmpty ( $source ) ] Set Variable [ $source; Value:MBS( "Events.SourceWithType"; "caldav" ) ] End If #New calendar for events Set Variable [ $calendar; Value:MBS( "Events.NewCalendar"; "Event" ) ] #configure it Set Variable [ $r; Value:MBS( "Events.Calendar.SetTitle"; $Calendar; "Test" ) ] Set Variable [ $r; Value:MBS( "Events.Calendar.SetColor"; $Calendar; "red" ) ] Set Variable [ $r; Value:MBS( "Events.Calendar.SetSource"; $Calendar; $Source ) ] #save to database Set Variable [ $r; Value:MBS( "Events.SaveCalendar"; $calendar ;1 ) ] #and check what ID we got for later Set Variable [ $id; Value:MBS( "Events.Calendar.CalendarIdentifier"; $Calendar ) ] Show Custom Dialog [ Title: "Saved calendar"; Message: $r & ¶ & $id; Default Button: “OK”, Commit: “Yes” ]
Fields used in this script
Scripts used in this script
Layouts used in this script
Tables used in this script
Table occurrences used by this script
Custom Functions used by this script
Custom menu set used by this script

Download example: Events Create Event

Used functions: