Middle
Como devolver um valor de um procedimento usando um cursor (REF CURSOR)?
sobes.tech IA
Resposta da IA
No Oracle PL/SQL, para devolver um conjunto de linhas de um procedimento, muitas vezes usa-se REF CURSOR. É um ponteiro para o resultado de uma consulta, que pode ser aberto dentro do procedimento e retornado ao código chamador.
Exemplo de procedimento com um parâmetro OUT do tipo REF CURSOR:
CREATE OR REPLACE PROCEDURE get_employees(p_dept_id IN NUMBER, p_refcur OUT SYS_REFCURSOR) AS
BEGIN
OPEN p_refcur FOR
SELECT employee_id, first_name, last_name
FROM employees
WHERE department_id = p_dept_id;
END;
/
Chamada de um bloco PL/SQL:
DECLARE
rc SYS_REFCURSOR;
emp_id employees.employee_id%TYPE;
fname employees.first_name%TYPE;
lname employees.last_name%TYPE;
BEGIN
get_employees(10, rc);
LOOP
FETCH rc INTO emp_id, fname, lname;
EXIT WHEN rc%NOTFOUND;
DBMS_OUTPUT.PUT_LINE(emp_id || ' ' || fname || ' ' || lname);
END LOOP;
CLOSE rc;
END;
/
Dessa forma, a procedure abre um REF CURSOR com a consulta necessária, e o código chamador lê os dados dele.