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

Question

我正在做某事。 我必须检查一个字符串以进行验证。 该字符串具有国家代码和大学代码（来自数据库中自己的表）和一堆数字。 现在，我需要验证此字符串。 我需要检查国家/地区代码和大学代码上的此字符串，以及是否包含数字yes或no。

目前，我已经尝试了很多方法。 我尝试使用很多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）。 如果结果为true或经过验证，则返回1，否则返回0。

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

如果有人可以向我解释我需要执行/执行的功能和步骤，那将很棒

提前致谢

Answer 1

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

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

或者您可以将regexp与connect by语句一起使用，以将单词变成行。

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

这会给你四行

NL
4633
4809
KTU

Answer 2

可能低于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;
/