************** 부서/직원 리포트 ******************

부서 : 부서번호       부서명             위치

        10         ACCOUNTING        NEW YORK

사원 : 사번     이름         급여          급여 등급

       7871    Anderson    2000         ***   
      7890    Andrew       700         * 
      7870    Scott       2400         **** 
      7866    David        900         * 
      7891    Sylvia      3200         *****

2명의 급여가 인상되었습니다.


위와 같은 리포트를 뽑아내고 $1000보다 적은 급여를 받는 직원의 급여를 10%인상하는 프로그램을 작성하여 봅니다.

ACCEPT p_deptno PROMPT 'Please enter the department number : '

DECLARE

   v_deptno    NUMBER(2);

   v_dname     CHAR(14);

   v_loc       CHAR(13);

   v_empno     emp.empno%TYPE;

   v_ename     emp.ename%TYPE;

   v_sal       emp.sal%TYPE;

   v_grade     salgrade.grade%TYPE;

   v_dno       emp.deptno%TYPE := &p_deptno;

   CURSOR emp_cursor IS

          SELECLT empno, ename, sal

          FROM emp

          WHERE deptno = &p_deptno;

   e_no_emp    EXCEPTION;

BEGIN

   -- print out the report title

   DBMS_OUTPUT.PUT_LINE('*********부서/직원 리포트*********');

   SELECT  deptno, dname, loc

      INTO v_deptno, v_dname, v_loc

      FROM dept

      WHERE   deptno = v_dno;

   DBMS_OUTPUT.PUT_LINE('부서 :  부서번호   부서명        위치');

   DBMS_OUTPUT.PUT_LINE('     '∥v_deptno∥'    '∥v_dname∥
                        '   '∥v_loc∥'   ');

   DBMS_OUTPUT.PUT_LINE('사원 : 사번   이름   급여    급여등급');

   OPEN emp_cursor;

   FETCH emp_cursor INTO v_empno, v_ename, v_sal;

   /* according to the salary amount,

      print out the stars */

   WHILE emp_cursor%FOUND LOOP

      SELECT grade

         INTO v_grade

         FROM salgrade

         WHERE v_sal > losal AND v_sal <hisal;

      DBMS_OUTPUT.PUT('      '∥v_empno∥'   '∥v_ename∥
                      '      '∥v_sal∥'     ');

      FOR I in 1..v_grade LOOP

         DBMS_OUTPUT.PUT('*');

      END LOOP;

      DBMS_OUTPUT.PUT_LINE('');

      FETCH emp_cursor INTO v_empno, v_ename, v_sal;

   END LOOP;

   CLOSE emp_cursor;

   UPDATE emp

      SET     sal = sal * 1.1

      WHERE   sal < 1000;

   IF SQL%ROWCOUNT = 0 THEN

      RAISE e_no_emp;

   ELSE

      DBMS_OUTPUT.PUT_LINE(SQL%ROWCOUNT ∥'명의 급여가 ' ||
                           '인상되었습니다.');

   END IF;

   COMMIT;

EXCEPTION

   WHEN no_data_found THEN

      DBMS_OUTPUT.PUT_LINE('There is no matching data.');

   WHEN too_many_rows THEN

      DBMS_OUTPUT.PUT_LINE('More than one matching data. ');

   WHEN e_no_emp THEN

      DBMS_OUTPUT.PUT_LINE('No employee with a smaller ' ||
                           'than  $1000.');

   --in case of any other exception

   WHEN others THEN

      DBMS_OUTPUT.PUT_LINE('Some other error occurred.');

END;  

 

IF 문장

   PL/SQL IF 문장 구조는 다른 절차적인 언어의 IF 문장구조와 유사합니다.
   이것은 PL/SQL이 조건에 따라 선택적으로 작업을 수행할 수 있도록 해 줍니다.
   구문에서
    
        condition              부울 변수 또는 표현식입니다 (TRUE, FALSE,또는 NULL).
                                    이것은 IF 표현식이 TRUE를 생성할 때만 일련의 문장들을
                                    실행하도록 합니다.                                              
    
        THEN                    다음에 나오는 문장들과 그것에 선행되는 부울 표현식을  
                                    관련시키는 절입니다.                                            
    
        statements           하나 이상의 PL/SQL 또는 SQL문장이 될 수 있습니다.
                                    그것들은 몇 개의 중첩 IF, ELSE와 ELSIF를 포함하는 IF문장을
                                    포함할 수 있습니다.
    
        ELSIF                    부울식이 다시 나오게 하는 키워드입니다. 처음의 조건이 FALSE                                     또는NULL을 생성하고  이때 ELSIF 키워드는 추가적인 조건을                                     작성하도록 합니다.     
    
        ELSE                    위의 조건들을 다 만족시키지 못하였을 때 다음의 문장들이
                                    수행됩니다.

 

