Monkeybread Software - MBS FileMaker Plugin: Create Text as PDFA

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

MBS FileMaker Plugin Example Databases

Create Text as PDFA

All examples are included with download of MBS FileMaker Plugin.

Create Text as PDFA.fmp12

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

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

Tables

Table Name	Statistics	Comments	Occurrences in Relationship Graph
Create Text	6 fields defined, 1 record		Create Text

Fields

Table Name: Create Text - 6 Fields
Field Name	Type	Options	Comments	On Layouts	In Relationships	In Scripts	In Value Lists
PDF	Normal, Binary	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1		Create Text		Run Run with PDF/A Run with PDF/UA Clear Render text block Render text block 2
DynaPDFLicenseKey	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Global Repetitions: 1 Index Language: German		Create Text		Clear
CheckConformanceResult	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		Create Text		Run Run with PDF/A Clear
Gray ICC Profile	Normal, Binary	Auto-Enter: Allow editing Validation: Only during data entry Storage: Global Repetitions: 1		Create Text		Run with PDF/A
RGB ICC Profile	Normal, Binary	Auto-Enter: Allow editing Validation: Only during data entry Storage: Global Repetitions: 1		Create Text		Run with PDF/A
CMYK ICC Profile	Normal, Binary	Auto-Enter: Allow editing Validation: Only during data entry Storage: Global Repetitions: 1		Create Text		Run with PDF/A

Layout Objects: Create Text

Regular Fields

Field Name: Create Text::PDF

Layout Name:

Create Text

Top: 25 pt
Left: 452 pt
Bottom: 714 pt
Right: 1112 pt

Anchoring: Left and Right, Top and 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: Create Text::DynaPDFLicenseKey

Layout Name:

Create Text

Top: 245 pt
Left: 174 pt
Bottom: 264 pt
Right: 427 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

Field Name: Create Text::CheckConformanceResult

Layout Name:

Create Text

Top: 177 pt
Left: 174 pt
Bottom: 196 pt
Right: 427 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: Create Text::Gray ICC Profile

Layout Name:

Create Text

Top: 331 pt
Left: 174 pt
Bottom: 456 pt
Right: 427 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

Field Name: Create Text::RGB ICC Profile

Layout Name:

Create Text

Top: 460 pt
Left: 174 pt
Bottom: 585 pt
Right: 427 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

Field Name: Create Text::CMYK ICC Profile

Layout Name:

Create Text

Top: 589 pt
Left: 174 pt
Bottom: 714 pt
Right: 427 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

Type:

Text: Create PDF

Layout Name:

Create Text

Top: 37 pt
Left: 174 pt
Bottom: 73 pt
Right: 325 pt

Anchoring: Left, Top

Perform Script [ “Run” ]

Scripts:

Button Properties

Coordinates

Script/Script Step

Type:

Text: Create PDF/A

Layout Name:

Create Text

Top: 85 pt
Left: 174 pt
Bottom: 121 pt
Right: 325 pt

Anchoring: Left, Top

Perform Script [ “Run with PDF/A” ]

Scripts:

Run with PDF/A

Script Name	InitDynaPDF
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	Run Run with PDF/A Run with PDF/UA Render text block Render text block 2
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\dynapdf.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 dynapdf.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. // Use e.g. "Lite", "Pro" or "Starter" to use demo mode for just that mode. ] 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]

Next Script: [Run with PDF/A]

