Topics   All   Mac OS X (Only)   Windows (Only)   Linux (Only, Not)   iOS (Only, Not)  
Components   Crossplatform Mac & Win   Server   Client   Old   Guides   Examples
New in version: 7.1   7.2   7.3   7.4   7.5   8.0   8.1   8.2   8.3   8.4    Statistic  

Barcode.SetPrimary

Sets primary parameter.

Component Version macOS Windows Server FileMaker Cloud FileMaker iOS SDK
Barcode 7.1 Yes Yes Yes Yes Yes

MBS( "Barcode.SetPrimary"; Text; Encoding )

Parameters

Parameter Description Example value
Text The text to use. "Hello World"
Encoding The text encoding for text parameter.
Default is UTF-8.
Possible encoding names: ANSI, Arabic-Mac, Arabic-Win, Baltic-Win, CentralEurope-Mac, ChineseSimp-Mac, ChineseSimp-Win, ChineseTrad-Mac, ChineseTrad-Win, Cyrillic-Mac, Cyrillic-Win, EasternEurope-Win, Greek-Mac, Greek-Win, Hebrew-Mac, Hebrew-Win, ISO-8859-1, ISO-8859-2, ISO-8859-3, ISO-8859-4, ISO-8859-5, ISO-8859-6, ISO-8859-7, ISO-8859-8, ISO-8859-9, ISO-8859-15, Korean-Johab, Korean-Mac, Korean-Win, Latin1, Mac, Native, ShiftJIS-Mac, ShiftJIS-Win, Turkish-Mac, Turkish-Win, UTF-8, DOS or Windows. Pass native to use the native encoding of the current platform.
"UTF-8"

Result

Returns OK or error.

Description

Sets primary parameter.
Needed for some barcodes like MaxiCode.

For Maxicode, length must be 15 characters. Last 3 characters must be service number as 3 digits. And next three characters before that are the country ID with 3 digits.

Examples

Create Maxicode with Primary text:

Set Field [Barcode Generation::Image; ""]
Set Variable [$r; Value:MBS("Barcode.SetOptions"; 4)]
Set Variable [$r; Value:MBS("Barcode.SetPrimary"; "999999999840012")]
Set Variable [$img; Value:MBS("Barcode.Generate"; "MAXICODE"; "Secondary Message Here")]
Set Variable [$r; Value:MBS("Barcode.SetPrimary"; "")]
If [MBS("IsError") = 0]
    Set Field [Barcode Generation::Image; MBS( "GMImage.WriteToPNGContainer"; $img; "barcode.png")]
    Set Variable [$r; Value:MBS( "GMImage.Destroy"; $img )]
End If

Create maxicode:

Set Field [ Barcode Generation::Image ; "" ]
Set Variable [ $img ; Value: MBS("Barcode.SetOptions"; 2) ]
Set Variable [ $img ; Value: MBS("Barcode.SetPrimary"; "999999999840012"; "utf8") ]
Set Variable [ $img ; Value: MBS("Barcode.Generate"; "Maxicode"; "Secondary Message Here") ]
If [ MBS("IsError") = 0 ]
    Set Field [ Barcode Generation::Image ; MBS( "GMImage.WriteToPNGContainer"; $img; "barcode.png") ]
    Set Variable [ $r ; Value: MBS( "GMImage.Destroy"; $img ) ]
End If

Create Maxicode with mode 3:

Set Variable [ $p ; Value: "196LS97TF826004" // primary text ]
Set Variable [ $t ; Value: "1Z42015596UPSN123W123456/11NLEEDS" // second text ]
Set Variable [ $r ; Value: MBS("Barcode.SetOptions"; 3) ]
Set Variable [ $r ; Value: MBS("Barcode.SetPrimary"; $p) ]
Set Variable [ $img ; Value: MBS("Barcode.Generate"; "maxicode"; $t) ]

Example for Maxicode creation, e.g. for UPS:

Set Variable [ $p ; Value: "LS97TF   826004" // primary text ]
Set Variable [ $t ; Value: "[)>{RS}01{GS}961Z42015596{GS}UPSN{GS}123W45{GS}339{GS}{GS}1/1{GS}1{GS}N{GS}{GS}LEEDS{GS}{RS}{EOT}" ]
Set Variable [ $t ; Value: Substitute($t; "{EOT}"; Char(4)) ]
Set Variable [ $t ; Value: Substitute($t; "{RS}"; Char(30)) ]
Set Variable [ $t ; Value: Substitute($t; "{GS}"; Char(29)) ]
Set Variable [ $r ; Value: MBS("Barcode.SetOptions"; 3) ]
// Set Variable [ $r ; Value: MBS( "Barcode.SetInputMode"; "data" ) ]
Set Variable [ $r ; Value: MBS( "Barcode.SetInputMode"; "unicode" ) ]
Set Variable [ $r ; Value: MBS("Barcode.SetPrimary"; $p) ]
Set Variable [ $img ; Value: MBS("Barcode.Generate"; "maxicode"; $t) ]
Set Field [ Barcode Generation::Image ; MBS( "GMImage.WriteToPNGContainer"; $img ) ]
Set Variable [ $r ; Value: MBS("GMImage.Destroy"; $img) ]

See also

Created 1st March 2017, last changed 11st April 2018


Barcode.SetOptions   -   Barcode.UPCChecksum

Feedback: Report problem or ask question.




Links
MBS Xojo Chart Plugins