예

   종업원 이름이 King이라면 관리자로 작업을 설정합니다. 종업원 이름이 King이 아니면    Clerk으로 설정합니다.
 

IF v_ename = 'KING' THEN
  v_job := 'MANAGER';
ELSE
  v_job := 'CLERK';
END IF;

IF-THEN-ELSIF 문장

   가능하면, 중첩 IF 문장 대신에  ELSIF  절을 사용합니다. 코드를 읽고  이해 하기가 더    쉬우 며 로직은 정확하게 식별됩니다. ELSE 절 안의 작업이 순수하게 다른 IF 문장으로    구성된다면, 이것은 ELSIF 절을 사용하는 것이 더욱 편리합니다.  조건과 수행이 각각    종료시에 중첩 END  IF에 대해 일일이 요구하지 않음으로써 코드를 더 명확하게 만들어    줍니다.

예
 

IF condition1 THEN
  statement1;
ELSIF condition2 THEN
  statement2;
ELSIF condition3 THEN
  statement3;
END IF;

   위의 IF-THEN-ELSIF 문장 예는 다음과 같이 더 자세히 정의됩니다:
입력된 주어진 값에 대해, 계산 값을 리턴합니다. 입력 값이 100이상이면, 이때 계산 값은 입력 값의 두 배가 됩니다.   입력 값이 50과 100사이라면, 계산 값은 시작값의 50%가 되고, 입력값이 50 미만이면 계산값은 시작값의 10%가 됩니다.

주: null 값을 포함하는 임의의 수 표현식은 null로 평가합니다.

 

비교 연산자와 부울 조건

   논리 연산자 AND, OR,  NOT을 가지고 단순한 부울 조건을 조합함으로써 복잡한 부울    조건을 구축할 수 있습니다.   슬라이드에 보여진 논리 테이블에서,  FALSE  는  AND    조건에 대해 우선순위를 갖고 TRUE는 OR 조건에  대해 우선순위를 갖습니다. AND 는    양쪽 연산자가 TRUE일 경우에만 TRUE를 반환합니다. OR 은 양쪽 연산자가 FALSE일    경우만 FALSE를 반환합니다.NULL AND TRUE는 첫 번째 연산자가 TRUE로 평가되는지    아닌지 알려지지 않았기 때문에 항상 NULL로 평가됩니다.

   주:  NULL의 부정(NOT NULL)은 null 값들이 모호하기 때문에 null 값이 됩니다.

 

논리 조건 구축

   AND 로직 테이블은 위의 슬라이드에서 부울 조건에 대한 가능성을 평가하는데 도움을    줄 수 있습니다.

반복적인 제어 : LOOP 문장

   PL/SQL  은 문장 또는 일련의 문장들을 반복하기 위해 루프를 구조화하기 위한 많은    편의를 제공합니다.
   루프문은  제어 구조의 두 번째 유형입니다.

     자세한 내용은

     PL/SQL User's Guide and Reference, Release 7.3 또는 8.0, “Control     Structures”를 참조하십시오.

   주 : FOR LOOP의 다른 타입, 커서 FOR LOOP 는 후속 장에서 논합니다.

 

기본 루프

    LOOP 와  END LOOP  키워드 사이에 일련의 문장들을 포함하는  LOOP  문장의 가장    단순한 형태는 기본(또는 basic) 루프입니다. 실행 흐름의 END LOOP 문장에 도달할 때    마다,  제어는 해당  LOOP  문장으로 되돌려 줍니다.  기본 루프는 루프에 들어갈 때    조건이 이미  일치했다 할지라도 적어도 한번은 문장이 실행됩니다.

EXIT 문장

   EXIT 문장을 사용하여 루프를 종료할 수 있습니다. 제어는 END LOOP 문장 후의 다음    문장으로 전달됩니다.   IF 문장 내에서의 문장으로서 또는 ,루프 내에 있는 독립적인    문장으로 서  EXIT를 사용할 수 있습니다. EXIT 문장은 루프 내부에 위치해야 합니다.    후자인 경우에 ,  루프의 조건적인  종료를  허용하기  위해   WHEN  절을  첨부할  수    있습니다.  EXIT 문장에 직면할 때는, WHEN 절에서 조건이 평가됩니다. 조건이    TRUE 를 리턴하면, 루프는  끝나고 루프 후의 다음 문장으로 제어를 전달합니다. 기본    루프는 복수 EXIT 문장을 포함할 수 있습니다.

