Monkeybread Software - MBS FileMaker Plugin: Saxon ZUGFeRD Validation

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

MBS FileMaker Plugin Example Databases

Saxon ZUGFeRD Validation

All examples are included with download of MBS FileMaker Plugin.

Saxon ZUGFeRD Validation.fmp12

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

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	On
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	Comments	Occurrences in Relationship Graph
ZUGFeRD Validation	13 fields defined, 1 record		ZUGFeRD Validation

Fields

Table Name: ZUGFeRD Validation - 13 Fields
Field Name	Type	Options	Comments	On Layouts	In Relationships	In Scripts	In Value Lists
PrimaryKey	Normal, Text	Auto-Enter: Context table: ZUGFeRD Validation Calculation: Get( UUID ) Validation: Only during data entry Not empty Unique Strict validation Storage: Repetitions: 1 Indexing: Minimal Automatically create indexes as needed Index Language: Unicode Raw	Unique identifier of each record in this table
CreationTimestamp	Normal, Timestamp	Auto-Enter: Creation timestamp Validation: Only during data entry Strict data type: 4 digit year Not empty Strict validation Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German	Date and time each record was created
CreatedBy	Normal, Text	Auto-Enter: Creation account name Validation: Only during data entry Not empty Strict validation Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German	Account name of the user who created each record
ModificationTimestamp	Normal, Timestamp	Auto-Enter: Modification timestamp Validation: Only during data entry Strict data type: 4 digit year Not empty Strict validation Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German	Date and time each record was last modified
ModifiedBy	Normal, Text	Auto-Enter: Modification account name Validation: Only during data entry Not empty Strict validation Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German	Account name of the user who last modified each record
Invoice XML	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		ZUGFeRD Validation		LibXML Validation Saxon Validate Validate Content with Saxon
Folder	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Global Repetitions: 1 Index Language: German		ZUGFeRD Validation		Start LibXML Validation Saxon Validate Validate Content with Saxon
Result	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		ZUGFeRD Validation		LibXML Validation Saxon Validate Clear
Messages	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German
Report	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		ZUGFeRD Validation		LibXML Validation Saxon Validate Validate Content with Saxon Clear
HTML XSLT1	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Global Repetitions: 1 Index Language: German		ZUGFeRD Validation		Validate Content with Saxon
HTML	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		ZUGFeRD Validation		LibXML Validation Saxon Validate Validate Content with Saxon Clear
HTML XSLT2	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Global Repetitions: 1 Index Language: German		ZUGFeRD Validation		Saxon Validate

Layout Objects: ZUGFeRD Validation

Regular Fields

Field Name: ZUGFeRD Validation::Invoice XML

Layout Name:

ZUGFeRD Validation

Top: 112 pt
Left: 9 pt
Bottom: 353 pt
Right: 473 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: ZUGFeRD Validation::Folder

Layout Name:

ZUGFeRD Validation

Top: 749 pt
Left: 80 pt
Bottom: 780 pt
Right: 776 pt

Anchoring: Left, 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

Field Name: ZUGFeRD Validation::Result

Layout Name:

ZUGFeRD Validation

Top: 399 pt
Left: 9 pt
Bottom: 667 pt
Right: 473 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: ZUGFeRD Validation::Report

Layout Name:

ZUGFeRD Validation

Top: 673 pt
Left: 117 pt
Bottom: 704 pt
Right: 370 pt

Anchoring: Left, 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: ZUGFeRD Validation::HTML XSLT1

Layout Name:

ZUGFeRD Validation

Top: 710 pt
Left: 117 pt
Bottom: 741 pt
Right: 370 pt

Anchoring: Left, 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

Field Name: ZUGFeRD Validation::HTML

Layout Name:

ZUGFeRD Validation

Top: 672 pt
Left: 491 pt
Bottom: 703 pt
Right: 744 pt

Anchoring: Left, 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: ZUGFeRD Validation::HTML XSLT2

Layout Name:

ZUGFeRD Validation

Top: 710 pt
Left: 491 pt
Bottom: 741 pt
Right: 744 pt

