This is a known issue with Crystal Reports which reduces the font size when it exports to a PDF file. The solution below is retrieved from Business Objects support site.

This known issue has been assigned Track ID ADAPT00145285, and affects the following:

If the update does not fix the issue, try increasing the font size to compensate the loss during the export.

HKCR\SOFTWARE\Crystal Decisions\10.0\Crystal Reports\Export\PDF

HKCR\SOFTWARE\Crystal Decisions\10.0\Crystal Reports\Export\PDF

USPS confirmation services uses UCC/EAN128 barcodes to uniquely identify mail pieces and to designate the type of services requested. This barcode encodes the Package Identification Code (PIC), commonly referred as a tracking number. With Morovia U.S. Postal Fontware, you are able to produce such barcode in your own shipping labels in minutes.

This article is based on USPS Publication 91, published in May 2008.

The confirmation services use a 20-digit package ID which can be further divided into four parts:

The barcode uses EAN128 symbology. The Application Identifier in this case is 91. If you are familiar with Code128C, it is not difficult to find out the barcode is composed with six parts:

The AI and Package ID are required to be printed underneath of the barcode per USPS requirement.

The function to calculate checksum digit for package ID, as well as the complete barcode string for USPS confirmation services is included in Morovia Font Tools, which is included in Morovia U.S. Postal Fontware.

The text above the barcode code must read as appropriate: "USPS DELIVERY CONFIRMATION", "USPS SIGNATURE CONFIRMATION", etc. The font must be sans serif bold. And the size must be at least 12 points. (14-point type preferred).

The human readable text representing the barcode must be placed below the quiet zone of the barcode, and must be printed with a sans serif bold with minimum point size 10. The AI 91 must be printed at the beginning of the human readable text.

Two identification bars with at least 0.062" thick must appear between 0.125 inch and 0.5 inch above and below the human readable text and numbers to distinguish the Confirmation Services bar code from other information on the shipping label.

The USPS Confirmation barcode can be concatenated with another GS-128 barcode with ZIP code encoded. For more information, se KB10049.

An EAN-13 number consists of four areas: (1) The number System; (2)The manufacturer code; (3) the product code; (4)The check digit. Normally the number system digit is printed to the left of the barcode, and the check digit to the right. The manufacturer and product codes are printed just below the barcode, separated by the guard bar.

UPC-A check digit is calculated using standard Mod10 method. Here outlines the steps to calculate UPC-A check digit:

A web-based free utility to calculate UPC-A check digit is available at http://www.morovia.com/education/utility/upc-ean.asp.

A EAN-13 symbol can be divided into two halves, each consisting of six digits separated by a center guard bar pattern. The whole symbol is surrounded by two guard bar patterns. The same digit has different encoding depends whether it is in the left halve or in the right halve. The encoding pattern for digits in the left halve always starts with a space while the one for digits in the right halve always start with a bar and ends with a space.

A EAN-13 symbol has the following structure:

Not all UPC-A numbers can be compressed to UPC-E. These codes who have a corresponding UPC-E code must have at least 4 zeros. The rules are:

You can use this web-based free utility to perform conversion.

The UPC-E check digit is the same check digit of its corresponding UPC-A number. Therefore, to calculate the check digit of a UPC-E number, first convert it to UPC-A, then calculate the check digit using the algorithm described in UPC-A specification.

A UPC-E symbol has the following structure:

A typical Code25 barcode has the following structure:

The EAN-8 check digit is calculated using modulo 10 method. Here outlines the steps to calculate EAN-8 check digit:

A web-based free utility to calculate UPC-A check digit is available at http://www.morovia.com/education/utility/upc-ean.asp.

The encoding of an EAN-8 symbol uses all three two character set. An EAN-8 symbol has the following structure:

Symbologies are the schema how the data is encoded into physicals bars and spaces. Symbology is analogous to the language. The reading and printing equipments must use the same language to communicate with each other, this language is called symbology.

Generally speaking, symbologies can be divided into two major categories: width-modulated and height-modulated. Except these used in postal applications, most symbologies encode the data into the different width of the bars. All the bars have the same height. The contrary holds true for height-modulated symbologies: all bars have the same width, and the data is encoded into different length of the bars.

We call the data to encoded “message” or “code”. When we talk about the physical representation of the message, we refer as “symbol” or “barcode” in this web site.

You can find a list of barcode glossary in the support section.

The symbology configuration refers to the shape of a symbol. There are three major configurations: linear, 2D stacked and 2D matrix. The linear symbology is most widely used, consisting only one row of bars and spaces. The 2D stacked symbol uses multiple rows of bars and spaces. Each row in a 2D stacked symbol has the same height. 2D matrix symbol uses both width and height to encode the data.

Figure 1. Linear Barcode

Figure 2. 2D Stacked Barcode

Figure 3. 2D Matrix Barcode

The character set defines what kind of data the symbology encodes. Generally there are three types of character sets: numeric, alpha-numeric and full ASCII. Some symbologies can encode arbitrary binary data. Not all alpha-numeric symbologies share the same character set. Most alpha-numeric symbologies can only encode several characters in addition to letters and numbers.

In a discrete symbology, each character ends with a bar and an inter-character gap separates two adjacent characters. Each character is treated separately, no end characters are required for scanning.

In a continuous symbology, there is no inter-character gap and each character terminates at the starting bar of the next character. Hence, a stop character is usually needed. Continuous symbologies usually encode more information than the discrete symbologies.

Figure 4. 2D Matrix Barcode

Some symbologies can encode only certain length of data. For example, UPC only accepts 11 digits and Code39 encodes any length of data.

X dimension describes the nominal width of the narrowest elements (both bars and spaces). For 2D matrix symbologies, X refers to the nominal dimension of the smallest data cell.

The X dimension largely decides the barcode density (how many characters can be encoded in one inch). The resolution of a barcode readers is also measured by the X-dimension that the reader can recognize. A high resolution barcode scanner can recognize a barcode with X dimension at 5 mils.

The linear barcode symbols in an open system usually have a X dimension equal to 10 mils. Two dimensional barcodes usually have a higher X dimension at 20 mils.

Most linear symbologies employs two widths, one for the wide element and one for narrow element. The ratio between the wide element and the narrow element is called N. N typically have a value ranging from 2.0 to 3.0. The large the N is, the allowable printing tolerance increases. N also slightly impact the density of a symbol.

If a single printing defect will not cause a character to be recognized as another one, the symbology is regarded as self-checking. A non-self-checking symbology usually has a check character to make sure that the error is detected.

Start/Stop character is placed to indicate where the barcode symbol starts and ends. It also indicates the scanning direction in some symbologies.

Quiet zone refers to the spaces around the barcode that must contains no dark marks. Most of symbology requires quiet zone preceding and following barcode.

The table below lists all the functions we support in the language tools. All functions take one input parameter - the data encoded. If input contains characters which can not be encode with the indicated symbology, these characters will be filtered out. If a symbology required fixed length of the input string, the excess will be truncated if the input's length exceeds the required length; or zeroes are appended to the end of the input if too short.

The functions below are designed to support double byte languages (Korean, Traditional Chinese and Simplified Chinese) and only apply to the following three products:

These functions required Fontware Version 2.5 or later. These functions can be found in files with suffix Asian, such as MoroviaFontTools_Asian.c. Currently only Visual Basic and C are provided. For other languages, use the Windows DLL interface instead.

When you view a report with barcode UFL functions through Crystal Report Viewer ActiveX, Crystal Reports, or Crystal Reports Web, an error message box pops up with text The Visual Basic UFL that implements this function is missing(or U2LCOM.dll is missing).

There are several possible causes:

If the existing product does not have 64-bit UFL, you need to install 32-bit Crystal Reports run-time and change application settings.

