Declare
No Number;
v Emp%Rowtype; --定义接受Emp一行数据的变量
Cursor Mycur Is
Select * From Emp e;
Cursor Mycur2(No Number) Is
Select * From Emp e Where e.Empno = No;
Begin
No := 0;
--If 使用
/*If (1 = 1) Then
Dbms_Output.Put_Line('1=1');
Else
Dbms_Output.Put_Line('1!=1');
End If;*/
--While 使用
/* While No < 5 Loop
Dbms_Output.Put_Line(No);
No := No + 1;
End Loop;*/
--Loop 使用,退出判断在变量增加的前和后是不同的结果
/*Loop
Dbms_Output.Put_Line(No);
No := No + 1;
Exit When No = 5;
End Loop;*/
--For in 使用 cursor
/* For r In mycur Loop
Dbms_Output.Put_Line(r.empno);
End Loop;*/
--带参数的Cursor
--先执行Fetch Into,不然输出两遍
/*Open Mycur2(7499);
Loop
Fetch Mycur2
Into v;
Exit When Mycur2%Notfound;
Dbms_Output.Put_Line(v.Ename);
End Loop;*/
End;
注意使用Scoot测试用户登录!