SQL> @E:\get_rowid_info.txt;
7 /
过程已创建。
内容如下：
create or replace procedure get_rowid_info(l_rowid in rowid)
as
begin
dbms_output.put_line('所在的文件号是:'||dbms_rowid.ROWID_RELATIVE_FNO(l_rowid));
dbms_output.put_line('所在的行号是:'||dbms_rowid.ROWID_ROW_NUMBER(l_rowid));
end;
SQL> exec get_rowid_info('AAAM4xAAEAAAAAcAAI');
所在的文件号是:4
所在的行号是:8
SQL> select text from user_source where name='GET_ROWID_INFO';
TEXT
---------------------------------------------------------------------------------------------------------------------
procedure get_rowid_info(l_rowid in rowid)
as
begin
dbms_output.put_line('所在的文件号是:'||dbms_rowid.ROWID_RELATIVE_FNO(l_rowid));
dbms_output.put_line('所在的行号是:'||dbms_rowid.ROWID_ROW_NUMBER(l_rowid));
end;
已选择6行。
Drop procedure get_rowid_info;
C:\DocumentsandSettings\Administrator>wrap iname=E:\get_rowid_info.plb oname=E:\get_rowid_info.txt;
注意在使用前设置环境变量：
Set nls_lang=simplified chinese.china.zhs16gbk
然后我们就可以删除原来的脚本了。
SQL> @E:\get_rowid_info.plb
过程已创建。
SQL> select text from user_source where name='GET_ROWID_INFO';
TEXT
-------------------------------------------------------------------------------
procedure get_rowid_info wrapped
a000000
352
abcd
abcd
abcd
abcd
abcd
abcd
abcd
abcd
abcd
abcd
abcd
abcd
abcd
abcd
abcd
7
e1 e7
aJFMIAvYFHbFeP5qe/zcq5E75DMwg5nnm7+fMr2ywFxarmL0lpeWcln0ckcM2bGl9CibKP71
zKXSXqaCIb6Odta+jo5ucVUAc6mgrG23ILg0qhFaZxHjHC/G+DCSvidNT/lCQzw878FKijrE
Hn0mhiv8KipwMnDv0t2Rz8gK0AvjF3X2NBNPJEerLi725smHU6kForWlMJ1pD0mxyo5OcXNx
2IimwSguYg==
