At 23:34 -0500 on 12/31/2015, Dale R. Smith wrote about Re: Review My Program:
We have a few Assembler tables that are used by CICS COBOL programs
that generally follow a structure like this:
asmtab CSECT
NUMENT DC Y((LASTENT-FIRSTENT)/LENGENT
FIRSTENT EQU *
DC C'xxxxxxxxyyyyyyyy'
LENGENT EQU *-FIRSTENT
LASTENT EQU *
END asmtab
One GOTCHA with this structure is that you need to make sure that all
the entries have the same length. A L' suffix on each C or using a
macro that length checks and emits the table entry can be useful for
insuring this.
