UPC-E is a kind of UPC-A, which allows a more compact bar code by eliminating "extra" zeros. Since the resulting UPC-E bar code is about half the size of the UPC-A bar code, UPC-E is generally used on products with a very small packaging where a full UPC-A bar code does not fit.
The UPC-E1 is a variation of UPC-E code with the number system set to "1". In the human readable string of the bar code the first digit signifies the number system (always 1 for this code type), the last digit is the check digit of the original UPC-A code.
In the example below, the original UPC-A code is "14210000526". We should remove the leading "1" when assigning the string to the control's property, since the code format itself implies its presence. The checksum digit (1) is calculated automatically, and the symbology algorithm transforms the rest of the numeral string. The result is 425261, and it is encoded along with the number system prefix and the check digit into the scanner-readable form.
Not every UPC-A code can be transformed into the UPC-E1. It must meet special requirements, and you may refer to UPC-E Symbology page for more information.
Since the number system "1" is not used in regular UPC-A codes, the UPC-E1 symbology use is uncommon.
The type of a bar code control's Symbology property is UPCE1Generator.
The are no properties specific to the UPC-E1 bar code type.
The following code creates a UPC-E1 bar code and specifies its main properties.
Imports System Imports System.Collections.Generic Imports System.Drawing.Printing Imports System.Windows.Forms Imports DevExpress.XtraPrinting.BarCode Imports DevExpress.XtraReports.UI ' ... Public Function CreateUPCE1BarCode(ByVal BarCodeText As String) As XRBarCode ' Create a bar code control. Dim barCode As New XRBarCode() ' Set the bar code's type to UPC-E1. barCode.Symbology = New UPCE1Generator() ' Adjust the bar code's main properties. barCode.Text = BarCodeText barCode.Width = 400 barCode.Height = 100 Return barCode End Function