declare
pass_error1 EXCEPTION;
pass_error4 EXCEPTION;
pass_error8 EXCEPTION;
pass_w varchar2(2000) := '&password';
begin
if length(pass_w)>=4 then
if length (pass_w)<=8 then
if ascii(substr(pass_w,1,1))<=123' then
else
raise pass_error1;
end if;
else
raise pass_error8;
end if;
else
RAISE pass_error4;
end if;
exception
WHEN pass_error4 THEN
dBMS_OUTPUT.PUT_LINE('비밀번호가 4자리 이하 입니다.');
when pass_error8 then
dBMS_OUTPUT.PUT_LINE('비밀번호가 8자리 이상입니다.');
when pass_error1 then
dBMS_OUTPUT.PUT_LINE('비밀번호 첫글자가 알파벳이 아닙니다');
end;
/