Oracle代码块详解,Oracle可执行代码块

declare --声明变量

v_menu_name varchar(50):='aaa管理'; --声明字符串变量必须带上长度

v_menu_url varchar(100):='/aaa.html';

v_ord varchar(100):='10';

v_parent_fun varchar(50):='02'; -- 默认为：统计分析

v_parent_menu varchar(50):='02'; -- 默认为：统计分析

b_gn_uuid varchar(50); -- 封装功能 uuid

begin --执行业务逻辑

select sys_guid() into b_gn_uuid from dual;

/* */

-- 插入功能

insert into S_FRAMEWORK_FUNCTION (FUNCTIONID, PARENTID, FUNCTIONNAME, ACTIONTYPE, CREATOR, CREATEDTIME, LASTUPDATEDBY, LASTUPDATEDTIME)

values (b_gn_uuid, v_parent_fun, v_menu_name, v_menu_url, 'manager', to_date('29-01-2013 08:39:56', 'dd-mm-yyyy hh24:mi:ss'), 'manager', to_date('26-02-2013 04:38:32', 'dd-mm-yyyy hh24:mi:ss'));

-- 插入菜单

insert into s_framework_menu (MENUID, PARENTMENU, MENUNAME, FUNCTIONID, SYS_RESERVER3, CREATOR, SECURITYGRADE, CREATEDTIME, LASTUPDATEDBY, LASTUPDATEDTIME)

values (sys_guid(), v_parent_menu, v_menu_name, b_gn_uuid, v_ord, 'manager', '1', to_date('24-04-2008 15:30:54', 'dd-mm-yyyy hh24:mi:ss'), '开发用户', to_date('24-04-2008 15:30:54', 'dd-mm-yyyy hh24:mi:ss'));

commit;

-- dbms_output.put_line(b_gn_uuid);

exception --异常处理

WHEN OTHERS THEN

ROLLBACK;

RETURN;

end; --结束