SQL PL/SQL 설명 및 예제

※ PL/SQL

- 데이터베이스 응용 프로그램을 작성 시 사용하는 오라클의 SQL 전용 언어

- SQL문에 변수, 제어, 입출력 등 기능 추가하여 SQL 내 처리하기 어려운 문제 해결

 

※ PL/SQL 기본단위

1) DECLARE(선언부) : 실행에 사용될 변수, 상수, 커서 등 선언

2) BEGIN(실행부) : WHRJSANS, QKSQHRANS, DML 함수 등 정의

3) EXCEPTION(예외 처리부) : PL/SQL 실행 도중 발생하는 오류 해결

 

 

※ 변수의 자료형

- 특정 테이블의 열의 자료형이나 하나의 행 구조를 참조하는 자료형

- %TYPE : 열 참조

- %ROWTYPE : 행 참조 

- 변수이름 테이블이름.열이름%TYPE

 

※ 예외처리

- 예외 발생 시 메세지를 입력자가 원하는 대로 바꿈

- EXCEPTION : 예외 처리 영역

 

[예제들] - PL/SQL

--HELLO PL/SQL 출력
SET SERVEROUTPUT ON;
BEGIN
DBMS_OUTPUT.PUT_LINE('Hello, PL/SQL');
END;
 
 
-- 기본 변수 선언과 사용
-- 변수이름 자료형:= 값 또는 표현식;
DECLARE 
    V_EMPNO NUMBER(4):=7788;
    V_ENAME VARCHAR2(10);
BEGIN
    V_ENAME:='CONAN';
    DBMS_OUTPUT.PUT_LINE('V_EMPNO:' || V_EMPNO);
    DBMS_OUTPUT.PUT_LINE('V_ENAME:' || V_ENAME);
END;
 
 
-- 상수 정의하기 : CONSTANT
DECLARE 
    V_TAX CONSTANT NUMBER(1):=5;
BEGIN
    DBMS_OUTPUT.PUT_LINE('V_TAX:' || V_TAX);
END;
 
 
--변수의 기본값 지정하기 : DEFAULT 
DECLARE
    V_DEPTNO NUMBER(2) DEFAULT 10;
BEGIN
    DBMS_OUTPUT.PUT_LINE('V_DEPTNO:' || V_DEPTNO);
END;
 
 
--변수에 NULL값 저장 막기 : NOT NULL
DECLARE 
    V_DEPTNO NUMBER(2) NOT NULL:=10;
BEGIN
    DBMS_OUTPUT.PUT_LINE('V_DEPTNO:' || V_DEPTNO);
END;
 
 
-- 상수 정의하기
DECLARE 
    V_TAX CONSTANT NUMBER(1):=5;
BEGIN
    DBMS_OUTPUT.PUT_LINE('V_TAX:' || V_TAX);
END;
 
 
------------------------------------------------------
 
--변수의 자료형 1) (열 참조 : %TYPE, 행 챀조 : %ROWTYPE)
DECLARE
     V_DEPTNO DEPT.DEPTNO%TYPE:=50;
BEGIN
    DBMS_OUTPUT.PUT_LINE('V_DEPTNO:' || V_DETPNO);
END;
 
 
--변수의 자료형 2)
DECLARE
    V_DEPT_ROW DEPT%ROWTYPE;
BEGIN
    SELECT DEPTNO, DNAME, LOC INTO V_DEPT_ROW
    FROM DEPT
    WHERE DEPTNO = 40;
    DBMS_OUTPUT.PUT_LINE('DEPTNO :' || V_DEPT_ROW.DEPTNO);
    DBMS_OUTPUT.PUT_LINE('DNAME :' || V_DEPT_ROW.DNAME);
    DBMS_OUTPUT.PUT_LINE('LOC :' || V_DEPT_ROW.LOC);
END;
 
 
 
-- CASE 조건문
DECLARE 
    ismale NUMBER(1);
BEGIN 
    ismale:=&성별;
 
    CASE ismale
        WHEN 1 THEN DBMS_OUTPUT.PUT_LINE('남자');
        WHEN 2 THEN DBMS_OUTPUT.PUT_LINE('여자');
        ELSE DBMS_OUTPUT.PUT_LINE('Third Thing');
    END CASE;
END;
 
 
 
--LOOP(1)
DECLARE
    i NUMBER:=0;
BEGIN
    LOOP
    DBMS_OUTPUT.PUT_LINE(i);
    IF i>10 THEN
        EXIT;
    END IF;
    i:=i+1;
    END LOOP;
END;
 
--LOOP(2)
DECLARE
    i NUMBER:=0;
BEGIN
    LOOP
    DBMS_OUTPUT.PUT_LINE(i);
    EXIT WHEN i>10;
    i:=i+1;
    END LOOP;
END;
 
 
--WHILE
DECLARE
    i NUMBER:=0;
BEGIN
    WHILE i<10 LOOP
    DBMS_OUTPUT.PUT_LINE(i);
    i:=i+1;
    END LOOP;
END;
 
 
--FOR
DECLARE 
    i NUMBER:=0;
BEGIN
    FOR i IN REVERSE 1..10 LOOP
    DBMS_OUTPUT.PUT_LINE(i);
    END LOOP;
END;
 
 
--예외처리
DECLARE 
    V_NUM NUMBER;
BEGIN
    V_NUM:=10/&분모;
EXCEPTION
    WHEN ZERO_DIVIDE THEN
    DBMS_OUTPUT.PUT_LINE('0이외의 다른 값을 입력하시오');
    WHEN OTHERS THEN
        DBMS_OUTPUT.PUT_LINE('딴 오류 발생..');
END;
 
SELECT * FROM SALGRADE;