Programação de hoje

PROCEDURE aniversario_p IS

--

l_nMuita_Saude INTEGER := 99999999;

l_nIdade INTEGER := 33;

--

BEGIN

LOOP

l_nIdade := l_nIdade + 1;

--

EXIT WHEN (g_Deus_Quiser) OR

(l_nIdade = l_nMuita_Saude);

--

END LOOP;

--

EXCEPTION

WHEN OTHERS THEN NULL; -- RARARARARA!!!

--

END aniversario_p;

--