sql server 按照日期自动生成单据编号的函数

sql server 按照日期自动生成单据编号的函数，格式为##08080001，##表示打头的单据字符，然后是年月和流水编号。
传入的参数为单据的打头字符和生成单据的日期
一般的调用格式为dbo.GetCostBillID('HP',getdate())

--按单号和年月获取单据的编号
CREATE FUNCTION GetCostBillID(@headStr nvarchar(10),@date datetime)
RETURNS nvarchar(50)
BEGIN 
declare  @oid2 nvarchar(50)
declare @oid nvarchar(50)
declare @month nvarchar(2)
declare @year nvarchar(2)
declare @ym nvarchar(4)
set @month=month(@date)
if len(@month)=1
    set @month='0'+@month --使月为两位长
set @year=right(convert(nvarchar,year(@date)),2)
set @ym=@year+@month --组成年月字符

--格式CB0808001
if exists(select * from CostBill)
begin
    select  top 1 @oid2=CostBillID from CostBill order by id desc --获取最后一条的单据编号，一定要有id，并且自动生成的，倒排序
end
else 
begin
    set @oid2=@headStr+@ym+'0000' --没有记录是默认为今天
end

--订单不是本月的，重新开始一个新的订单流水号
if convert(nvarchar,left(@oid2,6))<>@headStr+@ym
begin
--用本月的年月号开始
    set @oid2=@headStr+@ym+'0000'
end

declare @str nvarchar(50) --临时单号

set @str=convert(nvarchar,(convert(int,right(@oid2,4))+1)) --订单号加一
while (4-len(@str)>0)
begin
     set @str='0'+@str    
end
set @oid2=@headStr+@ym+@str
--print @oid2

--如果该订单好已经存在，则重新获取
while exists(select * from CostBill where CostBillID=@oid2)
begin
    
    set @str=convert(nvarchar,(convert(int,right(@oid2,4))+1)) --订单号加一
    while (4-len(@str)>0)
    begin
         set @str='0'+@str    
    end
    set @oid2=@headStr+@ym+@str
--    print @oid2
end

set @oid=convert(nvarchar,@oid2)
--print 'HP'+convert(nvarchar,year(getdate()))+convert(nvarchar,month(getdate()))+@str

RETURN @oid
END