rowid 获取文件号，块号

create or replace function get_rowid
(tabname in varchar2)
return varchar2
is
v_rowid varchar2(40);
ls_my_rowid  varchar2(200);          
rowid_type  number;          
object_number  number;          
relative_fno  number;          
block_number  number;          
row_number  number;  
begin
 select into
 dbms_rowid.rowid_info(l_rowid,rowid_type,object_number,relative_fno, block_number, row_number);          
 ls_my_rowid := 'Object# is      :'||to_char(object_number)||chr(10)||
  'Relative_fno is :'||to_char(relative_fno)||chr(10)||
  'Block number is :'||to_char(block_number)||chr(10)||
  'Row number is   :'||to_char(row_number);
 return ls_my_rowid ;
end;          
/

IAN@orcl > select get_rowid(rowid) from t_ian ;

GET_ROWID(ROWID)
----------------------------------------------------------------------------------------------------------------------------------
Object# is      :52366
Relative_fno is :5
Block number is :12
Row number is   :0

Object# is      :52366
Relative_fno is :5
Block number is :12
Row number is   :1

Object# is      :52366

GET_ROWID(ROWID)
----------------------------------------------------------------------------------------------------------------------------------
Relative_fno is :5
Block number is :12
Row number is   :2