In Crystal Reports XI and Crystal Reports XI Release 2 the font shrinks by approximately 10% when a report is exported to Adobe Acrobat Format (PDF).

To solve the behavior

This section explains how you create the long 30-digit USPS code128 barcode. Before calling our encode function, you need to prepare the following information:

On Windows platform, PHP provides a class called COM through which PHP script can create an instance of a CoM object and manipulate its methods. It is fairly straightforward to translate VBScript code to PHP.

<?php
$obj = new COM("cruflMorovia.QRCode5");
$dataToEncode = "some data to encode, put here " ;
    
// find out how many chunks are needed
// parameters: data-to-encode, version, error correction
$version = 0;       // version
$ecLevel = 0;       // error correction level
$chunks = $obj->QRCodeEncodeSet($dataToEncode, $version, $ecLevel);

$barcodestring = "";
for ($i=0; $i<$chunks; $i++) {
  $barcodestring .= $obj->QRCodeEncodeGet($i);
}

echo($barcodestring);?>

<?php
$obj = new COM("cruflMorovia.DataMatrix5");
$dataToEncode = "some data to encode, put here " ;

// find out how many chunks are needed
// parameters: data-to-encode, version, error correction
$sizeID = 0      // data matrix size ID
$chunks = obj.DataMatrixEncodeSet($dataToEncode,  $sizeID)

$barcodestring = ""
for ($i=0; $i<$chunks; $i++) {
  $barcodestring .= $obj.DataMatrixEncodeGet($i)
}

echo($barcodestring);

I am trying to print the barcode from VB and I am having some problems. If I print the form by calling PrintForm method, then I am not able to scan the barcode because of print quality. If I use the Printer object and manually code everything it gets more complicated because I want to print checkboxes and I also have to worry about word wrapping.

Below is the code that made it work. You are free to use it in your applications. If you have any questions or comments about the code you can reply to this post and I will try to answer them. Simply call PrintBarcode from your printing routine and pass a string that you want to generate a barcode for. In order to generate a barcode you would need to purchase Morovia Barcode Fonts and copy and paste Code39, SpecialChar functions from the source code into your VB project. Hope this helps.

Public Sub PrintBarcode(ByVal MSR As String)
' =========================================================================================
' Programmer:        Dragan Knezevic
' Date:              July 19 2004
' Description:       Prints the contents of labels, textboxes (with word wrapping), 
'                    checkboxes(caption only), DTPicker and generates a barcode for the
'                    passed parameter.
'
' Parameters Passed: MSR: A string for which a barcode needs to be generated.
' Value Returned:    None
' Called by:         PrintFrm or your own sub
' Calls:             FormatStringAndPrint
'
' Last Revised:      n/a
' Changes made:      n/a
' =========================================================================================
    Dim ctl As Control
    
    Printer.PrintQuality = vbPRPQHigh
    Printer.Orientation = vbPRORLandscape 'or vbPRORPortrait
    Printer.FontName = "MS Sans Serif"  'or any other font used for controls
    Printer.FontSize = 8
    Printer.ScaleMode = 1   'twips
    
    For Each ctl In frmPrintBarCode.Controls 'or your form name
        If TypeOf ctl Is SSResizer Then GoTo Res'or any other controls that are invisible at run-time (Timer)
      'should not be printed
        
        Printer.CurrentX = ctl.Left
        Printer.CurrentY = ctl.Top
 'add other controls here if you want to print their caption
        
        If TypeOf ctl Is Label Or TypeOf ctl Is CommandButton Or TypeOf ctl Is CheckBox Or TypeOf ctl Is Frame Then
            Printer.Print ctl.Caption
        ElseIf TypeOf ctl Is TextBox Then 'add other controls here if you want to print their text
            'this wraps the text inside a textbox so it fits nicely
     'carriage return/line feed characters are removed prior to formatting
     FormatStringAndPrint Replace(ctl.Text, vbCrLf, " "), ctl.Left, ctl.Width
     
     'this draws a line around the edges of the textbox
            Printer.Line (ctl.Left - 50, ctl.Top - 50)-(ctl.Left + ctl.Width + 50, ctl.Top + ctl.Height + 50), , B
        ElseIf TypeOf ctl Is DTPicker Then 'date picker control
            Printer.Print ctl.Value
            Printer.Line (ctl.Left - 25, ctl.Top - 25)-(ctl.Left + ctl.Width + 25, ctl.Top + ctl.Height + 25), , B
        End If
