日期:2014-05-16  浏览次数:20386 次

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

      近期接到一个需求需要将一个大的单据拆分成多个小单据,这几个小单据主信息要相同,除了单号和ID外其他都要一样,于是

我考虑了借用游标和循环来进行拆分数据,并最终实现了该方法,通过了测试,代码如下:

       IF OBJECT_ID(N'tempdb..#tmpOrgList', 'U') IS NOT NULL  
  drop table #tmpOrgList 


---获取所有有客户的分公司的列表
select distinct OrgID into #tmpOrgList from v_WS400TelSurveyCustDetl 

--声明新建单据的ID和BillNo
declare @intBillID int=0 
declare @chvBillNO nvarchar(20)

---季度首月的第一天
declare @dtLastQtStart datetime 
---季度的年和季度
declare @intYearLastQt int
declare @intLastQt int

---自动执行时赋值当前年度和当前季度
set @dtLastQtStart=DATEADD(qq, DATEDiff(qq,1,GETDATE()), 0)
set @intYearLastQt=Year(@dtLastQtStart)
set @intLastQt=DATEPART(QQ,@dtLastQtStart)

---手动执行时重新赋值指定的年度和季度
if @Flage=1 
begin
set @intYearLastQt=@intYear
set @intLastQt=@intQt
end

---获取所有的抽查明细列表,去除重复的数据
IF OBJECT_ID(N'tempdb..#tmpSVDetlList', 'U') IS NOT NULL  
 drop table #tmpSVDetlList 

select distinct 
[OrgID],[CompanyID],[DistributorID],[CompBranchID],[CustID],[CustChannelID]
,[CustName],isnull([CustContact],'') as Contacts,isnull([MobilePhone],'') as MobilePhone,
isnull([CustTel],'') as ContactPhone,
[CustAddr] as ClientAddress,[AreaID],[AreaType],[AreaName]
,[IsShow],GETDATE() as CreateTime,2 as BillerID,GETDATE() as ModifyTime 
into #tmpSVDetlList
from v_WS400TelSurveyCustDetl 

declare @intOrgSVDetlCount int
declare @intOrgSVDetlPage int 
declare @intPageCount int
declare @intPage int=0 

---每个分公司明细超过500条就开始拆分
set @intPageCount=500

DECLARE WS400_Cursor Cursor Local For
SELECT OrgID FROM #tmpOrgList
OPEN WS400_Cursor
DECLARE @intOrgID int
FETCH NEXT FROM WS400_Cursor INTO @intOrgID

WHILE @@FETCH_STATUS=0 
BEGIN
BEGIN TRY

---判断所属分公司数据量是否超过了500条,超过了则拆分成几条数据来插入
---先生成单个分公司的抽查数据并插入临时表中
IF OBJECT_ID(N'tempdb..#tmpOrgSVDetlList', 'U') IS NOT NULL  
drop table #tmpOrgSVDetlList 
 
select 
@intBillID as BillID,ROW_NUMBER() over (order by CompanyID asc,CustID asc) as SNO,
[OrgID],[CompanyID],[DistributorID],[CompBranchID],[CustID],[CustChannelID]
,[CustName],[Contacts],[MobilePhone],[ContactPhone],
[ClientAddress],[AreaID],[AreaType],[AreaName]
,[IsShow],GETDATE() as CreateTime,2 as BillerID,GETDATE() as ModifyTime 
into #tmpOrgSVDetlList 
from #tmpSVDetlList 
where OrgID=@intOrgID 

---获取当前这个分公司的所有抽查数据的数量
select @intOrgSVDetlCount=COUNT(1) from #tmpOrgSVDetlList
set  @intOrgSVDetlPage=@intOrgSVDetlCount/@intPageCount 
set @intPage=0