EAN 128 - urgent

rbuser

Hi all !

I need to be able to print BarCode EAN 128 from ReportBuilder. I read all the messages I could find
in these newsgroups. I also need to be able to use packages, so I can't follow the instructions that
I saw in an earlier message here. I've also tried "BarCode library" from PSoft but even though I
selected EAN 128, the result was code128 instead. Will RB provide support for EAN 128 (which is used
a lot in Europe) real soon ? Has anyone been able to solve this ?

TIA

Best wishes
Kai Bohli
Norway
kaiboe@online.no

Best wishes
Kai Bohli
kai@procom.as
Norway

nicocizik

Here is a response from another customer in an earlier post on this topic
who found a work around.


---Original Message by Phillip Herries---

"I solved this as per this post 4/1/2003, but this quick fix does mean any
code128 comes out as ean128 which was fine for me. Hopefully RB's shift also
gives them more resources to work on such things?

I made the following change to the Code128 Autoencode procedure in
ppDrwCmd.pas to get it to do EAN 128 ( It's just got a FUNC1 char as the
second character ) and it works fine. After reading another post that it was
not recommended to recompile the packages, I followed that posts
instructions and just copied the file ppDrwCmd to my application directory.
However this means I had to turn packages off. Can you instruct me what
package to rebuild and any issues I might encounter doing so. I also look
forward to seeing a official EAN 128 support next maintenance release.

Regards, Phillip Herries

procedure TppDrawBarCode.AutoEncode128(var sData : string);
const
CharSetA : set of char = [' '..'_', #201, #202, #206, #207, #211..#242];
.
.
StartC = #210;

TempShift = #203;

Func1 = #207; // for FUNC1 code

ControlChars : set of char = [SwitchA, SwitchB, SwitchC, StartA, StartB,
StartC,TempShift,Func1]; // included Func1 code
.
.
.
sData := S;
Insert(Chr(207),sData,2); // insert FUNC1 as second char.
end; {procedure, AutoEncode128}


Also got another reply re the packages issue as per below...

section of any units, you can simple recompile the one affected packages, in
this case rbRBC7X.dpk."

Phillip Herries


--

rbuser

Hi Niko !

Thanks for your reply. I made the changes mentioned, and recompiled rbRcl76.dpk, and will know
tomorrow if it works ok. I would prefer that you made official support for EAN 128 soon though. It
will be a maintenance nightmare to do this everytime there's a new build of RB.


Best wishes
Kai Bohli
kai@procom.as
Norway