On Wed, 2 Oct 2013 10:48:49 -0500, Mark Zelden <[email protected]> wrote:

>On Wed, 2 Oct 2013 18:14:15 +0300, Binyamin Dissen 
><[email protected]> wrote:
>
>>I am aware of the ISPF LM functions.
>>
>>I wonder if there is a native MVS or TSO command to easily do this.
>>
>>There is delete pds(member), but that requires exclusive access.
>>
>>There is IEHPROGM, but I would as soon just avoid it.
>>
>>--
>
>If you allocate the PDS as SHR, you can delete it with IDCAMS.  The
>same is true with TSO DELETE if you ALLOC the PDS as SHR to a DD first
>since it uses IDCAMS under the covers.
>
>
>                                              
>//JS010  EXEC  PGM=IDCAMS                          
>//DD1      DD  DSN=MZELDEN.PDS,DISP=SHR            
>//SYSPRINT DD  SYSOUT=*                            
>//SYSUDUMP DD  SYSOUT=*                            
>//SYSIN    DD  *                                   
> DELETE MZELDEN.PDS(MEMBER) FILE(DD1)  
>/*           
>

For completeness:  

tso alloc fi(dd1) shr reuse da('mzelden.pds');tso delete 'mzelden.pds(member)' 
file(dd1)

Also, you did say "native", but personally I use usually PDS86 for this sort of 
thing.

Mark
--
Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS  
mailto:[email protected]     
ITIL v3 Foundation Certified                                     
Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html 
Systems Programming expert at http://search390.techtarget.com/ateExperts/




----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to