IMB source code

[Debbie999]

I am of need of the source code for the IMB (intelligent mail barcode) that converts a 31 digit string to a 65 char string. I am little behind the curve as most companies converted many years ago. I work on a Dec Vax mainframe system. I think I could even convert IBM cobol if that is available. I would really like the complete source code for the usps4bc module.

But in working through the specs, I've coded step 1&2 for converting the 31 digits to binary, and I found the 11-bit crc module but it requires a copybook called xortable.cpy. So 2 questions.

1. is there anyone that has the IMB source code - which would be ideal and preferred...

2. can anyone provide the code included in xortable.cpy.

Thank you so much for any and all assistance.

 

[k5tm]

Debbie, Welcome to Tek-Tips.

You can find this article on the Micro Focus Community. Unfortunately, the attachment is no longer on the article. I will see if we can get the attachment redone for you.

An XOR table is fairly easy to generate. I will try to dig that up too.


Tom Morrison
Micro Focus

 

[k5tm]

I have placed the COBOL code associated with the article at the indicated attachment URL. You will need the password shown below to extract files:

Spoiler

BaRcOdEs

While the example does not use the XOR table (it uses a library subroutine to do that work), the ZIP file also contains an XOR table.

I will remove this when the article linked above has its attachment restored.




Tom Morrison
Micro Focus