Try something like this (syntax might need to be corrected): //CHECKDEL EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * LISTCAT ENT(AA.AA),NAME
IF MAXCC NE 0 THEN DO DELETE BB.BB NVSAM SCRATCH PURGE DELETE CC.CC NVSAM SCRATCH PURGE DELETE DD.DD NVSAM SCRATCH PURGE SET MAXCC EQ 0 END /* //* // On 28/12/2021 21:10, PINION, RICHARD W. wrote: > I'm going to ask what many of you may consider a foolish question. Please be > kind in > your criticism. Let's say I have 4 datasets, a.a, b.b, c.c, and d.d. Is > there any way to > define a relationship between a.a to b.b, a.a to c.c , and a.a to d.d? What > I would like > to happen, if a.a is deleted, b.b, c.c, and d.d would be deleted. > Confidentiality notice: > This e-mail message, including any attachments, may contain legally > privileged and/or confidential information. If you are not the intended > recipient(s), or the employee or agent responsible for delivery of this > message to the intended recipient(s), you are hereby notified that any > dissemination, distribution, or copying of this e-mail message is strictly > prohibited. If you have received this message in error, please immediately > notify the sender and delete this e-mail message from your computer. > > ---------------------------------------------------------------------- > 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
