我正在尝试检查是否以某种特定格式给出了被插入到employee表中的登录名,即:严格给出了第一个字母-x,然后是5个字母和两个数字=> xlogin00。
CREATE OR REPLACE TRIGGER check_login
BEFORE INSERT OR UPDATE OF login ON employee
FOR EACH ROW
DECLARE
xlogin00 employee.login%TYPE;
prefix VARCHAR2(1);
name VARCHAR2(5);
number VARCHAR2(2);
BEGIN
xlogin00 := :new.login;
prefix := substr(xlogin00,1,1);
name := substr(xlogin00,2,5);
number := substr(xlogin00,7,2);
if(LENGTH(xlogin00) != 8) then
Raise_Application_Error (-20203, 'Error');
end if;
if(prefix != 'x') then
Raise_Application_Error (-20204, 'Error');
end if;
if NOT REGEXP_LIKE(name, '[^a-z]') then
Raise_Application_Error (-20204, 'Error');
end if;
if NOT REGEXP_LIKE(number, '[^0-9]') then
Raise_Application_Error (-20204, 'Error');
end if;
END;
在我的代码中似乎唯一起作用的是if(prefix != 'x')
。其他东西根本不起作用。我究竟做错了什么?
您只需检查一下即可完成所有操作:
IF NOT REGEXP_LIKE(:new.login, '^x[a-z]{5}\d\d$') THEN
Raise_Application_Error (-20204, 'Error');
请注意,您的布尔逻辑也被颠倒了:在最后两个测试中,您都有一个双重否定(NOT
在IF
和[^...]
的正则表达式中)。
请注意,在建议的正则表达式中^
,$
需要和来确保匹配与完整的登录值匹配,而不仅仅是子字符串。
本文收集自互联网,转载请注明来源。
如有侵权,请联系 [email protected] 删除。
我来说两句