BEGIN
     FOR cur_count IN (SELECT ename FROM emp)
     LOOP
         DBMS_OUTPUT.put_line(cur_count.ename);    
     END LOOP;
END;
 

DECLARE
       fn_result NUMBER;
   --함수를 정의 한다. 
   --스크립트이므로 사용할 함수를 미리 정의해야 한다. 
   FUNCTION iifn(boolean_expression IN BOOLEAN, true_number IN NUMBER, false_number IN NUMBER)
   RETURN NUMBER 
   IS
   BEGIN
        IF boolean_expression THEN
           RETURN true_number;
        ELSIF NOT boolean_expression THEN
            RETURN false_number;
        ELSE
             RETURN NULL;
        END IF;
   END;
BEGIN
   fn_result := iifn(2 > 1, 1, 0);
   DBMS_OUTPUT.put_line(fn_result);
END;
 

DECLARE
     f_num NUMBER;
     s_num NUMBER;
   --입력된 숫자를 뒤바꾸는 프로시저
   PROCEDURE swapn(num_one IN OUT NUMBER, num_two IN OUT NUMBER)   IS
             temp_num NUMBER;
   BEGIN
        temp_num := num_one;
        num_one := num_two;
        num_two := temp_num;
   END;
BEGIN
    f_num := 10;
    s_num := 20;
    swapn(f_num, s_num);
    DBMS_OUTPUT.put_line('First Number = ' || TO_CHAR(f_num));
    DBMS_OUTPUT.put_line('Second Number = ' || TO_CHAR(s_num));
END;
 

--날짜중에 월만 가져오게 하는 함수
--예외처리는 공부목적으로 해 놓았다. 
CREATE OR REPLACE FUNCTION fn_return_month(hiredate IN DATE)
RETURN VARCHAR2
AS
BEGIN
     DECLARE 
             h_date VARCHAR2(10);
             plsql_err EXCEPTION;
     BEGIN
          h_date := TO_CHAR(TRUNC(hiredate), 'yyyy-mm-dd');
          IF h_date LIKE '____-__-__' THEN
               RETURN SUBSTR(h_date, 6, 2);
          ELSE
              RAISE plsql_err;
          END IF;
     EXCEPTION
              WHEN plsql_err THEN
                   DBMS_OUTPUT.put_line('날짜 형식이 일치하지 않습니다. yyyy-mm-dd 형식으로 맞춰주십시오'); 
     END;
END;
--SELECT fn_return_month(SYSDATE) FROM dual;
 

--사장은 사업이 잘되어 전 사원에게 월급의 30%를 성과금으로 주기로 했다.
--emp.sal 컬럼이 언제 변할지 모르므로 %type형으로 선언하였다. 
CREATE OR REPLACE FUNCTION ufn_stock_option(sal emp.sal%TYPE, sal_percent IN NUMBER )
RETURN emp.sal%TYPE
AS
BEGIN
     RETURN sal * sal_percent*0.01;
END;
--SELECT empno, ename, ufn_stock_option(sal, 30) "stock option" FROM emp;