Monkeybread Software - MBS FileMaker Plugin: FileMaker Snippet Storage

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

MBS FileMaker Plugin Example Databases

FileMaker Snippet Storage

All examples are included with download of MBS FileMaker Plugin.

FileMaker Snippet Storage.fmp12

Overview
Tables	1
Relationships	1
Layouts	1
Scripts	11
Value Lists	2
Custom Functions	59
Custom Menus	33

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	Script: AutoStart
OnWindowClose	Off
OnFileAVPlayerChange	Off
Thumbnail Settings
Generate Thumbnails	On; Temporary

Tables

Table Name	Statistics	Occurrences in Relationship Graph
SnippetStorageDB	16 fields defined, 0 record	PORT_SnippetStorageDB, SnippetStorageDB

Fields

Table Name: SnippetStorageDB - 16 Fields
Field Name	Type	Options	Comments	On Layouts	In Relationships	In Scripts	In Value Lists
f004t_Snippet	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		SnippetStorageDB		ClipboardToField Update ClipboardToField FieldToClipboard
f001t_Description	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		SnippetStorageDB
f003t_Type	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: All Index Language: German		SnippetStorageDB	SnippetStorageDB=PORT_SnippetStorageDB	ClipboardToField FieldToClipboard UpdateScript
s001b_One	Normal, Number	Auto-Enter: Constant data: 1 Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: All Index Language: German
a001t_GUID	Normal, Text	Auto-Enter: Allow editing Context table: SnippetStorageDB Calculation: __GUID Validation: Only during data entry Storage: Repetitions: 1 Indexing: Minimal Automatically create indexes as needed Index Language: German		SnippetStorageDB
a_---------------------	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German
f_---------------------	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German
fs-----------------------	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Global Repetitions: 1 Index Language: German
n_---------------------	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German
s_---------------------	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German
sv_---------------------	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German
f002t_Plugin	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German
v_---------------------	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German
v001t_REL_PORT_Snippet	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Global Repetitions: 1 Index Language: German		SnippetStorageDB	SnippetStorageDB=PORT_SnippetStorageDB	Set PORT
f005n_SortID	Normal, Number	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: All Index Language: German		SnippetStorageDB
v002t_GUID_Snippet	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Global Repetitions: 1 Index Language: German				GoTo Snippet Delete Snippet

Layout Objects: SnippetStorageDB

Regular Fields

Field Name: SnippetStorageDB::f004t_Snippet

Layout Name:

SnippetStorageDB

Top: 74 pt
Left: 620 pt
Bottom: 766 pt
Right: 1390 pt

Anchoring: Left and Right, Top and Bottom

Field Format:

Edit Box
Include vertical scrollbar

Field Behavior:

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

Yes

Field Name: PORT_SnippetStorageDB::f005n_SortID

Layout Name:

SnippetStorageDB

Top: 98 pt
Left: 1 pt
Bottom: 119 pt
Right: 31 pt

Anchoring: Left, Top

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Browse mode
Select entire contents of field on entry
Touch keyboard type: Default for Data Type

Field Name: PORT_SnippetStorageDB::f001t_Description

Layout Name:

SnippetStorageDB

Top: 98 pt
Left: 32 pt
Bottom: 119 pt
Right: 564 pt

Anchoring: Left, Top

Field Format:

Edit Box

Field Name: SnippetStorageDB::f001t_Description

Layout Name:

SnippetStorageDB

Tooltip:

"Description"

Top: 43 pt
Left: 620 pt
Bottom: 71 pt
Right: 1120 pt

Anchoring: Left, Top

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Browse mode
Touch keyboard type: Default for Data Type

Field Name: SnippetStorageDB::f003t_Type

Layout Name:

SnippetStorageDB

Tooltip:

"Type of snippet"

Top: 43 pt
Left: 1132 pt
Bottom: 71 pt
Right: 1282 pt

Anchoring: Left, Top

Field Format:

Pop-up Menu
Display values from: SnippedTypen

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: Default for Data Type

Field Name: SnippetStorageDB::f005n_SortID

Layout Name:

SnippetStorageDB

Tooltip:

"Sorting"

Top: 43 pt
Left: 1291 pt
Bottom: 71 pt
Right: 1351 pt

Anchoring: Left, Top

Field Format:

Pop-up Menu
Display values from: SortID

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: Default for Data Type

Field Name: SnippetStorageDB::a001t_GUID

Layout Name:

SnippetStorageDB

Visibility:

Only visible in Table View

Top: 24 pt
Left: 630 pt
Bottom: 45 pt
Right: 750 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

Conditional Formatting	Condition	Format
1.	Formula: Exact ( PORT_SnippetStorageDB::a001t_GUID ; SnippetStorageDB::a001t_GUID )	self:normal .self { background-color: rgba(39.0064%,50.3948%,60.3137%,1); } self:normal .icon { -fm-icon-color: rgba(0%,0%,0%,0); }

Field Name: PORT_SnippetStorageDB::a001t_GUID

Layout Name:

SnippetStorageDB

Visibility:

Only visible in Table View

Top: 24 pt
Left: 750 pt
Bottom: 45 pt
Right: 870 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

Conditional Formatting	Condition	Format
1.	Formula: Exact ( PORT_SnippetStorageDB::a001t_GUID ; SnippetStorageDB::a001t_GUID )	self:normal .self { background-color: rgba(39.0064%,50.3948%,60.3137%,1); } self:normal .icon { -fm-icon-color: rgba(0%,0%,0%,0); }

Text:

<<$anz>>

Layout Name:

SnippetStorageDB

Top: 98 pt
Left: 0 pt
Bottom: 122 pt
Right: 594 pt

Anchoring: Left, Top

Type:

Text: <<$anz>>

Layout Name:

SnippetStorageDB

Additional Properties:

Rectangular

Top: 98 pt
Left: 0 pt
Bottom: 122 pt
Right: 594 pt

Anchoring: Left, Top

Perform Script [ “GoTo Snippet”; Parameter: PORT_SnippetStorageDB::a001t_GUID ]

Scripts:

GoTo Snippet

Fields:

PORT_SnippetStorageDB::a001t_GUID

Button Properties

Coordinates

Script/Script Step

Type:

Text: www.clarotools.com - manual

Layout Name:

SnippetStorageDB

Additional Properties:

Change to hand cursor over button
Rectangular

Top: 766 pt
Left: 1 pt
Bottom: 788 pt
Right: 1399 pt

Anchoring: Center, Center

Open URL [ "www.clarotools.com/clarosnippedmanual.html" ] [ No dialog ]

Type:

Text:

Layout Name:

SnippetStorageDB

Additional Properties:

Change to hand cursor over button

Top: 99 pt
Left: 569 pt
Bottom: 119 pt
Right: 593 pt

Anchoring: Left, Top

Perform Script [ “Delete Snippet”; Parameter: PORT_SnippetStorageDB::a001t_GUID & ¶ & PORT_SnippetStorageDB::f001t_Description ]

Scripts:

Delete Snippet

Fields:

PORT_SnippetStorageDB::a001t_GUID
PORT_SnippetStorageDB::f001t_Description

Button Properties

Coordinates

Script/Script Step

Type:

Text:

Layout Name:

SnippetStorageDB

Tooltip:

"Change ONLY snippet field - Clipboard to textfield"

Additional Properties:

Change to hand cursor over button

Top: 43 pt
Left: 1360 pt
Bottom: 71 pt
Right: 1390 pt

Anchoring: Left and Right, Top

Perform Script [ “Update ClipboardToField” ]

Scripts:

Update ClipboardToField

Button Bars

Button Bar Properties

Coordinates

Layout Name:

SnippetStorageDB

Tooltip:

"Copy textfield to clipboard"

Orientation:

horizontal

Top: 0 pt
Left: 620 pt
Bottom: 40 pt
Right: 870 pt

Anchoring: Left, Top

Type:

Text:

Layout Name:

SnippetStorageDB

Tooltip:

"Copy textfield to clipboard"

Label Calculations:

"COPY"

Additional Properties:

Change to hand cursor over button

Top: 0 pt
Left: 621 pt
Bottom: 40 pt
Right: 869 pt

Perform Script [ “FieldToClipboard” ]

Scripts:

FieldToClipboard

Button Bar Properties

Coordinates

Layout Name:

SnippetStorageDB

Orientation:

horizontal

Top: 40 pt
Left: 0 pt
Bottom: 97 pt
Right: 612 pt

Anchoring: Left, Top

Type:

Text:

Layout Name:

SnippetStorageDB

Label Calculations:

"Script"

Additional Properties:

Change to hand cursor over button

Top: 40 pt
Left: 1 pt
Bottom: 97 pt
Right: 69 pt

Perform Script [ “Set PORT”; Parameter: "Script" ]

Scripts:

Set PORT

