【发布时间】：2014-02-14 13:16:33
【问题描述】：
全部，
虽然我对 SQL 并不陌生，但已经有很长一段时间了，而且我对 Oracle 还是很陌生。另请注意，我知道我这样做的方式可能是最慢的解决方案，但正如我所说，我是新手，它适用于我需要测试的 1000 个左右的项目。问题是它确实有效，所以我想扩展它以测试 1,000,000 个，我知道这是一头驴而不是赛马。
有一个小任务要“标准化”公司名称列表，所以我创建了一个包含已知缩写的表格
Col1 Col2 Col3 Col4 …. Col14
Company Co Cmpy
Limited Ltd Lim LMT
Etc
然后我编写了一个函数来选择这个表到一个游标中，并为每个发送给它的名称循环遍历它，并将任何“NON”标准缩写替换为 Col 1 中的缩写，使用以下代码：
我一直在考虑的是重写代码（显然）并将其放入一个包中，因为我相信与现在相比，这应该会带来相当大的速度和清晰度。
我遇到的问题并不是真正改进函数的循环部分，而是我需要从调用此函数的 Select 中做些什么，以确保它只加载一次 STD_GBR_CO_SUFFIX 并重新使用光标。
我一直在阅读 O'Reilly 的一些内容，我认为我想做的事情是可能的，我只是不知道如何做。
我想我需要把它放在一个包中，并使用一个 REF 光标，BULK LOAD 看起来是一个竞争者，但我读得越多，我就越困惑。 如果那里有人可以指出我正确的方向，我可以从那里继续。我不希望有人只写解决方案我想学习如何更好地做到这一点而不是为我完成。
提前感谢大家的帮助。
所以如果我做一个
Select Standardise_Company_Suffix(company_name) AS STD_Company_Name
From VERY_LARGE_TABLE
CREATE OR REPLACE Function Standardise_Company_Suffix(Co_Name IN VARCHAR2)
RETURN varchar2 IS
stg_Co_Name varchar2(400 byte);
fmt_S varchar2(20 byte);
fmt_E varchar2(20 byte);
parse_Str varchar2(2400 byte);
parse_char varchar2(4 byte);
CURSOR C1 IS
-- Populate Cursor with Table of Suffixes
select * from STD_GBR_CO_SUFFIX;
BEGIN
parse_char := "s";
Fmt_S := '(^|\'||parse_char||')';
Fmt_E := '(\'||parse_char||'|$)';
stg_Co_Name := upper(co_name);
parse_str := ' ';
FOR c1pass IN C1 LOOP
parse_str :='';
If c1pass.column14 is not null then parse_str := parse_str||'|'||Fmt_S||Upper(c1pass.column14)||Fmt_E; End If;
If c1pass.column13 is not null then parse_str := parse_str||'|'||Fmt_S||Upper(c1pass.column13)||Fmt_E; End If;
If c1pass.column12 is not null then parse_str := parse_str||'|'||Fmt_S||Upper(c1pass.column12)||Fmt_E; End If;
If c1pass.column11 is not null then parse_str := parse_str||'|'||Fmt_S||Upper(c1pass.column11)||Fmt_E; End If;
If c1pass.column10 is not null then parse_str := parse_str||'|'||Fmt_S||Upper(c1pass.column10)||Fmt_E; End If;
If c1pass.column9 is not null then parse_str := parse_str||'|'||Fmt_S||Upper(c1pass.column9)||Fmt_E; End If;
If c1pass.column8 is not null then parse_str := parse_str||'|'||Fmt_S||Upper(c1pass.column8)||Fmt_E; End If;
If c1pass.column7 is not null then parse_str := parse_str||'|'||Fmt_S||Upper(c1pass.column7)||Fmt_E; End If;
If c1pass.column6 is not null then parse_str := parse_str||'|'||Fmt_S||Upper(c1pass.column6)||Fmt_E; End If;
If c1pass.column5 is not null then parse_str := parse_str||'|'||Fmt_S||Upper(c1pass.column5)||Fmt_E; End If;
If c1pass.column4 is not null then parse_str := parse_str||'|'||Fmt_S||Upper(c1pass.column4)||Fmt_E; End If;
If c1pass.column3 is not null then parse_str := parse_str||'|'||Fmt_S||Upper(c1pass.column3)||Fmt_E; End If;
If c1pass.column2 is not null then parse_str := parse_str||'|'||Fmt_S||Upper(c1pass.column2)||Fmt_E; End If;
Parse_str := substr(parse_str,2);
If regexp_instr(stg_Co_Name,parse_str) <> 0 Then
stg_Co_Name := regexp_REPLACE(stg_Co_Name,parse_str,
' $'||UPPER(c1pass.column1||'$ '));
Else
stg_Co_Name := stg_Co_Name;
End if;
END LOOP;
return stg_Co_Name;
End;
/
【问题讨论】：
标签： oracle function plsql ref-cursor