--删除旧记录
--delete from Report_Objects where Code='HO.Clinical.YSYZBL.001' --删除脚本内容
IF not EXISTS(SELECT * FROM Report_Objects WHERE code='HO.Clinical.YSYZBL.001')
begin --插入
Declare @Report_Id_1292 int
Exec Core_NewId 'Report_Objects', 'id', @Report_Id_1292 out
Declare @Report_Id_1292_CateID int
Set @Report_Id_1292_CateID = (select id from Report_Categories where code='HIS.3')
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_1292, 'HO.Clinical.YSYZBL.001', '书写病历调用指定模板设置', Null, Null, @Report_Id_1292_CateID, 1, 4, 100, 0, Null, '2016-08-23 17:07:45', '2016-08-23 17:07:45', Null, '
A11D7CBDA57C407B998F496D050DA9E9
--返回字段说明EmrType //1 病历文档, 2 病历范文, 3 病人病历
--ACAD01:病历文件表CAD01
--//documentId: EmrType=1时传0；EmrType=2时传 CBF01；EmrType=3时传 VAQ01
--ftype 5=住院输血申请单 3=会诊记录 2=门诊病历摘要(不需要保存) 1=门诊下达医嘱填写病历记录首页内容后保存时自动生成的病历
--ftype 4=下达出院医嘱时出院小结病历文档 6=病人健康档案信息 7=病人医疗扩展信息编辑
--imode :保存方式 为0只返回xml,不保存病历文档 为1 保存到病历文档中并返回xml
--BBX01 诊疗项目id，对应医嘱内容 输血申请单需要对应诊疗项目作为医嘱内容
--CAD04 文档名称
--门诊病历把处方内容及诊断自动填入病历，需要病历中有对应元素 处方内容、诊断
declare @ltype tinyint,@bck01 int
,@acf01 tinyint
,@bce01 int
,@vac06 tinyint
,@vaa07 int
,@vaa01 int
,@VAQ01 INT
,@EMRTYPE INT,@CAD01 int
set @ltype=%d
set @bck01=%d
set @bce01=%d
set @acf01=%d
set @vac06=%d
set @vaa07=%d
set @vaa01=%d
SET @VAQ01=0
SET @EMRTYPE=2
set @CAD01=532
if @ltype=1
begin
select @VAQ01=VAQ01,@CAD01=CAD01 From VAQ1 where vaa07=@vaa07 and acf01=@acf01 AND BCE01=@BCE01 and vaq20<2
IF @VAQ01>0
SET @EMRTYPE=3
set @CAD01=537
end
if @ltype=2
begin
select @VAQ01=VAQ01,@CAD01=CAD01 From VAQ1 where vaa07=@vaa07 and acf01=@acf01 AND BCE01=@BCE01 and vaq20<2
IF @VAQ01>0
SET @EMRTYPE=3
set @CAD01=532
end
select s.*
from (
select @EMRTYPE EmrType,@CAD01 CAD01,@VAQ01 documentid,5 ftype,1 imode,0 BBX01,''输血申请单'' CAD04
union all
select @EMRTYPE EmrType,@CAD01 CAD01,@VAQ01 documentid,3 ftype,1 imode,0 BBX01,''会诊记录单'' CAD04
union all
select @EMRTYPE EmrType,@CAD01 CAD01,@VAQ01 documentid,4 ftype,1 imode,0 BBX01,''出院小结'' CAD04
union all
select @EMRTYPE EmrType,@CAD01 CAD01,@VAQ01 documentid,2 ftype,0 imode,0 BBX01,''门诊日志'' CAD04
union all
select @EMRTYPE EmrType,@CAD01 CAD01,@VAQ01 documentid,1 ftype,1 imode,0 BBX01,''门诊初诊病历'' CAD04
union all
select @EMRTYPE EmrType,@CAD01 CAD01,@VAQ01 documentid,6 ftype,0 imode,0 BBX01,''病人健康档案信息'' CAD04
union all
select @EMRTYPE EmrType,@CAD01 CAD01,@VAQ01 documentid,7 ftype,0 imode,0 BBX01,''病人医疗扩展信息'' CAD04
) s
where s.ftype=@ltype
', Null, 0, 1, Null, 0, Null)
end
else --更新
begin
print 'HO.Clinical.YSYZBL.001 已经存在.'
end
GO
--删除旧记录
--delete from Report_Objects where Code='HO.Clinical.YSXXFS.001' --删除脚本内容
IF not EXISTS(SELECT * FROM Report_Objects WHERE code='HO.Clinical.YSXXFS.001')
begin --插入
Declare @Report_Id_1339 int
Exec Core_NewId 'Report_Objects', 'id', @Report_Id_1339 out
Declare @Report_Id_1339_CateID int
Set @Report_Id_1339_CateID = (select id from Report_Categories where code='HIS.3')
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_1339, 'HO.Clinical.YSXXFS.001', '医生站消息发送设置', Null, Null, @Report_Id_1339_CateID, 1, 4, 100, 0, Null, '2017-02-13 13:28:43', '2017-02-13 13:28:43', Null, '
722017D235AC140984E4D278E1D0AF22Declare @VAA01 int ,
@VAA07 int ,
@ACF01 tinyint,
@scbm01 varchar(256) ,
@svai01 varchar(256),
@amsgid varchar(20),
@atype int,
@VAA35 varchar(20) ,
@BCK01S varchar(256) ,
@BCE01S varchar(256),
@aremark varchar(256)='''',
@atitle varchar(64) ,
@totalfee varchar(20),
@VAA05 varchar(64) ,
@VAA03 varchar(64) ,
@ABW02 varchar(2)
set @atype = :atype
set @amsgid = :amsgid
SET @VAA01 = :VAA01
SET @VAA07 = :VAA07
set @ACF01 = :ACF01
SET @scbm01 = :scbmid
set @svai01 = :svaiid
--当前报表用于返回预交款收取时返回内容及手机号及发送科室、人员(多个以逗号分开)，固定字段返回Content、Phone,BCK01S,BCE01S
--@atitle 消息标题 @aremark 消息备注 @atype 0=门诊医生站 1=住院医生站 2=住院护士站
--传入的单据id，多个以逗号分开 @amsgid 消息id
-- 会诊、转科消息，需要根据传入的@scbm01 ,参数对应的值是医嘱id(VAF01),根据这个获取信息
select @VAA35=VAA35,@VAA05=VAA05,@VAA03=VAA03,@ABW02=case when ABW01=1 then ''先生'' when ABW01=2 then ''女士'' else '''' end
from VAA1 with(nolock) where VAA01 = @VAA01
if @amsgid=2001
begin
select * into #vai
from dbo.split(@svai01,'','')
select abf02,sum(VAJ38) fee into #fee
from VAJ1 a
join bby1 c on a.bby01=c.bby01
join abf1 b on c.abf01=b.abf01
where exists(select * from #vai where value=a.vai01)
group by abf02
set @atitle=''待缴费用''
select @totalfee=sum(fee) from #fee
select @aremark= @aremark+abf02+convert(varchar(20),fee)+''元 '' from #fee
drop table #fee
drop table #vai
set @aremark=''尊敬的【''+@VAA05+''】，您本次就诊已产生待缴费用【''+@totalfee+''元】（其中''+@aremark+''）。您可通过微信支付，也可到1楼或2楼人工收费窗口进行充值扣费，或者通过自助设备进行账户充值扣费。''
end
if @amsgid=2006
begin
set @atitle=''排队信息''
set @aremark=''尊敬的【''+@VAA05+''】，请到''+(select top 1 Position from sys_hosts where name= @$HostName and Enabled=1)+ ''就诊。''
end
if @amsgid=2005
begin
set @atitle=''医嘱退费''
set @aremark=''尊敬的【''+@VAA05+''】，门诊号【''+@VAA03+''】，【''+@$EmpName+''】医师已为您申请退费，如果退药请先到药房先退药，再到一楼或二楼收费处完成退费。''
end
--返回结果
select @aremark as Content , ISNULL(@VAA35 ,'''') as Phone , @BCK01S BCK01S , @BCE01S BCE01S,@atitle sTitle,'''' sRemark
', Null, 0, 1, Null, 0, Null)
end
else --更新
begin
print 'HO.Clinical.YSXXFS.001 已经存在.'
end
GO
--删除旧记录
--delete from Report_Objects where Code='HO.Clinical.YSiPADShow.01' --删除脚本内容
IF not EXISTS(SELECT * FROM Report_Objects WHERE code='HO.Clinical.YSiPADShow.01')
begin --插入
Declare @Report_Id_1361 int
Exec Core_NewId 'Report_Objects', 'id', @Report_Id_1361 out
Declare @Report_Id_1361_CateID int
Set @Report_Id_1361_CateID = (select id from Report_Categories where code='HIS.3')
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_1361, 'HO.Clinical.YSiPADShow.01', '门诊医生诊室前PAD信息显示配置', Null, Null, @Report_Id_1361_CateID, 1, 4, 100, 0, Null, '2017-05-15 17:07:25', '2017-05-15 17:07:25', Null, '
66090DAD025AE513416290B15ED5E29B
declare @type tinyint,@bce02 varchar(20),@nowVisit varchar(64),@waitVisit varchar(64),@url varchar(128)
set @type=%d
set @nowVisit=%s
set @waitVisit=%s
set @url=''http://服务器IP:服务器端口/onehismq/Mq/MQandroid/sendAndroidMessage?topic=''+@$IP+''&message=''
select @url+ case when @type=1 then ''{''''type'''':''''1'''',''''loginId'''':''''''+@$EmpCode+'''''',''''drAvatarPath'''':''''https://www.baidu.com/img/bd_logo1.png'''',''''hospitalLogo'''':''''https://www.baidu.com/img/bd_logo1.png''''}''
when @type=2 then ''{''''type'''':''''2'''',''''nowVisit'''':''''''+@nowVisit+'''''',''''waitVisit'''':''''''+@waitVist+''''''}'' else '''' end svalue
', Null, 0, 1, Null, 0, Null)
end
else --更新
begin
print 'HO.Clinical.YSiPADShow.01 已经存在.'
end
GO
--删除旧记录
--delete from Report_Objects where Code='HO.Clinical.OtherYGSB.01' --删除脚本内容
IF not EXISTS(SELECT * FROM Report_Objects WHERE code='HO.Clinical.OtherYGSB.01')
begin --插入
Declare @Report_Id_1372 int
Exec Core_NewId 'Report_Objects', 'id', @Report_Id_1372 out
Declare @Report_Id_1372_CateID int
Set @Report_Id_1372_CateID = (select id from Report_Categories where code='HIS.3')
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_1372, 'HO.Clinical.OtherYGSB.01', '第三方院感上报接口url设置', Null, Null, @Report_Id_1372_CateID, 1, 4, 100, 0, Null, '2017-06-22 15:59:45', '2017-06-22 15:59:45', Null, '
814663D0AC442A687D5DB90DEDA2A9CF
declare @VAE01 int,@Re_ParaValue varchar(1024),@bce01 int,@bce02 varchar(20),@bce03 varchar(64)
set @VAE01 = %d
set @bce01 = %d
set @bce02 = %s
set @bce03 = %s
--需要返回的参数及值都在这里设定
select @Re_ParaValue= ''调用地址及传入参数在此设定''
from VAE1 a with(nolock)
where a.VAE01 = @VAE01
select @Re_ParaValue pvalue
', Null, 0, 1, Null, 0, Null)
end
else --更新
begin
print 'HO.Clinical.OtherYGSB.01 已经存在.'
end
GO
--删除旧记录
--delete from Report_Objects where Code='HO.Clinical.OtherYGJC.01' --删除脚本内容
IF not EXISTS(SELECT * FROM Report_Objects WHERE code='HO.Clinical.OtherYGJC.01')
begin --插入
Declare @Report_Id_1373 int
Exec Core_NewId 'Report_Objects', 'id', @Report_Id_1373 out
Declare @Report_Id_1373_CateID int
Set @Report_Id_1373_CateID = (select id from Report_Categories where code='HIS.3')
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_1373, 'HO.Clinical.OtherYGJC.01', '第三方院感监测接口url设置', Null, Null, @Report_Id_1373_CateID, 1, 4, 100, 0, Null, '2017-06-22 16:01:31', '2017-06-22 16:01:31', Null, '
814663D0AC442A687D5DB90DEDA2A9CF
declare @VAE01 int,@Re_ParaValue varchar(1024),@bce01 int,@bce02 varchar(20),@bce03 varchar(64)
set @VAE01 = %d
set @bce01 = %d
set @bce02 = %s
set @bce03 = %s
--需要返回的参数及值都在这里设定
select @Re_ParaValue= ''调用地址及传入参数在此设定''
from VAE1 a with(nolock)
where a.VAE01 = @VAE01
select @Re_ParaValue pvalue
', Null, 0, 1, Null, 0, Null)
end
else --更新
begin
print 'HO.Clinical.OtherYGJC.01 已经存在.'
end
GO
--删除旧记录
--delete from Report_Objects where Code='HO.Clinical.HOCommand.01' --删除脚本内容
IF not EXISTS(SELECT * FROM Report_Objects WHERE code='HO.Clinical.HOCommand.01')
begin --插入
Declare @Report_Id_1374 int
Exec Core_NewId 'Report_Objects', 'id', @Report_Id_1374 out
Declare @Report_Id_1374_CateID int
Set @Report_Id_1374_CateID = (select id from Report_Categories where code='HIS.3')
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_1374, 'HO.Clinical.HOCommand.01', '通用接口webservices参数设置', Null, Null, @Report_Id_1374_CateID, 1, 4, 100, 0, Null, '2017-06-22 18:03:05', '2017-06-22 18:04:31', Null, '
2517A995D2F83EB2E094F8900DF76345
--返回字段:命令id，医疗机构指定编码，url地址，用户名，密码，是否记录日志
/* 100000 黄山转诊Webservices 服务配置
100001: HRP出库WebSerives接口
100002: 象山石浦港湾医院体检接口
100003: 江苏省职业健康监护平台
*/
declare @msgid int
set @msgid=%d
select *
from (
select 100000 msgid,''341004206000'' hisNo,''http://218.22.219.210:1432/interChg/services/InterChange?wsdl'' weburl
,''xcyygl'' username,''xcyygl'' userpass,0 SendCount ,1 writelog
union all
select 100001 msgid,'''' hisNo,''http://180.169.131.169:8088/uapws/service/IHrpSynService?wsdl'' weburl,'''' username,'''' userpass, 2 SendCount ,1 writelog
union all
select 100002 msgid,''34062964'' hisNo,''http://10.57.253.232:10002/CsbBusService.asmx'' weburl,''spgwyy'' username,''123'' userpass,0 SendCount ,1 writelog
union all
select 100003 msgid,'''' hisNo,''http://218.90.174.179:8010/BhkDataService/zwbhkService'' weburl,''91320811302196782F'' username,''b322972e860a4af890ae4d4c934b4027'' userpass,
0 SendCount ,0 writelog
) a
where a.msgid=@msgid
', Null, 0, 1, Null, 0, Null)
end
else --更新
begin
print 'HO.Clinical.HOCommand.01 已经存在.'
end
GO
--删除旧记录
--delete from Report_Objects where Code='HO.Clinical.OtherRep.001' --删除脚本内容
IF not EXISTS(SELECT * FROM Report_Objects WHERE code='HO.Clinical.OtherRep.001')
begin --插入
Declare @Report_Id_1377 int
Exec Core_NewId 'Report_Objects', 'id', @Report_Id_1377 out
Declare @Report_Id_1377_CateID int
Set @Report_Id_1377_CateID = (select id from Report_Categories where code='HIS.3')
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_1377, 'HO.Clinical.OtherRep.001', '第三方检查报告查看接口url设置', Null, Null, @Report_Id_1377_CateID, 1, 4, 100, 0, Null, '2017-07-06 10:31:29', '2017-07-06 10:31:29', Null, '
B20C45C024406964869D656C0AC9877D
declare @VAA07 varchar(20),@Re_ParaValue varchar(1024),@bce01 varchar(20),@bce02 varchar(20),@bce03 varchar(64),@ACF01 varchar(20),@VAA01 varchar(20)
set @ACF01 = %d
set @VAA07 = %d
set @bce01 = %d
set @bce02 = %s
set @bce03 = %s
--需要返回的参数及值都在这里设定
if @ACF01=2
select @VAA01= VAA01
from VAE1 a with(nolock)
where a.VAE01 = @VAA07
else
select @VAA01= VAA01
from VAC1 a with(nolock)
where a.VAC01 = @VAA07
select ''http://172.20.138.23/orgview.aspx?org=xxx&user=yyy&key=zzz&idno=''+(select dbo.GetO2E(dbo.GetASCII(VAA15)) from VAA1 with(nolock) where VAA01=@VAA01) PValue
--select ''http://192.168.1.137:9999/optometry/cf?VAA01=''+@VAA01+''&ACF01=''+@ACF01+''&VAA07=''+@VAA07+''&BCE01=''+@BCE01+''&BCE03=''+@BCE03+''&STATUS=0'' PValue
', Null, 0, 1, Null, 0, Null)
end
else --更新
begin
print 'HO.Clinical.OtherRep.001 已经存在.'
end
GO
--删除旧记录
--delete from Report_Objects where Code='HO.Clinical.OtherPES.01' --删除脚本内容
IF not EXISTS(SELECT * FROM Report_Objects WHERE code='HO.Clinical.OtherPES.01')
begin --插入
Declare @Report_Id_1382 int
Exec Core_NewId 'Report_Objects', 'id', @Report_Id_1382 out
Declare @Report_Id_1382_CateID int
Set @Report_Id_1382_CateID = (select id from Report_Categories where code='HIS.3')
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_1382, 'HO.Clinical.OtherPES.01', '第三方体检报告调阅接口', Null, Null, @Report_Id_1382_CateID, 1, 4, 100, 0, Null, '2017-08-04 15:03:09', '2017-08-04 15:03:09', Null, '
56C704EB3FD5F3395C8FB9418414B038
declare @VAA07 varchar(20),@Re_ParaValue varchar(1024),@bce01 varchar(20),@bce02 varchar(20),@bce03 varchar(64),@ACF01 varchar(20),@VAA01 varchar(20)
set @ACF01 = %d
set @VAA07 = %d
set @bce01 = %d
set @bce02 = %s
set @bce03 = %s
--需要返回的参数及值都在这里设定
if @ACF01=2
select @VAA01= VAA01
from VAE1 a with(nolock)
where a.VAE01 = @VAA07
else
select @VAA01= VAA01
from VAC1 a with(nolock)
where a.VAC01 = @VAA07
select ''返回调用地址及传入的参数'' PValue
', Null, 0, 1, Null, 0, Null)
end
else --更新
begin
print 'HO.Clinical.OtherPES.01 已经存在.'
end
GO
--删除旧记录
--delete from Report_Objects where Code='HO.Clinical.SYBILL.001' --删除脚本内容
IF not EXISTS(SELECT * FROM Report_Objects WHERE code='HO.Clinical.SYBILL.001')
begin --插入
Declare @Report_Id_1385 int
Exec Core_NewId 'Report_Objects', 'id', @Report_Id_1385 out
Declare @Report_Id_1385_CateID int
Set @Report_Id_1385_CateID = (select id from Report_Categories where code='HIS.3')
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_1385, 'HO.Clinical.SYBILL.001', '发送医嘱自动生成输液、口服等条码单', Null, Null, @Report_Id_1385_CateID, 1, 4, 100, 0, Null, '2017-08-17 16:11:03', '2017-08-17 16:11:03', Null, '
B651BA4FBD28E783ABA33DDC78C0E0D5
select cast(2 as tinyint) atype,cast(''0'' as varchar(20)) sbbx20,0 fenabled
', Null, 0, 1, Null, 0, Null)
end
else --更新
begin
print 'HO.Clinical.SYBILL.001 已经存在.'
end
GO
--删除旧记录
--delete from Report_Objects where Code='HO.Clinical.YSYKPJYG.01' --删除脚本内容
IF not EXISTS(SELECT * FROM Report_Objects WHERE code='HO.Clinical.YSYKPJYG.01')
begin --插入
Declare @Report_Id_1390 int
Exec Core_NewId 'Report_Objects', 'id', @Report_Id_1390 out
Declare @Report_Id_1390_CateID int
Set @Report_Id_1390_CateID = (select id from Report_Categories where code='HIS.3')
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_1390, 'HO.Clinical.YSYKPJYG.01', '门诊眼科验光配镜中心系统调阅设置', Null, Null, @Report_Id_1390_CateID, 1, 4, 100, 0, Null, '2017-09-01 09:06:45', '2017-09-01 09:06:45', Null, '
F82FA46C9510A8D725D55E786BE07C6E
declare @VAA07 varchar(20),@Re_ParaValue varchar(1024),@bce01 varchar(20),@bce02 varchar(20)
declare @bce03 varchar(64),@ACF01 varchar(20),@VAA01 varchar(20),@pmode int
set @ACF01 = %d
set @VAA01 = %d
set @VAA07 = %d
set @bce01 = %d
set @bce02 = %s
set @bce03 = %s
set @pmode=%d
--需要返回的参数及值都在这里设定 @pmode 场合
select ''返回调用地址及传入的参数'' PValue
', Null, 0, 1, Null, 0, Null)
end
else --更新
begin
print 'HO.Clinical.YSYKPJYG.01 已经存在.'
end
GO
--删除旧记录
--delete from Report_Objects where Code='HO.Clinical.S.000019' --删除脚本内容
IF not EXISTS(SELECT * FROM Report_Objects WHERE code='HO.Clinical.S.000019')
begin --插入
Declare @Report_Id_874 int
Exec Core_NewId 'Report_Objects', 'id', @Report_Id_874 out
Declare @Report_Id_874_CateID int
Set @Report_Id_874_CateID = (select id from Report_Categories where code='HIS.5')
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_874, 'HO.Clinical.S.000019', '日清单基本信息脚本', Null, Null, @Report_Id_874_CateID, 1, 4, 100, 0, Null, '2013-05-30 15:19:48', '2013-05-30 15:19:48', Null, '
F871F6F77E6EBEFD67CDD00963414255
Declare @aDateB varchar(30), @aDateE varchar(30),@vak01 int,@vaeid varchar(512)
Set @aDateB = Convert(varchar(19),Cast(%s as datetime),21)+''.000''
Set @aDateE = Convert(varchar(19),Cast(%s as datetime),21)+''.999''
set @vak01 = %d
set @vaeid = %s
IF Object_id(''tempdb..#TmpVBM'') IS NOT NULL DROP TABLE #TmpVBM
IF Object_id(''tempdb..#TmpVBL'') IS NOT NULL DROP TABLE #TmpVBL
declare @kbVAE table(VAE01 int)
insert into @kbVAE(VAE01)
select Value from dbo.Split(@vaeid,'','')
select a.VAA07,isnull(sum(a.VAJ38),0) FVBM05
into #tmpVBM
from VAJ2 a with(nolock)
join @kbVAE b on b.VAE01=a.VAA07
where @vak01=0 and a.ACF01 = 2 And a.VAK01 = 0 and a.VAJ46 <= @aDateE
group by a.VAA07
union all
select a.VAA07,isnull(sum(a.VAJ38),0) FVBM05
from V_VAJ_2 a
join @kbVAE b on b.VAE01=a.VAA07
where @vak01=1 and a.ACF01 = 2 and a.VAJ46 <= @aDateE
group by a.VAA07
select a.VAA07,isnull(sum(a.VBL13),0) FVBM04
into #tmpVBL
from VBL1 a with(nolock)
join @kbVAE b on b.VAE01=a.VAA07
where @vak01=0 and a.VBL04 = 4 And a.VBL27 = 1 And a.VAK01 = 0 and a.VBL19 <= @aDateE
group by a.VAA07
union all
select a.VAA07,isnull(sum(a.VBL13),0) FVBM04
from V_VBL_FULL a
join @kbVAE b on b.VAE01=a.VAA07
where @vak01=1 and a.VBL04 = 4 And a.VBL27 = 1 and a.VBL19 <= @aDateE
group by a.VAA07
select b.vaa04 住院号
,b.vaa05 姓名
,case when b.ABW01 = ''1'' then ''男'' when b.ABW01 = ''2'' then ''女'' else ''未知'' end 性别
,case when isnull(a.VAE87,'''') = '''' then CAST(isnull(a.VAE46,0) as varchar)+ISNULL(g.AAU02,'''') else dbo.GetPatAge(a.VAE87,0,0,0) end as 年龄
,c.BCK03 科室
,a.BDP02 病人类别
,a.BCQ04B 床位
,a.baq03 工作单位
,a.vae62 地址
,a.bce03c 住院医师
,d.FVBM05 费用总额
,e.FVBM04 押金总额
,e.FVBM04 - d.FVBM05 as 余额
,a.VAE11 入院时间
,case DATEDIFF(day,a.VAE11,isnull(a.VAE26,Getdate())) when 0 then 1 else
DATEDIFF(day,a.VAE11,isnull(a.VAE26,Getdate())) end As 住院天数
,a.VAE01 就诊ID
,@aDateB 起始时间
,@aDateE 终止时间
,f.Rownr 床位序号
from vae1 a with(nolock)
join vaa1 b with(nolock) on a.vaa01=b.vaa01
join bck1 c with(nolock) on a.BCK01D = c.BCK01
left join BCQ1 f with(nolock) on f.VAA01 = a.VAA01 and a.BCQ04B = f.BCQ04 and (f.BCQ13 = 1 or f.BCQ13 = 3) and a.VAE44 >= 2 and a.VAE44 <= 3
left join #tmpVBM d on d.VAA07 = a.VAE01
left join #tmpVBL e on e.VAA07 = a.VAE01
left join AAU1 g on g.AAU01 = a.AAU01
where exists(select * from @kbVAE s where s.VAE01=a.VAE01)
order by f.Rownr
IF Object_id(''tempdb..#TmpVBM'') IS NOT NULL DROP TABLE #TmpVBM
IF Object_id(''tempdb..#TmpVBL'') IS NOT NULL DROP TABLE #TmpVBL
', Null, 0, 1, Null, 0, Null)
end
else --更新
begin
update Report_Objects set Config='
F871F6F77E6EBEFD67CDD00963414255
Declare @aDateB varchar(30), @aDateE varchar(30),@vak01 int,@vaeid varchar(512)
Set @aDateB = Convert(varchar(19),Cast(%s as datetime),21)+''.000''
Set @aDateE = Convert(varchar(19),Cast(%s as datetime),21)+''.999''
set @vak01 = %d
set @vaeid = %s
IF Object_id(''tempdb..#TmpVBM'') IS NOT NULL DROP TABLE #TmpVBM
IF Object_id(''tempdb..#TmpVBL'') IS NOT NULL DROP TABLE #TmpVBL
declare @kbVAE table(VAE01 int)
insert into @kbVAE(VAE01)
select Value from dbo.Split(@vaeid,'','')
select a.VAA07,isnull(sum(a.VAJ38),0) FVBM05
into #tmpVBM
from VAJ2 a with(nolock)
join @kbVAE b on b.VAE01=a.VAA07
where @vak01=0 and a.ACF01 = 2 And a.VAK01 = 0 and a.VAJ46 <= @aDateE
group by a.VAA07
union all
select a.VAA07,isnull(sum(a.VAJ38),0) FVBM05
from V_VAJ_2 a
join @kbVAE b on b.VAE01=a.VAA07
where @vak01=1 and a.ACF01 = 2 and a.VAJ46 <= @aDateE
group by a.VAA07
select a.VAA07,isnull(sum(a.VBL13),0) FVBM04
into #tmpVBL
from VBL1 a with(nolock)
join @kbVAE b on b.VAE01=a.VAA07
where @vak01=0 and a.VBL04 = 4 And a.VBL27 = 1 And a.VAK01 = 0 and a.VBL19 <= @aDateE
group by a.VAA07
union all
select a.VAA07,isnull(sum(a.VBL13),0) FVBM04
from V_VBL_FULL a
join @kbVAE b on b.VAE01=a.VAA07
where @vak01=1 and a.VBL04 = 4 And a.VBL27 = 1 and a.VBL19 <= @aDateE
group by a.VAA07
select b.vaa04 住院号
,b.vaa05 姓名
,case when b.ABW01 = ''1'' then ''男'' when b.ABW01 = ''2'' then ''女'' else ''未知'' end 性别
,case when isnull(a.VAE87,'''') = '''' then CAST(isnull(a.VAE46,0) as varchar)+ISNULL(g.AAU02,'''') else dbo.GetPatAge(a.VAE87,0,0,0) end as 年龄
,c.BCK03 科室
,a.BDP02 病人类别
,a.BCQ04B 床位
,a.baq03 工作单位
,a.vae62 地址
,a.bce03c 住院医师
,d.FVBM05 费用总额
,e.FVBM04 押金总额
,e.FVBM04 - d.FVBM05 as 余额
,a.VAE11 入院时间
,case DATEDIFF(day,a.VAE11,isnull(a.VAE26,Getdate())) when 0 then 1 else
DATEDIFF(day,a.VAE11,isnull(a.VAE26,Getdate())) end As 住院天数
,a.VAE01 就诊ID
,@aDateB 起始时间
,@aDateE 终止时间
,f.Rownr 床位序号
from vae1 a with(nolock)
join vaa1 b with(nolock) on a.vaa01=b.vaa01
join bck1 c with(nolock) on a.BCK01D = c.BCK01
left join BCQ1 f with(nolock) on f.VAA01 = a.VAA01 and a.BCQ04B = f.BCQ04 and (f.BCQ13 = 1 or f.BCQ13 = 3) and a.VAE44 >= 2 and a.VAE44 <= 3
left join #tmpVBM d on d.VAA07 = a.VAE01
left join #tmpVBL e on e.VAA07 = a.VAE01
left join AAU1 g on g.AAU01 = a.AAU01
where exists(select * from @kbVAE s where s.VAE01=a.VAE01)
order by f.Rownr
IF Object_id(''tempdb..#TmpVBM'') IS NOT NULL DROP TABLE #TmpVBM
IF Object_id(''tempdb..#TmpVBL'') IS NOT NULL DROP TABLE #TmpVBL
' where Code='HO.Clinical.S.000019'
end
GO
--删除旧记录
--delete from Report_Objects where Code='HO.Clinical.S.000020' --删除脚本内容
IF not EXISTS(SELECT * FROM Report_Objects WHERE code='HO.Clinical.S.000020')
begin --插入
Declare @Report_Id_875 int
Exec Core_NewId 'Report_Objects', 'id', @Report_Id_875 out
Declare @Report_Id_875_CateID int
Set @Report_Id_875_CateID = (select id from Report_Categories where code='HIS.5')
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_875, 'HO.Clinical.S.000020', '日清单费用明细脚本', Null, Null, @Report_Id_875_CateID, 1, 4, 100, 0, Null, '2013-05-30 15:21:15', '2013-05-30 15:21:15', Null, '
62BCA9CB44D96E1CD8A556E05F10E205
Declare @aDateB datetime, @aDateE datetime,@vak01 int,@vaeid varchar(512)
Set @aDateB = Convert(varchar(19),Cast(%s as datetime),21)+''.000''
Set @aDateE = Convert(varchar(19),Cast(%s as datetime),21)+''.999''
set @vak01 = %d
set @vaeid = %s
declare @kbVAE table(VAE01 int)
insert into @kbVAE(VAE01)
select Value from dbo.Split(@vaeid,'','')
select 就诊ID,日期,收入项目,收入项目编码,收费项目编号,收费项目名称,规格,单位,单价,执行科室,保险类型,其它费别
,sum(数量) 数量,sum(金额) 金额
from (select convert(varchar(10),a.VAJ46,21) 日期
,b.BBY04 收费项目编号
,b.BBY05 收费项目名称
,b.BBY06 规格
,b.BBY08 单位
,a.VAJ33 单价
,a.VAJ25 数量
,a.VAJ38 金额
,c.BAX03 收入项目
,c.BAX02 收入项目编码
,a.VAA07 就诊ID
,a.VAJ27 婴儿ID
,e.bck03 执行科室
,f.aas02 保险类型
,g.BCG02 其它费别
from VAJ2 a with(nolock)
join BBY1 b with(nolock) on a.BBY01 = b.BBY01
join BAX1 c on b.BAX01 = c.BAX01
join VAA1 d with(nolock) on a.vaa01=d.vaa01
join BCK1 e with(nolock) on a.bck01d=e.bck01
left join AAS1 f on b.aas01=f.aas01
left join BCG1 g on g.BCG01 = b.BCG01
where @vak01=0 and a.ACF01 = 2 and a.VAK01 = 0 and a.VAJ38 <> 0
and a.VAJ46 >= @aDateB And a.VAJ46 <= @aDateE
and exists(select * from @kbVAE s where s.VAE01=a.VAA07)
union all
select convert(varchar(10),a.VAJ46,21) 日期
,b.BBY04 收费项目编号
,b.BBY05 收费项目名称
,b.BBY06 规格
,b.BBY08 单位
,a.VAJ33 单价
,a.VAJ25 数量
,a.VAJ38 金额
,c.BAX03 收入项目
,c.BAX02 收入项目编码
,a.VAA07 就诊ID
,a.VAJ27 婴儿ID
,e.bck03 执行科室
,f.aas02 保险类型
,g.BCG02 其它费别
from V_VAJ_2 a
join BBY1 b with(nolock) on a.BBY01 = b.BBY01
join BAX1 c on b.BAX01 = c.BAX01
join VAA1 d with(nolock) on a.vaa01=d.vaa01
join BCK1 e with(nolock) on a.bck01d=e.bck01
left join AAS1 f on b.aas01=f.aas01
left join BCG1 g on g.BCG01 = b.BCG01
where @vak01=1 and a.ACF01 = 2 and a.VAJ38 <> 0
and a.VAJ46 >= @aDateB And a.VAJ46 <= @aDateE
and exists(select * from @kbVAE s where s.VAE01=a.VAA07)
) v
group by 就诊ID,婴儿ID,日期,收入项目编码,收入项目,收费项目编号,收费项目名称,规格,单位,单价,执行科室,保险类型,其它费别
order by 就诊ID,婴儿ID,日期,收入项目
', Null, 0, 1, Null, 0, Null)
end
else --更新
begin
update Report_Objects set Config='
62BCA9CB44D96E1CD8A556E05F10E205
Declare @aDateB datetime, @aDateE datetime,@vak01 int,@vaeid varchar(512)
Set @aDateB = Convert(varchar(19),Cast(%s as datetime),21)+''.000''
Set @aDateE = Convert(varchar(19),Cast(%s as datetime),21)+''.999''
set @vak01 = %d
set @vaeid = %s
declare @kbVAE table(VAE01 int)
insert into @kbVAE(VAE01)
select Value from dbo.Split(@vaeid,'','')
select 就诊ID,日期,收入项目,收入项目编码,收费项目编号,收费项目名称,规格,单位,单价,执行科室,保险类型,其它费别
,sum(数量) 数量,sum(金额) 金额
from (select convert(varchar(10),a.VAJ46,21) 日期
,b.BBY04 收费项目编号
,b.BBY05 收费项目名称
,b.BBY06 规格
,b.BBY08 单位
,a.VAJ33 单价
,a.VAJ25 数量
,a.VAJ38 金额
,c.BAX03 收入项目
,c.BAX02 收入项目编码
,a.VAA07 就诊ID
,a.VAJ27 婴儿ID
,e.bck03 执行科室
,f.aas02 保险类型
,g.BCG02 其它费别
from VAJ2 a with(nolock)
join BBY1 b with(nolock) on a.BBY01 = b.BBY01
join BAX1 c on b.BAX01 = c.BAX01
join VAA1 d with(nolock) on a.vaa01=d.vaa01
join BCK1 e with(nolock) on a.bck01d=e.bck01
left join AAS1 f on b.aas01=f.aas01
left join BCG1 g on g.BCG01 = b.BCG01
where @vak01=0 and a.ACF01 = 2 and a.VAK01 = 0 and a.VAJ38 <> 0
and a.VAJ46 >= @aDateB And a.VAJ46 <= @aDateE
and exists(select * from @kbVAE s where s.VAE01=a.VAA07)
union all
select convert(varchar(10),a.VAJ46,21) 日期
,b.BBY04 收费项目编号
,b.BBY05 收费项目名称
,b.BBY06 规格
,b.BBY08 单位
,a.VAJ33 单价
,a.VAJ25 数量
,a.VAJ38 金额
,c.BAX03 收入项目
,c.BAX02 收入项目编码
,a.VAA07 就诊ID
,a.VAJ27 婴儿ID
,e.bck03 执行科室
,f.aas02 保险类型
,g.BCG02 其它费别
from V_VAJ_2 a
join BBY1 b with(nolock) on a.BBY01 = b.BBY01
join BAX1 c on b.BAX01 = c.BAX01
join VAA1 d with(nolock) on a.vaa01=d.vaa01
join BCK1 e with(nolock) on a.bck01d=e.bck01
left join AAS1 f on b.aas01=f.aas01
left join BCG1 g on g.BCG01 = b.BCG01
where @vak01=1 and a.ACF01 = 2 and a.VAJ38 <> 0
and a.VAJ46 >= @aDateB And a.VAJ46 <= @aDateE
and exists(select * from @kbVAE s where s.VAE01=a.VAA07)
) v
group by 就诊ID,婴儿ID,日期,收入项目编码,收入项目,收费项目编号,收费项目名称,规格,单位,单价,执行科室,保险类型,其它费别
order by 就诊ID,婴儿ID,日期,收入项目
' where Code='HO.Clinical.S.000020'
end
GO
--删除旧记录
--delete from Report_Objects where Code='HO.Clinical.S.000021' --删除脚本内容
IF not EXISTS(SELECT * FROM Report_Objects WHERE code='HO.Clinical.S.000021')
begin --插入
Declare @Report_Id_876 int
Exec Core_NewId 'Report_Objects', 'id', @Report_Id_876 out
Declare @Report_Id_876_CateID int
Set @Report_Id_876_CateID = (select id from Report_Categories where code='HIS.5')
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_876, 'HO.Clinical.S.000021', '日汇总单基本信息脚本', Null, Null, @Report_Id_876_CateID, 1, 4, 100, 0, Null, '2013-05-30 15:22:31', '2013-05-30 15:22:31', Null, '
8895E0704093166E51A37FBFAD9EFCF3
Declare @aDateB datetime, @aDateE datetime,@vak01 int,@vaeid varchar(512)
Set @aDateB = Convert(varchar(19),Cast(%s as datetime),21)+''.000''
Set @aDateE = Convert(varchar(19),Cast(%s as datetime),21)+''.999''
set @vak01 = %d
set @vaeid = %s
declare @kbVAE table(VAE01 int,fvaj37 numeric(18,4))
insert into @kbVAE(VAE01,fvaj37)
select Value,0 from dbo.Split(@vaeid,'','')
if @vak01=1
update a set a.fvaj37=s.FSum
from @kbVAE a
join (select v.vaa07,sum(v.vaj37) as FSum from V_VAJ_2 v
where v.acf01=2 and v.VAJ46 >= @aDateB and v.VAJ46 <= @aDateE
group by v.vaa07) s on s.VAA07=a.VAE01
else
update a set a.fvaj37=s.FSum
from @kbVAE a
join (select v.vaa07,sum(v.vaj37) as FSum from VAJ2 v with(nolock)
where v.acf01=2 and v.VAJ46 >= @aDateB and v.VAJ46 <= @aDateE
group by v.vaa07) s on s.VAA07=a.VAE01
select b.vaa04 住院号
,b.vaa05 姓名
,c.BCK03 科室
,a.BDP02 病人类别
,a.BCQ04B 床位
,d.VBM05 费用总额
,d.VBM04 押金总额
,isnull(d.VBM04,0)-isnull(d.VBM05,0) as 余额
,a.VAE11 入院时间
,case DATEDIFF(day,a.VAE11,isnull(a.VAE26,Getdate())) when 0 then 1 else
DATEDIFF(day,a.VAE11,isnull(a.VAE26,Getdate())) end As 住院天数
,a.VAE01 就诊ID
,v1.fvaj37 单日费用
,e.Rownr 床位序号
,b.VAA53 担保人
,b.BEP05 报警线
,b.BEP06 信用额度
,@aDateB 起始时间
,@aDateE 终止时间
from vae1 a with(nolock)
join vaa1 b with(nolock) on a.vaa01=b.vaa01
join bck1 c with(nolock) on a.BCK01D = c.BCK01
join @kbVAE v1 on v1.VAE01=a.VAE01
left join BCQ1 e with(nolock) on e.BCK01A = a.BCK01C and e.BCQ04 = a.BCQ04B
left join VBM2 d with(nolock) on d.VAA07 = a.VAE01 and d.ACF01 = 2
order by e.rownr
', Null, 0, 1, Null, 0, Null)
end
else --更新
begin
update Report_Objects set Config='
8895E0704093166E51A37FBFAD9EFCF3
Declare @aDateB datetime, @aDateE datetime,@vak01 int,@vaeid varchar(512)
Set @aDateB = Convert(varchar(19),Cast(%s as datetime),21)+''.000''
Set @aDateE = Convert(varchar(19),Cast(%s as datetime),21)+''.999''
set @vak01 = %d
set @vaeid = %s
declare @kbVAE table(VAE01 int,fvaj37 numeric(18,4))
insert into @kbVAE(VAE01,fvaj37)
select Value,0 from dbo.Split(@vaeid,'','')
if @vak01=1
update a set a.fvaj37=s.FSum
from @kbVAE a
join (select v.vaa07,sum(v.vaj37) as FSum from V_VAJ_2 v
where v.acf01=2 and v.VAJ46 >= @aDateB and v.VAJ46 <= @aDateE
group by v.vaa07) s on s.VAA07=a.VAE01
else
update a set a.fvaj37=s.FSum
from @kbVAE a
join (select v.vaa07,sum(v.vaj37) as FSum from VAJ2 v with(nolock)
where v.acf01=2 and v.VAJ46 >= @aDateB and v.VAJ46 <= @aDateE
group by v.vaa07) s on s.VAA07=a.VAE01
select b.vaa04 住院号
,b.vaa05 姓名
,c.BCK03 科室
,a.BDP02 病人类别
,a.BCQ04B 床位
,d.VBM05 费用总额
,d.VBM04 押金总额
,isnull(d.VBM04,0)-isnull(d.VBM05,0) as 余额
,a.VAE11 入院时间
,case DATEDIFF(day,a.VAE11,isnull(a.VAE26,Getdate())) when 0 then 1 else
DATEDIFF(day,a.VAE11,isnull(a.VAE26,Getdate())) end As 住院天数
,a.VAE01 就诊ID
,v1.fvaj37 单日费用
,e.Rownr 床位序号
,b.VAA53 担保人
,b.BEP05 报警线
,b.BEP06 信用额度
,@aDateB 起始时间
,@aDateE 终止时间
from vae1 a with(nolock)
join vaa1 b with(nolock) on a.vaa01=b.vaa01
join bck1 c with(nolock) on a.BCK01D = c.BCK01
join @kbVAE v1 on v1.VAE01=a.VAE01
left join BCQ1 e with(nolock) on e.BCK01A = a.BCK01C and e.BCQ04 = a.BCQ04B
left join VBM2 d with(nolock) on d.VAA07 = a.VAE01 and d.ACF01 = 2
order by e.rownr
' where Code='HO.Clinical.S.000021'
end
GO
--删除旧记录
--delete from Report_Objects where Code='HO.Clinical.S.000022' --删除脚本内容
IF not EXISTS(SELECT * FROM Report_Objects WHERE code='HO.Clinical.S.000022')
begin --插入
Declare @Report_Id_877 int
Exec Core_NewId 'Report_Objects', 'id', @Report_Id_877 out
Declare @Report_Id_877_CateID int
Set @Report_Id_877_CateID = (select id from Report_Categories where code='HIS.5')
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_877, 'HO.Clinical.S.000022', '日汇总单汇总项目脚本', Null, Null, @Report_Id_877_CateID, 1, 4, 100, 0, Null, '2013-05-30 15:22:50', '2013-05-30 15:22:50', Null, '
89AD810A3D89F844171532E2888B648A
Declare @aDateB datetime, @aDateE datetime,@vak01 int,@vaeid varchar(512)
Set @aDateB = Convert(varchar(19),Cast(%s as datetime),21)+''.000''
Set @aDateE = Convert(varchar(19),Cast(%s as datetime),21)+''.999''
set @vak01 = %d
set @vaeid = %s
declare @kbVAE table(VAE01 int)
insert into @kbVAE(VAE01)
select Value from dbo.Split(@vaeid,'','')
select a.VAA07 就诊ID,c.BAX03 收入项目,sum(a.VAJ38) 金额
from VAJ2 a with(nolock)
join @kbVAE e on e.VAE01=a.VAA07
join BBY1 b with(nolock) on a.BBY01 = b.BBY01
join BAX1 c with(nolock) on b.BAX01 = c.BAX01
join vaa1 d with(nolock) on a.vaa01 = d.vaa01
where @vak01=0 and a.ACF01 = 2 and a.VAK01 = 0
and datediff(minute,@aDateB,a.vaj46) >=0 and datediff(minute,@aDateE,a.vaj46) <=0
group by a.VAA07,c.BAX03
union all
select a.VAA07 就诊ID,c.BAX03 收入项目,sum(a.VAJ38) 金额
from V_VAJ_2 a
join @kbVAE e on e.VAE01=a.VAA07
join BBY1 b with(nolock) on a.BBY01 = b.BBY01
join BAX1 c with(nolock) on b.BAX01 = c.BAX01
join vaa1 d with(nolock) on a.vaa01 = d.vaa01
where @vak01=1 and a.ACF01 = 2
and datediff(minute,@aDateB,a.vaj46) >=0 and datediff(minute,@aDateE,a.vaj46) <=0
group by a.VAA07,c.BAX03
', Null, 0, 1, Null, 0, Null)
end
else --更新
begin
update Report_Objects set Config='
89AD810A3D89F844171532E2888B648A
Declare @aDateB datetime, @aDateE datetime,@vak01 int,@vaeid varchar(512)
Set @aDateB = Convert(varchar(19),Cast(%s as datetime),21)+''.000''
Set @aDateE = Convert(varchar(19),Cast(%s as datetime),21)+''.999''
set @vak01 = %d
set @vaeid = %s
declare @kbVAE table(VAE01 int)
insert into @kbVAE(VAE01)
select Value from dbo.Split(@vaeid,'','')
select a.VAA07 就诊ID,c.BAX03 收入项目,sum(a.VAJ38) 金额
from VAJ2 a with(nolock)
join @kbVAE e on e.VAE01=a.VAA07
join BBY1 b with(nolock) on a.BBY01 = b.BBY01
join BAX1 c with(nolock) on b.BAX01 = c.BAX01
join vaa1 d with(nolock) on a.vaa01 = d.vaa01
where @vak01=0 and a.ACF01 = 2 and a.VAK01 = 0
and datediff(minute,@aDateB,a.vaj46) >=0 and datediff(minute,@aDateE,a.vaj46) <=0
group by a.VAA07,c.BAX03
union all
select a.VAA07 就诊ID,c.BAX03 收入项目,sum(a.VAJ38) 金额
from V_VAJ_2 a
join @kbVAE e on e.VAE01=a.VAA07
join BBY1 b with(nolock) on a.BBY01 = b.BBY01
join BAX1 c with(nolock) on b.BAX01 = c.BAX01
join vaa1 d with(nolock) on a.vaa01 = d.vaa01
where @vak01=1 and a.ACF01 = 2
and datediff(minute,@aDateB,a.vaj46) >=0 and datediff(minute,@aDateE,a.vaj46) <=0
group by a.VAA07,c.BAX03
' where Code='HO.Clinical.S.000022'
end
GO
--删除旧记录
--delete from Report_Objects where Code='HO.Clinical.S.000023' --删除脚本内容
IF not EXISTS(SELECT * FROM Report_Objects WHERE code='HO.Clinical.S.000023')
begin --插入
Declare @Report_Id_878 int
Exec Core_NewId 'Report_Objects', 'id', @Report_Id_878 out
Declare @Report_Id_878_CateID int
Set @Report_Id_878_CateID = (select id from Report_Categories where code='HIS.5')
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_878, 'HO.Clinical.S.000023', '日汇总单清单明细脚本', Null, Null, @Report_Id_878_CateID, 1, 4, 100, 0, Null, '2013-05-30 15:23:16', '2013-05-30 15:23:16', Null, '
0659C3D63159B0D0B263CE93FAA54B5E
Declare @aDateB datetime, @aDateE datetime,@vak01 int,@vaeid varchar(512)
Set @aDateB = Convert(varchar(19),Cast(%s as datetime),21)+''.000''
Set @aDateE = Convert(varchar(19),Cast(%s as datetime),21)+''.999''
set @vak01 = %d
set @vaeid = %s
declare @kbVAE table(VAE01 int)
insert into @kbVAE(VAE01)
select Value from dbo.Split(@vaeid,'','')
select b.BBY05 收费项目名称
,b.BBY06 规格
,a.VAJ33 单价
,null 单位负担
,null 保险金额
,c.BAX03 收入项目
,a.VAA07 就诊ID
,a.VAJ27 婴儿ID
,sum(a.VAJ25) 数量
,sum(a.VAJ38) 金额
,sum(a.VAJ38) 自负金额
from VAJ2 a with(nolock)
join @kbVAE e on e.VAE01=a.VAA07
join BBY1 b with(nolock) on a.BBY01 = b.BBY01
join BAX1 c with(nolock) on b.BAX01 = c.BAX01
join vaa1 d with(nolock) on a.vaa01 = d.vaa01
where @vak01=0 and a.ACF01 = 2 and a.VAK01 = 0
and datediff(minute,@aDateB,a.vaj46) >=0
and datediff(minute,@aDateE,a.vaj46) <=0
group by b.BBY05,b.BBY06,a.VAJ33,c.BAX03,a.VAA07,a.VAJ27
Having sum(a.VAJ37) <> 0
union all
select b.BBY05 收费项目名称
,b.BBY06 规格
,a.VAJ33 单价
,null 单位负担
,null 保险金额
,c.BAX03 收入项目
,a.VAA07 就诊ID
,a.VAJ27 婴儿ID
,sum(a.VAJ25) 数量
,sum(a.VAJ38) 金额
,sum(a.VAJ38) 自负金额
from V_VAJ_2 a
join @kbVAE e on e.VAE01=a.VAA07
join BBY1 b with(nolock) on a.BBY01 = b.BBY01
join BAX1 c with(nolock) on b.BAX01 = c.BAX01
join vaa1 d with(nolock) on a.vaa01 = d.vaa01
where @vak01=1 and a.ACF01 = 2
and datediff(minute,@aDateB,a.vaj46) >=0
and datediff(minute,@aDateE,a.vaj46) <=0
group by b.BBY05,b.BBY06,a.VAJ33,c.BAX03,a.VAA07,a.VAJ27
Having sum(a.VAJ37) <> 0
order by a.VAA07,c.BAX03
', Null, 0, 1, Null, 0, Null)
end
else --更新
begin
update Report_Objects set Config='
0659C3D63159B0D0B263CE93FAA54B5E
Declare @aDateB datetime, @aDateE datetime,@vak01 int,@vaeid varchar(512)
Set @aDateB = Convert(varchar(19),Cast(%s as datetime),21)+''.000''
Set @aDateE = Convert(varchar(19),Cast(%s as datetime),21)+''.999''
set @vak01 = %d
set @vaeid = %s
declare @kbVAE table(VAE01 int)
insert into @kbVAE(VAE01)
select Value from dbo.Split(@vaeid,'','')
select b.BBY05 收费项目名称
,b.BBY06 规格
,a.VAJ33 单价
,null 单位负担
,null 保险金额
,c.BAX03 收入项目
,a.VAA07 就诊ID
,a.VAJ27 婴儿ID
,sum(a.VAJ25) 数量
,sum(a.VAJ38) 金额
,sum(a.VAJ38) 自负金额
from VAJ2 a with(nolock)
join @kbVAE e on e.VAE01=a.VAA07
join BBY1 b with(nolock) on a.BBY01 = b.BBY01
join BAX1 c with(nolock) on b.BAX01 = c.BAX01
join vaa1 d with(nolock) on a.vaa01 = d.vaa01
where @vak01=0 and a.ACF01 = 2 and a.VAK01 = 0
and datediff(minute,@aDateB,a.vaj46) >=0
and datediff(minute,@aDateE,a.vaj46) <=0
group by b.BBY05,b.BBY06,a.VAJ33,c.BAX03,a.VAA07,a.VAJ27
Having sum(a.VAJ37) <> 0
union all
select b.BBY05 收费项目名称
,b.BBY06 规格
,a.VAJ33 单价
,null 单位负担
,null 保险金额
,c.BAX03 收入项目
,a.VAA07 就诊ID
,a.VAJ27 婴儿ID
,sum(a.VAJ25) 数量
,sum(a.VAJ38) 金额
,sum(a.VAJ38) 自负金额
from V_VAJ_2 a
join @kbVAE e on e.VAE01=a.VAA07
join BBY1 b with(nolock) on a.BBY01 = b.BBY01
join BAX1 c with(nolock) on b.BAX01 = c.BAX01
join vaa1 d with(nolock) on a.vaa01 = d.vaa01
where @vak01=1 and a.ACF01 = 2
and datediff(minute,@aDateB,a.vaj46) >=0
and datediff(minute,@aDateE,a.vaj46) <=0
group by b.BBY05,b.BBY06,a.VAJ33,c.BAX03,a.VAA07,a.VAJ27
Having sum(a.VAJ37) <> 0
order by a.VAA07,c.BAX03
' where Code='HO.Clinical.S.000023'
end
GO
--删除旧记录
--delete from Report_Objects where Code='HO.Clinical.Dev.000002' --删除脚本内容
IF not EXISTS(SELECT * FROM Report_Objects WHERE code='HO.Clinical.Dev.000002')
begin --插入
Declare @Report_Id_1056 int
Exec Core_NewId 'Report_Objects', 'id', @Report_Id_1056 out
Declare @Report_Id_1056_CateID int
Set @Report_Id_1056_CateID = (select id from Report_Categories where code='HIS.3')
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_1056, 'HO.Clinical.Dev.000002', '医生站扩展参数选项', '限制药品重复开药选项等', Null, @Report_Id_1056_CateID, 1, 4, 100, 0, Null, '2014-05-19 14:36:00', '2017-02-06 13:58:15', Null, '
3CB9D1F8D22A284E1DB5A3258F4D731F
--系统发布的都是固定选项。后面可以追加
select s.fid,s.fname,cast(s.fid as varchar)+''--''+s.fname as sfname
from (
select 0 fid,''按药品规格限制用药(X)天数,且距上次用药剩余(Y)天数内才能再开'' fname
union all
select 1 ,''按药品品种限制用药(X)天数,且距上次用药剩余(Y)天数内才能再开''
union all
select 2,''icd疾病用药(X)天数限制''
union all
select 3,''所有药品限制用药(X)天数,且距上次用药剩余(Y)天数内才能再开''
union all
select 4,''抗菌药品限制DDD''
union all
select 5,''医保病人处方，医保和自费药品不允许在同一张处方''
union all
select 6,''医保病人处方，精神类和非精神类药品不允许在同一张处方''
union all
select 7,''医保病人处方，对应相同医保药品编码的西成药品一天内只允许开一次''
union all
select 8,''医保病人处方，所有医保药品限制最大用药(X)天数''
union all
select 9,''医保病人处方，处方诊断限制最大条数''
union all
select 10,''医保挂急诊号病人限制最大开药(X)天数''
union all
select 11,''医保处方诊断为行动不便病人限制最大开药(X)天数''
union all
select 12,''医保病人医保药品3、7、14、30处方天数提前开药限制''
union all
select 13,''医保病人医保处方草药单方不报判断''
union all
select 14,''医保病人限制开大额药品的医保险种判断''
union all
select 15,''医保分配基金限制判断，当月所开医保报销金额大于分配基金，则禁止医师在开医保处方''
union all
select 16,''医保病人处方，对应相同医保药品编码的西成药品不允许在同一张处方''
union all
select 17,''门诊处方，医师所开西成药用药天数跟总量、用量计算出的天数超过设定值禁止保存''
union all
select 18,''医保病人草药处方，可报与不可报草药药品不允许在同一张处方''
union all
select 19,''医保病人处方，西成药品按总量、用量计算出的天数最大不能超过(X)天数''
union all
select 20,''门诊处方，西成药品总量必须大于零''
union all
select 21,''医保病人处方，限定同检查类型的诊疗项目一天内只允许开一次''
union all
select 22,''医保病人处方，当药品总量是1时，对应医师开药天数不在限制，但总量与用量计算出的天数仍然限制''
union all
select 23 ,''医保病人处方，所有药品按医保编码限制用药(X)天数,且距上次用药剩余(Y)天数内才能再开''
union all
select 24 ,''一次开多条相同医技项目医嘱，第二条及以上医嘱单独生成条码''
union all
select 25 ,''对住院手术有关抗生素类用药疗程及时机控制提示''
union all
select 26 ,''对应类别下诊疗项目，门诊医保病人当天重复开时增加提示''
union all
select 27 ,''默认提取最后一次医嘱时，需要剔除不提取的诊疗类别''
union all
select 28 ,''启用药品规格中的限制用量判断，下达医嘱时判断单次用量''
union all
select 29,''门诊处方，当药品总量是1时，对应医师开药天数不在限制，但总量与用量计算出的天数仍然限制''
union all
select 30,''住院手术医嘱，限制必须输入切口等级''
union all
select 31,''住院按病人类别及科室设置药品费用(Y)及总费用(X)限制值''
union all
select 32,''门诊医生站刷会员卡做简易挂号时，病人费别默认提取会员卡对应信息''
union all
select 33,''第三方处方点评浏览调用地址''
union all
select 34,''限定检查类型必须输入病历摘要''
union all
select 35,''限定检查类型必须输入辅助检查''
union all
select 36,''限定检查类型必须输入检查目的''
union all
select 37,''门诊手术医嘱，手术室审核安排后就不能在回退或取消医嘱''
union all
select 38,''住院药品临嘱必须输入频次''
union all
select 39,''调用第三方仪器检查报告(设置对应浏览调用地址和参数)''
union all
select 40,''住院术后超过24小时禁止使用抗生素''
union all
select 41,''住院术前超过0.5--2小时禁止使用抗生素''
union all
select 42,''自动提取病史摘要天数限制，门诊(Y)天及住院(X)天内的病史摘要''
union all
select 43,''下达医嘱限制诊疗类项目禁止输入小数，门诊(Y)及住院(X)大于零表示禁止''
union all
select 44,''门诊下达医嘱窗口，隐藏病人信息框把其显示在标题栏''
union all
select 45,''门诊病人超过一定岁数，必须在首页输入收缩压、舒张压''
union all
select 46,''门诊医师站在检索病人地方显示自定义查询按钮''
union all
select 47,''门诊医保病人保内西成药品处方，不能下达自费药品''
union all
select 48,''门诊编辑医嘱(Y)及回退或医嘱退费(X)大于零表示必须刷会员卡才能继续操作''
union all
select 49,''下达医嘱限制诊疗类项目数量不能输入零，门诊(Y)及住院(X)大于零表示禁止''
union all
select 50,''门诊医保病人保内处方，不能下达执行性质为自费的项目''
union all
select 51,''门诊医保病人，下达处方默认医保处方类型''
union all
select 52,''门诊医保病人保内中草药品处方，不能下达不可报药品''
union all
select 53,''门诊简易挂号，病人类别为医保，一卡通扣费余额不够时也允许挂号''
union all
select 54,''门诊简易挂号，同一个病人当天同一个科室同一个医生只能挂号一次''
union all
select 55,''下达医嘱时，根据医保明细项目中备注进行提示''
union all
select 56,''下达门诊处方诊断或住院出院诊断时，调用慢性病确诊接口，门诊(Y)及住院(X)大于零表示调用''
union all
select 57,''眼科专科疾病信息调用填写''
union all
select 58,''检查报告页面使用中间表浏览图文报告''
union all
select 59,''合理用药审核处方时传入历史有效医嘱设置，门诊(Y)及住院(X)大于零表示传入。''
union all
select 60,''查看病人医疗信息web地址设置(设置对应浏览调用地址和参数)''
union all
select 61,''调用第三方超声系统查看超声影像报告接口程序路径设置''
union all
select 62,''医护站发送医嘱后实时上传医保费用，门诊(Y)及住院(X)大于零表示启用''
union all
select 63,''医生站费用诊间结算(1=医保卡2=银行pos 3=两种都支持)，门诊(Y)及住院(X)大于零表示启用''
union all
select 64,''新版大通合理用药医院编码设置''
union all
select 65,''大通合理用药审核处方时，返回一般或其他信息提示时，医生站提示是否继续保存医嘱。''
union all
select 66,''调用第三方影像报告IE接口时嵌入到第三方影像报告页面浏览''
union all
select 67,''四川中医平台web地址设置''
union all
select 68,''分级转诊平台web地址设置(入参通过报表设置)''
union all
select 69,''医生给病人选择分配治疗套餐计划web地址''
union all
select 70,''北京五洲妇儿医院门诊医生站排队叫号接口(项目列维护ip，y列为端口号)''
union all
select 71,''门诊诊间结算打印收费小票，医保(Y)及银行pos(X)大于零表示启用''
union all
select 72,''医保限制内容提醒，门诊(Y)及住院(X)大于零表示启用''
union all
select 73,''下达医嘱限制修改检验样本类型，门诊(Y)及住院(X)大于零表示禁止''
union all
select 74,''门诊首页修改保存时，不判断限制年龄跟出生日期年份不一致的问题.''
union all
select 75,''下达医嘱医保病人只限制开医保目录内的药品，门诊(Y)及住院(X)大于零表示禁止''
union all
select 76,''门诊接诊病人时弹出复诊选项窗口''
union all
select 77,''门诊处方限制口服和注射不能开在同一张处方''
union all
select 78,''第三方手麻病历调阅web地址''
union all
select 79,''下达医嘱界面给药途径、频次、剂量、天数单独列显示''
union all
select 80,''第三方病理报告调阅web地址''
union all
select 81,''用血管理接口(1:西安金智),对应(X)列值''
union all
select 82,''门诊处方治疗申请单打印启用报表授权判断''
union all
select 83,''住院下达会诊医嘱启用会诊申请单模式''
union all
select 84,''住院下达医嘱前进行术后24、48、72小时用药未停止医嘱提醒''
union all
select 85,''住院会诊申请医嘱及申请单在执行科室对应病区提醒及打印''
union all
select 86,''下达医嘱时显示药品产地，门诊(Y)及住院(X)大于零表示显示''
union all
select 87,''下达医嘱时启用病历日志，门诊(Y)及住院(X)大于零表示启用''
union all
select 88,''住院入科时限制质控员，一级质控员(Y)及二级质控员(X)大于零必须输入''
union all
select 89,''使用HO老版本pacs''
union all
select 90,''启用合理用药及自助机接口日志记录''
union all
select 91,''医保病人，相同药品编码判断，根据药品规格对应备用编码进行比较限制''
union all
select 92,''住院临嘱自动发送时，只有发往手术室的手术医嘱自动发送.''
union all
select 93,''住院发送医嘱，对应药品设置为不发药既拒绝执行.''
union all
select 94,''门诊诊间结算支持医保报销后剩余部分可以继续用别的支付方式付款.''
union all
select 95,''下达医嘱选择诊断时，使用老样式窗口选择诊断.''
union all
select 96,''医生站简易挂号时，病人姓名和手机号码一致时只能检索挂号不能新增.''
union all
select 97,''门诊发送医嘱或记账保存时启用卫材自动冲减库存功能.''
union all
select 98,''下达医嘱诊断时，只针对当前处方，不自动增加别的处方诊断.''
union all
select 100,''住院下达出院医嘱时启用出院小结模式''
union all
select 101,''护士站不启用合理用药接口''
union all
select 102,''住院下达手术医嘱必须要输入诊断''
union all
select 103,''住院护士站启用首页床位卡片外显屏''
union all
select 104,''精准扶贫接口web地址设置(项目名称栏输入地址、(Y)栏目对应接口类型1=数据库 2=webservices 3=本地+webservices)''
union all
select 105,''xml文档文件在HoServer服务端存放路径(项目名称栏输入路径)''
union all
select 106,''启用分单规则时，医保病人在分单规则基础上按多少条再分单(Y)栏目输入对应条数''
union all
select 107,''门诊医保病人一天只允许开一张药品处方''
union all
select 108,''门诊医生站手工打印处方或申请单时不受报表权限控制''
union all
select 109,''门诊医生站检索病人时不受开始结束时间限制''
union all
select 110,''门诊医保用药历史记录下载，(Y)栏目对应间隔下载时间(分),间隔分钟需要大于1''
union all
select 111,''门诊接诊预约病人时才弹出复诊选项窗口''
union all
select 112,''门诊启用当天回诊查看检查结果列表队列,(Y)栏目对应呼叫规则(1=医生自由呼叫 2=交替呼叫)''
union all
select 113,''下达卫材医嘱判断库存，门诊(Y)及住院(X),值大于0表示启用库存判断''
union all
select 114,''北京医保共享信息停止时，就不再判断跨院记录''
union all
select 115,''住院病人档案启用无纸化流程管理''
union all
select 116,''门诊分配治疗套餐时按整个套餐选择，不允许选套餐中某个阶段''
union all
select 117,''门诊分配治疗套餐时隐藏[现在执行]列''
union all
select 118,''启用分单规则时，在分单规则基础上启用分单标示的项目单独分单''
union all
select 119,''启用住院病人类别为门诊特病住院期间医保治疗方案判断''
union all
select 120,''医生站费用诊间结算(1=微信2=支付宝 3=两种都支持)，门诊(Y)及住院(X)大于零表示启用''
union all
select 121,''门诊医生站启用诊室ipad排队信息显示''
union all
select 122,''下达草药医嘱默认剂数,门诊(Y)及住院(X)大于零表示启用''
union all
select 123,''医生站调用第三方体检检查报告,门诊(Y)及住院(X)大于零表示启用(1=调用dll或exe 2=web方式''
union all
select 124,''门诊医生站下达诊断时不使用树形列表''
union all
select 125,''下达手术医嘱时，隐藏手术申请单输入窗口，门诊(Y)及住院(X)大于零表示启用''
union all
select 126,''合理用药单个药品说明书通过右键菜单查看''
union all
select 127,''医生站观片时不启用双屏判断，门诊(Y)及住院(X)大于零表示参数启用''
union all
select 128,''门诊执行治疗套餐时允许按单个套餐项目选择''
union all
select 129,''门诊处方，医师所开西成药用药天数跟总量、用量计算出的天数不一致时提醒医生''
union all
select 130,''下达手术医嘱时，卫材只检索维护的执行科室，门诊(Y)及住院(X)大于零表示启用''
) s
', Null, 0, 1, Null, 0, Null)
end
else --更新
begin
update Report_Objects set Config='
3CB9D1F8D22A284E1DB5A3258F4D731F
--系统发布的都是固定选项。后面可以追加
select s.fid,s.fname,cast(s.fid as varchar)+''--''+s.fname as sfname
from (
select 0 fid,''按药品规格限制用药(X)天数,且距上次用药剩余(Y)天数内才能再开'' fname
union all
select 1 ,''按药品品种限制用药(X)天数,且距上次用药剩余(Y)天数内才能再开''
union all
select 2,''icd疾病用药(X)天数限制''
union all
select 3,''所有药品限制用药(X)天数,且距上次用药剩余(Y)天数内才能再开''
union all
select 4,''抗菌药品限制DDD''
union all
select 5,''医保病人处方，医保和自费药品不允许在同一张处方''
union all
select 6,''医保病人处方，精神类和非精神类药品不允许在同一张处方''
union all
select 7,''医保病人处方，对应相同医保药品编码的西成药品一天内只允许开一次''
union all
select 8,''医保病人处方，所有医保药品限制最大用药(X)天数''
union all
select 9,''医保病人处方，处方诊断限制最大条数''
union all
select 10,''医保挂急诊号病人限制最大开药(X)天数''
union all
select 11,''医保处方诊断为行动不便病人限制最大开药(X)天数''
union all
select 12,''医保病人医保药品3、7、14、30处方天数提前开药限制''
union all
select 13,''医保病人医保处方草药单方不报判断''
union all
select 14,''医保病人限制开大额药品的医保险种判断''
union all
select 15,''医保分配基金限制判断，当月所开医保报销金额大于分配基金，则禁止医师在开医保处方''
union all
select 16,''医保病人处方，对应相同医保药品编码的西成药品不允许在同一张处方''
union all
select 17,''门诊处方，医师所开西成药用药天数跟总量、用量计算出的天数超过设定值禁止保存''
union all
select 18,''医保病人草药处方，可报与不可报草药药品不允许在同一张处方''
union all
select 19,''医保病人处方，西成药品按总量、用量计算出的天数最大不能超过(X)天数''
union all
select 20,''门诊处方，西成药品总量必须大于零''
union all
select 21,''医保病人处方，限定同检查类型的诊疗项目一天内只允许开一次''
union all
select 22,''医保病人处方，当药品总量是1时，对应医师开药天数不在限制，但总量与用量计算出的天数仍然限制''
union all
select 23 ,''医保病人处方，所有药品按医保编码限制用药(X)天数,且距上次用药剩余(Y)天数内才能再开''
union all
select 24 ,''一次开多条相同医技项目医嘱，第二条及以上医嘱单独生成条码''
union all
select 25 ,''对住院手术有关抗生素类用药疗程及时机控制提示''
union all
select 26 ,''对应类别下诊疗项目，门诊医保病人当天重复开时增加提示''
union all
select 27 ,''默认提取最后一次医嘱时，需要剔除不提取的诊疗类别''
union all
select 28 ,''启用药品规格中的限制用量判断，下达医嘱时判断单次用量''
union all
select 29,''门诊处方，当药品总量是1时，对应医师开药天数不在限制，但总量与用量计算出的天数仍然限制''
union all
select 30,''住院手术医嘱，限制必须输入切口等级''
union all
select 31,''住院按病人类别及科室设置药品费用(Y)及总费用(X)限制值''
union all
select 32,''门诊医生站刷会员卡做简易挂号时，病人费别默认提取会员卡对应信息''
union all
select 33,''第三方处方点评浏览调用地址''
union all
select 34,''限定检查类型必须输入病历摘要''
union all
select 35,''限定检查类型必须输入辅助检查''
union all
select 36,''限定检查类型必须输入检查目的''
union all
select 37,''门诊手术医嘱，手术室审核安排后就不能在回退或取消医嘱''
union all
select 38,''住院药品临嘱必须输入频次''
union all
select 39,''调用第三方仪器检查报告(设置对应浏览调用地址和参数)''
union all
select 40,''住院术后超过24小时禁止使用抗生素''
union all
select 41,''住院术前超过0.5--2小时禁止使用抗生素''
union all
select 42,''自动提取病史摘要天数限制，门诊(Y)天及住院(X)天内的病史摘要''
union all
select 43,''下达医嘱限制诊疗类项目禁止输入小数，门诊(Y)及住院(X)大于零表示禁止''
union all
select 44,''门诊下达医嘱窗口，隐藏病人信息框把其显示在标题栏''
union all
select 45,''门诊病人超过一定岁数，必须在首页输入收缩压、舒张压''
union all
select 46,''门诊医师站在检索病人地方显示自定义查询按钮''
union all
select 47,''门诊医保病人保内西成药品处方，不能下达自费药品''
union all
select 48,''门诊编辑医嘱(Y)及回退或医嘱退费(X)大于零表示必须刷会员卡才能继续操作''
union all
select 49,''下达医嘱限制诊疗类项目数量不能输入零，门诊(Y)及住院(X)大于零表示禁止''
union all
select 50,''门诊医保病人保内处方，不能下达执行性质为自费的项目''
union all
select 51,''门诊医保病人，下达处方默认医保处方类型''
union all
select 52,''门诊医保病人保内中草药品处方，不能下达不可报药品''
union all
select 53,''门诊简易挂号，病人类别为医保，一卡通扣费余额不够时也允许挂号''
union all
select 54,''门诊简易挂号，同一个病人当天同一个科室同一个医生只能挂号一次''
union all
select 55,''下达医嘱时，根据医保明细项目中备注进行提示''
union all
select 56,''下达门诊处方诊断或住院出院诊断时，调用慢性病确诊接口，门诊(Y)及住院(X)大于零表示调用''
union all
select 57,''眼科专科疾病信息调用填写''
union all
select 58,''检查报告页面使用中间表浏览图文报告''
union all
select 59,''合理用药审核处方时传入历史有效医嘱设置，门诊(Y)及住院(X)大于零表示传入。''
union all
select 60,''查看病人医疗信息web地址设置(设置对应浏览调用地址和参数)''
union all
select 61,''调用第三方超声系统查看超声影像报告接口程序路径设置''
union all
select 62,''医护站发送医嘱后实时上传医保费用，门诊(Y)及住院(X)大于零表示启用''
union all
select 63,''医生站费用诊间结算(1=医保卡2=银行pos 3=两种都支持)，门诊(Y)及住院(X)大于零表示启用''
union all
select 64,''新版大通合理用药医院编码设置''
union all
select 65,''大通合理用药审核处方时，返回一般或其他信息提示时，医生站提示是否继续保存医嘱。''
union all
select 66,''调用第三方影像报告IE接口时嵌入到第三方影像报告页面浏览''
union all
select 67,''四川中医平台web地址设置''
union all
select 68,''分级转诊平台web地址设置(入参通过报表设置)''
union all
select 69,''医生给病人选择分配治疗套餐计划web地址''
union all
select 70,''北京五洲妇儿医院门诊医生站排队叫号接口(项目列维护ip，y列为端口号)''
union all
select 71,''门诊诊间结算打印收费小票，医保(Y)及银行pos(X)大于零表示启用''
union all
select 72,''医保限制内容提醒，门诊(Y)及住院(X)大于零表示启用''
union all
select 73,''下达医嘱限制修改检验样本类型，门诊(Y)及住院(X)大于零表示禁止''
union all
select 74,''门诊首页修改保存时，不判断限制年龄跟出生日期年份不一致的问题.''
union all
select 75,''下达医嘱医保病人只限制开医保目录内的药品，门诊(Y)及住院(X)大于零表示禁止''
union all
select 76,''门诊接诊病人时弹出复诊选项窗口''
union all
select 77,''门诊处方限制口服和注射不能开在同一张处方''
union all
select 78,''第三方手麻病历调阅web地址''
union all
select 79,''下达医嘱界面给药途径、频次、剂量、天数单独列显示''
union all
select 80,''第三方病理报告调阅web地址''
union all
select 81,''用血管理接口(1:西安金智),对应(X)列值''
union all
select 82,''门诊处方治疗申请单打印启用报表授权判断''
union all
select 83,''住院下达会诊医嘱启用会诊申请单模式''
union all
select 84,''住院下达医嘱前进行术后24、48、72小时用药未停止医嘱提醒''
union all
select 85,''住院会诊申请医嘱及申请单在执行科室对应病区提醒及打印''
union all
select 86,''下达医嘱时显示药品产地，门诊(Y)及住院(X)大于零表示显示''
union all
select 87,''下达医嘱时启用病历日志，门诊(Y)及住院(X)大于零表示启用''
union all
select 88,''住院入科时限制质控员，一级质控员(Y)及二级质控员(X)大于零必须输入''
union all
select 89,''使用HO老版本pacs''
union all
select 90,''启用合理用药及自助机接口日志记录''
union all
select 91,''医保病人，相同药品编码判断，根据药品规格对应备用编码进行比较限制''
union all
select 92,''住院临嘱自动发送时，只有发往手术室的手术医嘱自动发送.''
union all
select 93,''住院发送医嘱，对应药品设置为不发药既拒绝执行.''
union all
select 94,''门诊诊间结算支持医保报销后剩余部分可以继续用别的支付方式付款.''
union all
select 95,''下达医嘱选择诊断时，使用老样式窗口选择诊断.''
union all
select 96,''医生站简易挂号时，病人姓名和手机号码一致时只能检索挂号不能新增.''
union all
select 97,''门诊发送医嘱或记账保存时启用卫材自动冲减库存功能.''
union all
select 98,''下达医嘱诊断时，只针对当前处方，不自动增加别的处方诊断.''
union all
select 100,''住院下达出院医嘱时启用出院小结模式''
union all
select 101,''护士站不启用合理用药接口''
union all
select 102,''住院下达手术医嘱必须要输入诊断''
union all
select 103,''住院护士站启用首页床位卡片外显屏''
union all
select 104,''精准扶贫接口web地址设置(项目名称栏输入地址、(Y)栏目对应接口类型1=数据库 2=webservices 3=本地+webservices)''
union all
select 105,''xml文档文件在HoServer服务端存放路径(项目名称栏输入路径)''
union all
select 106,''启用分单规则时，医保病人在分单规则基础上按多少条再分单(Y)栏目输入对应条数''
union all
select 107,''门诊医保病人一天只允许开一张药品处方''
union all
select 108,''门诊医生站手工打印处方或申请单时不受报表权限控制''
union all
select 109,''门诊医生站检索病人时不受开始结束时间限制''
union all
select 110,''门诊医保用药历史记录下载，(Y)栏目对应间隔下载时间(分),间隔分钟需要大于1''
union all
select 111,''门诊接诊预约病人时才弹出复诊选项窗口''
union all
select 112,''门诊启用当天回诊查看检查结果列表队列,(Y)栏目对应呼叫规则(1=医生自由呼叫 2=交替呼叫)''
union all
select 113,''下达卫材医嘱判断库存，门诊(Y)及住院(X),值大于0表示启用库存判断''
union all
select 114,''北京医保共享信息停止时，就不再判断跨院记录''
union all
select 115,''住院病人档案启用无纸化流程管理''
union all
select 116,''门诊分配治疗套餐时按整个套餐选择，不允许选套餐中某个阶段''
union all
select 117,''门诊分配治疗套餐时隐藏[现在执行]列''
union all
select 118,''启用分单规则时，在分单规则基础上启用分单标示的项目单独分单''
union all
select 119,''启用住院病人类别为门诊特病住院期间医保治疗方案判断''
union all
select 120,''医生站费用诊间结算(1=微信2=支付宝 3=两种都支持)，门诊(Y)及住院(X)大于零表示启用''
union all
select 121,''门诊医生站启用诊室ipad排队信息显示''
union all
select 122,''下达草药医嘱默认剂数,门诊(Y)及住院(X)大于零表示启用''
union all
select 123,''医生站调用第三方体检检查报告,门诊(Y)及住院(X)大于零表示启用(1=调用dll或exe 2=web方式''
union all
select 124,''门诊医生站下达诊断时不使用树形列表''
union all
select 125,''下达手术医嘱时，隐藏手术申请单输入窗口，门诊(Y)及住院(X)大于零表示启用''
union all
select 126,''合理用药单个药品说明书通过右键菜单查看''
union all
select 127,''医生站观片时不启用双屏判断，门诊(Y)及住院(X)大于零表示参数启用''
union all
select 128,''门诊执行治疗套餐时允许按单个套餐项目选择''
union all
select 129,''门诊处方，医师所开西成药用药天数跟总量、用量计算出的天数不一致时提醒医生''
union all
select 130,''下达手术医嘱时，卫材只检索维护的执行科室，门诊(Y)及住院(X)大于零表示启用''
) s
' where Code='HO.Clinical.Dev.000002'
end
GO