Advertisement
Guest User

Untitled

a guest
Feb 1st, 2019
77
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
PL/SQL 0.81 KB | None | 0 0
  1. CREATE OR REPLACE FUNCTION            getEmail(
  2. pidm int,
  3. emalCode1 VARCHAR2,
  4. emalCode2 VARCHAR2,
  5. emalCode3 VARCHAR2,
  6. prefInd VARCHAR2 -- does nothing
  7. )
  8.     RETURN VARCHAR2 IS
  9.     v_pidm int;
  10.     v_email VARCHAR2(256);
  11.     v_pref VARCHAR2(2);
  12.  
  13.  
  14.     BEGIN
  15.         IF prefInd = 'Y' THEN
  16.             v_pref := 'Y';
  17.         ELSE
  18.             v_pref := '%';
  19.         END IF;
  20.  
  21.         SELECT goremal_email_Address INTO v_email FROM
  22.         (
  23.         SELECT goremal_email_address
  24.             FROM
  25.                 goremal
  26.             WHERE goremal_pidm = pidm
  27.                 AND goremal_status_ind = 'Y'
  28.                 AND goremal_preferred_ind LIKE v_pref
  29.             ORDER BY DECODE(goremal_emal_code,emalCode1,1,emalCode2,2,emalCode3,3,99) ASC
  30.         ) WHERE ROWNUM = 1;  
  31.         RETURN v_email;
  32.     END;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement