DECLARE 
  CURSOR c IS 
    SELECT first_name, last_name, phone_number 
    FROM hr.employees; 
 
  friend c%ROWTYPE; 
BEGIN 
  friend.first_name   := 'John'; 
  friend.last_name    := 'Smith'; 
  friend.phone_number := '1-650-555-1234'; 
   
  DBMS_OUTPUT.PUT_LINE ( 
    friend.first_name  || ' ' || 
    friend.last_name   || ', ' || 
    friend.phone_number 
  ); 
END;