Monkeybread Software - MBS FileMaker Plugin: Registration

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

MBS FileMaker Plugin Example Databases

Registration

All examples are included with download of MBS FileMaker Plugin.

Registration.fmp12

Overview
Tables	1
Relationships	0
Layouts	1
Scripts	9
Value Lists	0
Custom Functions	0
Custom Menus	33

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

Tables

Table Name	Statistics	Occurrences in Relationship Graph
Register	8 fields defined, 1 record	Register

Fields

Table Name: Register - 8 Fields
Field Name	Type	Options	Comments	On Layouts	In Relationships	In Scripts	In Value Lists
LicenseeName	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		Register		Register StoreRegistration ClearRegistration
Component	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		Register		Register StoreRegistration ClearRegistration
LicenseType	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		Register		Register StoreRegistration ClearRegistration
ExpireMonth	Normal, Number	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		Register		Register StoreRegistration ClearRegistration
SerialNumber	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		Register		Register StoreRegistration ClearRegistration
Version	Calculated, Text	Calculation: Context table: Register Let([ r = MBS("Version"); r = If( GetAsText ( r ) = "?"; "Not installed"; r) ]; r) Storage: Repetitions: 1 Do not store calculation results Index Language: German		Register
State	Calculated, Text	Calculation: Context table: Register Let([ r = MBS( "Plugin.State" ); r = If( GetAsText ( r ) = "?"; "Not installed"; r) ]; r) Storage: Repetitions: 1 Do not store calculation results Index Language: German		Register
Compiled Date	Calculated, Text	Calculation: Context table: Register Let([ r = MBS( "Plugin.CompileDate" ); r = If( GetAsText ( r ) = "?"; "Not installed"; r) ]; r) Storage: Repetitions: 1 Do not store calculation results Index Language: German		Register

Layout Objects: Register

Regular Fields

Field Name: Register::LicenseeName

Layout Name:

Top: 51 pt
Left: 187 pt
Bottom: 70 pt
Right: 475 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: Register::Component

Layout Name:

Top: 74 pt
Left: 187 pt
Bottom: 93 pt
Right: 475 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: Register::LicenseType

Layout Name:

Top: 97 pt
Left: 187 pt
Bottom: 116 pt
Right: 475 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: Register::ExpireMonth

Layout Name:

Top: 120 pt
Left: 187 pt
Bottom: 139 pt
Right: 475 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: Register::SerialNumber

Layout Name:

Top: 143 pt
Left: 187 pt
Bottom: 162 pt
Right: 475 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: Register::Version

Layout Name:

Top: 379 pt
Left: 485 pt
Bottom: 398 pt
Right: 595 pt

Anchoring: Right, Bottom

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: Register::State

Layout Name:

Top: 433 pt
Left: 485 pt
Bottom: 452 pt
Right: 595 pt

Anchoring: Right, Bottom

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: Register::Compiled Date

Layout Name:

Top: 406 pt
Left: 485 pt
Bottom: 425 pt
Right: 595 pt

Anchoring: Right, Bottom

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: Register

Layout Name:

Top: 235 pt
Left: 187 pt
Bottom: 267 pt
Right: 320 pt

Anchoring: Left, Top

Perform Script [ “Register” ]

Scripts:

Button Properties

Coordinates

Script/Script Step

Type:

Text: Is Registered?

Layout Name:

Top: 180 pt
Left: 342 pt
Bottom: 212 pt
Right: 475 pt

Anchoring: Left, Top

Perform Script [ “IsRegistered” ]

Scripts:

IsRegistered

Button Properties

Coordinates

Script/Script Step

Type:

Text: Store Registration

Layout Name:

Top: 307 pt
Left: 187 pt
Bottom: 339 pt
Right: 320 pt

Anchoring: Left, Top

Perform Script [ “StoreRegistration” ]

Scripts:

StoreRegistration

Button Properties

Coordinates

Script/Script Step

Type:

Text: Clear Registration

Layout Name:

Top: 307 pt
Left: 342 pt
Bottom: 339 pt
Right: 475 pt

Anchoring: Left, Top

Perform Script [ “ClearRegistration” ]

Scripts:

ClearRegistration

Button Properties

Coordinates

Script/Script Step

Type:

Text: Unregister

Layout Name:

Top: 235 pt
Left: 342 pt
Bottom: 267 pt
Right: 475 pt

Anchoring: Left, Top

Perform Script [ “Unregister” ]

Scripts:

Unregister

Example Register Scirpt

Unregister Solution

Next Script: [Unregister]

Script Name	Register
Run script with full access privileges	Off
Siri Shortcut Visible	Off
Include In Menu	Yes
Layouts that use this script	Register
Scripts that use this script
Script Definition
Script Steps	Set Variable [ $r; Value:MBS( "Register" ;Register::LicenseeName; Register::Component; Register::LicenseType; Register::ExpireMonth; Register::SerialNumber ) ] If [ Get ( LastError ) <> 0 ] Show Custom Dialog [ Title: "Register"; Message: "Got error code: " & Get ( LastError ); Default Button: “OK”, Commit: “Yes” ] Else If [ GetAsText ( $r ) = "?" ] Show Custom Dialog [ Title: "Register"; Message: "MBS Plugin not installed"; Default Button: “OK”, Commit: “Yes” ] Else [ ] Show Custom Dialog [ Title: "Register"; Message: $r; Default Button: “OK”, Commit: “Yes” ] End If
Fields used in this script	Register::LicenseeName Register::Component Register::LicenseType Register::ExpireMonth Register::SerialNumber
Scripts used in this script
Layouts used in this script
Tables used in this script	Register
Table occurrences used by this script	Register
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [Register]

