回 帖 发 新 帖 刷新版面

主题:不带日期的自动编号

如何让序号成为自动编号,用不带当前日期的(yymmdd)的形式,就是直接+1的.想求代码.出学者  谢谢

回复列表 (共1个回复)

沙发

if exists(select * from sysobjects where id=object_id(N'[dbo].[Auto_BH]')
    and objectproperty(id,N'IsProcedure')=1)
drop proc Auto_BH
GO
create proc Auto_BH
    @pp varchar(14) output
As
declare @dd varchar(10),
    @mm varchar(10),
    @yy varchar(10),
    @ymd varchar(10),
    @dj varchar(4),
           @ff varchar(8)
begin
    set @ymd=convert(varchar(10),getdate(),120)

    set @yy=substring(@ymd,1,4)

    set @mm=substring(@ymd,6,2)

    if substring(@mm,2,1)='-'
    begin
        set @mm='0'+substring(@mm,1,1)
    end

    set @dd=right(@ymd,2)
    if substring(@dd,1,1)='-'
    begin
        set @dd='0'+right(@dd,1)
    end

    set @ff=@yy+@mm+@dd+@dj


           select @dj=max(单据编号) from 产品表
    if @dj=0
    begin
        @dj=@ff
    end
    else
    begin
        @dj=convert(varchar(8),@dj+1)
    end
           set @pp=@ff

end
GO

我来回复

您尚未登录,请登录后再回复。点此登录或注册