学步园

CREATE OR REPLACE PROCEDURE kevin_proc(x varchar) IS<br /> a VARCHAR(20);<br /> b VARCHAR(20);</p> <p>CURSOR mycur(rn NUMBER) IS SELECT * FROM t_kevin_test WHERE ROWNUM<rn;<br /> BEGIN<br /> OPEN mycur(10);<br /> LOOP FETCH mycur INTO a,b;<br /> EXIT WHEN mycur%NOTFOUND;<br /> Dbms_Output.put_line('a: '||a);<br /> Dbms_Output.put_line('b: '||b);<br /> END LOOP;</p> <p>CLOSE mycur;<br /> begin<br /> dbms_output.put_line (x);<br /> end;<br /> END;