Script Name	Run
Run script with full access privileges	Off
Siri Shortcut Visible	Off
Include In Menu	Yes
Layouts that use this script	Create Text
Scripts that use this script
Script Definition
Script Steps	Set Variable [ $r; Value:MBS("Trace") ] #Initialize DynaPDF if needed If [ MBS("DynaPDF.IsInitialized") ≠ 1 ] Perform Script [ “InitDynaPDF” ] End If #Start with a new PDF document Set Variable [ $pdf; Value:MBS("DynaPDF.New") ] #Add page Set Variable [ $r; Value:MBS("DynaPDF.AppendPage"; $pdf) ] Set Variable [ $r; Value:MBS("DynaPDF.SetFont"; $pdf; "Helvetica"; 0; 12) ] #Write some text Set Variable [ $x; Value:MBS("DynaPDF.GetPageHeight"; $pdf)-100 ] Set Variable [ $r; Value:MBS("DynaPDF.SetFillColor"; $pdf; 0; 0; 0) ] Set Variable [ $r; Value:MBS("DynaPDF.WriteText"; $pdf; 100; $x; "Some black text") ] #Write some text Set Variable [ $x; Value:$x - 30 ] Set Variable [ $r; Value:MBS("DynaPDF.SetFillColor"; $pdf; 1; 0; 0) ] Set Variable [ $r; Value:MBS("DynaPDF.WriteText"; $pdf; 100; $x; "Some red text") ] #Write some invisible text Set Variable [ $x; Value:$x - 30 ] Set Variable [ $r; Value:MBS("DynaPDF.SaveGraphicState"; $pdf) ] Set Variable [ $r; Value:MBS("DynaPDF.SetAlpha"; $pdf; 0; 0) ] Set Variable [ $r; Value:MBS("DynaPDF.WriteText"; $pdf; 100; $x; "Invisible text") ] Set Variable [ $r; Value:MBS("DynaPDF.SetAlpha"; $pdf; 1; 1) ] Set Variable [ $r; Value:MBS("DynaPDF.RestoreGraphicState"; $pdf) ] #Write some text Set Variable [ $x; Value:$x - 30 ] Set Variable [ $r; Value:MBS("DynaPDF.SetFillColor"; $pdf; 0; 0; 1) ] Set Variable [ $r; Value:MBS("DynaPDF.WriteText"; $pdf; 100; $x; "You see invisible text above?") ] #Write some formatted text Set Variable [ $text; Value:"\FC[16711680]\ul#\LK[false, true, false, https://www.dynaforms.com]Link to DynaForms\EK#\ul#\FC[0]¶" & "Left aligned text, this is left aligned text, this is left aligned text...\ju#\FC[255]This is justified text, this is justified text, this is justified text, this is justified text, this is justified text, this is justified text, this is justified text, this is justified text...\re#\FC[165536]This is right aligned text, this is right aligned text, this is right aligned text...\le#\FC[233512]Back to left aligned text, we go back to left aligned text..." ] Set Variable [ $r; Value:MBS("DynaPDF.SetTextRect"; $pdf; 200; 200; 150; -1) ] Set Variable [ $r; Value:MBS("DynaPDF.WriteFText"; $pdf; "left"; $text) ] Set Variable [ $height; Value:200 - MBS("DynaPDF.GetLastTextPosY"; $pdf) ] Set Variable [ $r; Value:MBS("DynaPDF.Rectangle"; $pdf; 200; 200-$height; 150; $height; "Stroke") ] #Write some continued text Set Variable [ $r; Value:MBS("DynaPDF.SetFillColor"; $pdf; 0; 0; 0) ] Set Variable [ $r; Value:MBS("DynaPDF.BeginContinueText"; $pdf; 50; $x-30) ] Set Variable [ $r; Value:MBS("DynaPDF.AddContinueText"; $pdf; "Hello World") ] Set Variable [ $r; Value:MBS("DynaPDF.ChangeFontStyle"; $pdf; 4) ] Set Variable [ $r; Value:MBS("DynaPDF.AddContinueText"; $pdf; "Underlined Text") ] Set Variable [ $r; Value:MBS("DynaPDF.ChangeFontStyle"; $pdf; 0) ] Set Variable [ $r; Value:MBS("DynaPDF.AddContinueText"; $pdf; "Normal Text") ] Set Variable [ $r; Value:MBS("DynaPDF.ChangeFontStyle"; $pdf; 8) ] Set Variable [ $r; Value:MBS("DynaPDF.AddContinueText"; $pdf; "Strikout Text") ] #Write some text Set Variable [ $r; Value:MBS("DynaPDF.ChangeFontStyle"; $pdf; 0) ] Set Variable [ $r; Value:MBS("DynaPDF.SetFillColor"; $pdf; 0; 0; 1) ] Set Variable [ $r; Value:MBS("DynaPDF.WriteText"; $pdf; 100; 0; "In PDF the coordinate system is bottom up, so zero is on the bottom.") ] #End page Set Variable [ $r; Value:MBS("DynaPDF.EndPage"; $pdf) ] #Set title Set Variable [ $r; Value:MBS("DynaPDF.SetDocInfo"; $pdf; "Title"; "Test PDF") ] #Render one page as Picture Set Variable [ $PDFData; Value:MBS("DynaPDF.Save"; $pdf; "hello.pdf") ] Set Variable [ $r; Value:MBS("DynaPDF.Release"; $pdf) ] #Put in Container Set Field [ Create Text::PDF; $PDFData ] #clear other field Set Field [ Create Text::CheckConformanceResult; "" ]
Fields used in this script	Create Text::PDF Create Text::CheckConformanceResult
Scripts used in this script	InitDynaPDF
Layouts used in this script
Tables used in this script	Create Text
Table occurrences used by this script	Create Text
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [Run]

