128 Barcode Symbology #1
Description
I have this:
`SET PROCEDURE TO FoxBarCode ADDITIVE
SET PROCEDURE TO gpImage2 ADDITIVE
PRIVATE loFbc
loFbc = CREATEOBJECT("FoxBarcode")
WITH loFbc
.cSet128 = "*" && * - Auto, A - Set A, B- Set B, C - Set C
.lShowHumanReadableText = .F.
.nBarcodeType = 110 && Code 128
.nImageHeight = 100
.nAlignText = 2 && 0 - Left-aligned, 1 - Center, 2 - Right-aligned
ENDWITH`
In my label, which I call immediately after the code above, I have an image control with control source "loFbc.BarcodeImage(ALLTRIM(TRANSFORM(TSample.Out_Qty, "99,999")) + " EA")". The problem is in the generated 128 symbology. There is no problem when the TSample.Out_Qty is 9,999 or below. But when the said field is beyond that, there is where the problem show. If, for example, TSample.Out_Qty is let's say 41,875, the scanned value will always return 41,8750EA. I tested any other value greater 9,999 and it always converts the space between the number and the "EA" string to zero (0). Does the class allow space between a number greater than 9,999 and a string?