Photoshop action

Question

Hello all,
I have this script bellow and it's do all right but, when it
complete the action in Photoshop the script stop.
I would like to know if, my delete line is in wrong place.
i Guess yes but, i don't know where i have to put this.
Thanks
set input to choose folder
tell application "Finder"
if not (exists disk "Share Name") then
mount volume "afp://Goku.local./Bordados"
end if
end tell
tell application "Finder"
set filesList to files in input
end tell
repeat with aFile in filesList
set fileIndex to 0
tell application "Finder"
set theFile to aFile as alias
set theFileName to name of theFile
end tell
tell application "Adobe Photoshop CS"
activate
set display dialogs to never
open theFile
tell the current document
do action "Bordado" from "Bmp"
tell application "Finder"
activate
select every file of folder "input" of "desktop"
delete selection
empty trash
end tell
end tell
end tell
end repeat
end adding folder items to

Answer 1

I did this,
And doesn't work!
set input to choose folder
tell application "Finder"
if not (exists disk "Share Name") then
mount volume "afp://Goku.local./Bordados"
end if
end tell
tell application "Finder"
set filesList to files in input
end tell
repeat with aFile in filesList
set fileIndex to 0
tell application "Finder"
set theFile to aFile as alias
set theFileName to name of theFile
end tell
tell application "Adobe Photoshop CS"
activate
set display dialogs to never
open theFile
tell the current document
do action "Bordado" from "Bmp"
tell application "Finder" to delete file aFile
end tell
tell application "Finder"
empty trash
end tell
end tell
end repeat
end adding folder items to