-- Create table
create table T_EB_SYS_DN_SEQUENCE_CONFIG
(
sequence_id VARCHAR2(36) default sys_guid() not null,
sequence_name VARCHAR2(50) not null,
sequence_desc VARCHAR2(200),
sequence_len INTEGER default 4 not null,
reset_type INTEGER default 2 not null,
separator VARCHAR2(10) default '-',
prefix VARCHAR2(50),
date_format VARCHAR2(50) default 'YYYYMM',
current_value INTEGER default 0 not null,
initial_value INTEGER default 1 not null,
step INTEGER default 1 not null,
creator VARCHAR2(50) not null,
created_date TIMESTAMP(6) default systimestamp not null,
modifier VARCHAR2(50) not null,
last_updated_date TIMESTAMP(6) default systimestamp not null,
is_enable VARCHAR2(2) default '1' not null,
sdp_user_id VARCHAR2(36) default nvl(SYS_CONTEXT('SDP_CONTEXT','userid'),'88888') not null,
sdp_org_id VARCHAR2(36) default nvl(SYS_CONTEXT('SDP_CONTEXT','orgid'),'2') not null,
update_control_id VARCHAR2(36) default sys_guid() not null
)
tablespace EB_DATA_TBS
pctfree 10
initrans 1
maxtrans 255
storage
(
initial 64
next 1
minextents 1
maxextents unlimited
);
-- Add comments to the table
comment on table T_EB_SYS_DN_SEQUENCE_CONFIG
is 'T_SEQUENCE_CONFIG';
-- Add comments to the columns
comment on column T_EB_SYS_DN_SEQUENCE_CONFIG.sequence_id
is '流水号ID';
comment on column T_EB_SYS_DN_SEQUENCE_CONFIG.sequence_name
is '流水号名称 流水号名称必须唯一';
comment on column T_EB_SYS_DN_SEQUENCE_CONFIG.sequence_desc
is '流水号描述 对流水号的说明';
comment on column T_EB_SYS_DN_SEQUENCE_CONFIG.sequence_len
is '流水号长度 如4表示0001这种,6表示000001这种';
comment on column T_EB_SYS_DN_SEQUENCE_CONFIG.reset_type
is '重置类型 0不重置,1按年,2按月,3按日';
comment on column T_EB_SYS_DN_SEQUENCE_CONFIG.separator
is '分隔符 分隔流水号各部分的连接符,如-,则生成的流水号为 前缀-日期-流水号形式,如果为空,则各部分没有连接符号';
comment on column T_EB_SYS_DN_SEQUENCE_CONFIG.prefix
is '前缀';
comment on column T_EB_SYS_DN_SEQUENCE_CONFIG.date_format
is '日期格式 日期格式格式可以是yyyy yy mm dd hh ii ss的组合,如yyyymm,yy-mm,yyyymmdd,yyyymmdd-hh等,如果按年重置,则日期格式中必须有年,如果按月重置,则日期格式中必须有月.如果不重置,则日期格式不限定,甚至可以为空';
comment on column T_EB_SYS_DN_SEQUENCE_CONFIG.current_value
is '当前流水号 流水号当前值,如234表示当前的流水号生成到了234,下一个为234+STEP(步长)';
comment on column T_EB_SYS_DN_SEQUENCE_CONFIG.initial_value
is '初始值 初始流水号是多少,默认是0';
comment on column T_EB_SYS_DN_SEQUENCE_CONFIG.step
is '步长 每个流水号生成间隔是多少,如2,表示每个生成0001,0003这种流水号';
comment on column T_EB_SYS_DN_SEQUENCE_CONFIG.creator
is '创建人';
comment on column T_EB_SYS_DN_SEQUENCE_CONFIG.created_date
is '创建时间';
comment on column T_EB_SYS_DN_SEQUENCE_CONFIG.modifier
is '最后更新人员';
comment on column T_EB_SYS_DN_SEQUENCE_CONFIG.last_updated_date
is '最后更新时间';
comment on column T_EB_SYS_DN_SEQUENCE_CONFIG.is_enable
is '是否可用';
comment on column T_EB_SYS_DN_SEQUENCE_CONFIG.sdp_user_id
is 'SDP用户ID';
comment on column T_EB_SYS_DN_SEQUENCE_CONFIG.sdp_org_id
is 'SDP组织ID';
comment on column T_EB_SYS_DN_SEQUENCE_CONFIG.update_control_id
is '并发控制字段';
-- Create/Recreate primary, unique and foreign key constraints
alter table T_EB_SYS_DN_SEQUENCE_CONFIG
add constraint PK_RDP_SYS_SEQUENCE_CONFIG primary key (SEQUENCE_ID)
using index
tablespace EB_IDX_TBS
pctfree 10
initrans 2
maxtrans 255
storage
(
initial 64K
next 1M
minextents 1
maxextents unlimited
);
-- Create/Recreate check constraints
alter table T_EB_SYS_DN_SEQUENCE_CONFIG
add constraint CK_SEQUENCE_DATE_FORMAT
check (RESET_TYPE=0
OR (RESET_TYPE=1 AND INSTR(UPPER(DATE_FORMAT),'Y',1,1)>0)
OR (RESET_TYPE=2 AND INSTR(UPPER(DATE_FORMAT),'Y',1,1)>0 AND INSTR(UPPER(DATE_FORMAT),'M',1,1)>0)
OR (RESET_TYPE=3 AND INSTR(UPPER(DATE_FORMAT),'Y',1,1)>0 AND INSTR(UPPER(DATE_FORMAT),'M',1,1)>0 AND INSTR(UPPER(DATE_FORMAT),'D',1,1)>0));
alter table T_EB_SYS_DN_SEQUENCE_CONFIG
add constraint CK_SEQUENCE_RESET_TYPE
check (RESET_TYPE IN (0,1,2,3));
-- Grant/Revoke object privileges
grant select, insert, update, delete on T_EB_SYS_DN_SEQUENCE_CONFIG to BOM;

