Re: AW: The case of outnumbered numerator

On 18-Jun-2015 01:16 -0600, Birgitta Hauser wrote:

Yet another idea, why not using binary/integer and write the hex
value into the field?

D MyDS DS
D MyChar 8A
D MyInt 20U 0

Or

DCL-DS MyDS;
MyChar Char(8);
MyInt Uns(20);
End-DS

MyInt = yourNextNumValue;
EvalR YouCounter = MyChar;

While every possible 8-byte character value is a valid 8-byte integer, not every 8-byte integer will produce all visible glyphs, i.e. all printable characters of EBCDIC code points for which the character data will appear on "a few (hundreds) PGMs/Screens/Reports". Thus seems unclear to me, how what is offered here might be directly applicable to the OP; there seems to be nothing describing how to get from '9AAAAA' to '9AAAAB' or '9AAA99' to '9AABAA' as requested in the OP.?