有趣的测试，将执行计划保存到普通的表字段中。

16:00:18 SYS@men> desc scott.t4
 Name                                      Null?    Type
 ----------------------------------------- -------- ----------------------------
 ID                                        NOT NULL NUMBER
 NAME                                               VARCHAR2(30)
 SEX                                                CHAR(2)
 BIRTH                                              DATE
 MEMO                                               VARCHAR2(4000)

开始表演：

1，选择一个执行计划：

15:49:54 SYS@men> select * from table(dbms_xplan.display_cursor('4sx88rpzuy3ar',0)) ;

PLAN_TABLE_OUTPUT
--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
SQL_ID  4sx88rpzuy3ar, child number 0
-------------------------------------
select * from scott.t4 where id=100

Plan hash value: 127075253

--------------------------------------------------------------------------------------------
| Id  | Operation                   | Name         | Rows  | Bytes | Cost (%CPU)| Time     |
--------------------------------------------------------------------------------------------
|   0 | SELECT STATEMENT            |              |       |       |     1 (100)|          |
|   1 |  TABLE ACCESS BY INDEX ROWID| T4           |     1 |  2045 |     1   (0)| 00:00:01 |
|*  2 |   INDEX UNIQUE SCAN         | SYS_C0011623 |     1 |       |     0   (0)|          |
--------------------------------------------------------------------------------------------

Predicate Information (identified by operation id):
---------------------------------------------------

   2 - access("ID"=100)


19 rows selected.

1，创建一个变量，用于存放执行计划。

var a varchar2(4000)

2，将执行计划作为字符串聚合，并存放到变量中。
注意，如果不按rownum 排序，那么聚合之后的字符串顺序会混乱。

 exec select  listagg(PLAN_TABLE_OUTPUT, chr(10)) within group (order by rownum) into :a from table(dbms_xplan.display_cursor('4sx88rpzuy3ar',0)) ;

3， 查看结果

15:53:30 SYS@men> print :a

A
--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
SQL_ID  4sx88rpzuy3ar, child number 0
-------------------------------------
select * from scott.t4 where id=100

Plan hash value: 127075253

--------------------------------------------------------------------------------------------
| Id  | Operation                   | Name         | Rows  | Bytes | Cost (%CPU)| Time     |
--------------------------------------------------------------------------------------------
|   0 | SELECT STATEMENT            |              |       |       |     1 (100)|          |
|   1 |  TABLE ACCESS BY INDEX ROWID| T4           |     1 |  2045 |     1   (0)| 00:00:01 |
|*  2 |   INDEX UNIQUE SCAN         | SYS_C0011623 |     1 |       |     0   (0)|          |
--------------------------------------------------------------------------------------------

Predicate Information (identified by operation id):
---------------------------------------------------

   2 - access("ID"=100)

4，验证无误后，保存到表中：

update scott.t4 set memo= :a where id=100 ;
commit ;