MBS FileMaker Plugin Example Databases

Picture to PDF with navigation

All examples are included with download of MBS FileMaker Plugin.

Picture to PDF with navigation.fmp12

Overview
Tables1
Relationships0
Layouts1
Scripts2
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
Merge PDFs
3 fields defined, 1 record
Merge PDFs

Fields

Table Name: Merge PDFs - 3 Fields
Field NameTypeOptionsCommentsOn LayoutsIn RelationshipsIn ScriptsIn Value Lists
DynaPDF LicenseKeyNormal, TextAuto-Enter:
  • Allow editing
Validation:
  • Only during data entry
Storage:
  • Global
  • Repetitions: 1
  • Index Language: German
        FinalPDFNormal, BinaryAuto-Enter:
        • Allow editing
        Validation:
        • Only during data entry
        Storage:
        • Global
        • Repetitions: 1
            InputImageNormal, BinaryAuto-Enter:
            • Allow editing
            Validation:
            • Only during data entry
            Storage:
            • Repetitions: 1

                Layout Objects: Merge PDFs

                Regular Fields

                Field Name: Merge PDFs::DynaPDF LicenseKey
                Field PropertiesCoordinatesField FormatField BehaviorQuick Find
                • Top: 6 pt
                • Left: 132 pt
                • Bottom: 20 pt
                • Right: 385 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: Merge PDFs::FinalPDF
                Field PropertiesCoordinatesField FormatField BehaviorQuick Find
                • Top: 24 pt
                • Left: 132 pt
                • Bottom: 263 pt
                • Right: 539 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: Merge PDFs::InputImage
                Field PropertiesCoordinatesField FormatField BehaviorQuick Find
                • Top: 270 pt
                • Left: 132 pt
                • Bottom: 527 pt
                • Right: 385 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

                Group Buttons

                Button PropertiesCoordinatesScript/Script Step
                  Type:
                • Text: Export file...
                  Additional Properties:
                • Change to hand cursor over button
                • Rectangular
                • Top: 183 pt
                • Left: 569 pt
                • Bottom: 208 pt
                • Right: 702 pt
                • Anchoring: Left, Top
                Export Field Contents [ Merge PDFs::FinalPDF ]

                Fields:


                Button PropertiesCoordinatesScript/Script Step
                  Type:
                • Text: Import file...
                  Additional Properties:
                • Change to hand cursor over button
                • Rectangular
                • Top: 270 pt
                • Left: 396 pt
                • Bottom: 295 pt
                • Right: 529 pt
                • Anchoring: Left, Top
                Insert File [ Merge PDFs::InputImage ]

                Fields:


                Button PropertiesCoordinatesScript/Script Step
                  Type:
                • Text: Create PDF
                  Additional Properties:
                • Change to hand cursor over button
                • Rectangular
                • Top: 57 pt
                • Left: 569 pt
                • Bottom: 82 pt
                • Right: 703 pt
                • Anchoring: Left, Top
                Perform Script [ “Run”; Parameter: 1 ]

                Scripts:


                Script Hierarchy

                InitDynaPDF
                Run

                Next Script: [Run]
                Script NameInitDynaPDF
                Run script with full access privilegesOff
                Include In MenuYes
                Layouts that use this script
                  Scripts that use this script
                  Script Definition
                  Script Steps
                  • #Locate DynaPDF library
                  • #you can have libraries in container and export at runtime to folder of your choice.
                  • #Or install library somewhere and pass path.
                  • #If library is in same folder as plugin, you can only pass only file name.
                  • If [ MBS("IsServer") ]
                  • #Put the path you use for your server here:
                  • If [ Get(SystemPlatform) = -2 ]
                  • #Server on Windows
                  • Set Variable [ $path; Value:"C:\Programs\FileMaker Server\dynapdf64.dll" ]
                  • Else If [ MBS("IsLinux") ]
                  • #Server on Linux for FileMaker Cloud
                  • Set Variable [ $path; Value:"/opt/FileMaker/FileMaker Server/dynapdf.linux.so" ]
                  • Else
                  • #Server on Mac
                  • Set Variable [ $path; Value: "/Library/FileMaker Server/dynapdf.dylib" ]
                  • End If
                  • Else
                  • #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" ]
                  • If [ Get(SystemPlatform) = -2 ]
                  • Set Variable [ $path; Value:Substitute ( $databasePath ; $databaseName ; "dynapdf.dll" ) ]
                  • #plugin will look for dynapdf.dll and if not found also for dynapdf64.dll (64-bit) and dynapdf32.dll (32-bit).
                  • Else
                  • Set Variable [ $path; Value:Substitute ( $databasePath ; $databaseName ; "dynapdf.dylib" ) ]
                  • #Mac dylib is usually 32 and 64 bit together.
                  • End If
                  • End If
                  • #You can test for free.
                  • #If you like to get a dynapdf license, please follow links on our pricing page:
                  • #https://www.monkeybreadsoftware.de/filemaker/pricing.shtml
                  • Set Variable [ $LicenseKey; Value:"" // put your key here or leave empty for demo. ]
                  • Set Variable [ $r; Value:MBS( "DynaPDF.Initialize"; $path; $LicenseKey) ]
                  • 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

                                Previous Script: [InitDynaPDF]
                                Script NameRun
                                Run script with full access privilegesOff
                                Include In MenuYes
                                Layouts that use this script
                                Scripts that use this script
                                  Script Definition
                                  Script Steps
                                  • #Initialize DynaPDF if needed
                                  • If [ $$DynaPDFInited ≠ 1 ]
                                  • Perform Script [ “InitDynaPDF” ]
                                  • End If
                                  • #Clear current PDF document
                                  • Set Variable [ $pdf; Value:MBS("DynaPDF.New") ]
                                  • Set Variable [ $ImageCount; Value:Get ( FoundCount ) ]
                                  • #Load PDF from container
                                  • Go to Record/Request/Page [ First ]
                                  • Set Variable [ $page; Value:0 ]
                                  • Loop
                                  • Set Variable [ $r; Value:MBS("DynaPDF.AppendPage"; $pdf) ]
                                  • Set Variable [ $page; Value:$page + 1 ]
                                  • Set Variable [ $r; Value:MBS("DynaPDF.ReadImageResolution"; $pdf; Merge PDFs::InputImage) ]
                                  • Set Variable [ $resX; Value:GetAsNumber (LeftValues ( $r ; 1 )) ]
                                  • Set Variable [ $resY; Value:GetAsNumber (MiddleValues ( $r ; 2; 1 )) ]
                                  • If [ $resX <= 0 ]
                                  • Set Variable [ $resX; Value:72 ]
                                  • End If
                                  • If [ $resY <= 0 ]
                                  • Set Variable [ $resY; Value:72 ]
                                  • End If
                                  • Set Variable [ $r; Value:MBS("DynaPDF.ReadImageFormat"; $pdf; Merge PDFs::InputImage) ]
                                  • Set Variable [ $ImageWidth; Value:GetAsNumber (LeftValues ( $r ; 1 )) ]
                                  • Set Variable [ $imageHeight; Value:GetAsNumber (MiddleValues ( $r ; 2; 1 )) ]
                                  • Set Variable [ $BitsPerPixel; Value:GetAsNumber (MiddleValues ( $r ;3; 1 )) ]
                                  • Set Variable [ $r; Value:MBS("DynaPDF.SetJPEGQuality"; $pdf; 75) ]
                                  • Set Variable [ $r; Value:MBS("DynaPDF.SetCompressionFilter"; $pdf; "JPEG") ]
                                  • Set Variable [ $r; Value:MBS("DynaPDF.SetResolution"; $pdf; 200) ]
                                  • #no recompression!
                                  • Set Variable [ $r; Value:MBS("DynaPDF.SetSaveNewImageFormat"; $pdf; 0) ]
                                  • Set Variable [ $x; Value:0 ]
                                  • Set Variable [ $y; Value:0 ]
                                  • Set Variable [ $w; Value:$ImageWidth * 72 / $ResX ]
                                  • Set Variable [ $h; Value:$ImageHeight * 72 / $ResY ]
                                  • Set Variable [ $ph; Value:$h/10 ]
                                  • Set Variable [ $pw; Value:$w/20 ]
                                  • Set Variable [ $r; Value:MBS("DynaPDF.SetPageHeight"; $pdf; $h) ]
                                  • Set Variable [ $r; Value:MBS("DynaPDF.SetPageWidth"; $pdf; $w) ]
                                  • Set Variable [ $r; Value:MBS("DynaPDF.InsertImage"; $pdf; Merge PDFs::InputImage; $x; $y; $w; $h) ]
                                  • Set Variable [ $r; Value:MBS( "DynaPDF.SetColorSpace"; $PDF; "DeviceRGB") ]
                                  • Set Variable [ $r; Value:MBS( "DynaPDF.SetFillColor"; $PDF; ,2; ,2; ,8) ]
                                  • Set Variable [ $r; Value:MBS( "DynaPDF.Rectangle"; $PDF; 0; ($h-$ph)/2; $pw; $ph; "fill" ) ]
                                  • Set Variable [ $r; Value:MBS( "DynaPDF.Rectangle"; $PDF; $w-$pw; ($h-$ph)/2; $pw; $ph; "fill" ) ]
                                  • Set Variable [ $r; Value:MBS( "DynaPDF.PageLink"; $PDF; 0; ($h-$ph)/2; $pw; $ph; If($page = 1; $ImageCount; $page - 1) ) ]
                                  • Set Variable [ $r; Value:MBS( "DynaPDF.PageLink"; $PDF; $w-$pw; ($h-$ph)/2; $pw; $ph; If($page = $ImageCount; 1; $page + 1) ) ]
                                  • Set Variable [ $i; Value:0 ]
                                  • Loop
                                  • Set Variable [ $r; Value:MBS( "DynaPDF.DrawCircle"; $pdf; $w/2 - (($ImageCount-1)/2-$i) * $ph; $ph; $pw/2; "fill" ) ]
                                  • Set Variable [ $r; Value:MBS( "DynaPDF.PageLink"; $PDF; $w/2 - (($ImageCount-1)/2-$i) * $ph-$pw/2; $ph-$pw/2; $pw; $pw; $i+1 ) ]
                                  • Set Variable [ $i; Value:$i + 1 ]
                                  • Exit Loop If [ $i = $ImageCount ]
                                  • End Loop
                                  • Set Variable [ $r; Value:MBS("DynaPDF.EndPage"; $pdf) ]
                                  • Go to Record/Request/Page [ Next; Exit after last ]
                                  • End Loop
                                  • Set Field [ Merge PDFs::FinalPDF; MBS("DynaPDF.Save"; $pdf; "Merged.pdf") ]
                                  • Set Variable [ $r; Value:MBS("DynaPDF.Release"; $pdf) ]
                                  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: Picture to PDF with navigation

                                        Used functions:




                                        Links
                                        MBS Xojo PDF Plugins