Next Script: [StoreRegistration]

Script Name	Unregister
Run script with full access privileges	Off
Siri Shortcut Visible	Off
Include In Menu	Yes
Layouts that use this script	Register
Scripts that use this script
Script Definition
Script Steps	Set Variable [ $r; Value:MBS( "Unregister" ) ] If [ Get ( LastError ) <> 0 ] Show Custom Dialog [ Title: "Unregister"; Message: "Got error code: " & Get ( LastError ); Default Button: “OK”, Commit: “Yes” ] Else If [ GetAsText ( $r ) = "?" ] Show Custom Dialog [ Title: "Unregister"; Message: "MBS Plugin not installed"; Default Button: “OK”, Commit: “Yes” ] Else [ ] Show Custom Dialog [ Title: "Unregister"; Message: $r; Default Button: “OK”, Commit: “Yes” ] 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: [Unregister]

Next Script: [ClearRegistration]

Script Name	StoreRegistration
Run script with full access privileges	Off
Siri Shortcut Visible	Off
Include In Menu	Yes
Layouts that use this script	Register
Scripts that use this script
Script Definition
Script Steps	Set Variable [ $r; Value:MBS( "StoreRegistration" ;Register::LicenseeName; Register::Component; Register::LicenseType; Register::ExpireMonth; Register::SerialNumber ) ] If [ Get ( LastError ) <> 0 ] Show Custom Dialog [ Title: "StoreRegistration"; Message: "Got error code: " & Get ( LastError ); Default Button: “OK”, Commit: “Yes” ] Else If [ GetAsText ( $r ) = "?" ] Show Custom Dialog [ Title: "StoreRegistration"; Message: "MBS Plugin not installed"; Default Button: “OK”, Commit: “Yes” ] Else [ ] Show Custom Dialog [ Title: "StoreRegistration"; Message: $r; Default Button: “OK”, Commit: “Yes” ] End If
Fields used in this script	Register::LicenseeName Register::Component Register::LicenseType Register::ExpireMonth Register::SerialNumber
Scripts used in this script
Layouts used in this script
Tables used in this script	Register
Table occurrences used by this script	Register
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [StoreRegistration]

Next Script: [IsRegistered]

Script Name	ClearRegistration
Run script with full access privileges	Off
Siri Shortcut Visible	Off
Include In Menu	Yes
Layouts that use this script	Register
Scripts that use this script
Script Definition
Script Steps	Set Variable [ $r; Value:MBS( "ClearRegistration" ;Register::LicenseeName; Register::Component; Register::LicenseType; Register::ExpireMonth; Register::SerialNumber ) ] If [ Get ( LastError ) <> 0 ] Show Custom Dialog [ Title: "ClearRegistration"; Message: "Got error code: " & Get ( LastError ); Default Button: “OK”, Commit: “Yes” ] Else If [ GetAsText ( $r ) = "?" ] Show Custom Dialog [ Title: "ClearRegistration"; Message: "MBS Plugin not installed"; Default Button: “OK”, Commit: “Yes” ] Else [ ] Show Custom Dialog [ Title: "ClearRegistration"; Message: $r; Default Button: “OK”, Commit: “Yes” ] End If
Fields used in this script	Register::LicenseeName Register::Component Register::LicenseType Register::ExpireMonth Register::SerialNumber
Scripts used in this script
Layouts used in this script
Tables used in this script	Register
Table occurrences used by this script	Register
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [ClearRegistration]

Next Script: [Example Register Scirpt]