Next Script: [Run with PDF/UA]

Script Name	Run with PDF/A
Run script with full access privileges	Off
Siri Shortcut Visible	Off
Include In Menu	Yes
Layouts that use this script	Create Text
Scripts that use this script
Script Definition
Script Steps	Set Variable [ $r; Value:MBS("Trace") ] #Initialize DynaPDF if needed If [ MBS("DynaPDF.IsInitialized") ≠ 1 ] Perform Script [ “InitDynaPDF” ] End If #Start with a new PDF document Set Variable [ $pdf; Value:MBS("DynaPDF.New") ] #For PDF/A Set Variable [ $r; Value:MBS("DynaPDF.SetLanguage"; $pdf; "en-US") ] Set Variable [ $r; Value:MBS("DynaPDF.CreateStructureTree"; $pdf) ] # Set replacements for missing ICC profiles Set Variable [ $r; Value:MBS("DynaPDF.SetReplaceICCProfileData"; $pdf; "rgb"; Create Text::RGB ICC Profile) ] Set Variable [ $r; Value:MBS("DynaPDF.SetReplaceICCProfileData"; $pdf; "gray"; Create Text::Gray ICC Profile) ] Set Variable [ $r; Value:MBS("DynaPDF.SetReplaceICCProfileData"; $pdf; "cmyk"; Create Text::CMYK ICC Profile) ] #Add page Set Variable [ $r; Value:MBS("DynaPDF.AppendPage"; $pdf) ] Set Variable [ $r; Value:MBS("DynaPDF.SetFont"; $pdf; "Helvetica"; 0; 12) ] #Write some text Set Variable [ $x; Value:MBS("DynaPDF.GetPageHeight"; $pdf)-100 ] Set Variable [ $r; Value:MBS("DynaPDF.SetFillColor"; $pdf; 0; 0; 0) ] Set Variable [ $r; Value:MBS("DynaPDF.WriteText"; $pdf; 100; $x; "Some black text") ] #Write some text Set Variable [ $x; Value:$x - 30 ] Set Variable [ $r; Value:MBS("DynaPDF.SetFillColor"; $pdf; 1; 0; 0) ] Set Variable [ $r; Value:MBS("DynaPDF.WriteText"; $pdf; 100; $x; "Some red text") ] #Write some text Set Variable [ $x; Value:$x - 30 ] Set Variable [ $r; Value:MBS("DynaPDF.SetFillColor"; $pdf; 0; 0; 1) ] Set Variable [ $r; Value:MBS("DynaPDF.WriteText"; $pdf; 100; $x; "You see invisible text above?") ] #Write some formatted text Set Variable [ $text; Value:"\FC[16711680]\ul#\LK[false, true, false, https://www.dynaforms.com]Link to DynaForms\EK#\ul#\FC[0]¶" & "Left aligned text, this is left aligned text, this is left aligned text...\ju#\FC[255]This is justified text, this is justified text, this is justified text, this is justified text, this is justified text, this is justified text, this is justified text, this is justified text...\re#\FC[165536]This is right aligned text, this is right aligned text, this is right aligned text...\le#\FC[233512]Back to left aligned text, we go back to left aligned text..." ] Set Variable [ $r; Value:MBS("DynaPDF.SetTextRect"; $pdf; 200; 200; 150; -1) ] Set Variable [ $r; Value:MBS("DynaPDF.WriteFText"; $pdf; "left"; $text) ] Set Variable [ $height; Value:200 - MBS("DynaPDF.GetLastTextPosY"; $pdf) ] Set Variable [ $r; Value:MBS("DynaPDF.Rectangle"; $pdf; 200; 200-$height; 150; $height; "Stroke") ] #Write some continued text Set Variable [ $r; Value:MBS("DynaPDF.SetFillColor"; $pdf; 0; 0; 0) ] Set Variable [ $r; Value:MBS("DynaPDF.BeginContinueText"; $pdf; 50; $x-30) ] Set Variable [ $r; Value:MBS("DynaPDF.AddContinueText"; $pdf; "Hello World") ] Set Variable [ $r; Value:MBS("DynaPDF.ChangeFontStyle"; $pdf; 4) ] Set Variable [ $r; Value:MBS("DynaPDF.AddContinueText"; $pdf; "Underlined Text") ] Set Variable [ $r; Value:MBS("DynaPDF.ChangeFontStyle"; $pdf; 0) ] Set Variable [ $r; Value:MBS("DynaPDF.AddContinueText"; $pdf; "Normal Text") ] Set Variable [ $r; Value:MBS("DynaPDF.ChangeFontStyle"; $pdf; 8) ] Set Variable [ $r; Value:MBS("DynaPDF.AddContinueText"; $pdf; "Strikout Text") ] #Write some text Set Variable [ $r; Value:MBS("DynaPDF.ChangeFontStyle"; $pdf; 0) ] Set Variable [ $r; Value:MBS("DynaPDF.SetFillColor"; $pdf; 0; 0; 1) ] Set Variable [ $r; Value:MBS("DynaPDF.WriteText"; $pdf; 100; 0; "In PDF the coordinate system is bottom up, so zero is on the bottom.") ] #End page Set Variable [ $r; Value:MBS("DynaPDF.EndPage"; $pdf) ] #Set title Set Variable [ $r; Value:MBS("DynaPDF.SetDocInfo"; $pdf; "Title"; "Test PDF") ] #For PDF/A #Check if this PDF conforms to PDF/A-1b 2005 Set Variable [ $c; Value:MBS("DynaPDF.CheckConformance"; $pdf; "PDFA 1b 2005") ] Set Field [ Create Text::CheckConformanceResult; $c ] If [ $c = 1 ] # A RGB ICC profile must be added to the document Set Variable [ $r; Value:MBS("DynaPDF.AddOutputIntentEx"; $pdf; Create Text::RGB ICC Profile) ] Else If [ $c = 2 ] # A CMYK ICC profile must be added to the document Set Variable [ $r; Value:MBS("DynaPDF.AddOutputIntentEx"; $pdf; Create Text::CMYK ICC Profile) ] Else If [ $c = 3 ] # A Gray, RGB, or CMYK ICC profile must be added to the document Set Variable [ $r; Value:MBS("DynaPDF.AddOutputIntentEx"; $pdf; Create Text::RGB ICC Profile) ] End If #Save as PDF Set Variable [ $r; Value:MBS( "Plugin.SetPreviewSize"; 1200 ) // more then the usual small previews we make ] Set Variable [ $PDFData; Value:MBS("DynaPDF.Save"; $pdf; "hello.pdf") ] Set Variable [ $r; Value:MBS("DynaPDF.Release"; $pdf) ] #Put in Container Set Field [ Create Text::PDF; $PDFData ]
Fields used in this script	Create Text::RGB ICC Profile Create Text::Gray ICC Profile Create Text::CMYK ICC Profile Create Text::CheckConformanceResult Create Text::PDF
Scripts used in this script	InitDynaPDF
Layouts used in this script
Tables used in this script	Create Text
Table occurrences used by this script	Create Text
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [Run with PDF/A]

