一、临时表数据写入
1、运行table表结构
2、BM_YYSFXM_TJ20150624_SJ.sql  原始EXCEL表数据导入
3、对比医院价格库后写入临时表  脚本如下：
--市级医院(第三档价格)

insert into bm_yysfxm_tj20150701 (bh0000,xmmc00,sfje00)
select a.bh0000,a.xmmc00,a.newje3 from BM_YYSFXM_TJ20150624_SJ a,bm_yysfxm b where trim(a.bh0000)=trim(b.bh0000) 
and a.newje3<>b.sfje00;
commit;





二、价格调整
1、备份各关键表数据
create table bm_yysfxm_20150630 as select * from bm_yysfxm;
create table bm_ybsfxm_20150630 as select * from bm_ybsfxm;
create table bm_ybsfdy_20150630 as select * from bm_ybsfdy;

2、价格目录调整
--普通收费价格调整
update bm_yysfxm a 
set a.bzje00=(select b.sfje00 from bm_yysfxm_tj20150701 b where a.bh0000=b.bh0000), 
a.sfje00=(select b.sfje00 from bm_yysfxm_tj20150701 b where a.bh0000=b.bh0000),
a.sfsx00=(select b.sfje00 from bm_yysfxm_tj20150701 b where a.bh0000=b.bh0000)
where a.bh0000 in (select b.bh0000 from bm_yysfxm_tj20150701 b) and a.bmgzid='1';
commit;

--以下防止xt_zlsfgx.tcje00不为空时，诊疗项目价格与实际不一致造成很多问题; 
create table xt_zlsfgx_20150630 as select * from xt_zlsfgx;
update xt_zlsfgx set tcje00=null where tcje00 is not null;
commit;

--材料价格调整，
--按财务科要求，收费金额全部改为标准金额，就是取消加成率。
注意：根据各医院实际情况以决定是否要跑，如不确定请跳过本段。
update bm_yysfxm set sfje00= round(sfje00/1.03,2) where jsxm00='2' and tzrq00  is null and sfje00>=5150    and bh0000 like '9%' ;  --5150以上金额除以1.03
update bm_yysfxm set sfje00= round(sfje00/1.05,2) where jsxm00='2' and tzrq00  is null and sfje00>=1080 AND SFJE00<5150 and bh0000 like '9%'; --5150以下1080以上金额除以1.05
update bm_yysfxm set sfje00= round(sfje00/1.08,2) where jsxm00='2' and tzrq00  is null and sfje00<1080 and bh0000 like '9%';  --1080以下金额除以1.03


3、对在用的非药医嘱及医技单等数据进行修改

--修改常规项目记帐维护未停止项目、床位维护未停止项目价格
update BQ_JZXM00 a set a.sfje00=(select b.sfje00 from bm_yysfxm b where a.sfxmid=b.sfxmid and b.sfje00<>a.sfje00)
where a.tzrq00 is null and a.sfxmid in (select b.sfxmid from bm_yysfxm b where a.sfxmid=b.sfxmid and b.sfje00<>a.sfje00 and b.sfje00<>0) ;
commit;

--修改附加费
update bq_fjzxxm a set a.sfje00=(select b.sfje00 from bm_yysfxm b where a.sfxmid=b.sfxmid and a.sfje00<>b.sfje00 and a.tzrq00 is null)   
where exists (select 1 from bm_yysfxm b where a.sfxmid=b.sfxmid and a.sfje00<>b.sfje00 and a.tzrq00 is null);
commit;


4、运行‘修改长期医嘱医技单价格.txt’脚本，然后跑以下脚本
exec SP_YJ_XMTJ00('20150620','20150630');

运行以下过程医保病人开项目价格立刻按新价格显示
begin
sp_ys_ybfyyz;
end;
/

5、进门诊收费系统--综合-字典维护-挂号费维护   删除金额0的挂号对应

6、查询调价后哪些打包项目明细项目金额为0 的项目
select distinct a.zlxmbh,a.zlxmjc,c.xmmc00,c.sfje00 from bm_zlzd00 a,xt_zlsfgx b,bm_yysfxm c where a.zlxmid=b.zlxmid and b.sfxmid=c.sfxmid and c.sfje00=0 

7、未参与调价药品
select * from bm_yysfxm where trim(bh0000) not in (select trim(bh0000) from BM_YYSFXM_TJ20150624_SJ)