Re: 문제99.(오늘의 마지막 문제) 우리반에 domain 이라는 컬럼을 추가하고 해당 학생의...

[17기_김준혁]

DECLARE
     CURSOR  emp17_cursor  IS
        SELECT  ename, email, domain
           FROM  emp17;

     emp17_record     emp17_cursor%ROWTYPE;
     v_domain         VARCHAR2(10);

BEGIN
     OPEN  emp17_cursor;
     LOOP
        FETCH  emp17_cursor  INTO  emp17_record;
        EXIT  WHEN  emp17_cursor%NOTFOUND;

        IF  SUBSTR(emp17_record.email, INSTR(emp17_record.email, '@')+1) = 'gmail.com' THEN
            v_domain := 'gmail';
        ELSIF SUBSTR(emp17_record.email, INSTR(emp17_record.email, '@')+1) = 'naver.com' THEN
            v_domain := 'naver';

        END  IF;

        UPDATE  emp17
           SET  domain = v_domain
           WHERE  ename = emp17_record.ename;
     END  LOOP;
     CLOSE  emp17_cursor;
END;
/