47.融合了补号处理的流水号编号处理

约定不等于承诺〃 2024-02-19 17:57 24阅读 0赞

--1．融合了补号处理的流水号编号处理
    --下面是使用补号法生成流水编号的用户定义函数，生成的编号总长度为8位，以BH开头，其余6位为流水号。
    
    --得到新编号的函数
    CREATE FUNCTION f_NextBH()
    RETURNS char(8)
    AS
    BEGIN
    	DECLARE @r char(8)
    	
    	SELECT @r='BH'+RIGHT(1000001+MIN(BH),6)
    	FROM(
    		SELECT BH=RIGHT(BH,6) FROM tb WITH(XLOCK,PAGLOCK)
    		UNION ALL SELECT 0
    	)a WHERE NOT EXISTS(
    		SELECT * FROM tb  WITH(XLOCK,PAGLOCK)
    		WHERE BH='BH'+RIGHT(1000001+a.BH,6))
    	RETURN(@r)
    END
    GO
    
    --在表中应用函数
    CREATE TABLE tb(
    BH char(8) PRIMARY KEY DEFAULT dbo.f_NextBH(),
    col int)
    GO
    
    
    /*==================================================*/
    
    
    
    --2．融合了补号处理的日期编号处理
    --下面是使用补号法生成日期编号的用户定义函数，生成的编号总长度为12，前6位为日期信息，格式为YYMMDD，后6位为流水号。
    
    --创建得到当前日期的视图
    CREATE VIEW v_GetDate
    AS
    SELECT dt=CONVERT(CHAR(6),GETDATE(),12)
    GO
    
    --得到新编号的函数
    CREATE FUNCTION f_NextBH()
    RETURNS char(12)
    AS
    BEGIN
    	DECLARE @dt CHAR(6),@r char(12)
    	SELECT @dt=dt FROM v_GetDate
    
    	SELECT @r=@dt+RIGHT(1000001+MIN(BH),6)
    	FROM(
    		SELECT BH=RIGHT(BH,6) FROM tb WITH(XLOCK,PAGLOCK)
    		WHERE BH like @dt+'%'
    		UNION ALL SELECT 0
    	)a WHERE NOT EXISTS(
    		SELECT * FROM tb  WITH(XLOCK,PAGLOCK)
    		WHERE BH like @dt+'%'
    			AND BH=@dt+RIGHT(1000001+a.BH,6))
    	RETURN(@r)
    END
    GO
    
    --在表中应用函数
    CREATE TABLE tb(
    BH char(12) PRIMARY KEY DEFAULT dbo.f_NextBH(),
    col int)