--增加分类
GO
IF not EXISTS(SELECT * FROM SYS_ScriptCategories WHERE id=1)
insert into SYS_ScriptCategories(ID,Code,Name,ComponentID,xRowNum,ParentID,xLevel,Description)  Values(1, 'SC1', 'HOMaster 基础管理', 1, 0, 0, 0, Null)
else
print 'SYS_ScriptCategories.id=1 已经存在.'

GO


--删除旧记录
delete from SYS_Scripts where id=16629 --删除脚本内容
GO


GO
IF not EXISTS(SELECT * FROM SYS_Scripts WHERE id=16629)
insert into SYS_Scripts(ID,CategoryID,Code,Name,Description,xType,DatasourceID,DisplayNames,xRowNum,xText,UpdateDate,UpdateUser,UpdateMode)  Values(16629, 80, 'SQL_医嘱ID检索明细Ex', '按医嘱ID检索明细(住院)', '按医嘱ID检索住院明细', 1, 1, Null, 1, 'declare @p101002007 tinyint,@p167 int,@vaf01 int,@vaa07 int
set @p101002007=dbo.GetEmpPermissionValue(101002007,@$EmpId)
set @p167=dbo.GetSysParamValue(100,105001,167)
set @vaf01=%d
set @vaa07=%d
select 
  selected = 0 ,d.VAI04 ,b.BBY05 ,b.BBY06 ,b.AAS01 ,b.ABF01 ,C.BCK03 ,a.VAJ01 ,a.VAA01 ,a.VAA07,
  a.VAJ04 ,a.VAJ05 ,a.ROWNR ,a.VAJ01A ,a.VAJ01B ,a.VAJ09 ,a.VAJ10 ,a.VAI01 ,a.VAF01
  ,a.VAK01 ,a.ACF01 ,a.VAJ15 ,a.BCK01A ,a.BCK01B ,a.BDN01 ,a.BBY01 ,a.BCJ02 ,a.VAJ21
  ,a.VAJ22 ,a.VAJ23 ,a.VAJ24 ,a.VAJ25 ,a.VAJ26 ,a.VAJ27 ,a.VAJ28 ,a.VAJ29 ,a.VAJ30
  ,a.VAJ31 ,a.VAJ32 ,a.VAJ33 ,a.VAJ34 ,a.VAJ35 ,a.VAJ36 ,a.VAJ37 ,a.VAJ38
  ,a.VAJ39 ,a.VAJ40 ,a.VAJ41 ,a.BCE03A ,a.BCK01C ,a.BCE02B ,a.BCE03B ,a.VAJ46
  ,a.VAJ47 ,a.VAJ48 ,a.BCK01D ,a.BCE03C ,a.VAJ51 ,a.VAJ52  ,a.BCK01E , f.BCK03 as BCK03E 
  ,a.VAJ53 ,a.VAJ54 ,a.BCE02D ,a.BCE03D ,a.VAJ57 ,a.FAB03  ,a.VAJ59  ,a.VAJ61  
from VAJ2 a with(nolock)
JOIN BBY1 b with(nolock) ON a.bby01 = b.BBY01
JOIN VAI2 d with(nolock) ON a.VAI01 = d.VAI01
JOIN BDN1 e on a.BDN01 = e.BDN01
join VAF2 a1 with(nolock) on a1.VAF01=a.VAF01 
LEFT JOIN BCK1 c ON a.BCK01D = c.BCK01
LEFT JOIN BCK1 f on a.BCK01E = f.BCK01 
WHERE (a1.VAF01=@vaf01 or a1.VAF01A=@vaf01) and a.VAA07 = @vaa07 
AND (@p101002007=1 or ((a.VAJ53 <> 1 and a.BDN01 in(''E'' , ''L'' , ''P'' , ''T'')) or a.BDN01 not in(''E'' , ''L'' , ''P'', ''T'')))
AND (@p167=0 or a.BCK01C=@$DeptId)
AND a.ACF01 = 2 AND isnull(a.VAJ09 , 0) = 0 and VAJ05 = 1 and VAJ25 > 0 %s  
order by a.VAI01, a.VAF01, a.ROWNR ', '2016-09-21 13:45:08', '(8058)高瑜', 0)
else
print 'SYS_Scripts.id=16629 已经存在.'

GO