Next Script: [Clear]

Script Name	Run with PDF/UA
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	Set Variable [ $r; Value:MBS("Trace") ] #Initialize DynaPDF if needed If [ MBS("DynaPDF.IsInitialized") ≠ 1 ] Perform Script [ “InitDynaPDF” ] End If #Start with a new PDF document Set Variable [ $pdf; Value:MBS("DynaPDF.New") ] #A PDF/UA conformant file must contain a title Set Variable [ $r; Value:MBS("DynaPDF.SetDocInfo"; $pdf; "Title"; "Test PDF") ] #Required! The document title must be displayed Set Variable [ $r; Value:MBS("DynaPDF.SetViewerPreferences"; $pdf; "DisplayDocTitle"; "None") ] #Required! The language must be set too Set Variable [ $r; Value:MBS("DynaPDF.SetLanguage"; $pdf; "en-US") ] #PDF/UA files are Tagged PDF files. So, a structure tree is required. Set Variable [ $r; Value:MBS("DynaPDF.CreateStructureTree"; $pdf) ] #set PDF Version Set Variable [ $r; Value:MBS("DynaPDF.SetPDFVersion"; $pdf; "PDF/UA-1") ] #Add page Set Variable [ $r; Value:MBS("DynaPDF.AppendPage"; $pdf) ] Set Variable [ $r; Value:MBS("DynaPDF.SetFont"; $pdf; "Helvetica"; 0; 12) ] #Write some text with a p Tag around for a paragraph Set Variable [ $x; Value:MBS("DynaPDF.GetPageHeight"; $pdf)-100 ] Set Variable [ $r; Value:MBS("DynaPDF.SetFillColor"; $pdf; 0; 0; 0) ] Set Variable [ $r; Value:MBS("DynaPDF.OpenTag"; $pdf; "p") ] Set Variable [ $r; Value:MBS("DynaPDF.WriteText"; $pdf; 100; $x; "Some black text") ] Set Variable [ $r; Value:MBS("DynaPDF.CloseTag"; $pdf) ] #Write some text Set Variable [ $x; Value:$x - 30 ] Set Variable [ $r; Value:MBS("DynaPDF.SetFillColor"; $pdf; 1; 0; 0) ] Set Variable [ $r; Value:MBS("DynaPDF.OpenTag"; $pdf; "p") ] Set Variable [ $r; Value:MBS("DynaPDF.WriteText"; $pdf; 100; $x; "Some red text") ] Set Variable [ $r; Value:MBS("DynaPDF.CloseTag"; $pdf) ] #Write some text Set Variable [ $x; Value:$x - 30 ] Set Variable [ $r; Value:MBS("DynaPDF.SetFillColor"; $pdf; 0; 0; 1) ] Set Variable [ $r; Value:MBS("DynaPDF.OpenTag"; $pdf; "p") ] Set Variable [ $r; Value:MBS("DynaPDF.WriteText"; $pdf; 100; $x; "You see invisible text above?") ] Set Variable [ $r; Value:MBS("DynaPDF.CloseTag"; $pdf) ] #Write some artwork Set Variable [ $r; Value:MBS("DynaPDF.OpenTag"; $pdf; "figure"; // type ""; // AltText "Rectangle";// Expansion 200; 200; 150; 100) ] Set Variable [ $r; Value:MBS("DynaPDF.Rectangle"; $pdf; 200; 200; 150; 100; "Stroke") ] Set Variable [ $r; Value:MBS("DynaPDF.CloseTag"; $pdf) ] #Write some continued text Set Variable [ $r; Value:MBS("DynaPDF.OpenTag"; $pdf; "p") ] Set Variable [ $r; Value:MBS("DynaPDF.SetFillColor"; $pdf; 0; 0; 0) ] Set Variable [ $r; Value:MBS("DynaPDF.BeginContinueText"; $pdf; 50; $x-30) ] Set Variable [ $r; Value:MBS("DynaPDF.AddContinueText"; $pdf; "Hello World") ] Set Variable [ $r; Value:MBS("DynaPDF.ChangeFontStyle"; $pdf; 4) ] Set Variable [ $r; Value:MBS("DynaPDF.AddContinueText"; $pdf; "Underlined Text") ] Set Variable [ $r; Value:MBS("DynaPDF.ChangeFontStyle"; $pdf; 0) ] Set Variable [ $r; Value:MBS("DynaPDF.AddContinueText"; $pdf; "Normal Text") ] Set Variable [ $r; Value:MBS("DynaPDF.ChangeFontStyle"; $pdf; 8) ] Set Variable [ $r; Value:MBS("DynaPDF.AddContinueText"; $pdf; "Strikout Text") ] Set Variable [ $r; Value:MBS("DynaPDF.CloseTag"; $pdf) ] #Write some text Set Variable [ $r; Value:MBS("DynaPDF.ChangeFontStyle"; $pdf; 0) ] Set Variable [ $r; Value:MBS("DynaPDF.SetFillColor"; $pdf; 0; 0; 1) ] Set Variable [ $r; Value:MBS("DynaPDF.OpenTag"; $pdf; "p") ] Set Variable [ $r; Value:MBS("DynaPDF.WriteText"; $pdf; 100; 0; "In PDF the coordinate system is bottom up, so zero is on the bottom.") ] Set Variable [ $r; Value:MBS("DynaPDF.CloseTag"; $pdf) ] #End page Set Variable [ $r; Value:MBS("DynaPDF.EndPage"; $pdf) ] #Save as PDF Set Variable [ $PDFData; Value:MBS("DynaPDF.Save"; $pdf; "hello.pdf") ] Set Variable [ $r; Value:MBS("DynaPDF.Release"; $pdf) ] #Put in Container Set Field [ Create Text::PDF; $PDFData ]
Fields used in this script	Create Text::PDF
Scripts used in this script	InitDynaPDF
Layouts used in this script
Tables used in this script	Create Text
Table occurrences used by this script	Create Text
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [Run with PDF/UA]

