ICode9
精准搜索请尝试： 精确搜索
首页
编程语言>
数据库
系统相关
互联网
其他分享
Python
Java
JavaScript
android
PHP
首页 > 数据库> 文章详细

【SqlServer存储过程（二维数组参数）调用】

2021-12-05 09:59:48  阅读：174  来源： 互联网

标签：oldindex2 oldindex 调用 tmpindex2 SqlServer SUBSTRING 二维 set tmpindex


外部调用存储过程方式： 

_SCLLID --存储过程名 @ICStockBill='-1,345,2021-12-05,8185,7403,349,administrator',--表头数组参数(用,分割) 
/*** @ICStockBillEntry='1443,2021120100071,1100,40,751||1443,2021120100068,1100,40,734||1369,2021120100045,980,40,718.8||1369,2021120100037,980,40,717.4||1389,2021112300105,980,40,100.2||1389,2021112300106,980,40,100'--表体二维数组参数(用||和,分割) ***/
@ICStockBillEntry='1443,2021120100071,1100,40,751'--表体一维数组参数(用,分割)

-- =============================================
-- Author:		zjh
-- Create date: 2021-12-05
-- Description:	生产领料
-- ================== 以下是存储过程的内容：========================
CREATE PROCEDURE [dbo].[_SCLLID]
@ICStockBill varchar(100),
@ICStockBillEntry varchar(1500)
AS
BEGIN	
SET NOCOUNT ON;
declare @p2 int
exec GetICMaxNum 'ICStockBill',@p2 output,1,16394
declare @BillNo varchar(20)
declare @ftrantype varchar(20)
set @ftrantype = 24--领料单
update ICBillNo set FCurNo=FCurNo+1 where FBillID=@FTranType			set @BillNo=(select FFormat from ICBillNo where FBillID= @FTranType)			declare @lenBm int
set @LenBm=len(@BillNo)
			set @BillNo=right(@BillNo+cast((select FCurNo from ICBillNo where FBillID= @FTranType) as varchar(12)),@LenBm)
			set @BillNo=(select FPreLetter from ICBillNo where FBillID= @FTranType)+@BillNo


declare @tmpindex int = 1


declare @oldindex int = 1




declare @m1 int


set @tmpindex=CHARINDEX(',',@ICStockBill)


set @m1=cast(SUBSTRING(@ICStockBill,@oldindex,@tmpindex-@oldindex) as int)


set @oldindex=@tmpindex




declare @m2 int


set @tmpindex=CHARINDEX(',',@ICStockBill,@oldindex+1)


set @m2=cast(SUBSTRING(@ICStockBill,@oldindex+1,@tmpindex-@oldindex-1) as int)


set @oldindex=@tmpindex




declare @m3 char(10)


set @tmpindex=CHARINDEX(',',@ICStockBill,@oldindex+1)


set @m3=SUBSTRING(@ICStockBill,@oldindex+1,@tmpindex-@oldindex-1)


set @oldindex=@tmpindex




declare @m4 int


set @tmpindex=CHARINDEX(',',@ICStockBill,@oldindex+1)


set @m4=cast(SUBSTRING(@ICStockBill,@oldindex+1,@tmpindex-@oldindex-1) as int)


set @oldindex=@tmpindex




declare @m5 int


set @tmpindex=CHARINDEX(',',@ICStockBill,@oldindex+1)


set @m5=cast(SUBSTRING(@ICStockBill,@oldindex+1,@tmpindex-@oldindex-1) as int)


set @oldindex=@tmpindex




declare @stockid int


set @tmpindex=CHARINDEX(',',@ICStockBill,@oldindex+1)


set @stockid=cast(SUBSTRING(@ICStockBill,@oldindex+1,@tmpindex-@oldindex-1) as int)




declare @m6 int


set @m6=(select FUserID from t_user where FName=SUBSTRING(@ICStockBill,@tmpindex+1,LEN(@ICStockBill)-@tmpindex))




begin tran


begin try


INSERT INTO ICStockBill(FInterID,FBillNo,FBrNo,FTranType,FCancellation,FStatus,FUpStockWhenSave,FROB,FHookStatus,


	Fdate,FDeptID,Fuse,FCheckDate,FSManagerID,FFManagerID,FBillerID,FAcctID,FMultiCheckDate1,FMultiCheckDate2,


	FMultiCheckDate3,FMultiCheckDate4,FMultiCheckDate5,FVchInterID,FMultiCheckDate6,FPurposeID,FWBINTERID,


	FSelTranType,FBackFlushed,FManageType,FPrintCount)


values(@p2,@BillNo,'0',24,0,0,0,@m1,0,@m3,@m2,'',Null,@m4,@m5,@m6,0,Null,Null,Null,Null,Null,0,Null,12000,0,1,0,0,0)




set @oldindex=-1


set @tmpindex=CHARINDEX('||', @ICStockBillEntry,@oldindex+2)


declare @m21 int


declare @m22 varchar(28)


declare @m23 varchar(28)


