用存储过程生成单据号

-插入客户订单
CREATE PROCEDURE InsertOrder
(
    @CustomerId int,
    @MX nvarchar(4000),
    @Incom smallint
)

AS

SET NOCOUNT ON

--这一个部分还可单独提取到一个存储过程中通过传入“单据标识号”和“单据表名”为参数---------------------------------------

--找帐套字头号
DECLARE @IH char(1)
SELECT @IH = LEFT(IncID,1) FROM accounts WHERE ID = @Incom

--编号年月部分
DECLARE @YM char(6)
SET @YM = CONVERT(char(6),GETDATE(),12)
--单据字头
DECLARE @DJHH char(8)
SET @DJHH = @IH + 'E' + @YM


--找编号的基值（方法：用当天的编号到排序取最大的一个。如当前最大编号为0001那么它的基值为1，这样就能得出下个编号为0002）
DECLARE @MNO INT        --当天最大的单据号(数值)
SET @MNO = 1
select TOP 1 @MNO = CONVERT(int,RIGHT(DJH,4))+1 from Orders where left(DJH,8) = @DJHH and incom = @Incom Orders by DJH desc


DECLARE @DJH char(12)

--扩充成4位十进制编号(最大可显示9999)
IF @MNO < 9999
  IF @MNO < 999
    IF @MNO < 99
      IF @MNO < 9
        SET @DJH = @DJHH + '000' + CONVERT(char(1),@MNO)
      ELSE
        SET @DJH = @DJHH + '00' + CONVERT(char(2),@MNO)
    ELSE
      SET @DJH = @DJHH + '0' + CONVERT(char(3),@MNO)
  ELSE
    SET @DJH = @DJHH + CONVERT(char(4),@MNO)
ELSE
  SET @DJH = @DJHH + '9999'


----（可提取的部分结束）------------------------------------------------------------------------------------------------------
 
--插入订单
INSERT INTO Orders (DJH, CustomerId, MX, InCom) VALUES (@DJH, @CustomerId, @MX, @Incom)

RETURN
GO