Funciones en Oracle DataBase 11g XE
/*Creación de Funciones con HR*/
--Funcion que halla el 10% del salario
create or replace function f_bono_emp(salario number)
return number
is
begin
return (salario * 0.10);
end;
--Probar
begin
dbms_output.put_line('Bono Salario: ' || f_bono_emp(1500));
end;
--Funcion que obtiene el Maximo Salario de los empleados
create or replace function f_Maximo_Salario
return number
is
v_sal employees.salary%type;
begin
select max(salary) into v_sal
from employees;
return v_sal;
end;
--Probar
begin
dbms_output.put_line('Maximo Salario: ' || f_Maximo_Salario());
end;
--Funcion que halla el 10% del salario
create or replace function f_Salario_emp(p_cod in char)
return number
is
v_sal employees.salary%type;
begin
select salary into v_sal
from employees
where employee_id=p_cod;
return v_sal;
end;
--Probar
begin
dbms_output.put_line('Salario: ' || f_Salario_emp(200));
end;
--Funcion que halla el 10% del salario
create or replace function f_bono_emp(salario number)
return number
is
begin
return (salario * 0.10);
end;
--Probar
begin
dbms_output.put_line('Bono Salario: ' || f_bono_emp(1500));
end;
--Funcion que obtiene el Maximo Salario de los empleados
create or replace function f_Maximo_Salario
return number
is
v_sal employees.salary%type;
begin
select max(salary) into v_sal
from employees;
return v_sal;
end;
--Probar
begin
dbms_output.put_line('Maximo Salario: ' || f_Maximo_Salario());
end;
--Funcion que halla el 10% del salario
create or replace function f_Salario_emp(p_cod in char)
return number
is
v_sal employees.salary%type;
begin
select salary into v_sal
from employees
where employee_id=p_cod;
return v_sal;
end;
--Probar
begin
dbms_output.put_line('Salario: ' || f_Salario_emp(200));
end;
Comentarios