Script Name	IsRegistered
Run script with full access privileges	Off
Siri Shortcut Visible	Off
Include In Menu	Yes
Layouts that use this script	Register
Scripts that use this script
Script Definition
Script Steps	Set Variable [ $r; Value:MBS( "IsRegistered" ) ] If [ $r = 1 ] Show Custom Dialog [ Title: "Registration"; Message: "The MBS Plugin is registered."; Default Button: “OK”, Commit: “Yes”; Button 2: “Abbrechen”, Commit: “No” ] Else [ ] Show Custom Dialog [ Title: "Registration"; Message: "The MBS Plugin is not registered."; 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: [IsRegistered]

Next Script: [-]

Script Name	Example Register Scirpt
Run script with full access privileges	Off
Siri Shortcut Visible	Off
Include In Menu	Yes
Layouts that use this script
Scripts that use this script
Script Definition
Script Steps	#Enable debug logging. Shows messages in DebugView/Console.app Set Variable [ $r; Value:MBS("Trace") ] #Register if needed for right platform If [ MBS("IsRegistered") = 0 ] If [ MBS("IsRuntime") ] Set Variable [ $r; Value:MBS("Register"; "test"; "Complete"; "Runtime"; 123; 123) ] Else If [ MBS("IsServer") ] Set Variable [ $r; Value:MBS("Register"; "test"; "Complete"; "Server"; 123; 123) ] Else If [ MBS("IsClient") ] Set Variable [ $r; Value:MBS("Register"; "test"; "Complete"; "5 Seats"; 123; 123) ] Else [ ] Set Variable [ $r; Value:"Unknown platform: " & MBS("Platform") ] End If #Show errors, so developer can fix them If [ $r ≠ "OK" ] Show Custom Dialog [ Title: "InitMBS failed."; Message: $r; Default Button: “OK”, Commit: “Yes”; Button 2: “Abbrechen”, Commit: “No” ] End If End If #May initialize other stuff #like dynapdf with library in extensions folder If [ MBS("DynaPDF.IsInitialized") = 0 ] Set Variable [ $DynaPDFLicense; Value:"1003637-16022016-3-8-12-685C57F..." ] If [ MBS("IsWindows") ] Set Variable [ $r; Value:MBS( "DynaPDF.Initialize"; "dynapdf.dll"; $DynaPDFLicense) ] Else If [ MBS("IsMacOSX") ] Set Variable [ $r; Value:MBS( "DynaPDF.Initialize"; "dynapdf.dylib"; $DynaPDFLicense) ] Else [ ] Set Variable [ $r; Value:"Unknown platform: " & MBS("Platform") ] End If #Show errors, so developer can fix them If [ $r ≠ "OK" ] Show Custom Dialog [ Title: "InitMBS failed."; Message: $r; Default Button: “OK”, Commit: “Yes”; Button 2: “Abbrechen”, Commit: “No” ] End If 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: [Example Register Scirpt]

Next Script: [Register Solution]

Script Name	-
Run script with full access privileges	Off
Siri Shortcut Visible	Off
Include In Menu	Yes
Layouts that use this script
Scripts that use this script
Script Definition
Script Steps
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: [-]

Next Script: [Unregister Solution]

Script Name	Register Solution
Run script with full access privileges	Off
Siri Shortcut Visible	Off
Include In Menu	No
Layouts that use this script
Scripts that use this script
Script Definition
Script Steps	#Only activate a license in a module, not the whole solution. #Check if client already has a MBS license Set Variable [ $r; Value:MBS("IsRegistered") ] If [ $r = 1 ] Exit Script [ Result: "OK" ] Else [ ] #now set your license for use inside module Set Variable [ $r; Value:MBS("Register"; "test"; "Complete"; "ProDeveloper"; 123; 123) ] Set Variable [ $e; Value:Get ( LastError ) ] If [ $e <> 0 ] Show Custom Dialog [ Title: "Register"; Message: "Got error code: " & $e; Default Button: “OK”, Commit: “Yes” ] Exit Script [ Result: "Error " & $e ] Else If [ GetAsText ( $r ) = "?" ] Show Custom Dialog [ Title: "Register"; Message: "MBS Plugin not installed"; Default Button: “OK”, Commit: “Yes” ] Exit Script [ Result: "No MBS Plugin" ] Else If [ $r = "OK" ] #later call Unregister Solution script! #e.g. in 5 seconds with timer Set Variable [ $s; Value:MBS( "Schedule.StartScriptAfterDelay"; 5; Get(FileName); "Unregister Solution") ] #Limit plugin to onkly the functions you need Set Variable [ $s; Value:MBS( "Plugin.SetFunctions"; "Unregister¶XML.¶Trace¶Text.*") ] Exit Script [ Result: $r ] Else [ ] Show Custom Dialog [ Title: "Register"; Message: $r; Default Button: “OK”, Commit: “Yes” ] Exit Script [ Result: $r ] End If 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: [Register Solution]

Script Name	Unregister Solution
Run script with full access privileges	Off
Siri Shortcut Visible	Off
Include In Menu	No
Layouts that use this script
Scripts that use this script
Script Definition
Script Steps	Set Variable [ $name; Value:MBS( "Plugin.LicenseeName" ) ] If [ $name = "Your Name" ] #unregister your license Set Variable [ $r; Value:MBS( "Unregister" ) ] Set Variable [ $e; Value:Get ( LastError ) ] If [ $e <> 0 ] Show Custom Dialog [ Title: "Register"; Message: "Got error code: " & $e; Default Button: “OK”, Commit: “Yes” ] Exit Script [ Result: "Error " & $e ] Else If [ GetAsText ( $r ) = "?" ] Show Custom Dialog [ Title: "Unregister"; Message: "MBS Plugin not installed"; Default Button: “OK”, Commit: “Yes” ] Exit Script [ Result: "No MBS Plugin" ] Else If [ $r = "OK" ] Exit Script [ Result: $r ] Else [ ] Show Custom Dialog [ Title: "Register"; Message: $r; Default Button: “OK”, Commit: “Yes” ] Exit Script [ Result: $r ] End If 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

Download example: Registration

Used functions: