ActividadesPLSQL

Actividades PLSQL
1. Realiza un procedimiento mostrar_defts que reciba un nombre de usuario y muestre el nombre de su tablespace por defecto.
create or replace procedure mostrar_defts (nombrevarchar2)
IS
v_tablespace varchar2(50);
BEGIN
SELECT default_tablespace INTO v_tablespace
FROM dba_users
WHERE username=Nombre;
DBMS_OUTPUT.PUT_LINE(v_tablespace);
END;
/

Para usar el procedimiento:BEGIN
mostrar_defts('HR');
END;
/
ó
exec mostrar_defts('HR');

2. Realiza un procedimiento que reciba un número de departamento y muestre su nombre y localidad. (Tabla departments de HR)
CREATE ORREPLACE PROCEDURE mostar_dept (Numero number)
IS
v_nombre HR.departments.department_name%type;
v_loc HR.departments.location_id%type;
BEGIN
SELECT department_name, location_id INTO v_nombre,v_loc
FROM HR.departments
WHERE department_id=Numero;
dbms_output.put_line('Nombre: '||v_nombre|| 'localidad:’|| v_loc);
END;
/



3. Realiza una función devolver_sal que reciba un número de empleadoy devuelva su salario. (Tabla employees de HR)
create or replace function devolver_salario (Numero number)
return number
as
v_salario HR.employees.salary%TYPE;
begin
select salary
intov_salary
from HR.employees
where employee_id=Numero;
end devolver_salario;
/

BEGIN
DBMS_OUTPUT.PUT_LINE(devolver_salario(101));
END;
/

4. Crea una función que devuelva 1 o 0 si un número es divisiblepor otro (los dos números se pasarán como argumentos de la función)
create or replace function divisible (a number, b number)
return number
as
v_res number;
begin
if (a mod b=0) thenv_res:=1;
else
v_res:=0;
end if;
return v_res;
end divisible;
/

begin
dbms_output.put_line(divisible(5,2));
end;
/



5. Usa las estructuras condicionales para mostrar el día de lasemana según un valor de entrada numérico, 1 para domingo, 2 para lunes, etc.
CREATE OR REPLACE PROCEDURE diasemana (a NUMBER)
AS
BEGIN
CASE a
WHEN 1 THEN
dbms_output.put_line('Lunes');
WHEN 2 THEN...