1.刷新Shared Pool命令正常执行情况
sys@ora10g> alter system flush shared_pool;
System altered.
2.直接嵌入在PL/SQL块中的报错信息
sys@ora10g> create or replace procedure sec_proc
2 is
3 begin
4 alter system flush shared_pool;
5 end;
6 /
Warning: Procedure created with compilation errors.
可见，此时出现了编译错误。具体的报错信息如下：
sys@ora10g> show errors;
Errors for PROCEDURE SEC_PROC:
LINE/COL ERROR
-------- -----------------------------------------------------------------
4/4 PLS-00103: Encountered the symbol "ALTER" when expecting one of
the following:
begin case declare exit for goto if loop mod null pragma
raise return select update while with
<<
close current delete fetch lock insert open rollback
savepoint set sql execute commit forall merge pipe
这是PL/SQL本身的限制。因此不可简单的将任何SQL语句直接嵌入在PL/SQL中使用。
3.解决方法
1）第一种解决方法：使用PL/SQL的EXECUTE IMMEDIATE语句处理
sys@ora10g> create or replace procedure sec_proc
2 is
3 begin
4 execute immediate 'alter system flush shared_pool';
5 end;
6 /
Procedure created.
sys@ora10g> exec sec_proc;
PL/SQL procedure successfully completed.
使用EXECUTE IMMEDIATE语句是最简单的处理方法。这种方法非常的常用，推荐使用。
2）第二种解决方法：使用DBMS_SQL这个包辅助处理
sys@ora10g> CREATE OR REPLACE PROCEDURE sec_proc
2 IS
3 v_1 INTEGER;
4 v_2 INTEGER;
5 BEGIN
6 v_1 := DBMS_SQL.open_cursor;
7 DBMS_SQL.parse (v_1, 'alter system flush shared_pool', DBMS_SQL.native);
8 v_2 := DBMS_SQL.execute (v_1);
9 DBMS_SQL.close_cursor (v_1);
10 END;
11 /
Procedure created.
sys@ora10g> exec sec_proc;
PL/SQL procedure successfully completed.
OK，一样可以成功执行。不过这种方法较之EXECUTE IMMEDIATE语句处理方法使用起来复杂一些，需要对语法顺序多加留意。
4.小结
使用本文提供的两种方法基本上可以解决很大一部分类似“alter system flush shared_pool;”命令执行不了的问题。可以根据自己的使用习惯进行取舍。
Good luck.
secooler
10.12.29
-- The End --