Code-128 Hibcc Barcode S’abonner

0
Avatar
Legacy Poster

Hello,

   I am new to the forums and look forward to learning more about Bartender and it's capabilities! I have a quick question, I am not very familiar with VB Script and it seems like I would need to use some for this application. I am making a code-128 barcode with a HIBCC struture in a concatenated format. I am on BarTender 10.1 SR4 Automation Edition. I am using my LIC code, the catalog number as well as an expiration date and lot number. My format looks like this 

+M008581925/$$3161016123456

 

+M008 (LIC Identifier)  Data Source ID= LIC1

581925 (Catalog Number) Data Source ID= Style

5 (package identifier) Data Source ID= PKGLV

/$$3 (delimiter and identifier) Data Source ID= $$3

161016 (Exp Date yyMMdd) Copied from another value  Text 28

123456 (lot number)  Data Source ID= Lot

 

Where I am hung up at is the Modulo 43 check digit. I'm not sure how to accomplish this check digit with this concatenated structure. Any insight into this would be helpful!

8 commentaires

0
Avatar
Ian Cummings
Modérateur
Actions pour les commentaires Permalien

Create a barcode by clicking the barcode button in toolbar and then choosing the "More Barcodes" item to open the "Select Barcode" dialog.  Navigate to the "Healthcare>HIBC" folder and choose the appropriate HIBC barcode.  Place the barcode on the label, open its properties, and then note the VB script check digit data source that uses a built-in C39Mod43() function.

0
Avatar
Legacy Poster
Actions pour les commentaires Permalien

Ian,

    I initially tried that but the vbscript is C39Mod43(LIC1) which only pulled the check digit for the embedded data for the LIC. The check digit needs to read for the entire concatenated structure. 

0
Avatar
Legacy Poster
Actions pour les commentaires Permalien

Thanks for the help, I was able to figure out how to combine the fields in the concatenated structure. One of my big issues was the date....the field I was copying from was in a different format so I had to do some more VBscript to create a new data source in the correct format for the date in the barcode....probably an easier way to do it than what I did but it achieved the correct result.

0
Avatar
Ian Cummings
Modérateur
Actions pour les commentaires Permalien

For the date, create a new data source and set the "Data Type" to Date picking the format from the list the matches your needs.  No need to use a VB script expression for such a thing unless you have a pre-v10 version.

0
Avatar
Legacy Poster
Actions pour les commentaires Permalien

Yeah I tried that too....I have to have the date in two different formats copied from an input prompt. So the date field outside of the barcode is yyyy-MM-dd but in the barcode it is yyMMdd. This is very easy with the GS1-128 barcode but I couldn't find another way with the HIBC. When I named the other date field and then formatted the date in the barcode based on that data field I named it would also change the other date fields to the format I just created. 

0
Avatar
Ian Cummings
Modérateur
Actions pour les commentaires Permalien

It that case on the second you'll need to refer to the name data source from a VBscript data source.  Note you could then use transforms on this VBscript data source to truncate two characters from the left, and make it numeric only to remove any data part separators.  This saves you the effort of performing string functions in VBscript.

0
Avatar
Legacy Poster
Actions pour les commentaires Permalien

Thanks Ian!

0
Avatar
Legacy Poster
Actions pour les commentaires Permalien

Hi I am trying to calculate the check digit for my HIBCC barcode as well. 

 

If you look at the attached image you'll see I have 3 data sources: My actual barcode from HIBCC with variable name LIC1 (it has prefix and suffix), an Object Value (Text 1) for a Lot Number that is inputted by the user at print time, and the VB script which calculates the check digit. Right now the VB script is:

 

C39Mod43(LIC1)

 

But I want it to calculate the check digit for the combined LIC1 and Object Value(Text 1)  - but I can't create a "name" for my Object value.

 

I tried C39Mod43(LIC1,Format.Objects(TEXT1).Value) - didn't work. 

 

Help?? Or is there a better way to do this.

 

I'm trying to set up our label for the new FDA UDI regulations.  

 

Any help is appreciated! Thanks!

 

 

Sorry i figured it out! I had to change the properties on the object itself and created a name for it. Now it works! My script is:

C39Mod43((LIC2)+(LIC1)+(LOT))

Vous devez vous connecter pour laisser un commentaire.