On Wed, 19 Apr 2023 14:21:58 -0400, David Spiegel wrote:
>
>If I understand correctly ...
>"ALLOC F(X) DA('MY.PDS') SH REU"
>
>Do i=1 to n
> "ALLOC F(Y) DA('MY.PDS('member')') SH REU
> "EXECIO * DISKW (FINIS
>End
>
>Is this correct?
>
That's what I remember. But it might be better to remove the ALLOC and EXECIO
from
the loop and do
LMINIT DDNAME(X) /* outside the loop. */
then LMPUT, etc. /* inside. */
LMPUT requires exclusive allocation, not SHR.
It's infuriating that ISPF has no support for REXX compould symbols,
instead providing the bizarre MULTX form.
IBM doesn't care.
--
gil
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
