Postal Barcodes

[BruceB]

I^m looking for a UDF or Calc field to print US Postal barcodes on mailing labels. I use RR Reports Infinity.:-)____Thanks,____Bruce

[kfleming]

UDF Declaration:__USPS(c_zip)____Expression:__"("+subs(zip,1,5)+trim(subs(zip,7,4))+ str(IIF(VAL(str(mod(VAL(subs(zip,1,1))+VAL(subs(zip,2,1))+VAL(subs(zip,3,1))+VAL(subs(zip,4,1))+VAL(subs(zip,5,1))+VAL(subs(zip,7,1))+VAL(subs(zip,8,1))+VAL(subs(zip,9,1))+VAL(subs(zip,10,1)),10),1))=0,0,10-VAL(str(mod(VAL(subs(zip,1,1))+VAL(subs(zip,2,1))+VAL(subs(zip,3,1))+VAL(subs(zip,4,1))+VAL(subs(zip,5,1))+VAL(subs(zip,7,1))+VAL(subs(zip,8,1))+VAL(subs(zip,9,1))+VAL(subs(zip,10,1)),10),1))),1)+")"

[BruceB]

Thank you for the code. ____I found a free download of the USPS Barcode font at http://www.fryfonts.com/free-font/92____There is one change using this font. The beginning and ending bar is made with a "/" instead of a "("