Res:
    Next
    
    'after we printed the contents of individual controls we are ready to generate the barcode
    Printer.FontName = "MRV Code39M"
    Printer.FontSize = 12
    
    Printer.CurrentX = 12700 'X position of the barcode in twips
    Printer.CurrentY = 10930 'Y position of the barcode in twips
    Printer.Print Code39(MSR) 'Code39 function is available for users that bought Morovia Barcode Fonts
    Printer.EndDoc
    
End Sub
Public Sub FormatStringAndPrint(sInput As String, TempX As Long, tempWidth As Long)
' =========================================================================================
' Programmer:        Dragan Knezevic
' Date:              July 20 2004
' Description:       Formats each texbox before printing a barcode so that the text
'                    wraps inside the control
'
' Parameters Passed: sInput: text inside of the control free of carriage returns.
'                    TempX : current x position of the control
'                    tempWidth: width of the control.
'
' Value Returned:    None
' Called by:         PrintBarcode
' Calls:             Nothing
'
' Last Revised:      n/a
' Changes made:      n/a
' =========================================================================================
    Dim sTemp As String
    Dim bSpace As Boolean
    
    Do
        If Printer.TextWidth(sInput$) <= tempWidth Then
                sTemp$ = Trim(sInput$): Exit Do
        End If
     
        Do
            sTemp$ = sTemp$ & Left(sInput$, 1)
            sInput$ = Right(sInput$, Len(sInput$) - 1)
            Debug.Print sTemp
            Debug.Print Printer.TextWidth(sTemp)
        Loop While Printer.TextWidth(sTemp$) < tempWidth - 100
        
        Do
            If Right(sTemp$, 1) = Chr(32) Then bSpace = True
            If Not bSpace Then
                sInput$ = Right(sTemp$, 1) & sInput$
            End If
            sTemp$ = Left(sTemp$, Len(sTemp$) - 1)
        Loop While Not bSpace
        
        bSpace = False
    
        Printer.Print sTemp$: sTemp$ = ""
        Printer.CurrentX = TempX
    Loop
    
    Printer.Print sTemp$
End Sub

In order for the font to be registered with the system, typically a reboot is required, which is especially necessary for systems running Windows prior to Windows 2000.

True type fonts are recommended for systems running on Windows. Follow the steps below:

Figure 1. Add Font Dialog

Windows 2000 and later versions have the Postscript font support built-in - i.e. no third party tools are required in order for the system to use PostScript fonts.

The installing process is identical to the true type font installation. See the True Type Font Installation Process for details.

Adobe offers an product called ATM (Adobe Type Manager) which enables Windows applications to use PostScript® type 1 fonts on Windows 95, 98, ME and NT platforms. Th light version is available free to download on Adobe web site. See Adobe documentation for the details of installing fonts through ATM.

In the first page, you are required to enter the following information:

MyCommerce detects the country that you are from, and selects the currency and language for you. You can change them by selecting from the drop down list.

In this page, you are required to fill the billing and payment information.

VAT ID: MyCommerce participates EU VAT program. If you are from EU and have a VAT ID, you can enter the ID in order to remove the VAT from the order.

Paypal: to pay the purchase through Paypal, click on the Check out with Paypal button.

After you clicked on the Place Your Order button you can review the information before you confirm the order. If everything is correct, click on the Buy Now button.

This example shows what happens when you pay by credit card. This is the easiest and fastest way to order. After you placed the order you should see something familiar like this:

