Create procedure [dbo].[GetSerialNo]

 (

    @sCode varchar(50)

 )   

   as 

 --exec GetSerialNo   

 begin 

    Declare @sValue  varchar(16),   

            @dToday   datetime,           

            @sQZ  varchar(50)  --这个代表前缀 

    Begin Tran     

    Begin Try   

      -- 锁定该条记录，好多人用lock去锁，起始这里只要执行一句update就可以了

     --在同一个事物中，执行了update语句之后就会启动锁

      Update SerialNo set sValue=sValue where sCode=@sCode   

      Select @sValue = sValue From SerialNo where sCode=@sCode   

      Select @sQZ = sQZ From SerialNo where sCode=@sCode   

     -- 因子表中没有记录，插入初始值--基数据必须手动去创建   

     If @sValue is null   

      Begin 

        Select @sValue = convert(bigint, convert(varchar(6), getdate(), 12) + '')   

        Update SerialNo set sValue=@sValue where sCode=@sCode   

      end

    else   

      Begin               --因子表有记录   

        Select @dToday = substring(@sValue,1,6)   

       --如果日期相等，则加1   

        If @dToday = convert(varchar(6), getdate(), 12)   

          Select @sValue = convert(varchar(16), (convert(bigint, @sValue) + 1))   

       else              --如果日期不相等，则先赋值日期，流水号从1开始   

         Select @sValue = convert(bigint, convert(varchar(6), getdate(), 12) +'')   

        Update SerialNo set sValue =@sValue where sCode=@sCode   

      End 

      Select result = @sQZ+@sValue     

      Commit Tran   

    End Try   

    Begin Catch   

      Rollback Tran   

      Select result = 'Error' 

    End Catch   

 end