PLSQL Language Reference-PL/SQL語言基礎-變數賦值-作為子程式引數來賦值

DECLARE

    emp_salary  NUMBER(8,2);

    PROCEDURE adjust_salary (

        emp        NUMBER,

        sal IN OUT NUMBER,

        adjustment NUMBER

    ) IS

    BEGIN

        sal := sal + adjustment;

    END;

BEGIN

    SELECT salary INTO emp_salary

    FROM employees

    WHERE employee_id = 100;

    DBMS_OUTPUT.PUT_LINE('呼叫之前員工100的薪水: ' || emp_salary);

    adjust_salary (100, emp_salary, 1000);

  DBMS_OUTPUT.PUT_LINE('呼叫之後員工100的薪水: ' || emp_salary);

END;