Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
PL/SQL Control Statements
--Oracle 11g Express Edition --please drop objects you've created at the end of the script --or check for their existance before creating --'\\' is a delimiter -- Example of PL/SQL If, DECLARE a number(3) := 500; grade char(1) := 'B'; i number := 1; VAR1 number := 100; VAR2 number := 1; j integer := 1; var_11 number; BEGIN var_11 :=10; dbms_output.put_line(' -------- IF ------------'); IF( a < 20 ) THEN dbms_output.put_line('a is less than 20 ' ); ELSE dbms_output.put_line('a is not less than 20 ' ); END IF; dbms_output.put_line('value of a is : ' || a); dbms_output.put_line(' -------- CASE ------------'); CASE grade WHEN 'A' THEN dbms_output.put_line('Excellent'); WHEN 'B' THEN dbms_output.put_line('Very good'); WHEN 'C' THEN dbms_output.put_line('Good'); WHEN 'D' THEN dbms_output.put_line('Average'); WHEN 'F' THEN dbms_output.put_line('Passed with Grace'); ELSE dbms_output.put_line('Failed'); END CASE; dbms_output.put_line(' -------- EXIT Loop ------------'); LOOP EXIT WHEN i>10; dbms_output.put_line(i); i := i+1; END LOOP; dbms_output.put_line(' -------- other loop ------------'); LOOP dbms_output.put_line(VAR1*VAR2); IF (VAR2=10) THEN EXIT; END IF; VAR2:=VAR2+1; END LOOP; dbms_output.put_line(' -------- while------------'); WHILE j<=10 LOOP dbms_output.put_line(j); j := j+1; END LOOP; dbms_output.put_line(' -------- for loop ---------'); FOR var_12 IN 1 .. 11 LOOP dbms_output.put_line(var_11 * var_12); END LOOP; dbms_output.put_line(' ------- for reverse --------'); FOR var_13 IN REVERSE 1 .. 11 LOOP dbms_output.put_line(var_11 + var_13); END LOOP; dbms_output.put_line(' ------- **** ---------'); END; --%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
run
|
edit
|
history
|
help
0
Srinivas
prgms ora
Srinivas
DBMS
alle angemeldeten Benutzer können eine gegebene aktion ausgeben ( im Web )
scott
Srinivas
procedure to calulate LCM of three numbers
test out
HELLO WORLD