ClubEnsayos.com - Ensayos de Calidad, Tareas y Monografias
Buscar

Ejemplos De Cursores En Oracle

Ensayos para estudiantes : Ejemplos De Cursores En Oracle. Ensayos de Calidad, Tareas, Monografias - busque más de 2.326.000+ documentos.

Enviado por   •  24 de Febrero de 2012  •  1.566 Palabras (7 Páginas)  •  377 Visitas

Página 1 de 7

E J E R C I C I O S

CURSOR...IS...

1.- Ejemplos de creación de procedimientos con cursores.

1) Desarrollar un procedimiento que visualice el apellido y la fecha de alta de todos los empleados ordenados por apellido.

CREATE OR REPLACE PROCEDURE ver_emple

AS

CURSOR c_emple IS

SELECT APELLIDO, FECHA_ALT

FROM EMPLE

ORDER BY APELLIDO;

v_apellido VARCHAR2(10);

v_fecha DATE;

BEGIN

OPEN c_emple;

FETCH c_emple into v_apellido, v_fecha;

WHILE c_emple%FOUND LOOP

DBMS_OUTPUT.PUT_LINE( v_apellido||' * '||v_fecha);

FETCH c_emple into v_apellido,v_fecha;

END LOOP;

CLOSE c_emple;

END ver_emple;

2) Codificar un procedimiento que muestre el nombre de cada departamento y el número de empleados que tiene.

CREATE OR REPLACE PROCEDURE ver_emple_depart

AS

CURSOR c_emple IS

SELECT dnombre, COUNT(emp_no)

FROM emple e, depart d

WHERE d.dept_no = e.dept_no(+)

GROUP BY dnombre;

v_dnombre depart.dnombre%TYPE;

v_num_emple BINARY_INTEGER;

BEGIN

OPEN c_emple;

FETCH c_emple into v_dnombre, v_num_emple;

WHILE c_emple%FOUND LOOP

DBMS_OUTPUT.PUT_LINE(v_dnombre||' * '||v_num_emple);

FETCH c_emple into v_dnombre,v_num_emple;

END LOOP;

CLOSE c_emple;

END ver_emple_depart;

3) Escribir un procedimiento que reciba una cadena y visualice el apellido y el número de empleado de todos los empleados cuyo apellido contenga la cadena especificada. Al finalizar visualizar el número de empleados mostrados.

CREATE OR REPLACE PROCEDURE ver_emple_apell(

cadena VARCHAR2)

AS

cad VARCHAR2(10);

CURSOR c_emple IS

SELECT apellido, emp_no FROM emple

WHERE apellido LIKE cad;

vr_emple c_emple%ROWTYPE;

BEGIN

cad :='%'||cadena||'%';

OPEN c_emple;

FETCH c_emple INTO vr_emple;

WHILE (c_emple%FOUND) LOOP

DBMS_OUTPUT.PUT_LINE(vr_emple.emp_no||' * '

||vr_emple.apellido);

FETCH c_emple INTO vr_emple;

END LOOP;

DBMS_OUTPUT.PUT_LINE('NUMERO DE EMPLEADOS: '

|| c_emple%ROWCOUNT);

CLOSE c_emple;

END ver_emple_apell;

4) Escribir un programa que visualice el apellido y el salario de los cinco empleados que tienen el salario más alto.

CREATE OR REPLACE PROCEDURE emp_5maxsal

AS

CURSOR c_emp IS

SELECT apellido, salario FROM emple

ORDER BY salario DESC;

vr_emp c_emp%ROWTYPE;

i NUMBER;

BEGIN

i:=1;

OPEN c_emp;

FETCH c_emp INTO vr_emp;

WHILE c_emp%FOUND AND i<=5 LOOP

DBMS_OUTPUT.PUT_LINE(vr_emp.apellido ||

' * '|| vr_emp.salario);

FETCH c_emp INTO vr_emp;

i:=I+1;

END LOOP;

CLOSE c_emp;

END emp_5maxsal;

OPEN...FETCH...

2 .- Ejemplos de como como recorrer un cursor.

5) Codificar un programa que visualice los dos empleados que ganan menos de cada oficio.

CREATE OR REPLACE PROCEDURE emp_2minsal

AS

CURSOR c_emp IS

SELECT apellido, oficio, salario FROM emple

ORDER BY oficio, salario;

vr_emp c_emp%ROWTYPE;

oficio_ant EMPLE.OFICIO%TYPE;

i NUMBER;

BEGIN

OPEN c_emp;

oficio_ant:='*';

FETCH c_emp INTO vr_emp;

WHILE c_emp%FOUND LOOP

IF oficio_ant <> vr_emp.oficio THEN

oficio_ant := vr_emp.oficio;

i := 1;

END IF;

IF i <= 2 THEN

DBMS_OUTPUT.PUT_LINE(vr_emp.oficio||' * '

||vr_emp.apellido||'

...

Descargar como (para miembros actualizados)  txt (15.3 Kb)  
Leer 6 páginas más »
Generador de citas

(2012, 02). Ejemplos De Cursores En Oracle. ClubEnsayos.com. Recuperado 02, 2012, de https://www.clubensayos.com/Tecnología/Ejemplos-De-Cursores-En-Oracle/146594.html

"Ejemplos De Cursores En Oracle" ClubEnsayos.com. 02 2012. 2012. 02 2012 <https://www.clubensayos.com/Tecnología/Ejemplos-De-Cursores-En-Oracle/146594.html>.

"Ejemplos De Cursores En Oracle." ClubEnsayos.com. ClubEnsayos.com, 02 2012. Web. 02 2012. <https://www.clubensayos.com/Tecnología/Ejemplos-De-Cursores-En-Oracle/146594.html>.

"Ejemplos De Cursores En Oracle." ClubEnsayos.com. 02, 2012. consultado el 02, 2012. https://www.clubensayos.com/Tecnología/Ejemplos-De-Cursores-En-Oracle/146594.html.