-- Listing 7-9. Revising the Get Info Code of Listing 7-5
begin
    -- First retrieve the data. 
    select Job, Sal, DeptNo
    into :P17_UPDATE_JOB, :P17_UPDATE_SAL, :P17_UPDATE_DEPT
    from EMP
    where EmpNo = :P17_UPDATE_EMPNO;

    -- Then use hidden items to save a copy of the data.
    :P17_ORIGINAL_JOB  := :P17_UPDATE_JOB;
    :P17_ORIGINAL_SAL  := :P17_UPDATE_SAL;
    :P17_ORIGINAL_DEPT := :P17_UPDATE_DEPT;
end;