From this page you can click on the Receipt to view the invoice. A typical invoice looks like below. Note that if you are in EU, your VAT ID and MyCommerce's VAT ID will be present in the invoice.

At this stage, the transaction is completed. Check your email from support@morovia.com. The email contains the download link. Follow the instructions in the email to download the software.

You are using Excel 2010 as the mail merge source. In Excel, you set up a column to hold the barcode string, which is formula like QRCodeEncode(A2, 0, 0), as described in the product manual. However, after formatting the field with the font, extra blacks appear at the right edge. Close inspection discovers that each line in the barcode string contains _x00D_ at the end.

The problem does not happen in earlier Office 2007 and 2003.

Word 2010 changes 0x0d (the carriage return) character as _x00D_ string.

To work around the issue, substitute 0x0d with space. You need to perform the substitute in the data source. For example, in Excel if your formula is QRCodeEncode(G2,0,0), change it to SUBSTITUTE(QRCodeEncode(G2,0,0), CHAR(13), "") and copy the formula to other cells under the same column.

Modulo 10 algorithm is used to calculate check digit on a number of data types, such as UPC-A, EAN-13, SCC-14/GTIN, SSCC-18, EAN-8, BLN and etc. Users can use the free online utility UPC/EAN/SSCC/ISBN check digit calculator to get the check digit. The source code for many programming languages can be found at KB10011.

Unfortunately, this function is not included in the Crystal Reports UFL for linear barcode fonts package. When using Crystal Reports to create GS1-128 barcodes, such as SSCC-18, users may require such a function to get the correct human readable, because the text provided by the font does not comply to the GS1 requirement.

To add the function into your report so that you can call in in your formula field, first select Formula Workshop from Report. In Formula Workshop, right click on the node Report Custom Functions and select New. Give a name mod10 and press Use Editor button.

In the Custom Function Editor, make sure that Crystal Syntax is selected for the grammar, and paste the content below:

Function (StringVar input_number)

input_number := replace(input_number, " ", "");

numbervar i := length(input_number);
numbervar sum_val := 0;

stringvar position := "odd";

do (
    if position = "odd" then (
        sum_val := sum_val + 3*tonumber(input_number[i]);
        position := "even" )
    else (
        sum_val := sum_val + tonumber(input_number[i]);
        position := "odd" )
    ;

    i := i-1
)  while i > 0;

numbervar remainder_val := Remainder(sum_val, 10);

numbervar check_digit := if remainder_val = 0 then 0 else (10-remainder_val) ;

input_number + ToText(check_digit, 0)

Save the function and close the editor. The function is ready to use.

After the function is defined, you can use it in your formula field. In our case, we created a field called sscc18. We like the human readable text to divide into 5 parts: GS1 AI 00, extension digit, company prefix, serial number and check digit. We use the code as below. Note that GS1 company prefix has a variable length, and your prefix assigned may be longer than 7 digits shown in this example.

StringVar sscc_number := mod10("00718908562723189");

// use Mid function to get substring
"(00)" + " " + Mid(sscc_number, 1, 1) + " " + Mid(sscc_number, 2, 7) + " " +
Mid(sscc_number, 9, 9) + " " + Mid(sscc_number, 18, 1)

Drag the field to the report, and format it with appropriate font, and we get the human readable text shown up:

To download a sample report file, click here. Crystal Reports 9 or above is required to open this file.

After you extracted the MSI files, you can use any advanced features that Windows Installer technology provides. When you install the software, you must provide a way to specify the license name and key in order for the install to succeed.

The following command shows to install the 32-bit QRCode Fonts & Encoder 5 in basic UI:

 msiexec /qb /i QRCodeFontware5_retail_x86.msi USERNAME=[your_license_name] ISX_SERIALNUM=[your_license_code]

For complete silent install, use /qn option (under Administrator command prompt as the installer requires administrative privileges). For complete list of command line options, see Msiexec (command-line options).