Dear All,
I tried to print the barcode from Navision using FONT Code 128.
StartChar:='À';
StopChar:='';
Checksum:=104;
FOR i:=1 TO STRLEN(pText) DO BEGIN
currentchar:=pText;
Checksum := Checksum +(i*(currentchar-32));
END;
ChecksumChar:= Checksum MOD 103;
ChecksumChar:= ChecksumChar+32;
pText:=CONVERTSTR(pText,' ','');
RetVal:=STRSUBSTNO('%1%2%3%4',startChar,pText,ChecksumChar,StopChar);
EXIT(RetVal);
It is printing but the reader is not reading this barcode.
SHould i need to do anything different et me know.
I need it on urgent basis.
Can anybody help me out in this matter.
0
Comments
Are you using a simple keyboard wedge to read the barcode?
Epimatic Corp.
http://www.epimatic.com