--增加分类
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=1501 --删除脚本内容
GO


GO
IF not EXISTS(SELECT * FROM SYS_Scripts WHERE id=1501)
insert into SYS_Scripts(ID,CategoryID,Code,Name,Description,xType,DatasourceID,DisplayNames,xRowNum,xText,UpdateDate,UpdateUser,UpdateMode)  Values(1501, 78, 'Sql_就诊收费单据列表', '就诊收费单据列表--门诊', '获取指定就诊ID对应的收费单据列表', 1, 0, Null, 1, 'DECLARE @VAA07 int,
        @CDays int,
        @CDate datetime,
        @IAA01 int  

SET @VAA07 = %d
SET @CDays = %d
SET @CDate = CONVERT(datetime, CONVERT(varchar(10), getdate() - @CDays , 120))
select @IAA01=IAA01 from IAR1 where VAA07=@VAA07 and ACF01=1  

select 
  a.VAI01 ,a.VAA01 ,a.VAA07 ,a.VAI04 ,a.VAI05 ,a.BCK01A ,a.BCK01B
  ,a.BCE02A ,a.BCE03A ,a.BCE02B ,a.BCE03B ,VAI12 ,VAI13 ,VAI14 ,VAI01A ,VAI16
  ,isnull(VAI17,0) VAI17 ,c.BCK03 ,d.BCE01 , VAI18 , a.IAI03 , b.IAI04 , VAI25 ,
  a.CBM01  
from VAI1 a  
  LEFT JOIN BCK1 c on a.BCK01B = c.BCK01 
  LEFT JOIN BCE1 d on d.BCE02 = a.BCE02A  
  LEFT JOIN IAI1 b on b.IAI03 = a.IAI03 and b.IAA01=@IAA01
WHERE
  a.VAA07 = @VAA07 
  and VAI16 = 1
  and VAK01 = 0 
  and a.ACF01 <> 2
  and a.VAI18 in(2 ,3 ,5)
  and (@CDays = 0 or VAI12 >= @CDate )', '2015-07-03 16:41:25', '(8088)王海涛', 0)
else
print 'SYS_Scripts.id=1501 已经存在.'

GO