declare @m24 varchar(28)


declare @m25 decimal(13,1)


declare @tmpindex2 int = 1


declare @oldindex2 int = 1


if (@tmpindex > 0)


 BEGIN


  declare @tmpentry varchar(80)


  declare @cnt int = 1


  WHILE (@tmpindex > 0)


    BEGIN


      BEGIN


		set @tmpentry=SUBSTRING(@ICStockBillEntry, @oldindex+2, @tmpindex-@oldindex-2)




        set @tmpindex2=CHARINDEX(',',@tmpentry)


		set @m21=cast(SUBSTRING(@tmpentry,@oldindex2,@tmpindex2-@oldindex2) as int)


		set @oldindex2=@tmpindex2




		set @tmpindex2=CHARINDEX(',',@tmpentry,@oldindex2+1)


		set @m22=SUBSTRING(@tmpentry,@oldindex2+1,@tmpindex2-@oldindex2-1)


		set @oldindex2=@tmpindex2




		set @tmpindex2=CHARINDEX(',',@tmpentry,@oldindex2+1)


		set @m23=SUBSTRING(@tmpentry,@oldindex2+1,@tmpindex2-@oldindex2-1)


		set @oldindex2=@tmpindex2




		set @tmpindex2=CHARINDEX(',',@tmpentry,@oldindex2+1)


		set @m24=SUBSTRING(@tmpentry,@oldindex2+1,@tmpindex2-@oldindex2-1)	




		set @m25=cast(SUBSTRING(@tmpentry,@tmpindex2+1,LEN(@tmpentry)-@tmpindex2) as decimal(13,1))


		set @tmpindex2=1


		set @oldindex2=1




		INSERT INTO ICStockBillEntry (FInterID,FEntryID,FBrNo,FItemID,FAuxPropID,FBatchNo,


			FQtyMust,FQty,FReProduceType,FCostOBJID,FCostObjGroupID,FUnitID,FAuxQtyMust,Fauxqty,


			FSecCoefficient,FSecQty,FAuxPlanPrice,FPlanAmount,Fauxprice,Famount,FBomInterID,Fnote,


			FKFDate,FKFPeriod,FPeriodDate,FIsVMI,FEntrySupply,FSCStockID,FEntrySelfB0457,


			FEntrySelfB0458,FDCSPID,FOperSN,FOperID,FSNListID,FSourceBillNo,FSourceTranType,


			FSourceInterId,FSourceEntryID,FICMOBillNo,FICMOInterID,FPPBomEntryID,FInStockID,


			FCostCenterID,FPlanMode,FMTONo,FPositionNo,FItemSize,FItemSuite,FDiscardID) 


		values(@p2,@cnt,'0',@m21,0,@m22,0,@m25,1059,0,0,275,0,@m25,0,0,0,0,0,0,0,'',Null,0,Null,0,0,


			@stockid,@m23,@m24,0,0,'0',0,'',0,0,0,'',0,0,0,0,14036,'','','','',0)


		set @cnt = @cnt + 1




      END




      SET @oldindex = @tmpindex


      set @tmpindex=CHARINDEX('||', @ICStockBillEntry,@oldindex+2)


      if (@tmpindex < 1)


        BEGIN


		set @tmpentry=SUBSTRING(@ICStockBillEntry, @oldindex+2, LEN(@ICStockBillEntry)-@oldindex-1)




        set @tmpindex2=CHARINDEX(',',@tmpentry)


		set @m21=cast(SUBSTRING(@tmpentry,@oldindex2,@tmpindex2-@oldindex2) as int)


		set @oldindex2=@tmpindex2




		set @tmpindex2=CHARINDEX(',',@tmpentry,@oldindex2+1)


		set @m22=SUBSTRING(@tmpentry,@oldindex2+1,@tmpindex2-@oldindex2-1)


		set @oldindex2=@tmpindex2




		set @tmpindex2=CHARINDEX(',',@tmpentry,@oldindex2+1)


		set @m23=SUBSTRING(@tmpentry,@oldindex2+1,@tmpindex2-@oldindex2-1)


		set @oldindex2=@tmpindex2




		set @tmpindex2=CHARINDEX(',',@tmpentry,@oldindex2+1)


		set @m24=SUBSTRING(@tmpentry,@oldindex2+1,@tmpindex2-@oldindex2-1)




		set @m25=cast(SUBSTRING(@tmpentry,@tmpindex2+1,LEN(@tmpentry)-@tmpindex2) as decimal(13,1))




		INSERT INTO ICStockBillEntry (FInterID,FEntryID,FBrNo,FItemID,FAuxPropID,FBatchNo,


			FQtyMust,FQty,FReProduceType,FCostOBJID,FCostObjGroupID,FUnitID,FAuxQtyMust,Fauxqty,


			FSecCoefficient,FSecQty,FAuxPlanPrice,FPlanAmount,Fauxprice,Famount,FBomInterID,Fnote,


			FKFDate,FKFPeriod,FPeriodDate,FIsVMI,FEntrySupply,FSCStockID,FEntrySelfB0457,


			FEntrySelfB0458,FDCSPID,FOperSN,FOperID,FSNListID,FSourceBillNo,FSourceTranType,


			FSourceInterId,FSourceEntryID,FICMOBillNo,FICMOInterID,FPPBomEntryID,FInStockID,


			FCostCenterID,FPlanMode,FMTONo,FPositionNo,FItemSize,FItemSuite,FDiscardID) 


		values(@p2,@cnt,'0',@m21,0,@m22,0,@m25,1059,0,0,275,0,@m25,0,0,0,0,0,0,0,'',Null,0,Null,0,0,


			@stockid,@m23,@m24,0,0,'0',0,'',0,0,0,'',0,0,0,0,14036,'','','','',0)		


      END


    END


  END


else


  BEGIN


	set @tmpindex2=CHARINDEX(',',@ICStockBillEntry)


	set @m21=cast(SUBSTRING(@ICStockBillEntry,@oldindex2,@tmpindex2-@oldindex2) as int)


	set @oldindex2=@tmpindex2




	set @tmpindex2=CHARINDEX(',',@ICStockBillEntry,@oldindex2+1)


	set @m22=SUBSTRING(@ICStockBillEntry,@oldindex2+1,@tmpindex2-@oldindex2-1)


	set @oldindex2=@tmpindex2




	set @tmpindex2=CHARINDEX(',',@ICStockBillEntry,@oldindex2+1)


	set @m23=SUBSTRING(@ICStockBillEntry,@oldindex2+1,@tmpindex2-@oldindex2-1)


	set @oldindex2=@tmpindex2




	set @tmpindex2=CHARINDEX(',',@ICStockBillEntry,@oldindex2+1)


	set @m24=SUBSTRING(@ICStockBillEntry,@oldindex2+1,@tmpindex2-@oldindex2-1)




	set @m25=cast(SUBSTRING(@ICStockBillEntry,@tmpindex2+1,LEN(@ICStockBillEntry)-@tmpindex2) as decimal(13,1))




	INSERT INTO ICStockBillEntry (FInterID,FEntryID,FBrNo,FItemID,FAuxPropID,FBatchNo,


		FQtyMust,FQty,FReProduceType,FCostOBJID,FCostObjGroupID,FUnitID,FAuxQtyMust,Fauxqty,


		FSecCoefficient,FSecQty,FAuxPlanPrice,FPlanAmount,Fauxprice,Famount,FBomInterID,Fnote,


		FKFDate,FKFPeriod,FPeriodDate,FIsVMI,FEntrySupply,FSCStockID,FEntrySelfB0457,


		FEntrySelfB0458,FDCSPID,FOperSN,FOperID,FSNListID,FSourceBillNo,FSourceTranType,


		FSourceInterId,FSourceEntryID,FICMOBillNo,FICMOInterID,FPPBomEntryID,FInStockID,


		FCostCenterID,FPlanMode,FMTONo,FPositionNo,FItemSize,FItemSuite,FDiscardID) 


	values(@p2,1,'0',@m21,0,@m22,0,@m25,1059,0,0,275,0,@m25,0,0,0,0,0,0,0,'',Null,0,Null,0,0,


		@stockid,@m23,@m24,0,0,'0',0,'',0,0,0,'',0,0,0,0,14036,'','','','',0)




  END




 end try


 begin catch


	rollback tran


	select 0


	return


 end catch






 commit tran




 select 1




END







 
 


标签：oldindex2,oldindex,调用,tmpindex2,SqlServer,SUBSTRING,二维,set,tmpindex	

来源： https://blog.csdn.net/zjhh116/article/details/121725635 




本站声明：
1. iCode9 技术分享网（下文简称本站）提供的所有内容，仅供技术学习、探讨和分享；

2. 关于本站的所有留言、评论、转载及引用，纯属内容发起人的个人观点，与本站观点和立场无关；

3. 关于本站的所有言论和文字，纯属内容发起人的个人观点，与本站观点和立场无关；

4. 本站文章均是网友提供，不完全保证技术分享内容的完整性、准确性、时效性、风险性和版权归属；如您发现该文章侵犯了您的权益，可联系我们第一时间进行删除；

5. 本站为非盈利性的个人网站，所有内容不会用来进行牟利，也不会利用任何形式的广告来间接获益，纯粹是为了广大技术爱好者提供技术内容和技术思想的分享性交流网站。


	

     

      

      

      

      

     

     

    

     
    
      
  • 
       
    


    • 
      
  •  
    • 
      
  • 
       
    


    • 
      
  • 
       
    
 
       
    • 
     

     
    
      
  • 
       
    
       
    • 
      
  • 
       
    
       
    • 
     

    

   

  

  

     

    

     关于我们
     |
     联系我们
     |
     留言反馈
    

    

     
专注分享技术，共同学习，共同进步。侵权联系[81616952@qq.com]

     
Copyright (C)ICode9.com, All Rights Reserved.

     
ICode9版权所有