Re: copy PS into PDS with RPF?

On 8/7/2010 12:08 PM, Mike Stramba wrote:
> So
> " pds atc01.asm cop lib1.asm(atc) "
>
> is a lot easier to remember / (type one line) use than :
>
> ALLOC FI(SYSUT1) DA('input-ps-dataset') SHR
> ALLOC FI(SYSUT2) DA('output-pds(membername')) SHR
> ALLOC FI(SYSIN) DUMMY
> ALLOC FI(SYSPRINT) DA(*)
> CALL 'SYS1.LINKLIB(IEBGENER)'

As usual, there are a number of distinct ways of doing things. 
In my case, I have canned JCL for everything I need regularly, 
and then some. Usually requires changing one or two names. If I 
have the requirement or preference to do it in TSO, the above 
can be encapsulated in a CLIST (e.g., define a PROC with an 
obvious, but unique name, such as COPY, and use either two 
positional or two keyword parameters for the in and out names).

> .. On the other hand, IEBGENER, is "standard", and I assume pds
> is an
> optional program (is it the 'pds' from the cbt tape?
>
> E.g. I haven't found 'pds' in TSO while working on OS390 r8 or zos
> 1.4 systems, so I guess that's where your "generic" solution will
> work. (I'll try it on both).

PDS is the greatest thing since sliced bread <G>. Go to 
www.cbttape.org and download a copy for your OS/390 and later 
systems before you forget <g>. There's even a version for MVT if 
you want even older system stuff.

Gerhard Postpischil
Bradford, VT


------------------------------------

Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/turnkey-mvs/

<*> Your email settings:
    Individual Email | Traditional

<*> To change settings online go to:
    http://groups.yahoo.com/group/turnkey-mvs/join
    (Yahoo! ID required)

<*> To change settings via email:
    [email protected] 
    [email protected]

<*> To unsubscribe from this group, send an email to:
    [email protected]

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.com/info/terms/