Oracle loop、while、for循環
阿新 • • 發佈:2017-11-03
font while sys gin loop rac while循環 style acl
- Loop循環
Declare p_sum number := 0; p_i number; Begin p_i := 1; Loop p_sum := p_sum + p_i; p_i := p_i + 1; If (p_i > 100) then SYS.Dbms_Output.Put_Line(p_sum); Exit; End if; End loop; End;
- while循環
Declare p_sum number := 0; p_i number; Begin p_i := 1; Whilep_i <= 100 loop p_sum := p_sum + p_i; p_i := p_i + 1; End loop; Dbms_Output.Put_Line(p_sum); End;
- for循環
Declare p_sum number := 0; p_i number; Begin p_i := 1; For p_i in 1..100 loop p_sum := p_sum + p_i; End loop; Dbms_Output.Put_Line(p_sum); End;
Oracle loop、while、for循環