Conditional Formatting	Condition	Format
1.	Formula: Self = SnippetStorageDB::v001t_REL_PORT_Snippet	self:normal .self { background-color: rgba(39.0064%,50.3948%,60.3137%,1); color: rgba(100%,100%,100%,1); } self:normal .icon { -fm-icon-color: rgba(0%,0%,0%,0); }

Button Properties

Coordinates

Script/Script Step

Type:

Text:

Layout Name:

SnippetStorageDB

Label Calculations:

"Script" & ¶ & "Step"

Additional Properties:

Change to hand cursor over button

Top: 40 pt
Left: 69 pt
Bottom: 97 pt
Right: 137 pt

Perform Script [ “Set PORT”; Parameter: "Scriptstep" ]

Scripts:

Set PORT

Conditional Formatting	Condition	Format
1.	Formula: Self = SnippetStorageDB::v001t_REL_PORT_Snippet	self:normal .self { background-color: rgba(39.0064%,50.3948%,60.3137%,1); color: rgba(100%,100%,100%,1); } self:normal .icon { -fm-icon-color: rgba(0%,0%,0%,0); }

Button Properties

Coordinates

Script/Script Step

Type:

Text:

Layout Name:

SnippetStorageDB

Label Calculations:

"Custom" & ¶ & "Function"

Additional Properties:

Change to hand cursor over button

Top: 40 pt
Left: 137 pt
Bottom: 97 pt
Right: 204 pt

Perform Script [ “Set PORT”; Parameter: "CustomFunction" ]

Scripts:

Set PORT

Conditional Formatting	Condition	Format
1.	Formula: Self = SnippetStorageDB::v001t_REL_PORT_Snippet	self:normal .self { background-color: rgba(39.0064%,50.3948%,60.3137%,1); color: rgba(100%,100%,100%,1); } self:normal .icon { -fm-icon-color: rgba(0%,0%,0%,0); }

Button Properties

Coordinates

Script/Script Step

Type:

Text:

Layout Name:

SnippetStorageDB

Label Calculations:

"Table"

Additional Properties:

Change to hand cursor over button

Top: 40 pt
Left: 204 pt
Bottom: 97 pt
Right: 272 pt

Perform Script [ “Set PORT”; Parameter: "Table" ]

Scripts:

Set PORT

Button Properties

Coordinates

Script/Script Step

Type:

Text:

Layout Name:

SnippetStorageDB

Label Calculations:

"Field"

Additional Properties:

Change to hand cursor over button

Top: 40 pt
Left: 272 pt
Bottom: 97 pt
Right: 340 pt

Perform Script [ “Set PORT”; Parameter: "Field" ]

Scripts:

Set PORT

Button Properties

Coordinates

Script/Script Step

Type:

Text:

Layout Name:

SnippetStorageDB

Label Calculations:

"Layout"

Additional Properties:

Change to hand cursor over button

Top: 40 pt
Left: 340 pt
Bottom: 97 pt
Right: 408 pt

Perform Script [ “Set PORT”; Parameter: "Layout Layout12" ]

Scripts:

Set PORT

Conditional Formatting	Condition	Format
1.	Formula: Self = SnippetStorageDB::v001t_REL_PORT_Snippet	self:normal .self { background-color: rgba(39.0064%,50.3948%,60.3137%,1); color: rgba(100%,100%,100%,1); } self:normal .icon { -fm-icon-color: rgba(0%,0%,0%,0); }

Button Properties

Coordinates

Script/Script Step

Type:

Text:

Layout Name:

SnippetStorageDB

Label Calculations:

"Layout" & ¶ & "12"

Top: 40 pt
Left: 408 pt
Bottom: 97 pt
Right: 475 pt

Perform Script [ “Set PORT”; Parameter: "Layout12" ]

Scripts:

Set PORT

Button Properties

Coordinates

Script/Script Step

Type:

Text:

Layout Name:

SnippetStorageDB

Label Calculations:

"Value" & ¶ & "List"

Top: 40 pt
Left: 475 pt
Bottom: 97 pt
Right: 543 pt

Perform Script [ “Set PORT”; Parameter: "ValueList" ]

Scripts:

Set PORT

Button Properties

Coordinates

Script/Script Step

Type:

Text:

Layout Name:

SnippetStorageDB

Label Calculations:

"Text"

Additional Properties:

Change to hand cursor over button

Top: 40 pt
Left: 543 pt
Bottom: 97 pt
Right: 611 pt

Perform Script [ “Set PORT”; Parameter: "Text" ]

Scripts:

Set PORT

Conditional Formatting	Condition	Format
1.	Formula: Self = SnippetStorageDB::v001t_REL_PORT_Snippet	self:normal .self { background-color: rgba(39.0064%,50.3948%,60.3137%,1); color: rgba(100%,100%,100%,1); } self:normal .icon { -fm-icon-color: rgba(0%,0%,0%,0); }

Button Bar Properties

Coordinates

Layout Name:

SnippetStorageDB

Tooltip:

"Create new snippet - Clipboard to textfield"

Orientation:

horizontal

Top: 0 pt
Left: 1150 pt
Bottom: 40 pt
Right: 1400 pt

Anchoring: Right, Top

Type:

Text:

Layout Name:

SnippetStorageDB

Tooltip:

"Create new snippet - Clipboard to textfield"

Label Calculations:

"NEW"

Additional Properties:

Change to hand cursor over button

Top: 0 pt
Left: 1151 pt
Bottom: 40 pt
Right: 1400 pt

Perform Script [ “ClipboardToField” ]

Scripts:

ClipboardToField

Table:

PORT_SnippetStorageDB

Layout Name:

SnippetStorageDB

Top: 97 pt
Left: 0 pt
Bottom: 766 pt
Right: 612 pt

Anchoring: Left, Top and Bottom

Field Objects

PORT_SnippetStorageDB::f005n_SortID at (98, 1, 119, 31)
PORT_SnippetStorageDB::f001t_Description at (98, 32, 119, 564)

Merge Field Objects

<<$anz>> at (98, 0, 122, 594)

Sort records: On
Field: f005n_SortID
- Ascending order
- Reorder based on summary field: Off
- Override field's language for sort: Off
Field: f001t_Description
- Ascending order
- Reorder based on summary field: Off
- Override field's language for sort: Off

Filter calculation: None
Initial Row: 1
Number of Rows: 29
Show vertical scroll bar

Graphic Objects

Graphic Object Properties

Coordinates

Type:

Text: <<$anz>>

Layout Name:

SnippetStorageDB

Top: 98 pt
Left: 0 pt
Bottom: 122 pt
Right: 594 pt

Anchoring: Left, Top

Conditional Formatting	Condition	Format
1.	Formula: Exact ( PORT_SnippetStorageDB::a001t_GUID ; SnippetStorageDB::a001t_GUID )	self:normal .self { background-color: rgba(39.0064%,50.3948%,60.3137%,1); } self:normal .icon { -fm-icon-color: rgba(0%,0%,0%,0); }

Value Lists

Value List Name	Source	Values	On Layouts
SnippedTypen	Custom	Script, Layout, Table, Field, ScriptStep, Text, CustomFunction, ValueList, Layout12	SnippetStorageDB
SortID	Custom	0, 1, 2, 3, 4, 5, 6, 7, 8, 9	SnippetStorageDB

Script Hierarchy

AutoStart

ClipboardToField

Update ClipboardToField

Script Name	AutoStart
Run script with full access privileges	Off
Include In Menu	No
Layouts that use this script
Scripts that use this script
Script Definition
Script Steps	Allow User Abort [ Off ] Set Error Capture [ On ] Set Zoom Level [ 100% ] Show/Hide Toolbars [ Hide ] Show/Hide Menubar [ Hide ] Adjust Window [ Resize to Fit ] Move/Resize Window [ Current Window; Height: 1500; Top: 0 ]
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: [AutoStart]

Next Script: [ClipboardToField]

Script Name	-
Run script with full access privileges	Off
Include In Menu	No
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: [Update ClipboardToField]

