Agora está ok.
Facil de editar e já testei todas as hipoteses.
E e nem uma delas ocoreu erro algum.
Tá ai o script