SQL> @E:\get_rowid_info.txt;

  7  /

过程已创建。

E:\get_rowid_info 内容如下：

  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.plb

注意在使用前设置环境变量：

 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==