|
View previous topic :: View next topic
|
| Author |
Message |
alamelu
New User
Joined: 18 Jul 2005
Posts: 15
|
|
|
|
Hi ,
Is there any possibilty to delete a menber of PDS using a Batch Job (JCL)?
I tried using Iefbr14 , Its deleting only the Whole PDS.
Can anyone Suggest me how do it ?
Thanks,
Alamelu |
|
| Back to top |
|
 |
priya
Moderator
Joined: 24 Jul 2003
Posts: 568
Location: Bangalore
|
|
| Back to top |
|
|
superk
Global Moderator
Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA
|
|
|
|
This job deletes two different members (#1 and #2) using two different methods for the same PDS ('SUPERK.PDS'):
| Code: |
//*
//DELETE EXEC PGM=IKJEFT01
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD DATA
DELETE 'SUPERK.PDS(#1)'
/*
//*
//SASSTEP EXEC SAS
//SAS.SASLOG DD SYSOUT=*
//SAS.SYSDUMP DD SYSOUT=*
//SAS.SASLIST DD SYSOUT=*
//SYSUT1 DD DISP=SHR,DSN=SUPERK.PDS
//SYSIN DD DATA
PROC PDS DDNAME=SYSUT1;
DELETE #2;
/*
//*
|
|
|
| Back to top |
|
|
kousalya26
New User
Joined: 06 Jul 2005
Posts: 21
Location: chennai
|
|
|
|
Hi
try this out :-
//jobcard here
//step1 exec pgm=IDCAMS
//pds dd dsn=abc.test.try(mem1), disp=shr
//sysin dd *
DELETE abc.test.try FILE(pds)
/*
here abc.test.try is the pds name and mem1 is themember to be deleted in that pds. |
|
| Back to top |
|
|
|
|
