...
elsif updating then
    add_rec('ID', 'ключевой идентификатор', to_str(:new.ID), to_str(:old.ID));
    add_rec('DOC_STATUS_ID', 'статус заявки', to_str(:new.DOC_STATUS_ID), to_str(:old.DOC_STATUS_ID));
    add_rec('REQUEST_TYPE_ID', 'тип заявки', to_str(:new.REQUEST_TYPE_ID), to_str(:old.REQUEST_TYPE_ID));
    add_rec('REQUEST_DATE', 'Дата заявки', to_str(:new.REQUEST_DATE), to_str(:old.REQUEST_DATE));
... еще куча полей  
   add_rec('ADVERTISING_SOURCES', 'источник рекламы', to_str(:new.ADVERTISING_SOURCES), to_str(:old.ADVERTISING_SOURCES));
    add_rec('PLACEORDER_ID', 'место принятия заявки', to_str(:new.PLACEORDER_ID), to_str(:old.PLACEORDER_ID));
    
    l_ind := l_rec.first;

    while l_ind is not null loop
      begin
        if (l_rec(l_ind).new_value <> l_rec(l_ind).old_value)
          or (l_rec(l_ind).new_value is not null and l_rec(l_ind).old_value is null)
          or (l_rec(l_ind).new_value is null and l_rec(l_ind).old_value is not null)
        then
          insert into tele2_request_history(
            id,
            changetype,
            changecolumn,
            newvalue,
            oldvalue,
            changeuser,
            changedate
          )
          values(
            :new.id,
            'UPD',
            l_rec(l_ind).column_comment,
            l_rec(l_ind).new_value,
            l_rec(l_ind).old_value,
            l_user,
            l_sysdate
          );
        end if;
      exception
        when others then
          xxfnd_error.log_error('tele2_request_history', l_ind||': '||sqlerrm);
      end;
      
      l_ind := l_rec.next(l_ind);
    end loop;
  end if;
...

select 'add_rec('''||c.COLUMN_NAME||''', '''||cm.COMMENTS||''', to_char(:new.'||c.COLUMN_NAME||'), to_char(:old.'||c.COLUMN_NAME||'));'
from all_tab_columns c, all_col_comments cm
where c.TABLE_NAME = 'TELE2_REQUESTS'
and cm.TABLE_NAME = c.TABLE_NAME
and cm.COLUMN_NAME = c.COLUMN_NAME
order by c.COLUMN_ID;