Next Script: [Render text block]

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	Set Field [ Create Text::PDF; "" ] Set Field [ Create Text::DynaPDFLicenseKey; "" ] Set Field [ Create Text::CheckConformanceResult; "" ]
Fields used in this script	Create Text::PDF Create Text::DynaPDFLicenseKey Create Text::CheckConformanceResult
Scripts used in this script
Layouts used in this script
Tables used in this script	Create Text
Table occurrences used by this script	Create Text
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [Clear]

Next Script: [Render text block 2]

Script Name	Render text block
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	Set Variable [ $r; Value:MBS("Trace") ] #Initialize DynaPDF if needed If [ MBS("DynaPDF.IsInitialized") ≠ 1 ] Perform Script [ “InitDynaPDF” ] End If #Start with a new PDF document Set Variable [ $pdf; Value:MBS("DynaPDF.New") ] #Add page Set Variable [ $r; Value:MBS("DynaPDF.AppendPage"; $pdf) ] Set Variable [ $r; Value:MBS("DynaPDF.SetPageCoords"; $pdf; "topdown") ] Set Variable [ $r; Value:MBS("DynaPDF.SetFont"; $pdf; "Helvetica"; 0; 12) ] #Write some text Set Variable [ $text; Value:"The award winning MBS Plugin is easily the most powerful plug-in available for Claris FileMaker today. There are over 7,700 functions that allow Claris FileMaker developers to extend their solutions in some amazing ways. Each function does a little task and in their combination you can unleash the full power of our plugin. MBS Plugin support Claris FileMaker Pro, Server (Scheduled Scripts, WebDirect Data API, & PSoS) and the iOS SDK. To learn how to use them together, please check our reference and our more than 600 example databases.¶¶We support FileMaker 7 to the latest version 22.0. Please use MBS Plugin 15.2 or newer for FileMaker 22 alias 2025." ] Set Variable [ $r; Value:MBS("DynaPDF.SetFillColor"; $pdf; 0; 0; 0) ] Set Variable [ $r; Value:MBS("DynaPDF.WriteStyledTextEx"; $pdf; 10; 10; 300; -1; "justify"; $Text) ] #now figure out how much space we needed to make the page the right size Set Variable [ $height; Value:MBS("DynaPDF.GetLastTextPosY"; $pdf) ] Set Variable [ $ph; Value:MBS("DynaPDF.GetPageHeight"; $pdf) ] Set Variable [ $r; Value:MBS( "DynaPDF.SetBBox"; $PDF; "Media"; 0; $ph; 320; $height - 10 ) ] #close page, document and save PDF Set Variable [ $r; Value:MBS("DynaPDF.EndPage"; $pdf) ] If [ 0 ] #save as PDF Set Variable [ $Result; Value:MBS("DynaPDF.Save"; $pdf; "hello.pdf") ] Else [ ] #or render a picture Set Variable [ $Result; Value:MBS("DynaPDF.RenderPage"; $pdf; 1; 150) ] End If Set Variable [ $r; Value:MBS("DynaPDF.Release"; $pdf) ] #Put in Container Set Field [ Create Text::PDF; $Result ]
Fields used in this script	Create Text::PDF
Scripts used in this script	InitDynaPDF
Layouts used in this script
Tables used in this script	Create Text
Table occurrences used by this script	Create Text
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [Render text block]

