Oracle Get ROWID information

create or replace function fgetrowid(prowid in varchar2)
  return varchar2 is
  rowid_type number;
  obj_num number;
  rel_fno number;
  blo_num number;
  row_num number;
begin
  dbms_rowid.rowid_info(prowid, rowid_type, obj_num, rel_fno
        , blo_num, row_num);
                                                                                                    
  return 'obj#='||to_char(obj_num)||' file#=' || to_char(rel_fno)
        || ' block#=' || to_char(blo_num)
        || ' row#='||to_char(row_num);
end;