调用存储过程:

CREATE OR REPLACE PROCEDURE P_EB_GET_SEQUENCE(PARA_SEQUENCE_NAME   VARCHAR2,
PARA_DYNAMIC_CONTENT VARCHAR2,
PARA_SEQUENCE OUT VARCHAR2) IS
V_SEQUENCE_LEN INTEGER;
V_RESET_TYPE INTEGER;
V_SEPARATOR VARCHAR2(10);
V_PREFIX VARCHAR2(50);
V_DATE_FORMAT VARCHAR2(50);
V_CURRENT_VALUE INTEGER;
V_INITIAL_VALUE INTEGER;
V_STEP INTEGER;
V_LAST_UPDATED_DATE TIMESTAMP;
V_YYYY VARCHAR2(4);
V_MM VARCHAR2(2);
V_DD VARCHAR2(2);
V_HH VARCHAR2(2);
V_II VARCHAR2(2);
V_SS VARCHAR2(2);
V_DATESTRFULL VARCHAR2(50);
V_DATESTR VARCHAR2(50); BEGIN
--设置事务隔离级别为序列化,防止并发产生相同的流水号
SET TRANSACTION ISOLATION LEVEL SERIALIZABLE; SELECT SEQUENCE_LEN,
RESET_TYPE,
SEPARATOR,
PREFIX,
UPPER(DATE_FORMAT),
CURRENT_VALUE,
INITIAL_VALUE,
STEP,
LAST_UPDATED_DATE
INTO V_SEQUENCE_LEN,
V_RESET_TYPE,
V_SEPARATOR,
V_PREFIX,
V_DATE_FORMAT,
V_CURRENT_VALUE,
V_INITIAL_VALUE,
V_STEP,
V_LAST_UPDATED_DATE
FROM T_EB_SYS_DN_SEQUENCE_CONFIG
WHERE SEQUENCE_NAME = PARA_SEQUENCE_NAME; --日期生成 日期全字符串 YYYY-MM-DD HH:MM:SS
V_DATESTRFULL := TO_CHAR(SYSDATE, 'YYYY-MM-DD HH24:MI:SS');
V_YYYY := SUBSTR(V_DATESTRFULL, 1, 4);
V_MM := SUBSTR(V_DATESTRFULL, 6, 2);
V_DD := SUBSTR(V_DATESTRFULL, 9, 2);
V_HH := SUBSTR(V_DATESTRFULL, 12, 2);
V_II := SUBSTR(V_DATESTRFULL, 15, 2);
V_SS := SUBSTR(V_DATESTRFULL, 18, 2); IF V_DATE_FORMAT IS NOT NULL THEN
BEGIN
V_DATESTR := REPLACE(V_DATE_FORMAT, 'YYYY', V_YYYY);
V_DATESTR := REPLACE(V_DATESTR, 'YY', SUBSTR(V_YYYY, -2));
V_DATESTR := REPLACE(V_DATESTR, 'MM', V_MM);
V_DATESTR := REPLACE(V_DATESTR, 'M', SUBSTR(V_MM, -1));
V_DATESTR := REPLACE(V_DATESTR, 'DD', V_DD);
V_DATESTR := REPLACE(V_DATESTR, 'D', SUBSTR(V_DD, -1));
V_DATESTR := REPLACE(V_DATESTR, 'HH', V_HH);
V_DATESTR := REPLACE(V_DATESTR, 'H', SUBSTR(V_HH, -1));
V_DATESTR := REPLACE(V_DATESTR, 'II', V_II);
V_DATESTR := REPLACE(V_DATESTR, 'I', SUBSTR(V_II, -1));
V_DATESTR := REPLACE(V_DATESTR, 'SS', V_SS);
V_DATESTR := REPLACE(V_DATESTR, 'S', SUBSTR(V_SS, -1));
END;
END IF; IF V_RESET_TYPE <> 0 THEN
BEGIN IF (V_RESET_TYPE = 1 AND TO_CHAR(SYSDATE,'YYYY')>TO_CHAR(V_LAST_UPDATED_DATE,'YYYY'))
OR (V_RESET_TYPE = 2 AND TO_CHAR(SYSDATE,'YYYYMM')>TO_CHAR(V_LAST_UPDATED_DATE,'YYYYMM'))
OR (V_RESET_TYPE = 3 AND TO_CHAR(SYSDATE,'YYYYMMDD')>TO_CHAR(V_LAST_UPDATED_DATE,'YYYYMMDD')) THEN
V_CURRENT_VALUE := V_INITIAL_VALUE;
ELSE
V_CURRENT_VALUE := V_CURRENT_VALUE + V_STEP;
END IF;
END;
ELSE
BEGIN
V_CURRENT_VALUE := V_CURRENT_VALUE + V_STEP;
END;
END IF;
PARA_SEQUENCE := CASE WHEN V_PREFIX IS NOT NULL THEN V_PREFIX || V_SEPARATOR END
|| CASE WHEN PARA_DYNAMIC_CONTENT IS NOT NULL THEN PARA_DYNAMIC_CONTENT || V_SEPARATOR END
|| CASE WHEN V_DATESTR IS NOT NULL THEN V_DATESTR || V_SEPARATOR END
|| LPAD(TO_CHAR(V_CURRENT_VALUE), V_SEQUENCE_LEN, '0'); UPDATE T_EB_SYS_DN_SEQUENCE_CONFIG
SET CURRENT_VALUE = V_CURRENT_VALUE,LAST_UPDATED_DATE = SYSDATE
WHERE SEQUENCE_NAME = PARA_SEQUENCE_NAME; COMMIT;
EXCEPTION
WHEN OTHERS THEN
ROLLBACK;
END;

