I forgot the SETA, of course:
LCLA &FOOCNT
&FOOCNT SETA 10
FOO DS &FOOCNT.CL5
Am 31.03.2024 um 11:31 schrieb Bernd Oppolzer:
I don't know the answer to your question. Don't know, if such an
attribute exists or if the repetition count is really stored as an
attribute of the symbol. But:
FOO DS 10CL5
ENDFOO EQU *
COUNTFOO EQU (ENDFOO-FOO)/L'FOO
This way you can compute the count and put it into a symbol.
Another approach would be not to use constant repetition counts, but
macro symbols from the start, like
LCLA &FOOCNT
FOO DS &FOOCNT.CL5
HTH, kind regards
Bernd
Am 31.03.2024 um 10:53 schrieb Binyamin Dissen:
Given
FOO DS 10CL5
which attribute / macro function extracts the repetition count - 10
I assume that it must exist but I am not finding it.
--
Binyamin Dissen <bdis...@dissensoftware.com>
http://www.dissensoftware.com
Director, Dissen Software, Bar & Grill - Israel
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
