--example 1 最简单的块
SET SERVEROUTPUT ON
BEGIN
dbms_output.put_line('hello,world');
END;
/
--example 2 带变量的块
DECLARE
V_ENAME VARCHAR2(5); --定义变量
V_SAL NUMBER(7, 2); --定义变量
BEGIN
SELECT ENAME, SAL INTO V_ENAME, V_SAL FROM EMP WHERE EMPNO = &EMPNO;
DBMS_OUTPUT.PUT_LINE('用户名:' || V_ENAME || ',薪水' || V_SAL);
EXCEPTION
WHEN NO_DATA_FOUND THEN
DBMS_OUTPUT.PUT_LINE('friends ,you input empno is not exist!');
END;
--example 3 显示工号,姓名,工资,个人所得税
DECLARE
C_TAX_RATE NUMBER(3, 2) := 0.03;
V_ENAME emp.ename%type;
V_SAL NUMBER(7, 2);
V_TAX_SAL NUMBER(7, 2);
BEGIN
SELECT ENAME, SAL INTO V_ENAME, V_SAL FROM EMP WHERE EMPNO = &NO;
V_TAX_SAL := C_TAX_RATE * V_SAL;
DBMS_OUTPUT.PUT_LINE('name:' || V_ENAME || ',薪资:' || V_SAL || '税率' ||
V_TAX_SAL);
END;
SET SERVEROUTPUT ON
BEGIN
dbms_output.put_line('hello,world');
END;
/
--example 2 带变量的块
DECLARE
V_ENAME VARCHAR2(5); --定义变量
V_SAL NUMBER(7, 2); --定义变量
BEGIN
SELECT ENAME, SAL INTO V_ENAME, V_SAL FROM EMP WHERE EMPNO = &EMPNO;
DBMS_OUTPUT.PUT_LINE('用户名:' || V_ENAME || ',薪水' || V_SAL);
EXCEPTION
WHEN NO_DATA_FOUND THEN
DBMS_OUTPUT.PUT_LINE('friends ,you input empno is not exist!');
END;
--example 3 显示工号,姓名,工资,个人所得税
DECLARE
C_TAX_RATE NUMBER(3, 2) := 0.03;
V_ENAME emp.ename%type;
V_SAL NUMBER(7, 2);
V_TAX_SAL NUMBER(7, 2);
BEGIN
SELECT ENAME, SAL INTO V_ENAME, V_SAL FROM EMP WHERE EMPNO = &NO;
V_TAX_SAL := C_TAX_RATE * V_SAL;
DBMS_OUTPUT.PUT_LINE('name:' || V_ENAME || ',薪资:' || V_SAL || '税率' ||
V_TAX_SAL);
END;