오라클 DBMS 정리 09

DECLARE
    변수선언
BEGIN
    코드작성
END;
/

-- 콘솔 출력설정
SET serveroutput ON

-- 출력함수
-- 출력 후 줄을 변경해줌(/n)
DBMS_OUTPUT.PUT_LINE(출력할내용);

-- 출력 후 줄을 안바꿈
DBMS_OUTPUT.PUT(출력할내용);

-- 출력할 내용은 변수, '문자열', 연산식 등이 올 수 있음
-- '||'를 사용해서 변수나 문자열들을 붙여 출력 가능

-- 출력설정
SET serveroutput ON

DECLARE
-- 변수선언
    var VARCHAR2(15);

BEGIN
-- 코드작성
    SELECT '안녕 PL/SQL' INTO var
    FROM DUAL;

-- 출력함수
DBMS_OUTPUT.PUT_LINE(var);
DBMS_OUTPUT.PUT_LINE('hello PL/SQL');

END;
/

DECLARE
   -- 변수 선언
   변수명 테이터형(크기);
   변수명 데이터형(크기) := 초기값;
BEGIN
   -- 값 할당
   변수명 := 값;

   -- 값 사용
   변수명 := 또다른변수명;
   DBMS_OUTPUT.PUT_LINE(변수명);
   DBMS_OUTPUT.PUT_LINE(3 + 변수명);
END;

SET serveroutput ON

DECLARE
-- 1. 변수 선언 : 변수명 데이터형(크기);
    name1 VARCHAR2(60);
    name2 VARCHAR2(60);
    temp VARCHAR2(60);

BEGIN
-- 2. 값 할당 : 변수명 := 값;
    name1 := '오영영';
    name2 := '손솔솔';
    temp := name1;
    name1 := name2;
    name2 := temp;

-- 3. 사용 : 출력, 연산참여, 재할당
    DBMS_OUTPUT.PUT_LINE('name1 : '||name1);
    DBMS_OUTPUT.PUT_LINE('name2 : '||name2);
END;

DECLARE
-- 컬럼 하나를 참조
    참조변수명 테이블명.컬럼명%TYPE := 값;

-- 테이블의 모든 컬럼 참조(RECORD TYPE)
    레코드변수명 테이블명%ROWTYPE;
BEGIN
    변수명 := 값;
    레코드타입변수명.컬럼명 := 값;
...

DECLARE
-- 테이블의 컬럼을 참조하여 변수를 만들 수 있다
    e_name emp.ename%TYPE;
BEGIN
    e_name := '이재현';
    DBMS_OUTPUT.PUT_LINE(e_name||'씨');
END;
/

DECLARE
-- 테이블의 모든 컬럼을 참조하여 변수 선언(RECORD TYPE, 레코드변수)    
    row_type cp_emp%ROWTYPE;
                             
BEGIN
-- cp_emp 테이블은 empno, ename, hiredate, sal 컬럼을 가짐  
-- RECORD TYPE 변수 사용 : 변수명.컬럼명
    row_type.empno := 1234;
    row_type.ename := 'young';
    row_type.hiredate := '1990-12-06';
    row_type.sal := 5000;
                        
    DBMS_OUTPUT.PUT_LINE(row_type.empno||'번, '
        ||row_type.ename||'은 생년월일이 '||row_type.hiredate||'고 '
        ||row_type.sal||'정도의 연봉을 받는다.');

END;
/          

ACCEPT 입력될변수명 PROMPT '콘솔창에 출력될 메시지'

DECLARE
...
BEGIN
    ... := &입력될변수명 
    ...
END;
/

SET verify OFF

SET serveroutput ON  
-- 검증옵션 끄기 
SET verify OFF

ACCEPT input_name PROMPT '이름을 입력하세요 : '
ACCEPT input_age  PROMPT '나이를 입력하세요 : '

DECLARE
    name VARCHAR2(15);
    age NUMBER(3);
BEGIN             

-- 입력값이 문자열인 경우 ''로 묶어서 문자열로 변환
    name := '&input_name';
    age := &input_age;

    DBMS_OUTPUT.PUT_LINE('이름 : '||name||'님 나이는 '||age||'살입니다.');
END;
/

BEGIN                    
-- 주석안에 &가 있으면??  &comment
END;
/

-- 태어난해 출력 : XX살 태어난해 XXXX년생

ACCEPT input_age PROMPT '나이를 입력하세요 : '

DECLARE
    age NUMBER(3);
    yob NUMBER(4);
BEGIN              
    age := &input_age;
    yob := TO_CHAR(SYSDATE, 'yyyy')-age+1;

    DBMS_OUTPUT.PUT_LINE(age||'살 태어난해 : '||yob||'년생');

-- 문자열은 연산이 안된다! -> DBMS가 자동 형변환
-- 아래 PUT_LINE함수는 에러발생
-- '||'는 산술연산자(+,-)보다 우선순위가 높아서 하이라이트한 부분먼저 붙고 산술연산이 시도됨
    DBMS_OUTPUT.PUT_LINE(age||'살 태어난해 : '||TO_CHAR(SYSDATE, 'yyyy')-age+1||'년생');

-- || 사이에 있는 값을 연산 시킬려면 ||보다 먼저 수행되도록 ()를 붙인다
-- 산술연산자(*,/)는 안붙여도 된다(우선순위가 높기 때문에)
    DBMS_OUTPUT.PUT_LINE(age||'살 태어난해 : '||
         (TO_CHAR(SYSDATE, 'yyyy')-age+1)||'년생');

END;
/

...
BEGIN

    IF 조건식 THEN
        조건에 맞을 때 수행할 문장들;
    END IF;

END;
/

BEGIN
    IF 조건식 THEN
        조건에 맞을 때 수행할 문장;
    ELSE 
        조건에 맞지 않을 때 수행할 문장;
    END IF;
END;

BEGIN

    IF 조건1 THEN
        조건1에 맞을 때 수행할 문장;
    ELSIF 조건2 THEN
        조건2에 맞을 때 수행할 문장;
    ELSIF 조건3 THEN
        조건3에 맞을 때 수행할 문장;
    ELSIF ...
        ...
    ELSE
        모든 조건에 맞지 않았을 때 수행할 문장
    END IF;

END;