Deleting volumes in a stg pools after cloning a TSM server on AIX

Hi expert!

I have really been searching for a 'solution' for my challenge, but not succeeded!

I have cloned a TSM server ver. 6.3.4 running on an AIX server.

4 primrary stg pools and their volumes had to be removed. But i want to do it by a script. I tried the flw.:

delete vol XYZ discarddata=yes
delete vol ABC discarddata=yes
delete vol EFG discarddata=yes

300 volumues all together, one at a time, in a sequential way. Since I had to confirm each 'discarddata=yes' I cannot just run the script above.

Any suggestions?
Thank you.