Oracle主键自动生成_表and存储过程的更多相关文章

  1. SQL Server主键自动生成_表and存储过程

    主键表: CREATE TABLE [dbo].[KEYCODE]( [KeyName] [varchar](12) NOT NULL, [KeyTableName] [varchar](40) NU ...

  2. MySql主键自动生成,表、实体、C#调用方法

    1.表:mysql建表语句 DROP TABLE IF EXISTS `keycode`; CREATE TABLE `keycode` ( `Id` ) NOT NULL AUTO_INCREMEN ...

  3. oracle 主键自动增长

    oracle 主键自动增长 2009-12-11 16:07:00|  分类: 数据库资料|字号 订阅     这几天搞Oracle,想让表的主键实现自动增长,查网络实现如下: create tabl ...

  4. hibernate主键自动生成

    Entity类中,主键尽量使用可以为null值的类型,比如Integer,Long,String等,不要用int,long等.因为如果主键为null,则表示该实体类还没有保存到数据库,是一个临时状态( ...

  5. Mybatis「MySQL-Oracle」 中主键自动生成 <selectKey> 序列化

    有时候我们不仅仅是通过返回 int 影响行数来确定数据是否插入成功就行了,因为我们总是会用到这个刚刚插入的自增主键,比如主子表入库,子表需要主表的 id,那这个时候我们再去数据库查就显得有点 low ...

  6. Mysql,SqlServer,Oracle主键自动增长的设置

    1.把主键定义为自动增长标识符类型 MySql 在mysql中,如果把表的主键设为auto_increment类型,数据库就会自动为主键赋值.例如: )); insert into customers ...

  7. Mysql,SqlServer,Oracle主键自动增长的设置

    在mysql中,如果把表的主键设为auto_increment类型,数据库就会自动为主键赋值.例如: CREATE TABLE google(id INT AUTO_INCREMENT PRIMARY ...

  8. Entity Framework Code First 遭遇主键自动生成问题

    4.0后就没有去跟踪后面的版本了.现在直接开始用5.0没想到在做User的GURD时就遭遇insert不进数据问题. ISet<User>.Add(user);_context.SaveC ...

  9. oracle 主键应用序列和触发器实现自动增长

    oracle 主键自动增长 这几天搞Oracle,想让表的主键实现自动增长,查网络实现如下: create table simon_example ( id number(4) not null pr ...

随机推荐

  1. 单片机Keil软件仿真与调试技巧

    一.引言 单片机软件开发过程中,软件调试遇到的各种问题常令初学者感到不知所措.实际上.各种仿真开发软件的程序调试基本方法和技巧大同小异,掌握正确的程序调试基本技巧.对于排查这些程序错误问题可以起到举一 ...

  2. 用SharedPreferences保存List(Map(String, String))数据

    原因: SharedPreferences没有保存数组的方法,但是有时候为了保存一个数组而进行序列化,或者动用sqlite都是有点杀猪焉用牛刀的感觉,所以就自己动手改进一下吧. 解决方案: 采用的方式 ...

  3. Sqoop安装与使用(sqoop-1.4.5 on hadoop 1.0.4)

    1.什么是Sqoop Sqoop即 SQL to Hadoop ,是一款方便的在传统型数据库与Hadoop之间进行数据迁移的工具,充分利用MapReduce并行特点以批处理的方式加快数据传输,发展至今 ...

  4. VM Depot 镜像新增系列III – 社交媒体,内容管理 与 项目协同系统

     发布于 2014-06-30 作者 刘 天栋 对于架设可协同作业的网站平台, Windows  Azure有着得天独厚的优势.这不仅在于其强大的扩展性和安全性,更重要的是 Azure 平台对各类 ...

  5. 【转】Adnroid4.0 签名混淆打包(conversion to dalvik format failed with error 1)

    原文网址:http://jojol-zhou.iteye.com/blog/1220541 自己的解决方法:关闭Eclipse,再开启Eclipse就可以. 最新Eclipse3.7+android ...

  6. (转载)php获取mysql版本的几种方法小结

    (转载)http://www.jb51.net/article/13930.htm 查询当前连接的MYSQL数据库的版本,可以用下面SQL语句来实现 select VERSION(); 当前$res= ...

  7. 笔记-人老了-github

    其实GITHUB是很不错的,虽然之前的JD泄露那件事情,后果很严重. 但是作为个人使用很不错的. github使用入门: 1:申请一个帐号 2:github使用ssh推送的.(ssh走的是加密) 所以 ...

  8. leetcode 合并区间

    使用最简单的排序方法: /** * Definition for an interval. * public class Interval { * int start; * int end; * In ...

  9. IronPython fail to add reference to WebDriver.dll

    在使用Ironpython引用WebDriver程序集做web自动化时碰到这个问题,出问题的代码很简单,如下: import sys import clr clr.AddReferenceToFile ...

  10. nopcommerce中文网

    nopcommerce中文网 | nopcommerce是国外asp.net领域一个高质量的b2c开源项目,基于EntityFramework和MVC开发,交流QQ群:75272942 nopcomm ...