1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37
|
DROP TABLE table1
/
CREATE TABLE table1
(x1 INTEGER
,x2 INTEGER)
/
INSERT INTO table1 VALUES (1,1)
/
INSERT INTO table1 VALUES (2,2)
/
COMMIT
/
SET SERVEROUTPUT ON SIZE 100000
DECLARE
CURSOR curs_1 IS
SELECT x1,
x2
FROM table1
;
l_flag BOOLEAN := FALSE;
BEGIN
FOR lc_rec IN curs_1
LOOP
dbms_output.put_line('Loop '||lc_rec.x1);
l_flag := TRUE;
END LOOP;
IF l_flag THEN
dbms_output.put_line('Found records');
ELSE
dbms_output.put_line('No record found');
END IF;
END;
/ |
Partager