//* //********************************************************************** //* Delete Member //* The FILE Keyword avoids an EXCLUSIVE dynamic allocation //* if this file is allocated by another task or user //* MAXCC = 0 if the member doesn't exit //********************************************************************* //DEFGDG EXEC PGM=IDCAMS //DELDD DD DISP=SHR,DSN=HLQ.TWS.FILE //SYSPRINT DD SYSOUT=* //SYSOUT DD SYSOUT=* //SYSIN DD * DELETE 'HLQ.TWS.FILE(TESTMEM)' FILE(DELDD) SET MAXCC = 0 /*