Anchoring: Left, 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: Validate XML Structure with LibXML

Layout Name:

ZUGFeRD Validation

Additional Properties:

Change to hand cursor over button

Top: 99 pt
Left: 493 pt
Bottom: 141 pt
Right: 776 pt

Anchoring: Left, Top

Perform Script [ “LibXML Validation” ]

Scripts:

LibXML Validation

Button Properties

Coordinates

Script/Script Step

Type:

Text: Validate XML Content

Layout Name:

ZUGFeRD Validation

Additional Properties:

Change to hand cursor over button

Top: 154 pt
Left: 796 pt
Bottom: 196 pt
Right: 992 pt

Anchoring: Left, Top

Perform Script [ “Validate Content with Saxon” ]

Scripts:

Validate Content with Saxon

Button Properties

Coordinates

Script/Script Step

Type:

Text: Validate XML Structure with Saxon

Layout Name:

ZUGFeRD Validation

Additional Properties:

Change to hand cursor over button

Top: 154 pt
Left: 493 pt
Bottom: 196 pt
Right: 776 pt

Anchoring: Left, Top

Perform Script [ “Saxon Validate” ]

Scripts:

Saxon Validate

Web Viewer Controls

Web Viewer Control Properties

Coordinates

Web Address

Layout Name:

ZUGFeRD Validation

Additional Properties:

Allow interaction with web viewer content
Display progress bar
Display status messages
Automatically encode URL

Top: 210 pt
Left: 493 pt
Bottom: 667 pt
Right: 1016 pt

Anchoring: Left and Right, Top and Bottom

If ( IsEmpty ( ZUGFeRD Validation::HTML ) ; "about:blank"; "data:text/html;charset=utf-8;base64," & Base64Encode ( ZUGFeRD Validation::HTML ) )

Validate Content with Saxon

Clear

Next Script: [LibXML Validation]

Script Name	Start
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	#For desktop and our examples we look in same folder as database: Set Variable [ $databasePath; Value:Get(FilePath) ] Set Variable [ $databasePath; Value:MBS("Path.FilemakerPathToNativePath"; $databasePath) ] Set Variable [ $databasePath; Value:Substitute ( $databasePath ; ".fp7" ; ".fmp12") ] Set Variable [ $databaseName; Value:Get(FileName) & ".fmp12" ] Set Variable [ $path; Value:Substitute ( $databasePath ; $databaseName ; "" ) ] Set Field [ ZUGFeRD Validation::Folder; $path ]
Fields used in this script	ZUGFeRD Validation::Folder
Scripts used in this script
Layouts used in this script
Tables used in this script	ZUGFeRD Validation
Table occurrences used by this script	ZUGFeRD Validation
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [Start]

Next Script: [Saxon Validate]

Script Name	LibXML Validation
Run script with full access privileges	Off
Siri Shortcut Visible	Off
Include In Menu	Yes
Layouts that use this script	ZUGFeRD Validation
Scripts that use this script
Script Definition
Script Steps	#Validate the structure of the XML with LibXML (no Saxon) Set Variable [ $schemaPath; Value:MBS("Path.AddPathComponent"; ZUGFeRD Validation::Folder; "Factur-X_1.07.2_EN16931.xsd") ] If [ MBS("Files.FileExists"; $schemaPath) ≠ 1 ] Show Custom Dialog [ Title: "You miss the XSD file."; Message: $schemaPath; Default Button: “OK”, Commit: “Yes” ] Exit Script [ ] End If Set Variable [ $schemaText; Value:MBS("Text.ReadTextFile"; $schemaPath; "utf-8") ] #set folder value Set Variable [ $r; Value:MBS("Process.SetCurrentDirectory"; ZUGFeRD Validation::Folder) ] #validate the XML against the schema Set Variable [ $result; Value:MBS("XML.Validate"; ZUGFeRD Validation::Invoice XML; $schemaText; 0) ] Set Field [ ZUGFeRD Validation::Result; $result ] Set Field [ ZUGFeRD Validation::HTML; "" ] Set Field [ ZUGFeRD Validation::Report; "" ]
Fields used in this script	ZUGFeRD Validation::Folder ZUGFeRD Validation::Invoice XML ZUGFeRD Validation::Result ZUGFeRD Validation::HTML ZUGFeRD Validation::Report
Scripts used in this script
Layouts used in this script
Tables used in this script	ZUGFeRD Validation
Table occurrences used by this script	ZUGFeRD Validation
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [LibXML Validation]

