《基于net框架gsp医药管理系统原码》由会员分享，可在线阅读，更多相关《基于net框架gsp医药管理系统原码（176页珍藏版）》请在金锄头文库上搜索。
1、USE tytdyf_100831GO/* Object: StoredProcedure dbo.proCSSPBCreate Script Date: 05/25/2015 10:31:34 */SET ANSI_NULLS ONGOSET QUOTED_IDENTIFIER ONGO- =- Author:- Create date: 2009-12-28- Description:新增商品信息- =ALTER PROCEDURE dbo.proCSSPBCreate CompanyID INT , UserID VARCHAR(20) , LB VARCHAR(20) , ZJM VA
2、RCHAR(30) , TM VARCHAR(30) , KH VARCHAR(20) , HH VARCHAR(20) , PM VARCHAR(500) , BM VARCHAR(500) , GG VARCHAR(500) , CD VARCHAR(500) , LDW VARCHAR(20) , CBJ DECIMAL(20, 6) , ZZSL INT , JJ DECIMAL(20, 6) , LSJ DECIMAL(20, 6) , LSJ1 DECIMAL(20, 6) , MAX_SL DECIMAL(20, 6) , MIN_SL DECIMAL(20, 6) , XQ V
3、ARCHAR(100) , SFCF BIT , MJL INT , ZY1 VARCHAR(50) , ZY2 VARCHAR(50) , BZ VARCHAR(50) , JHR VARCHAR(20) , PJ DECIMAL(20, 6) , ZDJL DECIMAL(20, 6) , JX VARCHAR(50) , ZBZ INT , ZCSB VARCHAR(100) , PZWH VARCHAR(100) , YSBZ VARCHAR(100) , CCTJ VARCHAR(50) , YPXZ VARCHAR(200) , YPYT VARCHAR(200) , RLFA V
4、ARCHAR(20) , CBZKL DECIMAL(20, 6) , -ONLYMONEY BIT , ATTR VARCHAR(50) , FKATTR VARCHAR(50) , ISYBPZ BIT , SJ DECIMAL(20, 6) , TYBZ BIT , JG9 DECIMAL(20, 6) , ZDXJ DECIMAL(20, 6) , SCDW VARCHAR(200) , JFS FLOAT , SFJF BIT , RKCKBH int, RKXQYQ INT , SDXQTS INT , SFSYPZ BIT , SFZDPZ BIT , -CBHSFS INT ,
5、 SFCJPZ BIT , IsYJM BIT , TLPZBM VARCHAR(100) , ZPXX VARCHAR(100) , tgbz BIT , JYFW INT , TM1 VARCHAR(30), SFCFY BIT , FLength INT , FWidth INT , FHeight INT , FStack INT , PFZDJL INT , NewID INT OUT , JDSJ DATETIME OUTAS BEGIN DECLARE NewID2 INT DECLARE KDRQ DATETIMEDECLAREONLYMONEY BIT SET KDRQ =
6、GETDATE() IF EXISTS ( SELECT 1 FROM SPB WHERE hh = HH ) RETURN 2 IF NOT EXISTS ( SELECT 1 FROM CSSPLB WHERE LBBH = LB ) RETURN 3SELECT JX = LTRIM(RTRIM(jx) , TLPZBM = LTRIM(RTRIM(TLPZBM), ATTR = LTRIM(RTRIM(ATTR), FKATTR = LTRIM(RTRIM(FKATTR), LDW = LTRIM(RTRIM(LDW)-剂型 IF JX AND NOT EXISTS(SELECT *
7、FROM CSJX WHERE NAME = JX)INSERT INTO CSJX ( NAME, ZJM )VALUES ( JX, - NAME - varchar(20) LEFT(dbo.PY(JX),10) - ZJM - varchar(10) ) -同品编码 IF TLPZBM AND NOT EXISTS(SELECT * FROM CSTLPZBM WHERE TLBM = TLPZBM)INSERT INTO CSTLPZBM ( TLBM, ZJM, BZ )VALUES ( TLPZBM, - TLBM - varchar(100) dbo.PY(TLPZBM), -
8、 ZJM - varchar(100) - BZ - varchar(100) ) -属性 IF ATTR AND NOT EXISTS(SELECT * FROM CSSPSX WHERE NAME = ATTR)INSERT INTO CSSPSX ( NAME, ZJM )VALUES ( ATTR, - NAME - varchar(30) LEFT(dbo.PY(ATTR),10) - ZJM - varchar(10) )-单位 IF LDW AND NOT EXISTS(SELECT * FROM CSJLDW WHERE JLMC = LDW)INSERT INTO CSJLD
9、W ( JLMC, ZJM, BZ )VALUES ( LDW, - JLMC - varchar(40) LEFT(dbo.py(LDW),10), - ZJM - varchar(10) - BZ - varchar(200) ) insert into CSSPLZ (LM,NAME, ZJM)select n, v, dbo.PY(v)from( select LDW v, LDW n union select FKATTR v, FKATTR n union select ATTR v, ATTR n union select LDW v, LDW n union select JX
10、 v, JX n union select CD v, CD n union select SCDW v, SCDW n union select YPXZ v, YPXZ n union select YPYT v, YPYT n union select YSBZ v, YSBZ n union select CCTJ v, CCTJ n union select ZCSB v, ZCSB n union select BZ v, BZ n union select ZY1 v, ZY1 n union select ZY2 v, ZY2 n union select TLPZBM v,
11、TLPZBM n union select ZPXX v, ZPXX n ) as tabwhere rtrim(ltrim(isnull(tab.v, ) and not exists(select 1 from CSSPLZ where LM=n and NAME=v)IF hh = 00SELECT ONLYMONEY = 1 , SFCJPZ = 0else select ONLYMONEY = 0 SET NewID = -1 SELECT NewID = ISNULL(MAX(id), 0) FROM SPB IF NewID = -1 RETURN 404 SELECT NewI
12、D = NewID + 1, JDSJ = KDRQ SELECT HH = dbo.f_Convert(HH, 0) INSERT INTO SPB ( ID, LB, ZJM, TM, KH, HH, PM, BM, GG, CD, LDW, CBJ, ZZSL, JJ, LSJ, LSJ1, MAX_SL, MIN_SL, XQ, SFCF, MJL, ZY1, ZY2, BZ, JHR, PJ, ZDJL, JX, ZBZ, ZCSB, PZWH, YSBZ, CCTJ, YPXZ,YPYT ,CBZKL, ONLYMONEY, ATTR, ALLOWDELETED, FKATTR, ISYBPZ, SJ, TYBZ, JG9, ZDXJ, JDSJ, SCDW, JFS, SFJF,RKCKBH,
