Procedure之简单的Check 信息

Procedure之简单的Check 信息

 

---Parameter list
create or replace procedure CHECK_MAIL_ADDRESS(USER_ID IN VARCHAR2,RES OUT VARCHAR2) AS 
---declaration 
 EMAIL VARCHAR2(50);
---Code
begin
    SELECT E.EMAIL
    INTO EMAIL
    FROM EEP.USERS E
   WHERE E.USERID = USER_ID;
     
  RES := EMAIL;
---Exception
EXCEPTION
  WHEN OTHERS THEN
    RES := ' NO Mail Address';
  
end CHECK_MAIL_ADDRESS;