Charles,

Try this

//  SET FMID='xxxx' 
//STEP0100 EXEC PGM=IKJEFT01,
//             PARM='DELETE ''FOO.&FMID..LOAD(*)'''
//SYSTSPRT DD SYSOUT=*
//SYSTSIN  DD DUMMY
//* 

Kolusu

IBM Mainframe Discussion List <[email protected]> wrote on 
02/23/2015 03:00:52 PM:

> From: Charles Mills <[email protected]>
> To: [email protected]
> Date: 02/23/2015 03:01 PM
> Subject: Delete all members from PDS with symbolic in name?
> Sent by: IBM Mainframe Discussion List <[email protected]>
> 
> I'm trying to do the following and I know it does not work because 
IDCAMS
> says
> IDC2559I MEMBER CAN NOT BE SPECIFIED WITH A GENERIC NAME 
> 
> But is there a way to do something like this, without restricting the 
job to
> V2R1 and symbols in SYSIN? I want to delete all members of a PDS where 
the
> PDS is named with a JCL symbol:
> 
> //DELETMEM EXEC PGM=IDCAMS 
> //SYSPRINT DD   SYSOUT=* 
> //OUTLOAD  DD   DISP=(OLD,KEEP),DSN=FOO.&FMID..LOAD
> //SYSIN    DD   * 
>  DELETE FOO.*.LOAD(*) NONVSAM FILE(OUTLOAD) 
> /* 
> 
> I suppose I could do something with IEFBR14 and allocate a new dataset 
with
> a temporary name in one step and then delete the old dataset and rename 
the
> new one in the next step. Is there something easier?
> 
> Thanks,
> 
> Charles 
> 
> ----------------------------------------------------------------------
> 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

Reply via email to