Oracle
发布时间:2019-11-05 发布网站:大佬教程 code.js-code.com
大佬教程收集整理的这篇文章主要介绍了oracle中print_table存储过程实例介绍,大佬教程大佬觉得挺不错的,现在分享给大家,也给大家做个参考。
定义
所谓存储过程(Stored ProcedurE),就是一组用于完成特定数据库功能的sql语句集,该sql语句集经过
编译后存储在数据库系统中。在使用时候,用户通过指定已经定义的存储过程名字并给出相应的存储过程参数
来调用并执行它,从而完成一个或一系列的数据库操作。
一直以来,觉得MySQL中使用\G参数改变输出结果集的显示方式非常好用,尤其是在命令行界面。但是OrACLE数据库没有这个功能,今天在搜索到Tom大师的一篇博文时,发现大师用一个存储过程print_table实现了类似这样的功能。只是我们这些凡夫俗子不知道而已,@R_823_7729@,方便自己或有需要的人以后查看。
replaCE PROCEDURE print_table(p_query IN VARCHAR2)
AUTHID CURRENT_USER
IS
l_the
cursor
IntegeR DEFAULT
DBMS_sql
.open_
cursor;
l_
columnvalue VARCHAR2(4000
);
l_status
IntegeR;
l_desctbl
DBMS_sq
l.desc_tab;
l_colcnt
numbER;
BEGIN
EXECUTE IMMEDIATE 'alter session set nls_date_format=''dd-mon-yyyy hh24:mi:ss'' ';
DBMS_sql.parse(l_thecursor,p_query,DBMS_sql.nativE);
DBMS_sql.describe_columns (l_thecursor,l_colcnt,l_desctbl);
FOR i IN 1 .. l_colcnt LOOP
DBMS_sql.define_column (l_thecursor,i,l_columnvalue,4000);
END LOOP;
l_status := DBMS_sql.EXECUTE(l_thecursor);
WHILE ( DBMS_sql.Fetch_rows(l_thecursor) > 0 ) LOOP
FOR i IN 1 .. l_colcnt LOOP
DBMS_sql.column_value (l_thecursor,l_columnvalue);
DBMS_output.Put_line (RPAD(L_desctbl(i).col_name,30)
|| ': '
|| l_columnvalue);
END LOOP;
DBMS_output.put_line('-----------------');
END LOOP;
EXECUTE IMMEDIATE 'alter session set nls_date_format=''dd-MON-rr'' ';
EXCEPTION
WHEN OTHERS THEN
EXECUTE IMMEDIATE
'alter session set nls_date_format=''dd-MON-rr'' ';
RAISE;
END;
/
如下测试所示:
set serveroutput on size 99999;
SQL> execute print_table('
SELEct * from @R_
197_8166@sion where sid=997'
);
SADDR : 000000085FA35CA0
SID : 997
serial# : 1
AUDSID : 0
paddr : 000000085F6B7E70
USER# : 0
USERNAME :
COMMAND : 0
owneRID : 2147483644
TADDR :
lockwait :
STATUS : ACTIVE
SERVER : DE
DicATED
scheR_809_11845@A# : 0
schemaname : SYS
OSUSER :
Oracle
PROCESS : 5036
MACHINE : xxxx
PORT : 0
TERMINAL : UNKNOWN
PROGRAM :
Oracle@xxxxx (DBW0)
TYPE :
BACKGROUND
SQL_ADDRESS : 00
SQL_
hash_value : 0
SQL_ID :
SQL_CHILD_
numbER : 0
PREV_SQL_ADDR : 00
PREV_
hash_value : 0
PREV_SQL_ID :
PREV_CHILD_
numbER : 0
PLSQL_ENTRY_
object_id :
PLSQL_ENTRY_SUBPROGRAM_ID :
PLSQL_
object_id :
PLSQL_SUBPROGRAM_ID :
MODULE :
MODULE_HASH : 0
ACTION :
ACTION_HASH : 0
CLIENT_INFO :
FIXED_TABLE_SEQUENCE : 0
ROW_WAIT_OBJ# : -1
ROW_WAIT_
file# : 0
ROW_WAIT_
BLOCK# : 0
ROW_WAIT_ROW# : 0
LOGON_TIME : 04-jul-2018 21
:15:52
LAST_C
all_ET : 5272838
PDML_ENABLED : NO
FAILOVER_TYPE : NONE
FAILOVER_METHOD : NONE
FAILED_OVER : NO
resourcE_
consumer_group :
PDML_STATUS : DISABLED
PDDL_STATUS : DISABLED
PQ_STATUS : DISABLED
CURRENT_QUEUE_DURATION : 0
CLIENT_IDENTIFIER :
BLOCKING_SESSION_STATUS : NO HOLDER
BLOCKING_INSTANCE :
BLOCKING_SESSION :
SEQ# : 34697
EVENT# : 3
EVENT : rdbms ipc
message
P1TEXT : timeout
P1 : 300
P1RAW : 000000000000012C
P2TEXT :
P2 : 0
P2RAW : 00
P3TEXT :
P3 : 0
P3RAW : 00
WAIT_CLASS_ID : 2723168908
WAIT_CLASS# : 6
WAIT_CLASS : Idle
WAIT_TIME : 0
seconds_in_wait : 107
STATE : WAI
TinG
service_name : SYS$
BACKGROUND
SQL_TRACE : DISABLED
SQL_TRACE_WAITS :
falSE
SQL_TRACE_BINDS :
falSE
ECID :
-----------------
pl/sqL procedure
successfully completed.
SQL>
参考资料:
https://asktom.Oracle.com/pls/asktom/f?p=100:11:::::P11_QUESTION_ID:1035431863958,%7Bprint_table%7D">https://asktom.Oracle.com/pls/asktom/f?p=100:11:::::P11_QUESTION_ID:1035431863958,%7Bprint_table%7D
总结
以上所述是小编给大家介绍的Oracle中print_table存储过程介绍,希望对大家有所帮助,如果大家有任何疑问请给我留言,小编会及时回复大家的。在此也非常感谢大家对菜鸟教程网站的支持!
大佬总结
以上是大佬教程为你收集整理的oracle中print_table存储过程实例介绍全部内容,希望文章能够帮你解决oracle中print_table存储过程实例介绍所遇到的程序开发问题。
如果觉得大佬教程网站内容还不错,欢迎将大佬教程推荐给程序员好友。
本图文内容来源于网友网络收集整理提供,作为学习参考使用,版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ:384754419,请注明来意。