Pardon my previous misfire. I remembered the wrong procedure.
You need a shred procedure:
shred.aia (2.6 KB)
P.S. Watch out for the Blocks Editor if you try to put a double quote (") in a block. It trims trailing double quotes and trailing blanks. You have to go back and edit the text block to re-insert it.