CREATE OR REPLACE PROCEDURE SP_LIST_EMP_X_DPTO ( depa_id IN hr.employees.DEPARTMENT_ID%TYPE ) IS v_nombre HR.employees.FIRST_NAME%TYPE; v_apellido HR.employees.LAST_NAME%TYPE; v_sueldo HR.employees.SALARY%TYPE; v_fecha HR.employees.HIRE_DATE%TYPE; v_depaname HR.departments.DEPARTMENT_NAME%TYPE; v_ciudad HR.locations.CITY%TYPE; BEGIN for cur in (select employee_id from HR.EMPLOYEES where department_Id = depa_id) loop SELECT e.FIRST_NAME,e.LAST_NAME,e.SALARY,e.HIRE_DATE,d.DEPARTMENT_NAME,l.CITY INTO v_nombre, v_apellido, v_sueldo, v_fecha, v_depaname, v_ciudad FROM EMPLOYEES e join DEPARTMENTS d on (e.DEPARTMENT_ID = d.DEPARTMENT_ID) join LOCATIONS l on (d.LOCATION_ID = l.LOCATION_ID) WHERE employee_id = cur.employee_id; DBMS_OUTPUT.PUT_LINE('1er Nombre '|| v_nombre); DBMS_OUTPUT.PUT_LINE('2do Nombre '|| v_apellido); DBMS_OUTPUT.PUT_LINE('Salario '|| v_sueldo); DBMS_OUTPUT.PUT_LINE('Fecha Contratacion '|| v_fecha); DBMS_OUTPUT.PUT_LINE('Nombre Departamento '|| v_depaname); DBMS_OUTPUT.PUT_LINE('Ciudad '|| v_ciudad); end loop; end; EXECUTE SP_LIST_EMP_X_DPTO (90);