pretty simple at z/OS 2.1 //* //* // EXPORT SYMLIST=(PFILE,TXTYP,ACCT,RUN) //* // SET PFILE=MY.DATASET.NAME // SET TXTYP=1 // SET ACCT=001455 // SET RUN=TRIAL //* //* //* //* //SETUP EXEC PGM=IEBGENER //* //SYSUT1 DD *,SYMBOLS=EXECSYS USER xxxxxxx (don't worry about this - it is pre-set) PROCESS &PFILE (Process starts in 1, PFILE starts in 10) TRANS &TXTYP.-&ACCT (Trans starts in 1, TXTYP is in 10, "-" in 11, RUNTYPE &RUN (Runtype starts in 1, RUN is in 10) //*-+----1----+----2----+----3-- //SYSUT2 DD SYSOUT=* //SYSPRINT DD DUMMY //SYSIN DD DUMMY
result: USER xxxxxxx (don't worry about this - it is pre-set) PROCESS MY.DATASET.NAME (Process starts in 1, PFILE starts in 10) TRANS 1-001455 (Trans starts in 1, TXTYP is in 10, "-" in 11, RUNTYPE TRIAL (Runtype starts in 1, RUN is in 10) Regards Bruce ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
