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


GO
IF not EXISTS(SELECT * FROM SYS_Scripts WHERE id=7129)
insert into SYS_Scripts(ID,CategoryID,Code,Name,Description,xType,DatasourceID,DisplayNames,xRowNum,xText,UpdateDate,UpdateUser,UpdateMode)  Values(7129, 100, 'EMR_病人病历列表', '(内嵌浏览)病人病历列表', '病人病历列表', 1, 1, Null, 1, 'DECLARE @VAA01 int = %d, @VAA07 int = %d, @ACF01 int = %d
IF object_id(''tempdb..#Tmp_VAQ1'') IS NOT NULL DROP TABLE #Tmp_VAQ1
SELECT
  a.VAQ01,
  a.ACF01,
  a.VAA01,
  a.VAA07,
  a.BCK01,
  a.CAD01,
  a.CAD04,
  a.BCE01,
  a.BCE03A,
  a.VAQ13,
  a.BCE03B,
  b.BCK03,
  identity(int,1,1) rownr,
  NVAQ14 = CASE 
    WHEN a.VAQ20 = 0 THEN CONVERT(varchar(16),a.VAQ16,21)+'' 保存(未完成)''
    WHEN a.VAQ20 = 1 then a.BCE03B+''在''+CONVERT(varchar(16),a.VAQ14,21)+'' 完成''
    WHEN a.VAQ20 = 2 THEN a.bce03C+''在''+CONVERT(varchar(16),a.VAQ19,21)+'' 归档'' 
  END,
  a.CAB01,
  a.VAP01,
  a.VAQ17,
  a.VAQ20,
  e.CAB02, 
  a.VAQ16, 
  c.CAD11, 
  a.VAQ19, 
  a.BCE03C, 
  a.VAQ01A,
  A.VAQ21,
  a.BCK01B,
  a.VAQ26,
  A.VAQ27,
  A.CBF01,
  A.VAQ29,
  A.VAQ30,
  A.VAQ31,
  A.VAQ32,  
  A.VAQ01 as ID,
   case  isnull(a.vaq01a,0) when 0 then a.cab01-100 else a.vaq01a end as PID,
 a.CAD04   as PNAME,
 q.QAD08,
 q.QAD13,
 cast(null as image) as  stateImage
   
   into #Tmp_VAQ1
FROM VAQ1 a
  LEFT JOIN BCK1 b ON a.BCK01 = b.BCK01
  JOIN CAD1 c ON a.CAD01 = c.CAD01  
  JOIN CAB1 e ON a.CAB01 = e.CAB01 
  left join qad1 q on q.qad01=a.qad01
WHERE a.VAA01=@VAA01 and (a.VAA07 = @VAA07 or @ACF01=1) and a.ACF01 = @ACF01 AND A.VAQ20<>4 
ORDER BY c.cab01,a.vaq01 desc

insert into #tmp_VAQ1 (VAQ01,ID,PID,PNAME,VAQ21,VAP01)    
select cab01-100,cab01-100,-200,cab02,0,VAP01 from  (select distinct CAB01,CAB02,VAP01 from #tmp_VAQ1 ) t
select * from #Tmp_VAQ1 a
where 1=1', '2015-07-22 11:10:02', '(8088)王海涛', 0)
else
print 'SYS_Scripts.id=7129 已经存在.'

GO