bardecode.com

Overview

When True the toolkit will only report Code 39 barcodes where the last character is a valid checksum for the rest of the barcode. The toolkit expects a Code 39 checksum to be calculated using modulus-43. 

The following table shows the character and value used for the calculation...

 
  Char Value        Char Value         Char Value         Char Value
   0     0           B    11            M    22            X    33   
   1     1           C    12            N    23            Y    34
   2     2           D    13            O    24            Z    35
   3     3           E    14            P    25            -    36
   4     4           F    15            Q    26            .    37
   5     5           G    16            R    27          space  38
   6     6           H    17            S    28            $    39
   7     7           I    18            T    29            /    40
   8     8           J    19            U    30            +    41
   9     9           K    20            V    31            %    42
   A    10           L    21            W    32

e.g

Visual Basic using the OCX

[form.]SoftekBarcode.Code39Checksum = value

Visual Basic using the DLL

Private Declare Function stGetCode39Checksum Lib "SoftekBarcode" () As Boolean
Private Declare Function stSetCode39Checksum Lib "SoftekBarcode" (ByVal newValue As Boolean) As Boolean
stSetCode39Checksum (value)
value = stGetCode39Checksum ()

Visual Basic using COM

oBar = CreateObject("SoftekATL.Barcode")
.........
oBar.Code39Checksum = value
value = oBar.Code39Checksum

VB.Net using the DLL

Private Declare Function stGetCode39Checksum Lib "SoftekBarcode" () As Boolean
Private Declare Function stSetCode39Checksum Lib "SoftekBarcode" (ByVal newValue As Boolean) As Boolean
stSetCode39Checksum (value)
value = stGetCode39Checksum ()

VB.Net using the SoftekBarcode Wrapper Class

Dim barcode As SoftekBarcode
..........
barcode.SetCode39Checksum(value)
value = barcode.GetCode39Checksum()

VB.Net using the SoftekBarcodeLib Managed Component

Dim barcode As SoftekBarcodeLib.BarcodeReader
Dim value As Bool
..........
barcode = New SoftekBarcodeLib.BarcodeReader()
..........
barcode.Code39Checksum = value
value = barcode.Code39Checksum

Visual C++ Using the OCX

BOOL GetCode39Checksum() ;
void SetCode39Checksum(BOOL value);

Visual C++ Using the DLL

BOOL __stdcall stGetCode39Checksum();
BOOL __stdcall stSetCode39Checksum(BOOL bNewValue);