Next Script: [Load Saxon]

Script Name	Saxon Validate
Run script with full access privileges	Off
Siri Shortcut Visible	Off
Include In Menu	Yes
Layouts that use this script	ZUGFeRD Validation
Scripts that use this script
Script Definition
Script Steps	#Validate the structure of the XML with Saxon If [ MBS("Saxon.IsLoaded") = 0 ] Perform Script [ “Load Saxon” ] End If Set Variable [ $schemaPath; Value:MBS("Path.AddPathComponent"; ZUGFeRD Validation::Folder; "Factur-X_1.07.2_EN16931.xsd") ] If [ MBS("Files.FileExists"; $schemaPath) ≠ 1 ] Show Custom Dialog [ Title: "You miss the XSD file."; Message: $schemaPath; Default Button: “OK”, Commit: “Yes” ] Exit Script [ ] End If Set Variable [ $schemaText; Value:MBS("Text.ReadTextFile"; $schemaPath; "utf-8") ] If [ MBS("IsError") = 1 ] Show Custom Dialog [ Title: "Failed to read XSD. Please check path!"; Message: $schemaText; Default Button: “OK”, Commit: “Yes” ] Exit Script [ ] End If #set folder value Set Variable [ $r; Value:MBS("Process.SetCurrentDirectory"; ZUGFeRD Validation::Folder) ] #run validation Set Variable [ $r; Value:MBS( "Saxon.Validate"; ZUGFeRD Validation::Invoice XML; $schemaText; 2 ) ] Set Field [ ZUGFeRD Validation::Result; $r ] #there is also a report as XML Set Variable [ $report; Value:MBS("Saxon.ValidationReport") ] Set Field [ ZUGFeRD Validation::Report; $report ] If [ Length ( $report ) > 0 ] #convert report to html Set Variable [ $html; Value:MBS( "Saxon.XSLT"; $report; ZUGFeRD Validation::HTML XSLT2 ) ] If [ MBS("IsError") ] Show Custom Dialog [ Title: "Failed to produce html"; Message: $html; Default Button: “OK”, Commit: “Yes” ] Else [ ] Set Field [ ZUGFeRD Validation::HTML; $html ] End If End If
Fields used in this script	ZUGFeRD Validation::Folder ZUGFeRD Validation::Invoice XML ZUGFeRD Validation::Result ZUGFeRD Validation::Report ZUGFeRD Validation::HTML XSLT2 ZUGFeRD Validation::HTML
Scripts used in this script	Load Saxon
Layouts used in this script
Tables used in this script	ZUGFeRD Validation
Table occurrences used by this script	ZUGFeRD Validation
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [Saxon Validate]

Next Script: [Validate Content with Saxon]

Script Name	Load Saxon
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	Saxon Validate Validate Content with Saxon
Script Definition
Script Steps	Set Variable [ $path; Value:"" ] #you may need to put in your path or have the libraries in the folder for the plugin If [ MBS("IsMacOS") ] Set Variable [ $path; Value:"libsaxonc-core-ee.12.9.0.dylib" ] Else If [ MBS("IsWindows") ] Set Variable [ $path; Value:"saxonc-core-ee.dll" ] Else If [ MBS("IsLinux") ] Set Variable [ $path; Value:"libsaxonc-core-ee.so.12.9.0" ] End If Set Variable [ $r; Value:MBS( "Saxon.Load"; $Path ) ] If [ MBS("IsError") ] Show Custom Dialog [ Title: "Failed to load saxon library."; Message: $r; Default Button: “OK”, Commit: “Yes” ] Halt Script 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: [Load Saxon]

Next Script: [Clear]

