/*vw_jk_wbbasybchis; vw_jk_zdmx00; vw_jk_ssmx00; vw_jk_qtwk00; vw_jk_fymx00; */ create or replace view vw_jk_wbbasybchis as select '' aab301,--参保地行政区划 a.zyh000 bke050,--his住院病案号 a.zyh000 bke042,-- his住院号 a.lsh000 bkea29,-- his住院流水号 (select h.YBKH00 from zy_brxxb0 h where h.ZYID00 = a.lsh000 and rownum <=1 ) bkz553,-- his健康卡号 (select h.YBZYH0 from zy_brxxb0 h where h.ZYID00 = a.lsh000 and rownum <=1 ) akc190,-- 医保流水号 decode(A.JFFS00,'城镇职工基本医疗保险','01','城镇居民基本医疗保险','02','社会基本医疗保险','02', '新型农村合作医疗','03','新农合医疗','03','贫困救助','04', '商业保险','05','全公费','06','公费医疗','06','全自费','07','自费医疗','07','自费','07','08') bkz554,-- 医疗付费方式 A.ZYCS00 aka150,-- 就诊次数 '' aac999,-- 个人管理码 decode(nvl(decode(SP_SF_CHECKSFZH(upper(A.SFZH00)),1,upper(A.SFZH00),''),'-'),'-','01','01') aac058,-- 证件类型 (select brzjbh from zy_brxxb0 h, bm_brxxb0 b where h.ZYID00 = a.lsh000 and h.BRID00=b.brid00 and rownum <=1 ) aac002,-- 证件号码（社会保障号） (select h.YBKH00 from zy_brxxb0 h where h.ZYID00 = a.lsh000 and rownum <=1 ) aaz500,-- 社会保障卡号 a.brxm00 aac003,-- 姓名 decode(A.BRXB00,'女','2','男','1','0') aac004 ,-- 性别 A.BRCSRQ aac006 ,-- 出生日期 A.Brnl00 akc023,-- 年龄 nvl((select UPPER(GJDM00) from XT_GJ0000 where MC0000=A.GJ0000),'CHN') bae349,-- 国籍 A.CSDS00 bae407,-- 出生地（省市县） A.JGSF00 bae408,-- 籍贯（省市） decode(A.MZ0000,'汉','01','畲','22',decode((select MZ.DM0000 from XT_MZ0000 MZ where MZ.MC0000=A.MZ0000),'97','99',(select MZ.DM0000 from XT_MZ0000 MZ where MZ.MC0000=A.MZ0000))) aac005,-- 民族 decode(A.ZY0000,'国家公务员','11','专业技术人员','13','职员','17','企业管理人员','21','工人','24','农民','27','学生','31','现役军人','37','自由职业者','51','个体经营者','54','无业人员','70','退(离)休人员','80','其他','90','90') bae305,-- 职业 decode(A.HYZK00,'未婚','1','已婚','2','丧偶','3','离婚','4','其他','9','9') aac017,-- 婚姻状况 substrb(A.XZZXC0,1,49) aae006,-- 通讯地址 A.Xzzdh0 aab005,-- 联系电话 A.JTYB00 aae007,-- 邮政编码 A.JTDZ00 aac010,-- 户口所在地址 A.JTYB00 bae409,-- 户口地址邮编 A.GZDW00 bae411,-- 单位名称及地址 A.GZDW00 bkeh11,-- 单位地址 A.GZDH00 bae410,-- 单位联系电话 A.GZYB00 bae412,-- 单位地址邮编 A.LXRXM0 bae303,-- 联系人 decode(A.LXRGX0,'本人或户主','8','配偶','1','子','2','女','3','孙子、孙女或外孙子、外孙女','4','父子','5','父女','5','母子','5','母女','5','父母','5','祖父母或外祖父母','6','兄、弟、姐、妹','7','兄弟','7','兄妹','7','姐妹','7','姐弟','7','其他','8','8') aaa060,-- 关系代码 --nvl(substrb(A.LXRDZ0||A.LXRDZ1,1,100),'-') bae413,-- 关系人地址 nvl(substrb(A.LXRDZ0,1,49),'-') bae413,-- 关系人地址 A.LXRDH0 bae304,-- 关系人联系电话 (substrb(A.RYRQ00,1,4)||substrb(A.RYRQ00,5,2)||substrb(A.RYRQ00,7,2)||substrb(A.RYSJ00,1,2) ) akc192,-- 入院日期 DECODE(A.RYTJ00,'1','1','2','2','3','3','9','9') bke051,-- 入院途径 a.RYKB00 bke053,-- 入院科室编码（医院内部） a.Rykbmc bke052,-- 入院科别名称（医院内部） A.RYBF00 bke054,-- 入院病房 '3' bke060,-- 入院情况 substrb(A.CYRQ00,1,4)||substrb(A.CYRQ00,5,2)||substrb(A.CYRQ00,7,2)||substrb(A.CYSJ00,1,2) akc194,-- 出院日期 a.cykb00 bke057,-- 出院科室编码 a.cykbmc bke056,-- 出院科别名称 a.cybf00 bke059,-- 出院病房 a.zyts00 bke058,-- 实际住院天数 '30' bkz555,-- 治疗类别 a.blh000 bke064,-- 病理号 (select BLZDBM from ba_baszyb where LSH000=A.LSH000) bke063,-- 病理诊断编码 (select BLZD00 from ba_baszyb where LSH000=A.LSH000) bke062,-- 病理诊断名称 --decode(A.SFYWGM,'有','1','无','0','0') bke067,-- 药物过敏是否 0 bke067,---暂无过敏药物明细，药物过敏都传否 decode(A.SFSJ00,'是','1','否','0','0') bke072,-- 死亡患者尸检（ decode(A.XX0000,'A型','1','B型','2','O型','3','AB型','4','未检','6','A','1','B','2','O','3','AB','4','不详','5','未查','6','6') bke073,-- 血型 decode(A.RH0000,'阴性','1','阳性','2','不详','3','未做','4','阴','1','阳','2','未查','4','4') bke074,-- rh decode(A.BAZL00,'甲','1','乙','2','丙','3') bke075 ,-- 病案质量 A.ZKRQ00 bke077,-- 质控日期 decode(A.LYFS00,'医嘱离院','01','医嘱转院','02','医嘱转社区卫生服务机构','03','非医嘱离院','04','死亡','05','其他','09') bke078,-- 离院方式 A.ZYYLJG bke079,-- 拟接收医疗机构名称 decode(A.ZZYJH0,'有','1','无','0','0') bke068,-- 出院31天内再住院计划 A.ZZYMD0 bke069,-- 出院31天内再住院目的 '否' bke413,-- 是否新生儿（是/否） '' bka561,-- 新生儿入院类型 floor(decode(A.BRNL00,null,nvl(A.BRNLDD,0)/30,0,nvl(A.BRNLDD,0)/30)) bkc559,-- 不足1岁婴儿年龄(月) decode(A.BRNLDD,'0','0',a.brnldd) bke316,-- 新生儿出生天数 decode(A.YECSTZ,'0','',A.YECSTZ) bke317,-- 新生儿出生体重(克) decode(A.YERYTZ,'0','',a.YERYTZ) bke318,-- 新生儿入院体重(克) nvl(a.HXJSJ0,0) bke329,-- 呼吸机使用总时间（小时） '0' bkz580,-- 呼吸机使用时间（分） '0' bkz571,-- 抢救次数 '0' bkz572,-- 抢救成功次数 '' bkz573,-- 确诊日期 '' bkz556,-- 实施临床路径 '' bkz584,-- 随诊期限 '' bkz567,-- 门(急)诊诊断名称(中医诊断) '' bkz568,-- 门(急)诊疾病代码(中医诊断) SF_BA_GETLCZDB0_DIP(A.LSH000,'1',2,1) bkz569,-- 门(急)诊诊断名称(西医诊断) SF_BA_GETLCZDB0_DIP(A.LSH000,'1',0,1) bkz570,-- 门(急)诊疾病编码(西医诊断) '' bkz557,-- 使用医疗机构中药制剂 '' bkz558,-- 使用中医诊疗设备 '' bkz559,-- 使用中医诊疗技术 '' bkz560,-- 辩证施护 'N' bkz581,-- 急危重病例 'N' bkz582,-- 疑难病例 'N' bkz583,-- 是否随诊 decode(a.RJSS00,'是','Y','否','N','N') bkz589,-- 日间手术 'N' bkz604,-- 是否入住重症监护室 FY.ZYZFY0 aae198,-- 总费用 FY.ZFJE00 akc228,-- 其中自付金额 nvl(a.TJHLTS,0) bkz576,-- 特级护理天数 '0' bkz605,-- 特级护理小时 nvl(a.YJHLTS,0) bkz577,-- 一级护理天数 nvl(a.EJHLTS,0) bkz578,-- 二级护理天数 nvl(a.SJHLTS,0) bkz579,-- 三级护理天数 '' bkz585,-- 肿瘤病理分期t '' bkz586,-- 肿瘤病理分期n '' bkz587,-- 肿瘤病理分期m '' bkz588,-- 肿瘤临床分期 '-' bkz592,-- 体格检查，默认’-’ '' bke061,-- 入院诊断 '' bkea30,-- 出院诊断(小结) '' ake024,-- 主要病情描述（主诉） '' bkz593,-- 诊疗经过 '' bkz594,-- 病理结果 '' bkz590,-- 出院情况 '' aae190,-- 出院医嘱 '' aae138,-- 死亡日期 '' bkz591,-- 死亡诊断 '' bkz598,-- 死因诊断 '-' bke691,-- 现病史 '-' bkz608,-- 既往史 '-' bkz609,-- 个人史 '-' bkz613,-- 婚育史 '-' bkz614,-- 月经史 '-' bkz615,-- 家族史 '-' bkz610,-- 专科情况 '-' bkz611,-- 辅助检查 '-' bkz612,-- 初步诊断 '-' bkz595,-- 辅助实验室检查结果 '-' bkz596,-- 辅助影像学检查结果 '' aae011,-- 经办人（上传人） '' aae036,-- 经办时间 '' aae013,-- 备注 '' bkeh12,-- 手术及操作代码计数 '' bkeh13,-- 输血品种 '' bkec61,-- 输血量 '' bkeh14,-- 输血计量单位 '0' BKEH30,-- 是否院内感染 '' BKEH31,-- 院内感染诊断编码 '' itemcountzd,-- 1、诊断明细数量 '' itemcountss,-- 2、手术明细数量 '' itemcountssys,-- 3、手术医师明细数量 '' itemcountks,-- 4、科室数量 '' itemcountys,-- 5、医师数量 '' itemcountsszd,-- 6、外部损伤中毒数量 '' itemcountjh,-- 7、重症监护数量 '' itemcountgm,-- 8、药物过敏数量 '' itemcounthm,-- 9、昏迷时间段数量 '' itemcountfy,-- 10、费用明细数量 bb.sfcrff bkei55,--是否床日付费 bb.crfflx bkei56,--床日付费类型 bb.sftsbl bkei57,--是否特性病例 a.fzrmc0 bke070,---主治医生，实际取副主任字段与主诊医师代码匹配 a.zrhsmc nurs_name,--责任护士姓名 (select yg.ybygdm from bm_ygbm00 yg where yg.YGBH00 = a.zrhs00 and rownum <=1 ) nurs_code,--责任护士代码 (select yg.ybygdm from bm_ygbm00 yg where yg.YGBH00 = a.fzr000 and rownum <=1 ) chfpdr_code,--主诊医师代码 '' bill_code,--票据代码 '' bill_no --票据号码 from BA_BRZYXX A join BA_SYFYB0 FY on A.LSH000=FY.ZYID00 left join ba_brzyfy bb on a.lsh000=bb.zyid00 where /*a.scshrq = to_char(sysdate,'YYYYMMDD')*/ --a.scshrq = '20210122' /*a.cyrq00>='20210201' and a.cyrq00<='20210207' and*/ /*a.scshrq>='20210201' and */ /*a.cyrq00>='20210601' and a.cyrq00<='20210630' and a.scshrq>='20210401' and a.scshrq<='20210708'*/ (a.shbz00='2' and a.scshrq = to_char(sysdate,'YYYYMMDD') and exists (select 1 from vw_zy_jzb000 t where t.ZYID00=a.lsh000) ) or ( a.shbz00='2' and exists (select 1 from vw_zy_jzb000 t where t.ZYID00=a.lsh000 and t.JZRQ00=to_char(sysdate,'YYYYMMDD') ) ) /*(a.shbz00='2' and a.scshrq >= '20221101' and a.scshrq <= '20221130' and exists (select 1 from vw_zy_jzb000 t where t.ZYID00=a.lsh000) ) or ( a.shbz00='2' and exists (select 1 from vw_zy_jzb000 t where t.ZYID00=a.lsh000 and t.JZRQ00>='20221101' and t.JZRQ00<='20221130' ) ) */ /* a.zyh000 in ( '821920', '821379', '821378' )*/ ; create or replace view vw_jk_zdmx00 as select d.zyid00 bkea29,-- his住院流水号 decode(d.zdlb00,'1','01','3','03','04') bke301,-- 诊断或症状类型 '2' bkz564,-- 诊断分类 decode(d.zdlb00,'1','02','3','01','02') bke302,-- 诊断或症状次序 decode(length(d.plxh00),1,'0'||d.plxh00,2,''||d.plxh00) bke463,-- 诊断级别 nvl(xt.icd101,d.zdm000) bke087,-- 出院诊断或症状疾病编码 '' bkz617,-- 出院诊断或症状附加编码 nvl(xt.jbmc01,d.zdmc00) bke088,-- 出院诊断或症状疾病名称 '' bkz606,-- 术语集诊断编码 '' bkz607,-- 术语集诊断名称 decode(d.RYBQ00,'有','1','临床未确定','2','情况不明','3','无','4','1','1','2','2','3','3','4','4','4') bke090,-- 入院病情 decode(ZLXG00,'1','1','2','2','3','3','4','4','5') bke089,-- 出院情况 decode(d.zdlb00,'3','Y','') bkz561,-- 是否治疗 '' aae013-- 备注（备用内容） from bq_baszdb d left join xt_icdybd xt on xt.icd100=d.zdm000 where d.zdlb00 in ('1','2','3','4','5','6','7','8') ; create or replace view vw_jk_ssmx00 as select s.lsh000 bkea29,-- his住院流水号 decode(s.sslb00,'1','01','0','02','02') bke302,-- 手术次序 nvl(xt.cm3001,s.ssm000) bke091,-- 手术及操作编码 nvl(xt.ssmc01,s.ssmc00) bke092,-- 手术、操作名称（手术及操作名称） s.ssrq00 bke093,-- 手术、操作日期（手术及操作日期） decode(substr(SSZL00,1,1),'一','1','二','2','三','3','四','4','4') bke094,-- 手术级别 '' bkz601,-- cchi名称 '' bkz600,-- cchi编码 nvl(trim(s.SSYSMC),'-') bke095,-- 手术及操作医师 (select DM0000 from BA_ZDDY00 ZD where ZD.ZDBM00='MZFS41' and ZD.Zdmc00=S.MZFS00) bke096,-- 麻醉方式 decode(s.qkyhdj,'Ⅰ/甲','01','Ⅰ/乙','02','Ⅰ/丙','03','Ⅱ/甲','04','Ⅱ/乙','05','Ⅱ/丙','06','Ⅲ/甲','07','Ⅲ/乙','08','Ⅲ/丙','09','Ⅰ/-','10','Ⅱ/-','11','Ⅲ/-','12','12') bke098,-- 切口愈合等级 '' aae013,-- 备注（备用内容） '' BKEH32,-- 手术执行开始时间 '' BKEH33,-- 手术执行结束时间 '' BKEH34,-- 是否有手术并发症 '' BKEH35,-- 手术并发症编码 '' BKEH36-- 手术并发症名称 -- 手术明细结束 -- 3、手术医师明细开始 --bke091,-- 手术及操作编码 --bkz563,-- 手术医师分类 --aac003,-- 医师姓名 --aac002,-- 医师身份证号 --bke306,-- 医师等级 --aae013,-- 备注 from ba_basssb s left join xt_cm3ybd xt on xt.cm3000=s.ssm000 ---过滤相同手术码数据 where (s.lsh000,s.sslb00,s.ssm000,s.ssmc00,s.ssrq00) in ( select a.lsh000,a.sslb00,a.ssm000,a.ssmc00,min(a.ssrq00) from ba_basssb a where a.lsh000=s.lsh000 group by a.lsh000,a.sslb00,a.ssm000,a.ssmc00 ) -- where SSZL00<>'-' and SSZL00 is not null ; create or replace view vw_jk_qtwk00 as select t.lsh000 bkea29, '' bke301, '' bkz564, '' bke302, '' bke463, '' bke087, '' bkz617, '' bke088, '' bkz606, '' bkz607, '' bke090, '' bke089, '' bkz561, '' aae013, --'' bke091, --nvl(xt.cm3001,t.ssm000) bke091, nvl((select cm3001 from xt_cm3ybd where cm3000=t.ssm000 and rownum=1) ,t.ssm000) bke091, '' bke092, '' bke093, '' bke094, '' bkz601, '' bkz600, '' bke095, '' bke096, '' bke098, '' BKEH32, '' BKEH33, '' BKEH34, '' BKEH35, '' BKEH36, '01' bkz563, --'' aac003, nvl(trim(t.ssysmc),'-') aac003, --nvl((select sfzbh0 from bm_ygbm00 where ygbh00=t.ssys00 and rownum <=1 ),(select sfzbh0 from bm_ygbm00 where zwxm00=trim(t.ssysmc) and rownum <=1)) aac002, --海泰数据 ssys00<>ssysmc nvl((select sfzbh0 from bm_ygbm00 where zwxm00=trim(t.ssysmc) and rownum <=1 ),(select sfzbh0 from bm_ygbm00 where zwxm00=trim(t.ssysmc) and rownum <=1)) aac002, --'' aac002, decode((select yslb00 from bm_ygbm00 where ygbh00=t.ssys00 and rownum <=1),'2','4','3','3','4','2','5','1','6','1','4') bke306, --'' bke306, '' bke307, '' bkf237, '' bkf238, '' bke310, '' bke311, '' bkz603, '' bke305, '' bkeh08, '' bke065, '' bke086, '' bkz602, '' bke320, '' bke321, '' bke322, '' bke303, '' bke071, '' bke304, '' bke308, '' aae030, '' bke309, '' bkc560, '' bkc561, '' aae019, '' bkeh09, '' bkeh10, '' bke593 from ba_basssb t left join xt_cm3ybd xt on xt.cm3000=t.ssm000 ; create or replace view vw_jk_fymx00 as select f.zyid00 bkea29,-- his住院流水号 decode(f.fylbmc,'综合医疗服务类','1','诊断类','2','治疗类','3','康复类','4','中医类','5','西药类','6','中药类','7','血液和血液制品类','8' ,'耗材类','9','其他类','A','A') bkc560,-- 费用类型 decode(f.xmmc00,'一般医疗服务费','11','中医辨证论治费','11A','中医辨证论治会诊费','11B','一般治疗操作费','12','护理费','13','诊察费','14','普通床位费','15','重症监护床位费','16' ,'超标床位费','17','其他费用','19','病理诊断费','21','实验室诊断费','22','影像学诊断费','23','临床诊断项目费','24','非手术治疗项目费','31','临床物理治疗费','31A','手术治疗费','34' ,'麻醉费','34A','手术费','34B','临床物理治疗费','35','康复费','41','中医诊断费','51','中医治疗费','52','中医外治','52A','中医骨伤','52B','针刺与灸法','52C' ,'中医推拿治疗','52D','中医肛肠治疗','52E','中医特殊治疗','52F','中药特殊调配加工','53A','辨证施膳','53B','中医其他费','59','西药费','61','抗菌药物费用','61A','中成药费','71' ,'医疗机构中药制剂费','71A','中草药费','72','血费','81','白蛋白类制品费','82','球蛋白类制品费','83','凝血因子类制品费','84','细胞因子类制品费','85','检查用一次性医用材料费','91','治疗用一次性医用材料费','92' ,'手术用一次性医用材料费','93','除外耗材费','94','其他费','A9','A9' ) bkc561,-- 医疗服务项目 f.hjje00 aae019,-- 金额 '' aae013-- 备注 from vw_emr_patient_cost@his f ;