--儲存過程的建立set serveroutput on;create or replace procedure select_dept(num_deptno in number,--定義in模式變數，要求輸入部門編號var_dname out dept.dname%type,--定義out模式變數，可以儲存部門名稱並輸出var_loc out dept.loc%type) isbeginselect dname,loc into var_dname,var_loc from deptwhere deptno = num_deptno;--檢索某個部門編號的部門資訊exceptionwhen no_data_found then--若select語句無返回記錄dbms_output.put_line("該部門編號的不存在");--輸出資訊end select_dept;/--儲存過程的呼叫--注意：含有輸出引數的儲存過程呼叫，需要先宣告與out引數型別相容的變數set serveroutput on;declare var_dname dept.dname%type;var_loc dept.loc%type;beginselect_dept(10,var_dname,var_loc);dbms_output.put_line(var_dname||"位於："||var_loc);end;/
--儲存過程的建立set serveroutput on;create or replace procedure select_dept(num_deptno in number,--定義in模式變數，要求輸入部門編號var_dname out dept.dname%type,--定義out模式變數，可以儲存部門名稱並輸出var_loc out dept.loc%type) isbeginselect dname,loc into var_dname,var_loc from deptwhere deptno = num_deptno;--檢索某個部門編號的部門資訊exceptionwhen no_data_found then--若select語句無返回記錄dbms_output.put_line("該部門編號的不存在");--輸出資訊end select_dept;/--儲存過程的呼叫--注意：含有輸出引數的儲存過程呼叫，需要先宣告與out引數型別相容的變數set serveroutput on;declare var_dname dept.dname%type;var_loc dept.loc%type;beginselect_dept(10,var_dname,var_loc);dbms_output.put_line(var_dname||"位於："||var_loc);end;/