DECLARE 
  TYPE full_name IS VARRAY(2) OF VARCHAR2(20); 
 
  TYPE contact IS RECORD ( 
    name  full_name := full_name('John', 'Smith'),  -- varray field 
    phone hr.employees.phone_number%TYPE 
  ); 
 
  friend contact; 
BEGIN 
  friend.phone := '1-650-555-1234'; 
   
  DBMS_OUTPUT.PUT_LINE ( 
    friend.name(1) || ' ' || 
    friend.name(2) || ', ' || 
    friend.phone 
  ); 
END;