Microsoft Dynamics CRM4.0 创建单据的时候，自动生成单据编号的通用方法

一、新建两个实体，具体如下：

单据流水号(new_maxbillcode)
显示名称	名称	类型	格式	最大长度	需求级别	IME模式	备注
名称	new_name	nvarchar	文本	100	业务必需的	自动	系统自带
标记	new_billmark	nvarchar	文本	100	无约束	自动
实体	new_entity	nvarchar	文本	100	无约束	自动
年	new_year	nvarchar	文本	100	无约束	自动
月	new_month	nvarchar	文本	100	无约束	自动
日	new_day	nvarchar	文本	100	无约束	自动
位数	new_places	int	无
流水号	new_maxcode	int	无

测试(new_test)
显示名称	名称	类型	格式	最大长度	需求级别	IME模式	备注
名称	new_name	nvarchar	文本	100	业务必需的	自动	系统自带

二、在单据流水号实体上添加配置规则，具体如下图：

三、创建存储过程 [dbo].[UP_GetMaxBillCode] 

/*--------------------------------------------------------------------------------------------------------              
Memo 获取单据最大号        
        
DECLARE @BillMark VARCHAR(20)        
DECLARE @BillCode VARCHAR(50)        
SET @BillMark='NEW'        
EXEC UP_GetMaxBillCode @BillMark,@BillCode OUTPUT        
SELECT BillMark=@BillMark,BillCode=@BillCode        
        
SELECT * FROM NEW_MaxBillCodeExtensionBase        
--------------------------------------------------------------------------------------------------------*/        
CREATE PROC [dbo].[UP_GetMaxBillCode]        
@Entity VARCHAR(50),        
@BillCode VARCHAR(50) OUTPUT        
AS        
SET NOCOUNT ON        
DECLARE @MaxCode VARCHAR(20)        
DECLARE @Version ROWVERSION        
DECLARE @Times INT        
        
SELECT @MaxCode=NEW_MaxCode+1,@Version=[Version]        
FROM NEW_MaxBillCodeExtensionBase        
WHERE NEW_Entity=@Entity        
        
UPDATE NEW_MaxBillCodeExtensionBase SET NEW_MaxCode=NEW_MaxCode+1        
WHERE NEW_Entity=@Entity        
AND [Version]=@Version        
        
WHILE @@ROWCOUNT=0        
BEGIN        
 SET @Times=@Times+1        
 IF(@Times%100=0)        
 BEGIN        
  WAITFOR DELAY '00:00:01'        
  IF(@Times>500)        
  BEGIN        
   RETURN NULL        
  END        
 END        
         
 SELECT @MaxCode=NEW_MaxCode+1,@Version=[Version]        
 FROM NEW_MaxBillCodeExtensionBase        
 WHERE NEW_Entity=@Entity        
         
 UPDATE NEW_MaxBillCodeExtensionBase SET NEW_MaxCode=NEW_MaxCode+1        
 WHERE NEW_Entity=@Entity        
 AND [Version]=@Version        
END        
        
SELECT @BillCode=ISNULL(NEW_BillMark,'')+ISNULL(NEW_Year,'')+ISNULL(NEW_Month,'')+ISNULL(NEW_Day,'')+RIGHT(CONVERT(VARCHAR,@MaxCode),NEW_places)    
FROM NEW_MaxBillCodeExtensionBase        
WHERE NEW_Entity=@Entity 

四、创建测试实体的触发器 

--创建测试实体的触发器    
CREATE Trigger [dbo].[Company_Insert_new_test]
ON [dbo].[new_testExtensionBase]     
AFTER INSERT    
AS    
BEGIN    
 SET NOCOUNT ON     
 IF EXISTS(SELECT * FROM INSERTED WHERE new_name IS NULL)    
 BEGIN    
  DECLARE @BillCode VARCHAR(50)    
  EXEC UP_GetMaxBillCode 'new_test',@BillCode OUTPUT    
  UPDATE new_testExtensionBase SET new_name=@BillCode   
  WHERE new_testid IN (SELECT new_testid FROM INSERTED)    
 END       
END

五、新建一个测试实体记录，发现new_name自动生成如下：