기본 루프

   슬라이드에서 보여 준 기본 루프 예는 다음과 같이 정의됩니다.

   주: 기본 루프는 조건이 루프 안에 들어갈 때 만족되었다 할지라도 적어도 한번은 그         문장을 실행합니다.

 

FOR 루프는 기본 루프와 동일한 일반 구조를 가집니다. 그리고, PL/SQL이 수행할 반복되는 수를 정하기 위해 LOOP 키워드의 앞에 제어 문장을 사용합니다.

구문에서,

        counter             상단이나 하단 바운드에 도달할 때까지 루프를 계속 반복함으로써                                  1씩 자동적으로 증가되거나 감소되는(감소는 REVERSE 키워드가  
                                 사용된다면)값을 가진 암시적으로 선언된 정수입니다.
        
         REVERSE         상단 바운드에서 하단 바운드까지 반복함으로써 인덱스가 감소되
                                 도록 합니다. 하위 값(하단 바운드)는 여전히 처음에 참조됨을 주의
                                 하십시오.

        lower_bound     인덱스 값의 범위에 대한 하단 바운드를 지정합니다.

        upper_bound    인덱스 값의 범위에 대한  상단 바운드를 지정합니다.

카운터를 선언하지 마십시오. 이것은 정수로 암시적으로 선언됩니다.

주: 일련의 문장들은 두 바운드에 의해 카운터가 결정되고 증가될 때마다 실행됩니다. 루프 범위의 하단 바운드와 상단 바운드는 리터럴, 변수, 표현식이 될 수 있지만 정수로 평가해야 합니다. 루프 범위 하단 바운드가 상단 바운드보다 더 큰 정수를 평가한다면, 일련의 문장들은 실행되지 않습니다. 예를 들면, 다음에서 문장은 한번만 실행됩니다.
 

FOR i IN 3..3 LOOP statement1; END LOOP;

FOR 루프

주: LOOP 문장의 하단과 상단 바운드는 꼭 숫자 리터럴이 될 필요가 없습니다. 그것들은 숫자값으로 변환되는 표현식이 될 수도 있습니다.

예 

DECLARE
  v_lower   NUMBER := 1;
  v_upper   NUMBER := 100;
BEGIN
  FOR i IN v_lower..v_upper LOOP
  . . .
  END LOOP;
END;

WHILE 루프

   제어  조건이 더 이상  TRUE 가 아닐 때까지  일련의 문장들을 반복하기 위해  WHILE   루프를 사용할 수 있습니다. 조건은 반복이 시작될 때에 평가됩니다. 루프는 조건이    FALSE일 때 종료됩니다. 루프를 시작할 때 조건이 FALSE라면 , 이때는 더 이상 반복을    수행하지 않습니다
 
   구문에서,

       condition         부울 변수 또는 표현식입니다 (TRUE, FALSE, 또는 NULL).

       statement         하나 또는 그 이상의 PL/SQL 또는  SQL 문장이 될 수 있습니다.

조건 안에 포함된 변수가 루프의 안에서 변경될 수 없다면 이때 조건은 TRUE 를 계속 유지하고 루프는 종결되지 않습니다.

주: 조건이  NULL을 리턴하면, 루프는 실행되지 않고 다음 문장으로 제어를 전달합니다.

 

WHILE 루프

슬라이드 예에서 양(quantity)이 항목에서 소비로 허용된 최대 가격보다 더 이상 적지 않을 때까지 양(quantity)은 루프가 계속 반복되면서 증가합니다.

 

중첩 루프와 레이블

여러 단계로 루프를 중첩할 수 있습니다. WHILE 루프 내에서 FOR 루프를, FOR 루프 내에서 WHILE 루프를 중첩할 수 있습니다. 대개 중첩 루프가 종결되면 예외가 발생하지 않는 한 둘러싸는 루프가 종결되지 않습니다. 레이블 명은 다른 식별자들과 동일한 규칙을 따릅니다. 레이블은 같은 라인 또는 다음 라인에서 문장 앞에 위치됩니다. 레이블 구분 문자(<<label>>) 안에 LOOP라는 글자 앞에 레이블을 위치시킴으로서 루프를 레이블시킵니다. 루프가 레이블이 되면 END LOOP 문장 후에 루프 이름을 선택적으로 쓸 수 있습니다.

 

X 정답:A


X 정답:A