On Mon, Jun 25, 2018 at 5:23 PM Mike Schwab <[email protected]> wrote:
> Which is why we suggested C ALL P'.' ' ' 73 80.
> Change All characters to blanks in columns 73 to 80.
>
PMJI,
I have fought and fought with myself to stay quiet, but my silliness
factor is off the wall today. So I will reply with the most useless way to
do this that I can come up with.
1) Install Co:Z to get the batch launcher and Data Set Pipes tools.
2) Run the following script
export DSN='some.pds' # fully qualified name, not in ' marks but like in JCL
pdsdir ${DSN} | \
while read member;do
fromdsn "${DSN}(${member})" | \
cut -b 1-72 | \
todsn "${DSN)$({member})"
end
All this can be done from a UNIX shell, thus _proving_ that the UNIX shell
is more powerful than the standard TSO environment.
---- going back into my hole now ----
--
There is no such thing as the Cloud. It is just somebody else’s computer.
Maranatha! <><
John McKown
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
