CREATE [OR REPLACE] PROCEDURE procedure_name
[(parameter_name [IN | OUT | IN OUT] datatype [{(:= | DEFAULT ) defaultvalue}] [, ...])]
{IS | AS}
BEGIN
procedure_body
END procedure_name;

--注意，在声明参数类型时，不能带精度，如VARCHAR2(20)后面的(20)
CREATE OR REPLACE PROCEDURE test_procedure(name IN VARCHAR2 default 'Tim',age IN NUMBER :=20,sex IN OUT VARCHAR2,realname OUT VARCHAR2)
ISrn VARCHAR2(10) default 'Tim Leung';
BEGINIF name='Tim' THENrealname:=rn;END IF;IF sex='1' THENsex:='男';ELSEsex:='女';END IF;DBMS_OUTPUT.PUT_LINE(name || ' age:'||age||' sex:'||sex||' realname:'||realname);
END test_procedure;

declare result_sex varchar(3):='1';result_rn varchar(10) default null;
begintest_procedure('Tim',sex => result_sex,age => 20,realname => result_rn);--可以使用符号=>来传参DBMS_OUTPUT.PUT_LINE('sex:'||result_sex);DBMS_OUTPUT.PUT_LINE('realname:'||result_rn);
end;/*运行结果:
Tim age:20 sex:男 realname:Tim Leung
sex:男
realname:Tim Leung
*/

DROP PROCEDURE test_procedure;

CREATE [OR REPLACE] FUNCTION function_name
[(parameter1 {IN | OUT | IN OUT} datatype] [,...])]
RETURN datatype
{ IS | AS }
BEGIN
function_body
END function_name;

CREATE OR REPLACE FUNCTION test_function(name IN VARCHAR2 default 'Tim',age IN NUMBER :=20,sex IN OUT VARCHAR2,realname OUT VARCHAR2)
RETURN VARCHAR2
ISrn VARCHAR2(10) default 'Tim Leung';
BEGINIF name='Tim' THENrealname:=rn;END IF;IF sex='1' THENsex:='男';ELSEsex:='女';END IF;RETURN (name || ' age:'||age||' sex:'||sex||' realname:'||realname);
END test_function;

declare result_sex varchar(3):='1';result_rn varchar(10) default null;
begin--可以使用符号=>来传参DBMS_OUTPUT.PUT_LINE(test_function('Tim',sex => result_sex,age => 20,realname => result_rn));
end;/*运行结果:
Tim age:20 sex:男 realname:Tim Leung
*/

CREATE [OR REPLACE] PACKAGE package_name
{ IS | AS }
package_specification  --存储过程，函数，变量声明部分
END package_name;

CREATE OR REPLACE PACKAGE test_package
IS
v_name VARCHAR2(20);--声明公有变量
PROCEDURE getName(id NUMBER);--声明过程getName
PROCEDURE getName(p_name VARCHAR2);--声明重载过程getName
FUNCTION getAge RETURN NUMBER;--声明函数getAge
END test_package;

--包体名必须与包头名一致！
CREATE [OR REPLACE] PACKAGE BODY package_name
{ IS | AS}package_implement  --存储过程，函数实现部分BEGINpackage_init  --包初始化部分，在包被第一次调用时执行END;
--注意！！！包体不能有END;子句

CREATE OR REPLACE PACKAGE BODY test_package IS --包体名与包头名要一致/*创建私有过程output，以供其他过程或函数调用，必须在其他过程或函数调用前创建*/PROCEDURE output(output_str VARCHAR2) ISBEGINDBMS_OUTPUT.PUT_LINE(output_str);END output;/*创建公有过程getName*/PROCEDURE getName(id NUMBER) ISBEGINoutput('do getName('||id||')');END getName;/*重载过程getName，重载的意思即有相同的过程名或函数名，相同的返回类型，不同的参数列表！*/PROCEDURE getNAME(p_name VARCHAR2) ISBEGINoutput('do getNAME('||p_name|| ')!');END getNAME;/*创建函数getAge*/FUNCTION getAge RETURN NUMBER ISBEGINRETURN 20;END getAge;/*包的初始化块，在包被第一次调用时执行。初始化块只能在包体的末尾编写*/BEGINv_name:='Tim';END;--注意！！包体不能有END;子句

declare
beginDBMS_OUTPUT.PUT_LINE(test_package.v_name);test_package.getName(10);test_package.getName('Tim');DBMS_OUTPUT.PUT_LINE('getAge:' || test_package.getAge);
end;/*运行结果:
Tim
do getName(10)
do getNAME(Tim)!
getAge:20
*/

CREATE [OR REPLACE] TRIGGER trigger_name
{BEFORE | AFTER | INSTEAD OF} trigger_event
ON event_target
[FOR EACH ROW]
[WHEN condition]
BEGINtrigger_body
END trigger_name;

CREATE OR REPLACE TRIGGER test_trigger
AFTER INSERT OR UPDATE OF sal OR DELETE
ON emp
FOR EACH ROW
BEGINCASEWHEN INSERTING THEN  --当事件为INSERT时，INSERTING为TRUE/*:NEW关键字可以获取新记录的数据，它只能用于行级触发器*/DBMS_OUTPUT.PUT_LINE('INSERT INTO EMP VALUES('||:NEW.empno||','||:NEW.ename||','||:NEW.job||','||:NEW.mgr||','||:NEW.hiredate||','||:NEW.sal||','||:NEW.comm||','||:NEW.deptno||')');WHEN UPDATING THEN  --当事件为UPDATE时，UPDATING为TRUEDBMS_OUTPUT.PUT_LINE('UPDATING emp which empno='||:OLD.empno||'to sal:'||:NEW.sal);--:OLD关键字可以获取旧记录的数据，它只能用于行级触发器WHEN DELETING THEN  --当事件为DELETE时，DELETING为TRUEDBMS_OUTPUT.PUT_LINE('DELETING emp which empno='||:OLD.empno);--:OLD关键字可以获取旧记录的数据，它只能用于行级触发器ELSENULL;END CASE;
EXCEPTIONWHEN DUP_VAL_ON_INDEX THENNULL;WHEN OTHERS THENRAISE_APPLICATION_ERROR(SQLCODE,SQLERRM);
END test_trigger;

ALTER TRIGGER trigger_name ENABLE | DISABLE;

ALTER TABLE table_name {ENABLE | DISABLE} ALL TRIGGERS;

DROP TRIGGER trigger_name;