create table t1 as select sql_text from v$sqlarea;
alter table t1 add sql_text_wo_constants varchar2(1000);
create or replace function
remove_constants( p_query in varchar2 ) return varchar2
as
l_query long;
l_char varchar2(1);
l_in_quotes boolean default FALSE;
begin
for i in 1 .. length( p_query )
loop
l_char := substr(p_query,i,1);
if ( l_char = '''' and l_in_quotes )
then
l_in_quotes := FALSE;
elsif ( l_char = '''' and NOT l_in_quotes )
then
l_in_quotes := TRUE;
l_query := l_query || '''#';
end if;
if ( NOT l_in_quotes ) then
l_query := l_query || l_char;
end if;
end loop;
l_query := translate( l_query, '0123456789', '@@@@@@@@@@' );
for i in 0 .. 8 loop
l_query := replace( l_query, lpad('@',10-i,'@'), '@' );
l_query := replace( l_query, lpad(' ',10-i,' '), ' ' );
end loop;
return upper(l_query);
end;
/
update t1 set sql_text_wo_constants = remove_constants(sql_text);
commit;
that's all the using this function.and you can execute this statement to find whether your application have not used the bind variables.
select count(*),sql_text_wo_constants from t1 group by sql_text_wo_constants;
来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/14730395/viewspace-678343/,如需转载,请注明出处,否则将追究法律责任。
转载于:http://blog.itpub.net/14730395/viewspace-678343/
本文介绍了一种通过去除SQL语句中的常量值来创建更通用查询的方法,并提供了一个PL/SQL函数示例。该函数能移除SQL文本中的常量,使SQL语句更加通用,便于进行模式匹配及查询分析。

被折叠的 条评论
为什么被折叠?



