The space problem can be overcome at some cost (okay a big cost in
readability). This solves the OP problem but requires two steps due to the
parm length limits. I did not try it on 1.12 but assume it should work.
//CSWT JOB 9999,CLASS=A,MSGCLASS=X
// SET PFILE=MY.DATASET.NAME
// SET TXTYP=1
// SET ACCT=001455
// SET RUN=TRIAL
//ECHO EXEC PGM=BPXBATCH,
// PARM=('SH echo USER XXXXXXXX\\nPROCESS\\0100 &PFILE')
//STDERR DD SYSOUT=*
//*TDOUT DD SYSOUT=*
//STDOUT DD DSN=&&SMPEIN,DISP=(,PASS),SPACE=(TRK,1),LRECL=80,RECFM=FB
//ECHO EXEC PGM=BPXBATCH,
// PARM='SH echo TRANS\\0100 \\0100 &TXTYP-&ACCT\\nRUNTYPE\\0100 &RUN'
//STDERR DD SYSOUT=*
//*TDOUT DD SYSOUT=*
//STDOUT DD DSN=&&SMPEIN,DISP=(MOD,PASS),LRECL=80,RECFM=FB
// EXEC PGM=IEBGENR print the file
//SYSUT1 DD DISP=(SHR,DELETE),DSN=&&SMPEIN
//SYSUT2 DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSIN DD DUMMY,LRECL=80
...chris.
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf
Of Paul Gilmartin
Sent: Tuesday, February 02, 2016 4:09 PM
To: [email protected]
Subject: Re: Convert a Parm into a control card
On Tue, 2 Feb 2016 17:20:40 -0500, Ed Finnell wrote:
>Before there was Rexx we'd do Clists for this stuff. As SPF/ISPF rolled
>out(and Rexx) File Tailoring became the easiest for us. Full screen
>input with formatting and range checking. The driver could be any ISPF
>friendly language;i.e; Rexx, ASM, Cobol, PL/1 or Clist.
>
It's mind-boggling that OS/360 survived without an "echo" utility until z/OS
2.1 almost removes the motivation. "Almost" insofar as symbol substitution
reformats the record so an arbitrary substring of blanks may be unattainable.
-- gil
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to
[email protected] with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
