CREATEORREPLACEPROCEDURE INSERT_DEPT_PROCEDURE(
deptNo IN NUMBER,--输入型参数
deptName IN VARCHAR2 DEFAULT'新建部门',--输入参数的默认值
deptLoc IN VARCHAR2,
deptInfo OUT VARCHAR2,--输出型参数
returnInfo INOUTBOOLEAN--输入输出型参数)ISBEGININSERTINTO dept VALUES(deptNo,deptName,deptLoc);COMMIT;
dbms_output.put_line('插入数据成功');SELECT dt.deptno||dt.dname||dt.loc INTO deptInfo FROM dept dt;--给输出型参数赋值IF returnInfo THEN
returnInfo :=FALSE;ELSE
returnInfo :=TRUE;ENDIF;--这里可以有异常处理的代码END INSERT_DEPT_PROCEDURE;