Script Name	Render text block 2
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	Set Variable [ $r; Value:MBS("Trace") ] #Initialize DynaPDF if needed If [ MBS("DynaPDF.IsInitialized") ≠ 1 ] Perform Script [ “InitDynaPDF” ] End If #Start with a new PDF document Set Variable [ $pdf; Value:MBS("DynaPDF.New") ] #Add page Set Variable [ $r; Value:MBS("DynaPDF.AppendPage"; $pdf) ] Set Variable [ $r; Value:MBS("DynaPDF.SetFont"; $pdf; "Helvetica"; 0; 12) ] #Write some text Set Variable [ $text; Value:"The award winning MBS Plugin is easily the most powerful plug-in available for Claris FileMaker today. There are over 7,700 functions that allow Claris FileMaker developers to extend their solutions in some amazing ways. Each function does a little task and in their combination you can unleash the full power of our plugin. MBS Plugin support Claris FileMaker Pro, Server (Scheduled Scripts, WebDirect Data API, & PSoS) and the iOS SDK. To learn how to use them together, please check our reference and our more than 600 example databases.¶¶We support FileMaker 7 to the latest version 22.0. Please use MBS Plugin 15.2 or newer for FileMaker 22 alias 2025." ] Set Variable [ $ftext; Value:MBS( "DynaPDF.ConvertStyledText"; $PDF; $Text) ] #calculate height Set Variable [ $width; Value:300 ] Set Variable [ $height; Value:MBS( "DynaPDF.GetFTextHeightEx"; $PDF; $width; "justify"; $ftext ) ] #resize page Set Variable [ $r; Value:MBS( "DynaPDF.SetBBox"; $PDF; "Media"; 0; 0; $width + 20; $height + 20 ) ] Set Variable [ $r; Value:MBS("DynaPDF.SetPageCoords"; $pdf; "topdown") ] #draw round rect Set Variable [ $r; Value:MBS("DynaPDF.SetFillColor"; $pdf; 1; 1; 1) ] Set Variable [ $r; Value:MBS("DynaPDF.SetStrokeColor"; $pdf; 1; ,8; ,8) ] Set Variable [ $r; Value:MBS("DynaPDF.SetLineWidth"; $pdf; 3) ] Set Variable [ $r; Value:MBS( "DynaPDF.RoundRectEx"; $PDF; 5; 5; $width + 10; $Height + 10; 10; 10; "FillStroke" ) ] #and draw text Set Variable [ $r; Value:MBS("DynaPDF.SetFillColor"; $pdf; 0; 0; 0) ] Set Variable [ $r; Value:MBS("DynaPDF.WriteFTextEx"; $pdf; 10; 10; $width; -1; "justify"; $ftext) ] #close page, document and save PDF Set Variable [ $r; Value:MBS("DynaPDF.EndPage"; $pdf) ] If [ 0 ] #save as PDF Set Variable [ $Result; Value:MBS("DynaPDF.Save"; $pdf; "hello.pdf") ] Else [ ] #or render a picture, PNG with transparency Set Variable [ $Result; Value:MBS("DynaPDF.RenderPage"; $pdf; 1; 150; 0; 0; ""; "RGBA"; "Flate"; "PNG"; "image.png") ] End If Set Variable [ $r; Value:MBS("DynaPDF.Release"; $pdf) ] #Put in Container Set Field [ Create Text::PDF; $Result ]
Fields used in this script	Create Text::PDF
Scripts used in this script	InitDynaPDF
Layouts used in this script
Tables used in this script	Create Text
Table occurrences used by this script	Create Text
Custom Functions used by this script
Custom menu set used by this script

Download example: Create Text as PDFA

Used functions: