DECLARE
  TYPE typ_rek IS RECORD(
    empno NUMBER(4) NOT NULL := 0,
    sal NUMBER(8,2)
  );
  rekord1 typ_rek;
  rekord2 typ_rek;
BEGIN
  select empno, sal into rekord1 from emp where empno = 7900; --nie mozna po VALUES w INSERT
  rekord2 := rekord1; --tylko jezeli ten sam typ
  DBMS_OUTPUT.Put_Line('Pracownik: '||rekord1.empno||' zarabia: '||rekord2.sal);
END;
/
