0

我目前有两个表可以使用(如下所列)。下面发布的是我当前程序的代码,它接受一个employeeID 值并输出他们的信息。我需要修改它,另外列出部门主席是谁,如果员工已经是部门负责人,它将把他们列为“部门主席”。

我尝试创建一个单独的视图来告诉部门主席是谁并在循环中调用它,但没有成功。很卡在这里。

4

1 回答 1

0
create or replace procedure emp_records (
    p_emp_id employees.employeeid%type
) is

    l_department_name        departments.departmentname%type;
    l_department_id          departments.departmentid%type;
    l_employee_first_name    employees.firstname%type;
    l_employee_last_name     employees.lastname%type;
    l_employee_employee_id   employees.employeeid%type;
    l_chair_id               departments.departmentchair%type;
    l_chair_name             varchar2(100);
begin
    -- For employee details
    select
        departmentname,
        firstname,
        lastname,
        employeeid,
        departmentid
    into
        l_department_name,
        l_employee_first_name,
        l_employee_last_name,
        l_employee_employee_id,
        l_department_id
    from departments d
    join employees e 
      on e.departmentid = d.departmentidusing
   where employeeid = p_emp_id;

   --For CHair details
  select departmentchair
    into l_chair_id
    from department
   where departmentid = l_department_id;

    if l_chair_id = l_employee_employee_id 
        then
            select 'Is the department chair' into l_chair_name from dual;
    else
        select 'Department Chair: ' || firstname || ' ' || lastname
          into l_chair_name
          from employees
         where employeeid = l_chair_id;
    end if;

    -- For output
    dbms_output.put_line('Information for Employee #' || p_emp_id);
    dbms_output.put_line('Full Name: ' || l_employee_first_name || ' ' || l_employee_last_name);
    dbms_output.put_line('Department: ' || l_department_name);
    dbms_output.put_line(l_chair_name);
exception
    when no_data_found then
        dbms_output.put_line('No records found for this Employee.');
end;
/

希望这会有所帮助。

于 2019-10-09T04:27:11.207 回答