declare
  -- SELECT returns one row

  -- static SQL
  -- OK at 9.0.1
  v_employee_id employees.employee_id%type := 100;
  v_emprec employees%rowtype;
begin

  select * into v_emprec from employees where employee_id = v_employee_id;
  Emp_Util.Show_One ( v_emprec );
end;
/
-- PL/SQL procedure successfully completed.






declare
  -- alternative syntax, binding explicit column list
  -- to RECORD with corresponding structure

  -- OK at 9.0.1
  v_employee_id employees.employee_id%type := 100;
  v_emprec employees%rowtype;
begin
  select
    employee_id,
    first_name,
    last_name,

    email,
    phone_number,
    hire_date,
    job_id,
    salary,
    commission_pct,
    manager_id,
    department_id
    into v_emprec from employees where employee_id = v_employee_id;

  Emp_Util.Show_One ( v_emprec );
end;
/
-- PL/SQL procedure successfully completed.