怎么查看oralce隐含参数并在SQLPLUS窗口格式化输出

本文主要介绍“如何查看oralce的隐藏参数并在SQLPLUS窗口中显示”。在日常操作中，相信很多人对于如何查看oralce的隐藏参数以及SQLPLUS窗口的打印格式都有疑问。边肖查阅了各种资料，整理出简单易用的操作方法，希望能帮助大家解答“如何查看oralce的隐藏参数并在SQLPLUS窗口显示”的疑惑！接下来，请和边肖一起学习！

/**

功能：用于查询10g和11g中隐式参数的值，主要通过SQLPLUS窗口中的打印格式进行查询。

请注意，Cn_Batch_Length的值不一定设置得太大。

作者：stotf

时间：2020年3月28日。

**/

createorreplaceffective f _ Imp _ Param(name invar char 2)returnvarchar 2 is

VC _ termvarchar 2(100)；-用于参数替换。

Vc _ ResultLong-返回查询结果。

VC _ sqlvarchar 2(4000)；-定义sql。

Cur _ KkSys _ Refcursor-参考光标。

cn _ Batch _ length constantpls _ integer :=300；-定义查询行数的最大值。

v _ NumNumber :=0；-行号

-定义列标题。

VC _ ParameterVarchar 2(100):=' PARAMETER '；

VC _ Session _ VaLueVarChar 2(100):=' Session _ VaLue '；

VC _ INSTANCE _ VaLueVarChar 2(100):=' INSTANCE _ VaLue '；

VC _ Is _ Session _ modifielablevarchar 2(100):=' Is _ Session _ modified '；

VC _ IS _ SYStem _ modifielablevarchar 2(100):=' IS _ SYStem _ modified '；

-记录列的最大实际长度。

TypeLength_ColIsRecord(

ParaNumber:=长度(Vc_Parameter)，

会话号：=长度(Vc_Session_Value)，

InstNumber:=长度(Vc_Instance_Value)，

Is _ Sess _ ModNumber:=长度(Vc _ Is _ Session _可修改)，

Is _ Sys _ ModNumber:=长度(Vc _ Is _ System _ modified))；

Rec _ LengthLength _ Col

-定义与查询列匹配的记录。

TypeRec_ResultIsRecord(

Parameter             X$ksppi.Ksppinm%Type,
    Session_Value         X$ksppcv.Ksppstvl%Type,
    Instance_Value        X$ksppsv.Ksppstvl%Type,
    Is_Session_Modifiable Varchar2(10),
    Is_System_Modifiable  Varchar2(10));
  --定义存放结果的table
  Type Tab_Result Is Table Of Rec_Result;
  Typ_Tab Tab_Result;
Begin
  --处理参数，如果开头没有加下划线，则加上
  If Substr(Name, 1, 1) = '_' Then
    Vc_Term := '/' || Lower(Name);
  Else
    Vc_Term := '/_' || Lower(Name);
  End If;
  Vc_Sql := 'Select a.Ksppinm "Parameter",
         b.Ksppstvl "Session Value",
         c.Ksppstvl "Instance Value",
         Decode(Bitand(a.Ksppiflg / 256, 1), 1, ''TRUE'', ''FALSE'') Is_Session_Modifiable,
         Decode(Bitand(a.Ksppiflg / 65536, 3),
                1,
                ''IMMEDIATE'',
                2,
                ''Deferred'',
                3,
                ''IMMEDIATE'',
                ''FALSE'') Is_System_Modifiable
    From X$ksppi a, X$ksppcv b, X$ksppsv c
   Where a.Indx = b.Indx
     And a.Indx = c.Indx
     And a.Ksppinm Like :name Escape ''/''';
  Open Cur_Kk For Vc_Sql
    Using Vc_Term || '%';
  --循环结果，找出每一列实际值的最大长度
  Fetch Cur_Kk Bulk Collect
    Into Typ_Tab Limit Cn_Batch_Length;
  For i In 1 .. Typ_Tab.Count Loop
    If Length(Typ_Tab(i).Parameter) > Rec_Length.Para Then
      Rec_Length.Para := Length(Typ_Tab(i).Parameter);
    End If;
    If Length(Typ_Tab(i).Session_Value) > Rec_Length.Sess Then
      Rec_Length.Sess := Length(Typ_Tab(i).Session_Value);
    End If;
    If Length(Typ_Tab(i).Instance_Value) > Rec_Length.Inst Then
      Rec_Length.Inst := Length(Typ_Tab(i).Instance_Value);
    End If;
    If Length(Typ_Tab(i).Is_Session_Modifiable) > Rec_Length.Is_Sess_Mod Then
      Rec_Length.Is_Sess_Mod := Length(Typ_Tab(i).Is_Session_Modifiable);
    End If;
    If Length(Typ_Tab(i).Is_System_Modifiable) > Rec_Length.Is_Sys_Mod Then
      Rec_Length.Is_Sys_Mod := Length(Typ_Tab(i).Is_System_Modifiable);
    End If;
  End Loop;
  Close Cur_Kk;
  Dbms_Output.Put_Line('总记录数：' || Typ_Tab.Count);
  --输出列头
  Vc_Result := 'NO    ' || Rpad(Vc_Parameter, Rec_Length.Para + 2, ' ') ||
               Rpad(Vc_Session_Value, Rec_Length.Sess + 2, ' ') ||
               Rpad(Vc_Instance_Value, Rec_Length.Inst + 2, ' ') ||
               Rpad(Vc_Is_Session_Modifiable,
                    Rec_Length.Is_Sess_Mod + 2,
                    ' ') || Rpad(Vc_Is_System_Modifiable,
                                 Rec_Length.Is_Sys_Mod + 2,
                                 ' ' || Chr(10));
  --输出记录
  For i In 1 .. Typ_Tab.Count Loop
    v_Num := v_Num + 1;
    --字符后连接一个空格的字符，防止null值对长度计算的影响
    Vc_Result := Vc_Result || Rpad(To_Char(v_Num), 6, ' ') ||
                 Rpad(Typ_Tab(i).Parameter || ' ', Rec_Length.Para + 2, ' ') ||
                 Rpad(Typ_Tab(i).Session_Value || ' ',
                      Rec_Length.Sess + 2,
                      ' ') || Rpad(Typ_Tab(i).Instance_Value || ' ',
                                   Rec_Length.Inst + 2,
                                   ' ') ||
                 Rpad(Typ_Tab(i).Is_Session_Modifiable || ' ',
                      Rec_Length.Is_Sess_Mod + 2,
                      ' ') || Rpad(Typ_Tab(i).Is_System_Modifiable || ' ',
                                   Rec_Length.Is_Sys_Mod + 2,
                                   ' ') || Chr(10);
  End Loop;
  Dbms_Output.Put_Line(Vc_Result);
  Return '总记录数：' || v_Num;
Exception
  When Others Then
    Return 'ERROR: ' || Sqlcode || Sqlerrm;
End;

到此，关于“怎么查看oralce隐含参数并在SQLPLUS窗口格式化输出”的学习就结束了，希望能够解决大家的疑惑。理论与实践的搭配能更好的帮助大家学习，快去试试吧！若想继续学习更多相关知识，请继续关注网站，小编会继续努力为大家带来更多实用的文章！