TYPE t_rec1 IS RECORD
(
  m_num1  NUMBER,
  m_num2  NUMBER,
  m_str1  VARCHAR2(200),
  m_str2  VARCHAR2(200),
  m_date  DATE
);
r_cur t_rec;
r_def t_rec;

IF (r_def.m_num1 is not null) THEN r_cur.m_num1 := r_def.m_num1; END IF;
IF (r_def.m_num2 is not null) THEN r_cur.m_num2 := r_def.m_num2; END IF;
IF (r_def.m_str1 is not null) THEN r_cur.m_str1 := r_def.m_str1; END IF;