--创建序列eam_roleandmenuDECLARE
s_count NUMBER;BEGINSELECTCOUNT(1)INTO s_count
FROM user_sequences
WHERE sequence_name = UPPER ('seq_eam_roleandmenu');IF s_count =0THENEXECUTE IMMEDIATE '
CREATE SEQUENCE seq_eam_roleandmenu
INCREMENT BY 1
START WITH 1
MINVALUE 1
MAXVALUE 99999999999
NOCYCLE
NOORDER
NOCACHE
';ENDIF;END;/-------创建eam_roleandmenu表DECLARE
s_count NUMBER;BEGINSELECTCOUNT(1)INTO s_count
FROM user_tables
WHERE table_name = UPPER ('eam_roleandmenu');IF s_count =0THENEXECUTE IMMEDIATE 'CREATE TABLE eam_roleandmenu
(id NUMBER ,
rolecode NUMBER NOT NULL,
menuid VARCHAR2(8 BYTE) NOT NULL,
empid NUMBER NOT NULL,
dpid NUMBER NOT NULL,
create_date DATE DEFAULT SYSDATE NOT NULL,
update_date DATE DEFAULT SYSDATE NOT NULL)';ENDIF;END;/-------创建eam_roleandmenu主键DECLARE
num NUMBER;BEGINSELECTCOUNT(1)INTO num
FROM user_constraints a
WHERE a.constraint_name = UPPER ('pk_eam_roleandmenu');IF num =0THENEXECUTE IMMEDIATE 'ALTER TABLE eam_roleandmenu
ADD CONSTRAINT pk_eam_roleandmenu PRIMARY KEY (id)
USING INDEX';ENDIF;END;/-------创建eam_class_style触发器CREATEORREPLACETRIGGER trg_eam_roleandmenu
BEFORE INSERTON eam_roleandmenu
REFERENCING NEW AS new OLD AS old
FOR EACH ROWDECLARE
integrity_error EXCEPTION;
errno INTEGER;
errmsg CHAR(200);BEGINIF :new.id ISNULLOR :new.id <=0THENSELECT seq_eam_roleandmenu.NEXTVAL INTO :new.id FROM DUAL;ENDIF;-- Errors handling
EXCEPTION
WHEN integrity_error
THEN
raise_application_error (errno, errmsg);END;/-- Comments for eam_roleandmenuCOMMENTONTABLE eam_roleandmenu IS'角色菜单表'/COMMENTONCOLUMN eam_roleandmenu.create_date IS'创建时间'/COMMENTONCOLUMN eam_roleandmenu.dpid IS'客户代码'/COMMENTONCOLUMN eam_roleandmenu.empid IS'职员ID'/COMMENTONCOLUMN eam_roleandmenu.id IS'编号,自动增长'/COMMENTONCOLUMN eam_roleandmenu.menuid IS'菜单ID'/COMMENTONCOLUMN eam_roleandmenu.rolecode IS'角色code'/COMMENTONCOLUMN eam_roleandmenu.update_date IS'更新时间'/