Funciona el procedure en script