Solo tienes que mirar cualquier otro procedimiento almacenado para ver el error, por ejemplo,
este mismo.
Has puesto el
suspend fuera del bucle, por lo que no hace nada, mételo dentro. Antes del
end.
Por cierto, recuerda poner los tags al código fuente, ejemplo:
Gracias