What is your real purpose here? This is simpler and faster than the previous "solutions."
//A EXEC PGM=IKJEFT01,
// PARM='DELETE ''DATASET(MEMBER)'''
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD DUMMY
None of the solutions presented so far (including my solution) will prevent the member from being brought back by PDS "undelete" programs. The only way to prevent that is to "compress" the PDS after you have deleted the member as in my solution or replaced the member with a null member as in the previous "solutions," or to use a PDSE, which does not have a method to "undelete" a member.