Script Name	ClipboardToField
Run script with full access privileges	Off
Include In Menu	No
Layouts that use this script	SnippetStorageDB
Scripts that use this script
Script Definition
Script Steps	Set Variable [ $dataScript; Value:MBS("Clipboard.GetFileMakerData"; "Script") ] Set Variable [ $dataScriptStep; Value:MBS("Clipboard.GetFileMakerData"; "ScriptStep") ] Set Variable [ $dataCustomFunction; Value:MBS ( "Clipboard.GetFileMakerData" ; "CustomFunction") ] Set Variable [ $dataTable; Value:MBS("Clipboard.GetFileMakerData"; "Table") ] Set Variable [ $dataField; Value:MBS("Clipboard.GetFileMakerData"; "Field") ] Set Variable [ $dataLayout; Value:MBS("Clipboard.GetFileMakerData"; "Layout") ] Set Variable [ $dataLayout12; Value:MBS("Clipboard.GetFileMakerData"; "Layout12") ] Set Variable [ $dataValueList; Value:MBS("Clipboard.GetFileMakerData"; "ValueList") ] Set Variable [ $dataText; Value:MBS ( "Clipboard.GetText" ) ] If [ Length($dataScript)>0 ] New Record/Request Set Field [ SnippetStorageDB::f004t_Snippet; $dataScript ] Set Field [ SnippetStorageDB::f003t_Type; "Script" ] Else If [ Length($dataLayout)>0 ] New Record/Request Set Field [ SnippetStorageDB::f004t_Snippet; $dataLayout ] Set Field [ SnippetStorageDB::f003t_Type; "Layout" ] Else If [ Length($dataLayout12)>0 ] New Record/Request Set Field [ SnippetStorageDB::f004t_Snippet; $dataLayout12 ] Set Field [ SnippetStorageDB::f003t_Type; "Layout12" ] Else If [ Length($dataScriptStep)>0 ] New Record/Request Set Field [ SnippetStorageDB::f004t_Snippet; $dataScriptStep ] Set Field [ SnippetStorageDB::f003t_Type; "ScriptStep" ] Else If [ Length($dataCustomFunction)>0 ] New Record/Request Set Field [ SnippetStorageDB::f004t_Snippet; $dataCustomFunction ] Set Field [ SnippetStorageDB::f003t_Type; "CustomFunction" ] Else If [ Length($dataTable)>0 ] New Record/Request Set Field [ SnippetStorageDB::f004t_Snippet; $dataTable ] Set Field [ SnippetStorageDB::f003t_Type; "Table" ] Else If [ Length($dataField)>0 ] New Record/Request Set Field [ SnippetStorageDB::f004t_Snippet; $dataField ] Set Field [ SnippetStorageDB::f003t_Type; "Field" ] Else If [ Length($dataValueList)>0 ] New Record/Request Set Field [ SnippetStorageDB::f004t_Snippet; $dataValueList ] Set Field [ SnippetStorageDB::f003t_Type; "ValueList" ] Else New Record/Request Set Field [ SnippetStorageDB::f004t_Snippet; $dataText ] Set Field [ SnippetStorageDB::f003t_Type; "Text" ] End If Commit Records/Requests [ No dialog ]
Fields used in this script	SnippetStorageDB::f004t_Snippet SnippetStorageDB::f003t_Type
Scripts used in this script
Layouts used in this script
Tables used in this script	SnippetStorageDB
Table occurrences used by this script	SnippetStorageDB
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [ClipboardToField]

Next Script: [FieldToClipboard]

Script Name	Update ClipboardToField
Run script with full access privileges	Off
Include In Menu	No
Layouts that use this script	SnippetStorageDB
Scripts that use this script
Script Definition
Script Steps	Show Custom Dialog [ Title: "Change"; Message: ¶ & "Really change the text?"; Default Button: “Cancel”, Commit: “No”; Button 2: “Change”, Commit: “Yes” ] If [ Get ( LastMessageChoice ) = 2 ] Set Variable [ $dataScript; Value:MBS("Clipboard.GetFileMakerData"; "Script") ] Set Variable [ $dataScriptStep; Value:MBS("Clipboard.GetFileMakerData"; "ScriptStep") ] Set Variable [ $dataCustomFunction; Value:MBS ( "Clipboard.GetFileMakerData" ; "CustomFunction") ] Set Variable [ $dataTable; Value:MBS("Clipboard.GetFileMakerData"; "Table") ] Set Variable [ $dataField; Value:MBS("Clipboard.GetFileMakerData"; "Field") ] Set Variable [ $dataLayout; Value:MBS("Clipboard.GetFileMakerData"; "Layout") ] Set Variable [ $dataLayout12; Value:MBS("Clipboard.GetFileMakerData"; "Layout12") ] Set Variable [ $dataValueList; Value:MBS("Clipboard.GetFileMakerData"; "ValueList") ] Set Variable [ $dataText; Value:MBS ( "Clipboard.GetText" ) ] If [ Length($dataScript)>0 ] Set Field [ SnippetStorageDB::f004t_Snippet; $dataScript ] Else If [ Length($dataLayout)>0 ] Set Field [ SnippetStorageDB::f004t_Snippet; $dataLayout ] Else If [ Length($dataLayout12)>0 ] Set Field [ SnippetStorageDB::f004t_Snippet; $dataLayout12 ] Else If [ Length($dataScriptStep)>0 ] Set Field [ SnippetStorageDB::f004t_Snippet; $dataScriptStep ] Else If [ Length($dataCustomFunction)>0 ] Set Field [ SnippetStorageDB::f004t_Snippet; $dataCustomFunction ] Else If [ Length($dataTable)>0 ] Set Field [ SnippetStorageDB::f004t_Snippet; $dataTable ] Else If [ Length($dataField)>0 ] Set Field [ SnippetStorageDB::f004t_Snippet; $dataField ] Else If [ Length($dataValueList)>0 ] Set Field [ SnippetStorageDB::f004t_Snippet; $dataValueList ] Else Set Field [ SnippetStorageDB::f004t_Snippet; $dataText ] End If Commit Records/Requests [ No dialog ] End If
Fields used in this script	SnippetStorageDB::f004t_Snippet
Scripts used in this script
Layouts used in this script
Tables used in this script	SnippetStorageDB
Table occurrences used by this script	SnippetStorageDB
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [Update ClipboardToField]

Next Script: [GoTo Snippet]

Script Name	FieldToClipboard
Run script with full access privileges	Off
Include In Menu	No
Layouts that use this script	SnippetStorageDB
Scripts that use this script
Script Definition
Script Steps	If [ SnippetStorageDB::f003t_Type = "Layout" ] Set Variable [ $r; Value:MBS("Clipboard.SetFileMakerData"; "Layout"; SnippetStorageDB::f004t_Snippet) ] Else If [ SnippetStorageDB::f003t_Type = "Layout12" ] Set Variable [ $r; Value:MBS("Clipboard.SetFileMakerData"; "Layout12"; SnippetStorageDB::f004t_Snippet) ] Else If [ SnippetStorageDB::f003t_Type = "Script" ] Set Variable [ $r; Value:MBS("Clipboard.SetFileMakerData"; "Script"; SnippetStorageDB::f004t_Snippet) ] Else If [ SnippetStorageDB::f003t_Type = "ScriptStep" ] Set Variable [ $r; Value:MBS("Clipboard.SetFileMakerData"; "ScriptStep"; SnippetStorageDB::f004t_Snippet) ] Else If [ SnippetStorageDB::f003t_Type = "CustomFunktion" ] Set Variable [ $r; Value:MBS("Clipboard.SetFileMakerData"; "CustomFunktion"; SnippetStorageDB::f004t_Snippet) ] Else If [ SnippetStorageDB::f003t_Type = "Field" ] Set Variable [ $r; Value:MBS("Clipboard.SetFileMakerData"; "Field"; SnippetStorageDB::f004t_Snippet) ] Else If [ SnippetStorageDB::f003t_Type = "Table" ] Set Variable [ $r; Value:MBS("Clipboard.SetFileMakerData"; "Table"; SnippetStorageDB::f004t_Snippet) ] Else If [ SnippetStorageDB::f003t_Type = "ValueList" ] Set Variable [ $r; Value:MBS("Clipboard.SetFileMakerData"; "ValueList"; SnippetStorageDB::f004t_Snippet) ] Else If [ SnippetStorageDB::f003t_Type = "Text" ] Copy [ SnippetStorageDB::f004t_Snippet ] [ Select ] Commit Records/Requests [ No dialog ] Else Show Custom Dialog [ Message: "Invalid Field"; Default Button: “OK”, Commit: “Yes”; Button 2: “Abbrechen”, Commit: “No” ] End If
Fields used in this script	SnippetStorageDB::f003t_Type SnippetStorageDB::f004t_Snippet
Scripts used in this script
Layouts used in this script
Tables used in this script	SnippetStorageDB
Table occurrences used by this script	SnippetStorageDB
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [FieldToClipboard]

Next Script: [Set PORT]

Script Name	GoTo Snippet
Run script with full access privileges	Off
Include In Menu	No
Layouts that use this script	SnippetStorageDB
Scripts that use this script
Script Definition
Script Steps	Allow User Abort [ Off ] Set Error Capture [ On ] #<Scriptparameter> # 1: GUID # 2: # 3: # 4: #</Scriptparameter> Set Variable [ $pos; Value:Get ( ActivePortalRowNumber ) ] Set Field [ SnippetStorageDB::v002t_GUID_Snippet; __SCRIPT_Parameter ( 1 ) ] Show All Records Go to Related Record [ From table: “PORT_SnippetStorageDB”; Using layout: <Current Layout> ] Go to Portal Row [ $pos ] [ Select; No dialog ]
Fields used in this script	SnippetStorageDB::v002t_GUID_Snippet
Scripts used in this script
Layouts used in this script
Tables used in this script	SnippetStorageDB
Table occurrences used by this script	SnippetStorageDB PORT_SnippetStorageDB
Custom Functions used by this script	__SCRIPT_Parameter
Custom menu set used by this script

Previous Script: [GoTo Snippet]

Next Script: [Delete Snippet]

Script Name	Set PORT
Run script with full access privileges	Off
Include In Menu	No
Layouts that use this script	SnippetStorageDB
Scripts that use this script
Script Definition
Script Steps	Allow User Abort [ Off ] Set Error Capture [ On ] #<Scriptparameter> # 1: # 2: # 3: # 4: #</Scriptparameter> Show All Records Show Omitted Only Set Field [ SnippetStorageDB::v001t_REL_PORT_Snippet; __SCRIPT_Parameter ( 1 ) ]
Fields used in this script	SnippetStorageDB::v001t_REL_PORT_Snippet
Scripts used in this script
Layouts used in this script
Tables used in this script	SnippetStorageDB
Table occurrences used by this script	SnippetStorageDB
Custom Functions used by this script	__SCRIPT_Parameter
Custom menu set used by this script

Previous Script: [Set PORT]

Next Script: [-]

Script Name	Delete Snippet
Run script with full access privileges	Off
Include In Menu	No
Layouts that use this script	SnippetStorageDB
Scripts that use this script
Script Definition
Script Steps	Allow User Abort [ Off ] Set Error Capture [ On ] #<Scriptparameter> # 1: GUID # 2: # 3: # 4: #</Scriptparameter> Set Variable [ $pos; Value:Get ( ActivePortalRowNumber ) ] Set Field [ SnippetStorageDB::v002t_GUID_Snippet; __SCRIPT_Parameter ( 1 ) ] Show All Records Go to Related Record [ From table: “PORT_SnippetStorageDB”; Using layout: <Current Layout> ] Show Custom Dialog [ Title: "Löschen"; Message: ¶ & "Wollen die den Eintrag " & " << " & __SCRIPT_Parameter ( 2 ) & " >> " & "wirklich löschen?"; Default Button: “Abbrechen”, Commit: “No”; Button 2: “Löschen”, Commit: “Yes” ] If [ Get ( LastMessageChoice ) = 2 ] Set Variable [ $r; Value:Let ( [ pFile = Get ( FileName ) ; pTable = "SnippetStorageDB" ; pField = "a001t_GUID" ; pGUID = "'" & __SCRIPT_Parameter ( 1 ) & "'" ] ; __MBS_FM_2_DeleteGUID ( pFile ; pTable ; pGUID ) ) ] Go to Portal Row [ $pos - 1 ] [ Select; No dialog ] End If
Fields used in this script	SnippetStorageDB::v002t_GUID_Snippet
Scripts used in this script
Layouts used in this script
Tables used in this script	SnippetStorageDB
Table occurrences used by this script	SnippetStorageDB PORT_SnippetStorageDB
Custom Functions used by this script	__SCRIPT_Parameter __MBS_FM_2_DeleteGUID
Custom menu set used by this script

Previous Script: [Delete Snippet]

Next Script: [UpdateScript]

Script Name	-
Run script with full access privileges	Off
Include In Menu	No
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: [-]

Script Name	UpdateScript
Run script with full access privileges	Off
Include In Menu	No
Layouts that use this script
Scripts that use this script
Script Definition
Script Steps	#Change type "custom func" to "CustomFunction" Enter Find Mode [ ] Set Field [ SnippetStorageDB::f003t_Type; "custom func" ] Perform Find [ ] Replace Field Contents [ SnippetStorageDB::f003t_Type; Replace with calculation: "CustomFunction" ] [ No dialog ]
Fields used in this script	SnippetStorageDB::f003t_Type
Scripts used in this script
Layouts used in this script
Tables used in this script	SnippetStorageDB
Table occurrences used by this script	SnippetStorageDB
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [UpdateScript]

Script Name	-
Run script with full access privileges	Off
Include In Menu	No
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

Custom Functions

