1. CREATE OR REPLACE  PROCEDURE SP_LIST_EMP_X_DPTO
2.         (
3.         depa_id IN hr.employees.DEPARTMENT_ID%TYPE
4.         )
5.         IS
6.         v_nombre HR.employees.FIRST_NAME%TYPE;
7.     v_apellido HR.employees.LAST_NAME%TYPE;
8.     v_sueldo HR.employees.SALARY%TYPE;
9.     v_fecha HR.employees.HIRE_DATE%TYPE;
10.     v_depaname HR.departments.DEPARTMENT_NAME%TYPE;
11.     v_ciudad HR.locations.CITY%TYPE;
12.         BEGIN
13.           FOR cur IN (SELECT employee_id FROM HR.EMPLOYEES  WHERE department_Id = depa_id) LOOP
14.         SELECT e.FIRST_NAME,e.LAST_NAME,e.SALARY,e.HIRE_DATE,d.DEPARTMENT_NAME,l.CITY
15.         INTO v_nombre, v_apellido, v_sueldo, v_fecha, v_depaname, v_ciudad
16.                 FROM EMPLOYEES e join  DEPARTMENTS d ON (e.DEPARTMENT_ID = d.DEPARTMENT_ID) join LOCATIONS l ON (d.LOCATION_ID = l.LOCATION_ID)
17.                 WHERE employee_id = cur.employee_id;
18.                 DBMS_OUTPUT.PUT_LINE('1er Nombre '|| v_nombre);
19.         DBMS_OUTPUT.PUT_LINE('2do Nombre '|| v_apellido);
20.         DBMS_OUTPUT.PUT_LINE('Salario '|| v_sueldo);
21.         DBMS_OUTPUT.PUT_LINE('Fecha Contratacion '|| v_fecha);
22.         DBMS_OUTPUT.PUT_LINE('Nombre Departamento '|| v_depaname);
23.         DBMS_OUTPUT.PUT_LINE('Ciudad '|| v_ciudad);
24.           END LOOP;
25.         END;
26.    
27. EXECUTE SP_LIST_EMP_X_DPTO (90);