Script Name	Validate Content with Saxon
Run script with full access privileges	Off
Siri Shortcut Visible	Off
Include In Menu	Yes
Layouts that use this script	ZUGFeRD Validation
Scripts that use this script
Script Definition
Script Steps	If [ MBS("Saxon.IsLoaded") = 0 ] Perform Script [ “Load Saxon” ] End If #We read the XSLT needed to do validation Set Variable [ $schemaPath; Value:MBS("Path.AddPathComponent"; ZUGFeRD Validation::Folder; "FACTUR-X_EN16931.xslt") ] If [ MBS("Files.FileExists"; $schemaPath) ≠ 1 ] Show Custom Dialog [ Title: "You miss the XSLT file."; Message: $schemaPath; Default Button: “OK”, Commit: “Yes” ] Exit Script [ ] End If Set Variable [ $schemaText; Value:MBS("Text.ReadTextFile"; $schemaPath; "utf-8") ] If [ MBS("IsError") = 1 ] Show Custom Dialog [ Title: "Failed to read XSLT. Please check path!"; Message: $schemaText; Default Button: “OK”, Commit: “Yes” ] Exit Script [ ] End If #check count if you like to know how many rules you have Set Variable [ $countRules; Value:MBS("XML.Query"; $schemaText; "count(//svrl:failed-assert)"; "svrl=http://purl.oclc.org/dsdl/svrl"; 0) ] #we need to set where to find related files Set Variable [ $r; Value:MBS( "Saxon.SetCurrentWorkingDirectory"; ZUGFeRD Validation::Folder ) ] #perform check Set Variable [ $report; Value:MBS( "Saxon.XSLT"; ZUGFeRD Validation::Invoice XML; $schemaText ) ] Set Field [ ZUGFeRD Validation::Report; $report ] If [ MBS("IsError") ] Show Custom Dialog [ Title: "Failed to check invoice"; Message: $report; Default Button: “OK”, Commit: “Yes” ] Else [ ] #check count if you like to know how many rules you have Set Variable [ $countFailed; Value:MBS("XML.Query"; $report; "count(//svrl:failed-assert)"; "svrl=http://purl.oclc.org/dsdl/svrl"; 0) ] #convert report to html Set Variable [ $html; Value:MBS( "Saxon.XSLT"; $report; ZUGFeRD Validation::HTML XSLT1 ) ] If [ MBS("IsError") ] Show Custom Dialog [ Title: "Failed to produce html"; Message: $html; Default Button: “OK”, Commit: “Yes” ] Else [ ] Set Field [ ZUGFeRD Validation::HTML; $html ] Pause/Resume Script [ Duration (seconds): ,1 ] Show Custom Dialog [ Title: "Check completed."; Message: $countFailed & " of " & $countRules & " rules failed."; Default Button: “OK”, Commit: “Yes” ] End If End If
Fields used in this script	ZUGFeRD Validation::Folder ZUGFeRD Validation::Invoice XML ZUGFeRD Validation::Report ZUGFeRD Validation::HTML XSLT1 ZUGFeRD Validation::HTML
Scripts used in this script	Load Saxon
Layouts used in this script
Tables used in this script	ZUGFeRD Validation
Table occurrences used by this script	ZUGFeRD Validation
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [Validate Content with Saxon]

Script Name	Clear
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	Replace Field Contents [ ZUGFeRD Validation::HTML; Replace with calculation: "" ] [ No dialog ] Replace Field Contents [ ZUGFeRD Validation::Result; Replace with calculation: "" ] [ No dialog ] Replace Field Contents [ ZUGFeRD Validation::Report; Replace with calculation: "" ] [ No dialog ]
Fields used in this script	ZUGFeRD Validation::HTML ZUGFeRD Validation::Result ZUGFeRD Validation::Report
Scripts used in this script
Layouts used in this script
Tables used in this script	ZUGFeRD Validation
Table occurrences used by this script	ZUGFeRD Validation
Custom Functions used by this script
Custom menu set used by this script

Download example: Saxon ZUGFeRD Validation

Used functions: