MBS FileMaker Plugin Example Databases

XL

All examples are included with download of MBS FileMaker Plugin.

XL.fmp12

Overview
Tables1
Relationships0
Layouts1
Scripts3
Value Lists0
Custom Functions0
Custom Menus33
File Options
Default custom menu set[Standard FileMaker Menus]
When opening file
Minimum allowed version12.0
Login usingAccount Name; Account= Admin
Allow user to save passwordOff
Require iOS passcodeOff
Switch to layoutOff
Hide all toolbarsOff
Script triggers
OnFirstWindowOpenOff
OnLastWindowCloseOff
OnWindowOpenOff
OnWindowCloseOff
OnFileAVPlayerChangeOff
Thumbnail Settings
Generate ThumbnailsOn; Temporary

 

Tables

Table Name
Statistics
Occurrences in Relationship Graph
XL
3 fields defined, 1 record
XL

Fields

Table Name: XL - 3 Fields
Field NameTypeOptionsCommentsOn LayoutsIn RelationshipsIn ScriptsIn Value Lists
ExcelFileNormal, BinaryAuto-Enter:
  • Allow editing
Validation:
  • Only during data entry
Storage:
  • Repetitions: 1
      TextNormal, TextAuto-Enter:
      • Allow editing
      Validation:
      • Only during data entry
      Storage:
      • Repetitions: 1
      • Indexing: None
      • Automatically create indexes as needed
      • Index Language: German
          ResultNormal, TextAuto-Enter:
          • Allow editing
          Validation:
          • Only during data entry
          Storage:
          • Repetitions: 1
          • Indexing: None
          • Automatically create indexes as needed
          • Index Language: German

              Layout Objects: XL

              Regular Fields

              Field Name: XL::ExcelFile
              Field PropertiesCoordinatesField FormatField BehaviorQuick Find
              • Top: 24 pt
              • Left: 138 pt
              • Bottom: 149 pt
              • Right: 391 pt
              • Anchoring: Left, Top
              Field Format:
              • Edit Box
              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
              No

              Field Name: XL::Text
              Field PropertiesCoordinatesField FormatField BehaviorQuick Find
              • Top: 150 pt
              • Left: 138 pt
              • Bottom: 230 pt
              • Right: 391 pt
              • Anchoring: Left, Top
              Field Format:
              • Edit Box
              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: XL::Result
              Field PropertiesCoordinatesField FormatField BehaviorQuick Find
              • Top: 234 pt
              • Left: 138 pt
              • Bottom: 248 pt
              • Right: 391 pt
              • Anchoring: Left, Top
              Field Format:
              • Edit Box
              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

              Group Buttons

              Button PropertiesCoordinatesScript/Script Step
                Type:
              • Text: Get Text from Excel file
                Additional Properties:
              • Change to hand cursor over button
              • Rectangular
              • Top: 66 pt
              • Left: 414 pt
              • Bottom: 91 pt
              • Right: 547 pt
              • Anchoring: Left, Top
              Perform Script [ “GetText” ]

              Scripts:


              Script Hierarchy

              GetText
              Trace
              InitXL

              Next Script: [Trace]
              Script NameGetText
              Run script with full access privilegesOff
              Include In MenuYes
              Layouts that use this script
              Scripts that use this script
                Script Definition
                Script Steps
                • If [ MBS("XL.IsInitialized") ≠ 1 ]
                • Perform Script [ “InitXL” ]
                • End If
                • Set Variable [ $bookRef; Value:MBS( "XL.LoadBook"; XL::ExcelFile) ]
                • Set Field [ XL::Result; $bookRef ]
                • If [ MBS("IsError") ]
                • Show Custom Dialog [ Title: "Error"; Message: $bookRef; Default Button: “OK”, Commit: “Yes”; Button 2: “Cancel”, Commit: “No” ]
                • Exit Script [ ]
                • End If
                • Set Variable [ $r; Value:MBS( "XL.Book.GetText"; $bookRef) ]
                • Set Field [ XL::Text; $r ]
                • Set Variable [ $r; Value:MBS( "XL.Book.Release"; $bookRef) ]
                • Set Field [ XL::Result; $r ]
                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: [GetText]Next Script: [InitXL]
                      Script NameTrace
                      Run script with full access privilegesOff
                      Include In MenuYes
                      Layouts that use this script
                        Scripts that use this script
                          Script Definition
                          Script Steps
                          • Set Variable [ $Trace; Value:MBS("Trace") ]
                          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: [Trace]
                                        Script NameInitXL
                                        Run script with full access privilegesOff
                                        Include In MenuYes
                                        Layouts that use this script
                                          Scripts that use this script
                                          Script Definition
                                          Script Steps
                                          • #Find libXL and load it
                                          • If [ MBS("IsServer") ]
                                          • #Put the path you use for your server here:
                                          • If [ Get(SystemPlatform) = -2 ]
                                          • Set Variable [ $path; Value:"C:\Programs\FileMaker Server\libxl.dll" ]
                                          • Else
                                          • Set Variable [ $path; Value: "/Library/FileMaker Server/libxl.dylib" ]
                                          • End If
                                          • Else
                                          • #For desktop 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" ]
                                          • If [ Get(SystemPlatform) = -2 ]
                                          • Set Variable [ $path; Value:Substitute ( $databasePath ; $databaseName ; "libxl.dll" ) ]
                                          • Else
                                          • Set Variable [ $path; Value:Substitute ( $databasePath ; $databaseName ; "libxl.dylib" ) ]
                                          • End If
                                          • End If
                                          • Set Variable [ $r; Value:MBS( "XL.Initialize"; $path) ]
                                          • If [ $r ≠ "OK" ]
                                          • Show Custom Dialog [ Title: "Error"; Message: $r; Default Button: “OK”, Commit: “No”; Button 2: “Cancel”, Commit: “No” ]
                                          • 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

                                                        Download example: XL

                                                        Used functions:




                                                        Links
                                                        MBS Xojo blog