set serveroutput on 100000
DECLARE
dummy NUMBER;
adj_desc varchar2(50) := 'test';
CURSOR c1 IS
SELECT adj.ADJ_REASON_CODE_DESC des
FROM RAC_CS_ADJ_REASON_CODES adj
where adj.STATUS='A';
--WHERE adj.ADJ_REASON_CODE_ID = '456';
BEGIN
FOR a1 IN c1 LOOP
dbms_output.PUT_LINE( 'hello: ' || a1.des );
-- dbms_output.PUT_LINE( 'hello2: ' || adj_desc );
END LOOP;
open c1;
LOOP
fetch c1 into adj_desc;
dbms_output.PUT_LINE( 'hello2: ' || adj_desc );
---EXIT WHEN c1%NOTFOUND;
END LOOP;
close c1;
EXCEPTION
WHEN NO_DATA_FOUND THEN
NULL;
WHEN OTHERS THEN
NULL;
END;