--删除旧记录 --delete from Report_Objects where Code='HO.Reject.Drug' --删除脚本内容 IF not EXISTS(SELECT * FROM Report_Objects WHERE code='HO.Reject.Drug') begin --插入 Declare @Report_Id_1765 int Exec Core_NewId 'Report_Objects', 'id', @Report_Id_1765 out Declare @Report_Id_1765_CateID int Set @Report_Id_1765_CateID = (select id from Report_Categories where code='HIS.12.1') insert into Report_Objects(ID,Code,Name,Description,Password,CategoryID,xType,Classification,ProductID,ProgramID,ElementID,CreateDate,UpdateDate,ISSUANCEDATE,Config,SetupPath,IsMenu,Enabled,GroupName,Authorized,RefreshInterval) Values(@Report_Id_1765, 'HO.Reject.Drug', '拒收医嘱查询', '拒收医嘱查询', Null, @Report_Id_1765_CateID, 1, 4, 100, 0, Null, '2019-02-27 09:16:13', '2019-02-27 09:16:13', Null, ' 886F479D479676FB649B913907140A15Declare @PharmacyId int , @BDate datetime , @EDate datetime SET @PharmacyId =:PharmacyId SET @BDate =:BDate SET @EDate =:EDate --已有字段不允许删除，只能增加查询条件 SELECT CAST(0 as int) selected , J.VAJ01, J.VAA01, A.VAA02, A.VAA04, A.VAA05, A.ABW01 , ABW02 = CASE A.ABW01 WHEN 1 THEN ''男'' WHEN 2 THEN ''女'' WHEN 0 THEN ''未知'' END , VAA10A=ISNULL(CONVERT(VARCHAR, VAA10),'''') +'' ''+ ISNULL((SELECT AAU02 FROM AAU1 U WHERE U.AAU01 = A.AAU01),'''') , ISNULL(E.BCQ04B, '''') AS BCQ04, ISNULL(Q.ROWNR, 0) AS BCQ_ROWNR, J.VAJ04 , J.VAJ05, J.VAJ09, J.VAA07, J.VAI01, J.VAF01, F.CBM01 , ISNULL(F.VAF11, 2) AS VAF11 , VAF11A = CASE WHEN F.VAF11 = 1 and X.BBX20 = 0 THEN 3 WHEN F.VAF11 = 1 and X.BBX20<> 0 THEN 4 ELSE ISNULL(F.VAF11,2) END , J.BDN01, (SELECT BDN02 FROM BDN1 WHERE BDN1.BDN01=Y.BDN01) BDN02, J.BBY01 , Y.BBY04, Y.BBY05, Y.BBY06, Y.BBE02, G.BDG02C, G.BAG07, G.BAG09 , G.BAG09 药库包装 , CAST(CAST(J.VAJ25/J.VAJ34 AS NUMERIC(18,4)) AS VARCHAR) + '' ''+G.BDG02B AS BDG02B , G.BDG02B as ZyUnit , j.VAJ25/j.VAJ34 as ZyVAJ25 , CONVERT(VARCHAR, CONVERT(INT, ROUND(J.VAJ25/G.BAG09,0,1))) +'' ''+ G.BDG02C + CASE WHEN J.VAJ25 - ROUND(J.VAJ25/G.BAG09,0,1) * G.BAG09 <> 0 THEN CONVERT(VARCHAR,CONVERT(INT, J.VAJ25 - ROUND(J.VAJ25/G.BAG09,0,1) * G.BAG09)) + '' ''+ Y.BBY08 ELSE '''' END AS TQtyAbst , J.VAJ23, J.VAJ24, J.VAJ25, J.VAJ32, J.VAJ33, J.VAJ34, J.VAJ35, J.VAJ36, J.VAJ37, J.VAJ38 , F.VAF59, F.VAF17, F.VAF18, G.BAG03, X.BDG02, X.BBX20, X.BBX05 , ISNULL((SELECT TOP 1 P.BAP03 FROM BAP1 P WHERE P.BAP02 = T.BAP02),9) AS BAP01A , X.BBX05 AS VAF22, F.VAF19, F.VAF26, F.VAF23+V.VAF23 AS VAF23 , ISNULL(F.VAF58, 0) AS VAF58 , G.BAT02, T.BAP02 , J.BCK01A, J.BCK01B, J.BCK01C, J.BCK01D, J.BCK01E, n.BCK03 BCK03C , z.BCK03 BCK03E, J.BCE03A, J.BCE02B, J.BCE03B, J.BCE03C, J.VAJ46, J.VAJ47, J.VAJ48, J.VAJ51, J.VAJ54 , isnull(G.BAT02,'''')+isnull(L.BCD02,'''') BCD02 , ''床号: ''+ ISNULL(Q.BCQ03,'''')+'' ''+ISNULL(E.BCQ04B, '''')+ '' 住院号: ''+ISNULL(VAA04,'''') +'' 姓名: ''+ISNULL(VAA05,'''') +'' 性别: ''+CASE A.ABW01 WHEN 1 THEN ''男'' WHEN 2 THEN ''女'' ELSE ''未知'' END +'' 年龄: ''+ISNULL(CONVERT(VARCHAR, VAA10),'''') +'' ''+ ISNULL((SELECT AAU02 FROM AAU1 U WHERE U.AAU01 = A.AAU01),'''') +'' 住院科室: ''+ISNULL(m.BCK03,'''') +'' 入院诊断：''+ISNULL((select top 1 VAO15 from VAO1 where VAA07=VAE01 and acf01=2 and vao11=2) , '''') +'' 处方号：''+ISNULL(convert(varchar(10),J.VAI01),'''') AS Caption FROM VAJ2 J with(nolock) join BBY1 Y ON Y.BBY01 = J.BBY01 join BAG1 G ON G.BBY01 = Y.BBY01 join VAA1 A with(nolock) ON A.VAA01 = J.VAA01 join VAE1 E with(nolock) ON E.VAE01 = J.VAA07 left join VAF2 F with(nolock) ON J.VAF01 = F.VAF01 left join VAF2 V with(nolock) ON V.VAF01 = F.VAF01A left join BBX1 X ON X.BBX01 = V.BBX01 left join BBT1 T ON T.BBX01 = G.BBX01 left join BCQ1 Q ON Q.BCK01A= E.BCK01C and Q.BCQ04 = E.BCQ04B left join BCK1 m on m.BCK01 = j.BCK01B left join BCK1 n on n.BCK01 = j.BCK01C left join BCK1 z on z.BCK01 = j.BCK01E join (SELECT CASE BAU01 WHEN ''51'' THEN ''1'' --西药房 WHEN ''53'' THEN ''2'' --成药房 WHEN ''52'' THEN ''3'' --中药房 ELSE ''0'' END BAU01 FROM BAZ1 WHERE BCK01 = @PharmacyID) U ON U.BAU01 = J.BDN01 and J.BCK01D = @PharmacyId left join BAL1 L ON L.BCK01 = @PharmacyId and L.BBY01 = J.BBY01 WHERE VAJ47 between @BDate and @EDate and VAJ53 = 2 and J.BDN01 <= ''3'' ', Null, 0, 1, Null, 0, Null) end else --更新 begin print 'HO.Reject.Drug 已经存在.' end GO --删除旧记录 --delete from Report_Objects where Code='Snd.Drug.After' --删除脚本内容 IF not EXISTS(SELECT * FROM Report_Objects WHERE code='Snd.Drug.After') begin --插入 Declare @Report_Id_1798 int Exec Core_NewId 'Report_Objects', 'id', @Report_Id_1798 out Declare @Report_Id_1798_CateID int Set @Report_Id_1798_CateID = (select id from Report_Categories where code='HIS.12.1') insert into Report_Objects(ID,Code,Name,Description,Password,CategoryID,xType,Classification,ProductID,ProgramID,ElementID,CreateDate,UpdateDate,ISSUANCEDATE,Config,SetupPath,IsMenu,Enabled,GroupName,Authorized,RefreshInterval) Values(@Report_Id_1798, 'Snd.Drug.After', '发药后提示信息', '发药后提示信息', Null, @Report_Id_1798_CateID, 1, 4, 100, 0, Null, '2019-03-19 16:06:51', '2019-03-19 16:06:51', Null, ' BDC3FBE64532A78F23C6A828B548B2E5Declare @VAA07 int , @TradeId int , @ACF01 int SET @VAA07 = :VAA07 SET @TradeId = :TradeId SET @ACF01 =:ACF01 --MsgInfo返回不为空，前台提示 Declare @MsgInfo varchar(1024) SET @MsgInfo ='''' SELECT @MsgInfo MsgInfo ', Null, 0, 1, Null, 0, Null) end else --更新 begin print 'Snd.Drug.After 已经存在.' end GO