在 Oracle 11G 中检查字符串中的数字和字符

Question

我正在做某事。我必须检查一个字符串以进行验证。这个字符串有一个国家代码和一个大学代码（来自他们自己在数据库中的表）和一堆数字。现在我需要验证这个字符串。我需要检查国家代码和大学代码上的这个字符串，如果它有数字是或否。

目前我已经尝试了很多东西。我尝试使用很多 if 语句、regexp_like、instr、substr、select 语句等。但我无法检查字符串的国家和大学代码（以及是否有匹配的数字）。

我现在的代码如下：

create or replace function checkForCorrectness (
  isin varchar2)
return integer
as
  isCorrect integer := 0;
  checkISIN varchar2(50);
  checkCountryCode country.code%type;
  checkUniversityCode university.code%type;

  e_onbekendeLandCode exception;
  e_onbekendeUniCode exception;
  e_lengteNummer exception;
begin
 --checkISIN := isin;
 /*
 if checkISIN like '%NL%'
 then dbms_output.put_line('Beschikt over een landcode');
  if checkISIN like '%KTU%'
   then dbms_output.put_line('Beschikt over een universiteit code');
    if checkISIN like ''
     then dbms_output.put_line('Beschikt over een nummerreeks');
   end if;
  end if;
 end if;
 */
 --select isin
 --into checkISIN
 --from dual
 --where regexp_like(checkISIN, '^[[:digit:]]+$');
 isin := regexp_like(isin, '[[:digit:]]');
 dbms_output.put_line(checkISIN);

  return isCorrect;

exception
 when e_lengteNummer
 then dbms_output.put_line('Foutmelding: Nummereeks is kleiner dan 9');

 when e_onbekendeLandCode
 then dbms_output.put_line('Foutmelding: Landcode is niet geldig of bestaat niet');

 when e_onbekendeUniCode
 then dbms_output.put_line('Foutmelding: Universiteit code is niet geldig of bestaat niet');

end checkForCorrectness;
/
show errors function checkForCorrectness
/*
begin
 dbms_output.put_line(checkForCorrectness('NL 4633 4809 KTU'));
end;

现在我很困惑，我什至不知道该怎么办了。我希望你们中的一些人可以帮助我。

长话短说。我得到了这个检查值（以及更多）：

ASSERT_EQUALS(checkForCorrectness('NL 4633 4809 KTU'),1);
ASSERT_EQUALS(checkForCorrectness('NL 4954 2537 7808 MSM'),1);

输入是一个字符串，其中包含国家代码 (NL)、数字 (4633 4809) 和大学代码 (KTU)。如果结果为真或通过验证，则返回 1，否则返回 0。

希望我的问题不要太含糊。

如果有人可以向我解释我需要制作/采取什么样的功能和步骤，那就太棒了

提前致谢

Answer 1

可能下面的 sql 块代码将有助于获得您想要的输出......

set serveroutput on
Declare
  vStr Varchar2(100);
  iB Number := 0;
Begin
  vStr := 'NL 4633 4809 KTU';

  select distinct 1
  into iB
  from country where name = Substr(vStr,1,2);

  if iB = 1 then
    dbms_output.put_line('country is legit');
  end if;

  select distinct 1
  into iB
  from university where name = Substr(vStr,length(vStr)-2,3);

  if iB = 1 then
    dbms_output.put_line('uni. is legit');
  end if; 

End;
/

Answer 2

好的，我不太清楚您在做什么，但是也许以下内容可能会有所帮助。从数据创建表

create table mytable as select 'NL 4633 4809 KTU' txt from dual;

您可以使用正则表达式将单词分成几列

SELECT  REGEXP_SUBSTR (txt, '[^ ]+', 1, 1)    AS part_1
,       REGEXP_SUBSTR (txt, '[^ ]+', 1, 2)    AS part_2
,       REGEXP_SUBSTR (txt, '[^ ]+', 1, 3)    AS part_3
,       REGEXP_SUBSTR (txt, '[^ ]+', 1, 4)    AS part_4
FROM    mytable;

这将为您提供 4 列，并将您的单词分开。

part1 part2 part3 part4
NL 4633 4809 KTU

或者您可以使用带有 connect by 语句的正则表达式来将您的单词转换为行。

select REGEXP_SUBSTR (txt, '[^ ]+', 1, level) val from mytable connect by level <= regexp_count(txt,' ') + 1;

这会给你四行

NL
4633
4809
KTU