Function Name	Parameters	Availability	Definition	In Field Definitions	In Scripts
__GEN_Character_to_HTML	pString	All accounts	/__GEN_Character_to_HTML ; pString / Substitute ( pString ; ["\"";"""] ; ["&";"&"] ; ["<";"<"] ; [">";">"] ; [" ";" "] ; ["¡";"¡"] ; ["¢";"¢"] ; ["£";"£"] ; ["¤";"¤"] ; ["¥";"¥"] ; ["¦";"¦"] ; ["§";"§"] ; ["¨";"¨"] ; ["©";"©"] ; ["ª";"ª"] ; ["«";"«"] ; ["¬";"¬"] ; ["";""] ; ["®";"®"] ; ["¯";"¯"] ; ["°";"°"] ; ["±";"±"] ; ["²";"²"] ; ["³";"³"] ; ["´";"´"] ; ["µ";"µ"] ; ["¶";"¶"] ; ["·";"·"] ; ["¸";"¸"] ; ["¹";"¹"] ; ["º";"º"] ; ["»";"»"] ; ["¼";"¼"] ; ["½";"½"] ; ["¾";"¾"] ; ["¿";"¿"] ; ["À";"À"] ; ["Á";"Á"] ; ["Â";"Â"] ; ["Ã";"Ã"] ; ["Ä";"Ä"] ; ["Å";"Å"] ; ["Æ";"Æ"] ; ["Ç";"Ç"] ; ["È";"È"] ; ["É";"É"] ; ["Ê";"Ê"] ; ["Ë";"Ë"] ; ["Ì";"Ì"] ; ["Í";"Í"] ; ["Î";"Î"] ; ["Ï";"Ï"] ; ["Ð";"Ð"] ; ["Ñ";"Ñ"] ; ["Ò";"Ò"] ; ["Ó";"Ó"] ; ["Ô";"Ô"] ; ["Õ";"Õ"] ; ["Ö";"Ö"] ; ["×";"×"] ; ["Ø";"Ø"] ; ["Ù";"Ù"] ; ["Ú";"Ú"] ; ["Û";"Û"] ; ["Ü";"Ü"] ; ["Ý";"Ý"] ; ["Þ";"Þ"] ; ["ß";"ß"] ; ["à";"à"] ; ["á";"á"] ; ["â";"â"] ; ["ã";"ã"] ; ["ä";"ä"] ; ["å";"å"] ; ["æ";"æ"] ; ["ç";"ç"] ; ["è";"è"] ; ["é";"é"] ; ["ê";"ê"] ; ["ë";"ë"] ; ["ì";"ì"] ; ["í";"í"] ; ["î";"î"] ; ["ï";"ï"] ; ["ð";"ð"] ; ["ñ";"ñ"] ; ["ò";"ò"] ; ["ó";"ó"] ; ["ô";"ô"] ; ["õ";"õ"] ; ["ö";"ö"] ; ["÷";"÷"] ; ["ø";"ø"] ; ["ù";"ù"] ; ["ú";"ú"] ; ["û";"û"] ; ["ü";"ü"] ; ["ý";"ý"] ; ["þ";"þ"] ; ["ÿ";"ÿ"] ; ["Α";"Α"] ; ["α";"α"] ; ["Β";"Β"] ; ["β";"β"] ; ["Γ";"Γ"] ; ["γ";"γ"] ; ["Δ";"Δ"] ; ["δ";"δ"] ; ["Ε";"Ε"] ; ["ε";"ε"] ; ["Ζ";"Ζ"] ; ["ζ";"ζ"] ; ["Η";"Η"] ; ["η";"η"] ; ["Θ";"Θ"] ; ["θ";"θ"] ; ["Ι";"Ι"] ; ["ι";"ι"] ; ["Κ";"Κ"] ; ["κ";"κ"] ; ["Λ";"Λ"] ; ["λ";"λ"] ; ["Μ";"Μ"] ; ["μ";"μ"] ; ["Ν";"Ν"] ; ["ν";"ν"] ; ["Ξ";"Ξ"] ; ["ξ";"ξ"] ; ["Ο";"Ο"] ; ["ο";"ο"] ; ["Π";"Π"] ; ["π";"π"] ; ["Ρ";"Ρ"] ; ["ρ";"ρ"] ; ["Σ";"Σ"] ; ["ς";"&sigmaf;"] ; ["σ";"σ"] ; ["Τ";"Τ"] ; ["τ";"τ"] ; ["Υ";"Υ"] ; ["υ";"υ"] ; ["Φ";"Φ"] ; ["φ";"φ"] ; ["Χ";"Χ"] ; ["χ";"χ"] ; ["Ψ";"Ψ"] ; ["ψ";"ψ"] ; ["Ω";"Ω"] ; ["ω";"ω"] ; ["ϑ";"&thetasym;"] ; ["ϒ";"&upsih;"] ; ["ϖ";"ϖ"] ; ["∀";"∀"] ; ["∂";"∂"] ; ["∃";"∃"] ; ["∅";"∅"] ; ["∇";"∇"] ; ["∈";"∈"] ; ["∉";"∉"] ; ["∋";"&ni;"] ; ["∏";"∏"] ; ["∑";"∑"] ; ["−";"−"] ; ["∗";"&lowast;"] ; ["√";"√"] ; ["∝";"&prop;"] ; ["∞";"∞"] ; ["∠";"&ang;"] ; ["∧";"&and;"] ; ["∨";"&or;"] ; ["∩";"∩"] ; ["∪";"∪"] ; ["∫";"∫"] ; ["∴";"&there4;"] ; ["∼";"&sim;"] ; ["≅";"&cong;"] ; ["≈";"≈"] ; ["≠";"≠"] ; ["≡";"&equiv;"] ; ["≤";"≤"] ; ["≥";"≥"] ; ["⊂";"⊂"] ; ["⊃";"⊃"] ; ["⊄";"&nsub;"] ; ["⊆";"&sube;"] ; ["⊇";"&supe;"] ; ["⊕";"&oplus;"] ; ["⊗";"&otimes;"] ; ["⊥";"&perp;"] ; ["⋅";"⋅"] ; ["◊";"&loz;"] ; ["⌈";"&lceil;"] ; ["⌉";"&rceil;"] ; ["⌊";"&lfloor;"] ; ["⌋";"&rfloor;"] ; ["〈";"&lang;"] ; ["〉";"&rang;"] ; ["←";"←"] ; ["↑";"↑"] ; ["→";"→"] ; ["↓";"↓"] ; ["↔";"↔"] ; ["↵";"&crarr;"] ; ["⇐";"⇐"] ; ["⇑";"&uArr;"] ; ["⇒";"⇒"] ; ["⇓";"&dArr;"] ; ["⇔";"⇔"] ; ["•";"•"] ; ["′";"′"] ; ["″";"″"] ; ["‾";"&oline;"] ; ["⁄";"&frasl;"] ; ["℘";"&weierp;"] ; ["ℑ";"&image;"] ; ["ℜ";"&real;"] ; ["™";"™"] ; ["€";"€"] ; ["ℵ";"&alefsym;"] ; ["♠";"&spades;"] ; ["♣";"&clubs;"] ; ["♥";"&hearts;"] ; ["♦";"&diams;"] ; ["Œ";"&OElig;"] ; ["œ";"&oelig;"] ; ["Š";"&Scaron;"] ; ["š";"&scaron;"] ; ["Ÿ";"&Yuml;"] ; ["ƒ";"&fnof;"] ; [" ";"&ensp;"] ; [" ";"&emsp;"] ; ["–";"–"] ; ["—";"—"] ; ["‘";"‘"] ; ["’";"’"] ; ["‚";"&sbquo;"] ; ["\“";"“"] ; ["\”";"”"] ; ["\„";"&bdquo;"] ; ["†";"&dagger;"] ; ["‡";"&Dagger;"] ; ["…";"…"] ; ["‰";"&permil;"] ; ["‹";"&lsaquo;"] ; ["›";"&rsaquo;"] ; ["ˆ";"&circ;"] ; ["˜";"&tilde;"] )
__GEN_ContainerSize	pSize	All accounts	//__GEN_ContainerSize ( pSize ) //Robert Schaub //www.starrdata.com Let ( [ CTainer = pSize ; Roundit = 2 ]; Case( CTainer ≥ 1000000000;Round ( (CTainer / 1000000000); Roundit ) & " GB"; CTainer ≥ 1000000;Round ( (CTainer / 1000000); Roundit ) & " MB"; CTainer ≥ 1000;Round ( (CTainer / 1000); Roundit ) & " KB";"" ) )
__GEN_Control_ErrorID	pPosID;pLastErrorID	All accounts	/* __GEN_Control_ErrorID ( pPosID ; pLastErrorID ) / If ( pLastErrorID > 0 ; ExecuteSQL* ( "INSERT INTO S90_Errors ( f000t_GUID, f004n_ScriptPosID, f005n_ErrorID, f006t_ErrorMessage ) VALUES ( '" & "$$ContolMessageGUID" & "','" & "pPosID" & "','" & "pLastErrorID" & "')" ; "" ; "" ) ; "" )
__GEN_Crypt	pString;pDirection	All accounts	/* __GEN_Crypt ( pString ; pDirection ) / en, de/ Let* ( [ Keytext = __GEN_KeyText ( "DasWirstDuNieErraten_VersucheEsDochMal" ) ] ; Case ( pDirection = "en" ; MBS ( "Encryption.Cipher" ; "encrypt" ; "AES-128-CTR" ; "Text" ; Keytext ; "UTF-8" ; "Text" ; pString ; "UTF-8" ; "Hex" ; "" ) ; pDirection = "de" ; MBS ( "Encryption.Cipher" ; "decrypt" ; "AES-128-CTR" ; "Text" ; Keytext ; "UTF-8" ; "Hex" ; pString ; "UTF-8" ; "Text" ; "" ) ; "" ) )
__GEN_Crypt_CTs	pString;pDirection	All accounts	/* __GEN_Crypt_CTs ( pString ; pDirection ) / en, de/ Let* ( [ Keytext = Substitute ( __GEN_KeyText ( "EB8AF7C1-6789-45BB-9D4C-FABE3CB1272D" ) ; [ "1-" ; "FR"] ; [ "-4" ; "18697ITZ"] ) ] ; Case ( pDirection = "en" ; MBS ( "Encryption.Cipher" ; "encrypt" ; "AES-128-CTR" ; "Text" ; Keytext ; "UTF-8" ; "Text" ; pString ; "UTF-8" ; "Hex" ; "" ) ; pDirection = "de" ; MBS ( "Encryption.Cipher" ; "decrypt" ; "AES-128-CTR" ; "Text" ; Keytext ; "UTF-8" ; "Hex" ; pString ; "UTF-8" ; "Text" ; "" ) ; "" ) )
__GEN_Crypt_FM	pText;pPassphrase;pShift	All accounts	/__GEN_Crypt_FM ( pText, pPassphrase, pShift )/ /Create from Christian Ullmann/ /* pPassphrase = PasswortString/ /pShift nicht kleiner als 0,03/ /pShift mit "-" = Entschlüsseln/ Let* ( [ TextCode = Code ( Left ( pText ; 1 ) ) ; TextCodeCrypt = Right ( TextCode ; 5 ) ; TextRemaining = Char ( Left ( TextCode ; Length ( TextCode ) - 5 ) ) & Replace ( pText ; 1 ; 1 ; "" ) ; vShift = GetValue ( pShift ; 1 ) ; PassphraseRemainingLen = GetValue ( pShift ; 2 ) ; ParameterLength = Length ( vShift ) + Length ( PassphraseRemainingLen ) ; PassphraseRemaining = Left ( Replace ( pShift ; 1 ; ParameterLength + 2 ; "" ) ; PassphraseRemainingLen ) ; PassphraseRemaining = Case ( PassphraseRemaining = "" ; pPassphrase ; PassphraseRemaining ) ; Return = Replace ( pShift ; 1 ; ParameterLength + PassphraseRemainingLen + 3 ; "" ) ; PassphraseCode = Code ( Left ( PassphraseRemaining ; 1 ) ) ; PassphraseCodeCrypt = Right ( PassphraseCode ; 5 ) ; PassphraseRemaining = Char ( Left ( PassphraseCode ; Length ( PassphraseCode ) - 5 ) ) & Replace ( PassphraseRemaining ; 1 ; 1 ; "" ) ; CharCrypted = Case ( TextCode = "" ; "" ; Char ( Mod ( TextCodeCrypt + Int ( PassphraseCodeCrypt * vShift ) - 1 ; 65535 ) + 1 ) ) ; Return = Return & CharCrypted ] ; Case ( TextRemaining = "" ; Return ; __GEN_Crypt_FM ( TextRemaining ; pPassphrase ; vShift & ¶ & Length ( PassphraseRemaining ) & ¶ & PassphraseRemaining & ¶ & Return ) ) )
__GEN_HTML_to_Character	pString	All accounts	/__GEN_HTML_to_Character ; pString / Substitute ( pString ; ["&";"&"] ; [""";"\""] ;["<";"<"] ; [">";">"] ; [" ";" "] ; ["¡";"¡"] ; ["¢";"¢"] ; ["£";"£"] ; ["¤";"¤"] ; ["¥";"¥"] ; ["¦";"¦"] ; ["§";"§"] ; ["¨";"¨"] ; ["©";"©"] ; ["ª";"ª"] ; ["«";"«"] ; ["¬";"¬"] ; ["";""] ; ["®";"®"] ; ["¯";"¯"] ; ["°";"°"] ; ["±";"±"] ; ["²";"²"] ; ["³";"³"] ; ["´";"´"] ; ["µ";"µ"] ; ["¶";"¶"] ; ["·";"·"] ; ["¸";"¸"] ; ["¹";"¹"] ; ["º";"º"] ; ["»";"»"] ; ["¼";"¼"] ; ["½";"½"] ; ["¾";"¾"] ; ["¿";"¿"] ; ["À";"À"] ; ["Á";"Á"] ; ["Â";"Â"] ; ["Ã";"Ã"] ; ["Ä";"Ä"] ; ["Å";"Å"] ; ["Æ";"Æ"] ; ["Ç";"Ç"] ; ["È";"È"] ; ["É";"É"] ; ["Ê";"Ê"] ; ["Ë";"Ë"] ; ["Ì";"Ì"] ; ["Í";"Í"] ; ["Î";"Î"] ; ["Ï";"Ï"] ; ["Ð";"Ð"] ; ["Ñ";"Ñ"] ; ["Ò";"Ò"] ; ["Ó";"Ó"] ; ["Ô";"Ô"] ; ["Õ";"Õ"] ; ["Ö";"Ö"] ; ["×";"×"] ; ["Ø";"Ø"] ; ["Ù";"Ù"] ; ["Ú";"Ú"] ; ["Û";"Û"] ; ["Ü";"Ü"] ; ["Ý";"Ý"] ; ["Þ";"Þ"] ; ["ß";"ß"] ; ["à";"à"] ; ["á";"á"] ; ["â";"â"] ; ["ã";"ã"] ; ["ä";"ä"] ; ["å";"å"] ; ["æ";"æ"] ; ["ç";"ç"] ; ["è";"è"] ; ["é";"é"] ; ["ê";"ê"] ; ["ë";"ë"] ; ["ì";"ì"] ; ["í";"í"] ; ["î";"î"] ; ["ï";"ï"] ; ["ð";"ð"] ; ["ñ";"ñ"] ; ["ò";"ò"] ; ["ó";"ó"] ; ["ô";"ô"] ; ["õ";"õ"] ; ["ö";"ö"] ; ["÷";"÷"] ; ["ø";"ø"] ; ["ù";"ù"] ; ["ú";"ú"] ; ["û";"û"] ; ["ü";"ü"] ; ["ý";"ý"] ; ["þ";"þ"] ; ["ÿ";"ÿ"] ; ["Α";"Α"] ; ["α";"α"] ; ["Β";"Β"] ; ["β";"β"] ; ["Γ";"Γ"] ; ["γ";"γ"] ; ["Δ";"Δ"] ; ["δ";"δ"] ; ["Ε";"Ε"] ; ["ε";"ε"] ; ["Ζ";"Ζ"] ; ["ζ";"ζ"] ; ["Η";"Η"] ; ["η";"η"] ; ["Θ";"Θ"] ; ["θ";"θ"] ; ["Ι";"Ι"] ; ["ι";"ι"] ; ["Κ";"Κ"] ; ["κ";"κ"] ; ["Λ";"Λ"] ; ["λ";"λ"] ; ["Μ";"Μ"] ; ["μ";"μ"] ; ["Ν";"Ν"] ; ["ν";"ν"] ; ["Ξ";"Ξ"] ; ["ξ";"ξ"] ; ["Ο";"Ο"] ; ["ο";"ο"] ; ["Π";"Π"] ; ["π";"π"] ; ["Ρ";"Ρ"] ; ["ρ";"ρ"] ; ["Σ";"Σ"] ; ["&sigmaf;";"ς"] ; ["σ";"σ"] ; ["Τ";"Τ"] ; ["τ";"τ"] ; ["Υ";"Υ"] ; ["υ";"υ"] ; ["Φ";"Φ"] ; ["φ";"φ"] ; ["Χ";"Χ"] ; ["χ";"χ"] ; ["Ψ";"Ψ"] ; ["ψ";"ψ"] ; ["Ω";"Ω"] ; ["ω";"ω"] ; ["&thetasym;";"ϑ"] ; ["&upsih;";"ϒ"] ; ["ϖ";"ϖ"] ; ["∀";"∀"] ; ["∂";"∂"] ; ["∃";"∃"] ; ["∅";"∅"] ; ["∇";"∇"] ; ["∈";"∈"] ; ["∉";"∉"] ; ["&ni;";"∋"] ; ["∏";"∏"] ; ["∑";"∑"] ; ["−";"−"] ; ["&lowast;";"∗"] ; ["√";"√"] ; ["&prop;";"∝"] ; ["∞";"∞"] ; ["&ang;";"∠"] ; ["&and;";"∧"] ; ["&or;";"∨"] ; ["∩";"∩"] ; ["∪";"∪"] ; ["∫";"∫"] ; ["&there4;";"∴"] ; ["&sim;";"∼"] ; ["&cong;";"≅"] ; ["≈";"≈"] ; ["≠";"≠"] ; ["&equiv;";"≡"] ; ["≤";"≤"] ; ["≥";"≥"] ; ["⊂";"⊂"] ; ["⊃";"⊃"] ; ["&nsub;";"⊄"] ; ["&sube;";"⊆"] ; ["&supe;";"⊇"] ; ["&oplus;";"⊕"] ; ["&otimes;";"⊗"] ; ["&perp;";"⊥"] ; ["⋅";"⋅"] ; ["&loz;";"◊"] ; ["&lceil;";"⌈"] ; ["&rceil;";"⌉"] ; ["&lfloor;";"⌊"] ; ["&rfloor;";"⌋"] ; ["&lang;";"〈"] ; ["&rang;";"〉"] ; ["←";"←"] ; ["↑";"↑"] ; ["→";"→"] ; ["↓";"↓"] ; ["↔";"↔"] ; ["&crarr;";"↵"] ; ["⇐";"⇐"] ; ["&uArr;";"⇑"] ; ["⇒";"⇒"] ; ["&dArr;";"⇓"] ; ["⇔";"⇔"] ; ["•";"•"] ; ["′";"′"] ; ["″";"″"] ; ["&oline;";"‾"] ; ["&frasl;";"⁄"] ; ["&weierp;";"℘"] ; ["&image;";"ℑ"] ; ["&real;";"ℜ"] ; ["™";"™"] ; ["€";"€"] ; ["&alefsym;";"ℵ"] ; ["&spades;";"♠"] ; ["&clubs;";"♣"] ; ["&hearts;";"♥"] ; ["&diams;";"♦"] ; ["&OElig;";"Œ"] ; ["&oelig;";"œ"] ; ["&Scaron;";"Š"] ; ["&scaron;";"š"] ; ["&Yuml;";"Ÿ"] ; ["&fnof;";"ƒ"] ; ["&ensp;";" "] ; ["&emsp;";" "] ; ["–";"–"] ; ["—";"—"] ; ["‘";"‘"] ; ["’";"’"] ; ["&sbquo;";"‚"] ; ["“";"\“"] ; ["”";"\”"] ; ["&bdquo;";"\„"] ; ["&dagger;";"†"] ; ["&Dagger;";"‡"] ; ["…";"…"] ; ["&permil;";"‰"] ; ["&lsaquo;";"‹"] ; ["&rsaquo;";"›"] ; ["&circ;";"ˆ"] ; ["&tilde;";"˜"] )
__GEN_KeyText	pSting	All accounts	/* __GEN_KeyText ( pString ) / MBS* ( "Hash.Digest" ; "SHA256" ; "Text" ; Substitute ( "EB8AF7C1-6789-45BB-9D4C-FABE3CB1272D" ; [ "1-" ; "FR"] ; [ "-4" ; "18697ITZ"] ) ; "UTF-8" ; "Hex" )
__GEN_Money_to_Text	pBetrag	All accounts	/__GEN_Money_to_Text ; pBetrag / If (Round (pBetrag; 2) < 0; "-";"") & If (Length (Int (Abs (Round (pBetrag; 2)))) > 12; Right (Left (Int (Abs (Round (pBetrag; 2))); Length (Int (Abs (Round (pBetrag; 2)))) - 12);3) & ".";"") & If (Length (Int (Abs (Round (pBetrag; 2)))) > 9; Right (Left (Int (Abs (Round (pBetrag; 2))); Length (Int (Abs (Round (pBetrag; 2)))) - 9);3) & ".";"") & If (Length (Int (Abs (Round (pBetrag; 2)))) > 6; Right (Left (Int (Abs (Round (pBetrag; 2))); Length (Int (Abs (Round (pBetrag; 2)))) - 6);3) & ".";"") & If (Length (Int (Abs (Round (pBetrag; 2)))) > 3; Right (Left (Int (Abs (Round (pBetrag; 2))); Length (Int (Abs (Round (pBetrag; 2)))) - 3);3) & ".";"") & Right (If (PatternCount (Round (pBetrag; 2); ",") = 0; Abs (Round (pBetrag; 2)) & ",00"; If (Position (Abs (Round (pBetrag; 2)); ","; 1; 1) = 1;"0";"") & Left (Abs (Round (pBetrag; 2)) & "0"; Position (Abs (Round (pBetrag; 2) );",";1;1) + 2 ));6)
__GEN_MultilineKey	pField;pFoundCount	All accounts	/__GEN_MultilineKey ( pField ; pFoundCount )/ Case ( pFoundCount > 1 ; __GEN_MultilineKey( pField; pFoundCount - 1) & ¶ & GetNthRecord( pField; pFoundCount ) ; GetNthRecord( pField; 1 ) )
__GEN_RandomPW	pAnzahlZeichen;pReturn;pMethod	All accounts	/__GEN_RandomPW ( pAnzahlZeichen ; pReturn ; pMethod ) Autorin: Therese Telepski pAnzahlZeichen = Anzahl gewünschter Zeichen pReturn = Ausgabestring, normalerweise zu Beginn leer pMethod = Wahl des zur Verfügung stehenden Zeichensatzes 1: Nur Kleinbuchstaben 2: Klein- & Großbuchstaben 3: Buchstaben und Zahlen 4: Alles inkl. etlicher Sonderzeichen / Let ( [ // Erlaubte Zeichen Rep1 = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890ßäáàâëéèêïíìîöóòôüúùûÄÁÀÂËÉÈÊÏÍÌÎÖÓÒÔÜÚÙÛ-_.,!§$%&([{)]}}+~#@€$£" ; LR = Case ( pMethod = 1 ; 26 ; // nur Kleinbuchstaben pMethod = 2 ; 52 ; // Klein- und Großbuchstaben pMethod = 3 ; 62 ; // Klein- und Großbuchstaben sowie Zahlen pMethod = 4 ; Length ( Rep1 ) ; // Alle oben erlaubten Length ( Rep1 ) ) ; Rep2 = Left ( Rep1 ; LR ) ; // Passwort um ein Zeichen verlängern String = pReturn & Middle ( Rep2 ; Round ( Random * ( LR - 1 ) ; 0 ) +1 ; 1 ) ] ; Case ( Length ( String ) < pAnzahlZeichen ; __GEN_RandomPW ( pAnzahlZeichen ; String ; pMethod ) ; String ) )
__GEN_Range_ID	pBeginn;pEnde;pAbstand	All accounts	/__GEN_Range_ID ( pBeginn ; pEnde ; pAbstand )/ Let ( d = pBeginn ; Case ( d > pEnde ; "" ; IsEmpty ( pBeginn ) or IsEmpty ( pEnde ) ; "" ; d = pEnde ; d ; d & ¶ & __GEN_Range_ID ( d + pAbstand ; pEnde ; pAbstand ) ) )
__GEN_SpecialCharacter	pString	All accounts	/__GEN_SpecialCharacter (pString)/ Substitute (pString ; [ "ä"; "ae" ]; [ "ö"; "oe" ]; [ "ü"; "ue" ]; [ "Ä"; "Ae" ]; [ "Ö"; "Oe" ]; [ "Ü"; "Ue" ]; [ "ß"; "ss" ]; [ "á"; "a" ]; [ "é"; "e" ]; [ "í"; "i" ]; [ "ó"; "o" ]; [ "ú"; "u" ]; [ "à"; "a" ]; [ "è"; "e" ]; [ "ì"; "i" ]; [ "ò"; "o" ]; [ "ù"; "u" ]; [ "â"; "a" ]; [ "ê"; "e" ]; [ "í"; "i" ]; [ "ô"; "o" ]; [ "û"; "u" ]; [ "Á"; "A" ]; [ "É"; "E" ]; [ "Í"; "I" ]; [ "Ó"; "O" ]; [ "Ú"; "U" ]; [ "À"; "A" ]; [ "È"; "E" ]; [ "Ì"; "I" ]; [ "Ò"; "O" ]; [ "Ù"; "U" ]; [ "Â"; "A" ]; [ "Ê"; "E" ]; [ "Î"; "I" ]; [ "Ô"; "O" ]; [ "Û"; "U" ]; [ "("; "/" ]; [ ")"; "/" ]; [ "["; "/" ]; [ "]"; "/" ]; [ "["; "/" ]; [ "]"; "/" ]; [ "#"; "" ]; [ "?"; "" ]; [ "!"; "*" ]; [ ";"; "," ]; [ ":"; "," ] )
__GEN_Trace		All accounts	/* __GEN_Trace/ Let* ( [ TracePath = MBS ( "Path.AddPathComponent" ; MBS ( "Folders.UserDesktop" ) ; "trace.txt" ) ] ; Case ( $$Trace = 1 ; MBS ( "Trace" ; TracePath ) ) )
__GUID		All accounts	/__GUID/ Get ( UUID )	SnippetStorageDB::a001t_GUID
__MBS_FM_____		All accounts
__MBS_FM_1_CreateIndex	pField	All accounts	/* __MBS_FM_1_CreateIndex ( pField ) / Let* ( [ $$mbs_string = "CREATE INDEX ON " & Substitute ( pField ; [ "::" ; "." ] ) ] ; MBS ( "FM.ExecuteFileSQL" ; $$mbs_string ) )
__MBS_FM_1_DropIndex	pField	All accounts	/* __MBS_FM_1_DropIndex ( pField ) / Let* ( [ $$mbs_string = "DROP INDEX ON " & Substitute ( pField ; [ "::" ; "." ] ) ] ; MBS ( "FM.ExecuteFileSQL" ; $$mbs_string ) )
__MBS_FM_2_COUNT	pFile;pTable	All accounts	/* __MBS_FM_2_COUNT ( pFile ; pTable ) / Let* ( [ $$mbs_string = "SELECT COUNT () FROM " & pTable ] ; MBS* ( "FM.ExecuteFileSQL" ; pFile ; $$mbs_string ) )
__MBS_FM_2_COUNT_Where	pFile;pTable;pWhere	All accounts	/* __MBS_FM_2_COUNT_Where ( pFile ; pTable ; pWhere ) / Let* ( [ $$mbs_string = "SELECT COUNT () FROM " & pTable & " WHERE " & pWhere ] ; MBS* ( "FM.ExecuteFileSQL" ; pFile ; $$mbs_string ) )
__MBS_FM_2_DeleteALL	pFile;pTable	All accounts	/__MBS_FM_2_DeleteALL ( pFile ; pTable ) / Let ( [ $$mbs_string = "DELETE FROM " & pTable ] ; MBS ( "FM.ExecuteFileSQL" ; pFile ; $$mbs_string ) )
__MBS_FM_2_DeleteGUID	pFile;pTable;pGUID	All accounts	/__MBS_FM_2_DeleteGUID ( pFile , pTable, pGUID ) / Let ( [ $$MBS_FMstring = "DELETE FROM " & pTable & " WHERE a001t_GUID" & " = " & pGUID ] ; MBS ( "FM.ExecuteFileSQL" ; pFile ; $$MBS_FMstring ) )		Delete Snippet
__MBS_FM_2_Execute	pFile;pStatement	All accounts	/* __MBS_FM_2_Execute ( pFile ; pStatement ) / Let* ( [ $$MBS_FMPstring = pStatement ] ; MBS ( "FM.ExecuteFileSQL" ; pFile ; $$MBS_FMPstring ) )
__MBS_FM_3_Execute_to_Foundset	pFile;pStatement	All accounts	/* __MBS_FM_3_Execute_to_Foundset ( pFile ; pStatement ) / Let* ( [ $$MBS_FMPstring = pStatement ] ; MBS ( "FM.SQL.Execute" ; pFile ; $$MBS_FMPstring ) )
__MBS_FM_3_Insert_Foundset_to_SQL	pSQLref;pConnect;pTable;pFields	All accounts	/* __MBS_FM_3_Insert_Foundset_to_SQL / Let* ( [ $$MBS_FMPstring = "<" & pSQLref & "><" & pTable & "><" & pFields & ">" ] ; MBS ( "FM.SQL.InsertRecordsToSQL" ; pSQLref; pConnect; pTable; pFields ) ) //Return SQLref
__MBS_FM_3_ReleaseMemory	pRecords	All accounts	/* __MBS_FM_3_ReleaseMemory (pRecords)/ MBS* ( "FM.SQL.Release" ; pRecords )
__MBS_SQL_____		All accounts
__MBS_SQL_1_Disconnect	pConnection	All accounts	/__MBS_SQL_1_Disconnect (pConnection)/ MBS ( "SQL.Disconnect"; pConnection )
__MBS_SQL_1_FreeAllConnections		All accounts	/__MBS_SQL_1_FreeAllConnections/ MBS ( "SQL.FreeAllConnections" ; $$connection )
__MBS_SQL_1_FreeConnection	pConnection	All accounts	/__MBS_SQL_1_FreeConnection (pConnection)/ MBS ( "SQL.FreeConnection" ; pConnection )
__MBS_SQL_1_isConnected		All accounts	/* __MBS_SQL_1_isConnected/ MBS* ( "SQL.isConnected" ; $$connection )
__MBS_SQL_1_NewConnection		All accounts	/__MBS_SQL_1_NewConnection/ Case ( $$SQL_Client = "MySQL" ; __MBS_SQL_1_NewConnection_MySQL ; $$SQL_Client = "SQLite" ; __MBS_SQL_1_NewConnection_SQLite )
__MBS_SQL_1_NewConnection_MySQL		All accounts	/* __MBS_SQL_1_NewConnection/ Let* ( [ result1 = MBS ( "SQL.FreeConnection" ; $$Connection ) ; connection = MBS ( "SQL.NewConnection" ) ; r = MBS ( "SQL.SetClient" ; connection ; $$SQL_Client ) ; r = MBS ( "SQL.SetConnectionOption" ; connection ; "MYSQL.LIBS" ; $$SQL_Library ) ; r = MBS ( "SQL.SetConnectionOption" ; connection ; "MYSQL_SECURE_AUTH" ; "FALSE" ) ; connect = MBS ( "SQL.Connect" ; connection ; $$SQL_ServerURL & "@" & $$SQL_DB; $$SQL_User ; $$SQL_PW ; $$SQL_Client ) ; result2 = Case ( connect ≠ "OK" ; MBS ( "SQL.FreeConnection" ; connection ) ; connection ) ] ; Case ( connect ≠ "OK" ; "Error: " & connect ; connection ) )
__MBS_SQL_1_NewConnection_SQLite		All accounts	/* __MBS_SQL_1_NewConnection/ Let* ( [ result1 = MBS ( "SQL.FreeConnection" ; $$Connection ) ; connection = MBS ( "SQL.NewConnection" ) ; r = MBS ( "SQL.SetClient" ; connection ; $$SQL_Client ) ; r = MBS ( "SQL.InternalSQLiteLibrary.Activate" ) ; connect = MBS ( "SQL.Connect" ; connection ; $$SQLite_DBpath ) ; result2 = Case ( connect ≠ "OK" ; MBS ( "SQL.FreeConnection" ; connection ) ; connection ) ] ; Case ( connect ≠ "OK" ; "Error: " & connect ; connection ) )
__MBS_SQL_1_ResetConnection		All accounts	/__MBS_SQL_1_ResetConnection/ MBS ( "SQL.ResetConnection" ; $$connection )
__MBS_SQL_2_FreeCommand	pCommand	All accounts	/* __MBS_SQL_2_FreeCommand (pCommand)/ MBS* ( "SQL.FreeCommand"; pCommand )
__MBS_SQL_2_NewCommand	pConnection;pStatement	All accounts	/__MBS_SQL_2_NewCommand (pConnection, pStatement)/ Let ( [ $$MBS_SQLstring = pStatement ] ; MBS ( "SQL.NewCommand" ; pConnection ; pStatement ) )
__MBS_SQL_3_Commit	pConnection	All accounts	/* __MBS_SQL_3_Commit (pCommand)/ MBS* ( "SQL.Commit"; pConnection )
__MBS_SQL_3_Execute_to_Foundset	pCommand	All accounts	/__MBS_SQL_3_Execute_2_Foundset (pCommand)/ MBS ( "SQL.Execute" ; pCommand )
__MBS_SQL_3_FieldCount	pCommand	All accounts	/* __MBS_SQL_3_FieldCount (pCommand)/ MBS* ( "SQL.FieldCount" ; pCommand )
__MBS_SQL_3_Insert_Foundset_to_FM	pCommand;pFM_File;pFM_Table;pFM_Fields	All accounts	/* __MBS_SQL_3_Insert_Foundset_to_FM ( pCommand, pFM_File, pFM_Table, pFM_Fields ) / Let* ( [ $$MBS_SQLstring = "<" & pCommand & "><" & pFM_File & "><" & pFM_Table & "><" & pFM_Fields & ">" ] ; MBS ( "SQL.InsertRecords"; pCommand ; pFM_File; pFM_Table; pFM_Fields ) )
__MBS_SQL_3_RowsAffected	pCommand	All accounts	/* __MBS_SQL_3_RowsAffected (pCommand)/ MBS* ( "SQL.RowsAffected" ; pCommand )
__SCRIPT_____		All accounts
__SCRIPT_Ergebnis	pZeile	All accounts	/* __SCRIPT_Ergebnis/ Substitute* ( MiddleValues ( Get ( ScriptResult ) ; pZeile; 1) ; "¶" ;"")
__SCRIPT_Parameter	pZeile	All accounts	/* __SCRIPT_Parameter / Substitute* ( MiddleValues ( Get ( ScriptParameter ) ; pZeile; 1) ; "¶" ;"")		GoTo Snippet Set PORT Delete Snippet
__SCRIPT_SQL_Value4Insert	pValue;pTyp;pComma	All accounts	/* __SCRIPT_SQL_Value4Insert ( pValue ; pTyp ; pComma ) pTyp: t=Text, n=Zahl ; / Case* ( pTyp = "t" ; "'" & pValue & "'" & pComma; pTyp = "n" ; pValue & pComma )
__SCRIPT_SQL_Value4Update	pField;pValue;pTyp	All accounts	/* __SCRIPT_SQL_Value4Update ( pField ; pValue ; pTyp ) pTyp: t=Text, n=Zahl ; / pField & " = " & Case* ( pTyp = "t" ; "'" & pValue & "'" ; pTyp = "n" ; pValue )
__SCRIPT_SQL_Value4Where	pValue;pTyp	All accounts	/* __SCRIPT_SQL_Value4Where ( pValue ; pTyp ) pTyp: t=Text, n=Zahl ; / Case* ( pTyp = "t" ; "'" & pValue & "'" ; pTyp = "n" ; pValue )
__SCRIPT_SQL_ValueSeparator	pValue;pComma	All accounts	/* __SCRIPT_SQL_ValueSeparator ( pValue ) ; */ "'" & pValue & "'" & pComma
__SCRPIT_SQL_Value	pValue;pComma	All accounts	/* __SCRPIT_SQL_Value ( pValue ) */ pValue & pComma
__VAR_____		All accounts
__VAR_Delete	pName	All accounts	/__Var_Delete ( pName)/ MBS ( "FM.VariableClear"; pName )
__VAR_Get	pName	All accounts	/__Var_Get ( pName)/ MBS ( "FM.VariableGet"; pName )
__VAR_List		All accounts	/__Var_List ( )/ MBS ( "FM.VariableList" ; "—-" )
__VAR_Set	pName;pValue	All accounts	/__Var_Set ( pName; pValue )/ MBS ( "FM.VariableSet"; pName; pValue )
__XML_____		All accounts
__XML_1Value	pXML;pValue;pFeldPos	All accounts	/* __XML_1Value ; pXML ; pValue ; pFeldPos / Let* ( [ FP = pFeldPos ; L = Length ( pValue ) + 2 ; Pos1 = Position ( pXML ; "<" & pValue & ">" ;1 ; FP ) + L ; Pos2 = Position ( pXML ; "</" & pValue & ">" ; 1 ; FP ) - ( Position ( pXML ; "<" & pValue & ">" ;1 ; FP ) + L ) ] ; Middle ( pXML ; Pos1 ; Pos2 ) )
__XML_2Values	pXML;pValueA;pValueB;pFieldNo	All accounts	/* __XML_2Values ; pXML ; pValueA ; pValueB ; pFieldNo / Let* ( [ s = Middle ( pXML ; Position ( pXML ; pValueA ; 1 ; pFieldNo ) + Length ( pValueA ) ; 200000 ) ; p = Position ( s ; pValueB ; 1 ; 1 ) - 1 ] ; Left ( s ; p ) )
__GEN_Rabatt	pBetrag;pRabatt	All accounts	/__GEN_Rabatt ; pBetrag , pRabatt / /* Die Verwendung findet man hauptsächlich im Handwerk / Rabatt-Rabatt-Rabatt ; 10% - 5% - 3% / Let* ( [ rF = Substitute ( pRabatt ; "+" ; "¶" ) ; r1 = LeftValues ( rF ; 1) ; r2 = MiddleValues ( rF ;2; 1) ; r3 = MiddleValues ( rF ;3; 1) ; b1 = Round ( pBetrag * r1 / 100 ;2) ; b2 = If (IsEmpty ( r2 ) ; 0 ; Round ( ( pBetrag - b1 ) * r2 / 100 ; 2 ) ) ; b3 = If (IsEmpty ( r3 ) ; 0 ; Round ( ( pBetrag - b1 - b2 ) * r3 /100 ; 2 ) ) ] ; b1 + b2 + b3 )

Custom Menu Sets

Menu Sets	Menus	In Scripts	In Layouts	Comments
[Standard FileMaker Menus]	All Standard Menus
Angepasstes Menüset 1	FileMaker Pro Kopie Ablage Kopie Bearbeiten Kopie Ansicht Kopie Einfügen Kopie [Format] Abfragen Kopie Datensätze Kopie [Scripts] [Fenster] Hilfe Kopie

Download example: FileMaker Snippet Storage

Used functions: