材料分解与材耗统计su_zyj第一次修改增加699分解.docVIP

材料分解与材耗统计su_zyj第一次修改增加699分解 USE [UFDATA_001_2010] GO /****** 对象: StoredProcedure [dbo].[bom_susplit] 脚本日期: 08/20/2010 14:06:54 ******/ SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO ------------------------ ----物料分解与材耗统计zyj-su ---------------------------- ALTER PROCEDURE [dbo].[bom_susplit] ( --条件参数 @chrWhere varchar(1000) ) AS Declare @cflag varchar(20) --是否分解 Declare @scparentinv varchar(20) --起始母件编码 Declare @ecparentinv varchar(20) --结束母件编码 declare @chrSql nvarchar (4000) declare @D1 int,@D2 int,@F1 int IF LTRIM(RTRIM(@cflag)) is null SET @cflag=0 IF LTRIM(RTRIM(@scparentinv)) is null SET @scparentinv= IF LTRIM(RTRIM(@ecparentinv)) is null SET @ecparentinv=ZZZZZZZZZZZZZZZZZZZZ --获取条件 If Ltrim(Rtrim(@chrwhere)) begin set @chrWhere=replace(@chrWhere,cpinv = N,cpinv=) set @chrWhere=replace(@chrWhere,cpinv = N,cpinv=) set @chrWhere=replace(@chrWhere,cflag = N,cflag=) SET @F1=charindex(cflag=,@chrWhere)+7 SET @D1=charindex(cpinv=,@chrWhere)+8 SET @D2=charindex(cpinv=,@chrWhere)+8 IF @F17 SET @cflag=substring(@chrwhere,@f1,charindex(,@CHRWHERE,@f1)-@f1) IF @D18 SET @scparentinv=substring(@chrwhere,@D1,charindex(,@CHRWHERE,@D1)-@D1) IF @D28 SET @ecparentinv=substring(@chrwhere,@D2,charindex(,@CHRWHERE,@D2)-@D2) end --删除已存在的表，重新生成表 IF EXISTS(SELECT NAME FROM TEMPDB..SYSOBJECTS WHERE NAME=su_Bom_split_temp0) DROP TABLE TEMPDB..su_Bom_split_temp0 IF EXISTS(SELECT NAME FROM TEMPDB..SYSOBJECTS WHERE NAME=su_Bom_split_temp1) DROP TABLE TEMPDB..su_Bom_split_temp1 IF EXISTS(SELECT NAME FROM TEMPDB..SYSOBJECTS WHERE NAME=su_Bom_split_temp2) DROP TABLE TEMPDB..su_Bom_split_temp2 IF EXISTS(SELECT NAME FROM TEMPDB..SYSOBJECTS WHERE NAME=su_Bom_split_temp3) DROP TABLE TEMPDB..su_Bom_split_temp3 IF EXISTS(SELECT NAME FROM TEMPDB..SYSOBJECTS WHERE NAME=su_Bom_split_temp4) DROP TABLE TEMPDB..su_Bom_split_temp4 IF EXISTS(SELECT NAME FROM TEMPDB..SYSOBJECTS WHERE NAME=bom_susplit) DROP TAB