On Sat, 12 Nov 2022 10:09:43 -0600, Wendell Lovewell <wlovew...@mackinney.com> 
wrote:

>I can't explain why, but it works for me if I follow the //EX1  EXPORT 
>SYMLIST=* with SET statements using "renamed" variables, and then use the new 
>names in the in-stream data:
> 
Might logging-DDname be enlightening?  Can logging-DDname be merged with 
another SYSOUT,
as in:
    ...
    //SYSPRINT DD SYSOUT=L
    //SYSIN    DD  *,SYMBOLS=(EXECSYS,SYSPRINT)
    ...

>//RECATL   PROC DSN=,VOL=
>//EX1      EXPORT SYMLIST=*
>// SET    DS=&DSN
>// SET    VL=&VOL
>//RECAT    EXEC PGM=IDCAMS
>//SYSPRINT DD SYSOUT=L
>//SYSIN    DD  *,SYMBOLS=(EXECSYS)
>  DEFINE  CLUSTER(NAME(&DS) -
>           LINEAR RECATALOG VOL(&VL)) -
>           DATA(NAME(&DS..DATA))
>//*
>//        PEND

-- 
gil

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to