Can someone provide me with sample code that uses RADIX13 or Modulo55. My Modulo55 code is burried in a storage locker which I wont be able to get to until March.
By RADIX13 or Module 55 I mean the conversion routine that takes for example 8 Characters (non-hex) as input and converts them to 4 Chracters (non-hex). The Eight Character input is left justified padded with spaces on the right. It is typically used by CICS Terminal AutoInstall to develope CICS TERIDs. Im Not looking for COB, C, PL/I nor any Pseudo Code, I need the Assembler routine. If I remember correctly the routine that I had used 2 Translate statements. I would apprecite it If some one could provide the assembler routine. You can provide it off list if you choose. Paul D'Angelo *************