create or replace FUNCTION findMax(x IN number, y IN number)
RETURN number
IS
z number;
BEGIN
IF x > y THEN
z:= x;
ELSE
Z:= y;
END IF;
RETURN z;
END;
DECLARE
a number;
b number;
c number;
BEGIN
a:= 23;
b:= 45;
c := findMax(a, b);
dbms_output.put_line(' Maximum of (23,45): ' || c);
END;
/
CREATE OR REPLACE FUNCTION emptot
RETURN number IS
total number(2) := 0;
BEGIN
SELECT count(*) into total
FROM emp;
RETURN total;
END;
select emptot from dual;
set serveroutput on;
create or replace function reverse_it( x IN int)
return int
as
z int;
c int;
n int;
rev int:=0;
r int;
begin
n := x;
while (n > 0)
loop
r := mod(n, 10);
rev := (rev * 10) + r;
n := trunc(n / 10);
end loop;
z := rev;
return z;
end ;
declare
a int:=4321;
c number;
BEGIN
c := reverse_it(a);
dbms_output.put_line('the reverse of number is ' || c);
END;