用存储过程生成单据号

原创 2005年05月08日 21:02:00

  大多数的单据都需要有个单据号。有的单据号就是顺序编号如:000001,000002……。有的单据号是有一定意义的,如我遇见过的一个需求:单据号共12位,1位帐套号(区分使用单位的),1位单据标识号(表示该单是什么单,如:E表示订货单,X表示销售单),2位年号(05表示2005年),2位月号,2位日号,4位编号(按当天的顺序,最大9999,超过9999的就用9999表示) 。JE0505070001就表示某某单位2005年5月7日的第一单订货单。用编程实现这个要求当然不算太难,不过要将单据号生成方法放到存储过程中去就要费点心思了。


下面就以插入订单为例,其中有一段代码是可提取到一个单独的存储存储过程中的,这样可增加通用性。

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

AS

SET NOCOUNT ON

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

--找帐套字头号
DECLARE @IH char(1)
SELECT @IH = LEFT(IncID,1FROM 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

分享一个自动生成单据的存储过程

近期接到一个需求需要将一个大的单据拆分成多个小单据,这几个小单据主信息要相同,除了单号和ID外其他都要一样,于是 我考虑了借用游标和循环来进行拆分数据,并最终实现了该方法,通过了测试,代码如下: ...

MySQL存储过程和代码分别生成订单号,MySQL拾遗

业务中我们的订单号有几位是一个序列,每天的第一笔订单序列为1,以后每增加一个订单序列+1。每天需要清零。如果是Oracle就可以直接使用Sequence实现。在MySQL中,我们在数据库中设计一个表 ...

存储过程实现生成流水号

  • 2017年08月15日 15:10
  • 3KB
  • 下载

存储过程自动生成项目编号

  • 2013年11月01日 12:30
  • 2KB
  • 下载

用mysql的存储过程实现生成唯一订单号

DELIMITER $$ USE `roamerbuddy`$$ DROP PROCEDURE IF EXISTS `generate_orderNo`$$ CREATE DEFINER=`ro...

SocanCode(自动生成存储过程)

  • 2012年04月28日 20:41
  • 3.11MB
  • 下载

myql存储过程生成订单号

DELIMITER $$ USE `test`$$ DROP PROCEDURE IF EXISTS `GENERATE_ORDERNO`$$ CREATE DEFINER=`root`@`%`...
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:用存储过程生成单据号
举报原因:
原因补充:

(最多只允许输入30个字)