Veja abaixo:
BEGIN
OPEN cr_vl_limite_resp_aux(ldt_pesquisa);
FETCH cr_vl_limite_resp_aux INTO lvl_lim_pesquisa;
CLOSE cr_vl_limite_resp_aux;
EXCEPTION
WHEN NO_DATA_FOUND THEN
select vl_limite_resp
into lvl_lim_pesquisa
from tb_item_transp_nac
where cd_pessoa = PCd_Pessoa;
WHEN TOO_MANY_ROWS THEN
lvl_lim_pesquisa := 0;
END;
Outra coisa ridícula aqui é colocar TOO_MANY_ROWS nesse cursor! Imagine: Se o cara optou em fazer um cursor é meio ÓBVIO que ele espera retornar mais de uma linha (a fim de tratar linha por linha). Hheheheh