-- Start of DDL Script for View SD_HOSPITAL.VW_BM_BRXXB0
-- Generated 15-七月-2022 15:34:56 from SD_HOSPITAL@FW2

CREATE OR REPLACE VIEW vw_bm_brxxb0 (
   ickh00,
   ickmm0,
   brid00,
   mrn000,
   brblh0,
   ybkh00,
   ybid00,
   yblb00,
   yblbmc,
   ybzxlb,
   brxm00,
   pysm00,
   brxb00,
   brxx00,
   brcsrq,
   brnl00,
   brhyzk,
   brzy00,
   brmz00,
   brgj00,
   brzjlx,
   brzjbh,
   fbbh00,
   fbmc00,
   brgfzh,
   brdyfw,
   brdh00,
   brjtdz,
   bryb00,
   tydwid,
   tydwmc,
   brlxgx,
   brlxxm,
   brlxdz,
   brlxdh,
   brztqk,
   brjkqk,
   brlx00,
   czy000,
   czyxm0,
   czrq00,
   czrqgg,
   czsj00,
   shr000,
   shrq00,
   rycs00,
   cyqkje,
   zyzt00,
   zytzmc,
   bz0000,
   sfyd00,
   sfyxjb,
   ybbrlb,
   sfxnh0,
   grsfen,
   ybsbk0,
   brss00,
   fbxx00,
   mzkyje,
   tssxmc,
   jg0000,
   sfbj00,
   sfbyzg,
   hzdwmc,
   brdzbm,
   sfghxz,
   gzdwdh,
   brgrdh,
   bryb01,
   sfsy00,
   brszsf,
   brszs0,
   brszz0,
   brszc0,
   zyzye0,
   sfjzfp,
   zsyid0,
   ybmc00,
   sfyljz,
   sfgwy0,
   sfgwym )
AS
select
        ICKH00,    --病人IC卡号
        ICKMM0,    --IC卡密码

      A.BRID00,    --病人的唯一标识号,ID号

        MRN000,    --病案号

        BRBLH0,    --门诊病历号

        YBKH00,    --病人医保卡号
        YBID00,    --病人医疗保险号(医保ID)
      D.YBLB00,    --病人医保类别,'0':非医保'1':省直医保,'2':市医保

      D.YBMC00,    --病人医保类别名称
      D.YBZXLB,    --医保中心类别
        BRXM00,    --姓名
      A.PYSM00,    --拼音首码
        BRXB00,    --性别
        BRXX00,    --血型

        BRCSRQ,    --出生日期
        substr(SF_XT_CSRQTONL(a.BRCSRQ,to_char(sysdate,'yyyymmdd')),1,10) BRNL00,
        BRHYZK,    --婚姻状况
        BRZY00,    --职业
        BRMZ00,    --民族
        BRGJ00,    --国籍
        BRZJLX,    --证件类型
        --BRZJBH  ,    --证件编号
        decode(SF_SF_GETYYID00(),'223280',decode(A.BRZJLX,'身份证',substr(sp_sf_sfz15to18(A.BRZJBH),1,20),A.BRZJBH),A.BRZJBH) as BRZJBH, --证件编号
      B.FBBH00,    --费别编号
      B.FBMC00,    --费别名称
        BRGFZH,    --凭证号/公费证号
        BRDYFW,    --地域范围;本市、外地）
        BRDH00,    --电话
        --trim(substr((trim(BRSZSF)||trim(BRSZS0)||trim(BRSZZ0)||trim(BRJTDZ)),1,100)) ,    --家庭地址/通信地址
        trim(substr(nvl(trim(BRSZSF)||trim(BRSZS0)||trim(BRSZZ0),trim(BRJTDZ)),1,100)) as BRJTDZ,   --家庭地址/通信地址
        BRYB00,    --邮编
        TYDWID,    --单位ID
        TYDWMC,    --单位名称
        BRLXGX,    --联系人关系

        BRLXXM,    --联系人姓名

        BRLXDZ,    --联系人地址
        BRLXDH,    --联系人电话

        BRZTQK,    --职退情况
        BRJKQK,    --健康状况
        BRLX00,    --病人类型
        CZY000,    --操作员ID
        (select ZWXM00 from BM_YGBM00 where YGBH00 = A.CZY000) CZYXM0, --操作员姓名

        CZRQ00,    --操作日期
        decode(CZRQ00, null, null,
              substr(A.CZRQ00,3,2)||'-'||substr(A.CZRQ00,5,2)||'-'||substr(A.CZRQ00,7,2)) CZRQGG, --操作日期规格化

        CZSJ00,    --操作时间
        SHR000,    --审核人姓名

        SHRQ00,    --审核日期
        RYCS00,    --入院次数
        CYQKJE,    --病人出院后的欠款数额,供病人再次入院是查询提示
        ZYZT00,    --病人在院状态,'0':门诊,'1':住院,'2':其它,'3':出院
        decode(A.ZYZT00, '0', '门诊', '1', '住院', '2', '其它', '3', '出院') ZYTZMC, --病人在院状态名称

        BZ0000,    --备注
      A.SFYD00,    --是否优待
      A.SFYXJB,
      A.YBBRLB,
      D.SFXNH0,
      A.GRSFEN,
      '1' YBSBK0,
      floor(MONTHS_BETWEEN(SYSDATE,TO_DATE(A.BRCSRQ,'YYYYMMDD'))/12) BRSS00,
      d.YBJGJC FBXX00, 
      (select ykzye0+yxqfje-tyje00 from SF_BRZHXX where brid00=a.brid00 and  JFLBID IN( select JFLBID from BM_BRJFLB where SYBZ00='0') and SFDJ00='0') MZKYJE,
      A.TSSXMC,
      A.JG0000,
      A.SFBJ00,
      A.SFBYZG,
      A.HZDWMC,
      A.BRDZBM,
      A.SFGHXZ,
      A.GZDWDH,
      A.BRGRDH,
      A.BRYB01,
      A.SFSY00,
      A.BRSZSF,    
      A.BRSZS0,    
      A.BRSZZ0,   
      A.BRSZC0,
      (select nvl(sum(ZYE000),0) from ZY_BRZHXX E where A.BRID00=E.BRID00) as ZYZYE0,      
      decode(nvl(A.SFJZFP,'0'),'Y','1','N','0',nvl(A.SFJZFP,'0'))SFJZFP,       
      A.ZSYID0,
      D.YBMC00,
      A.SFYLJZ, 
      A.SFGWY0,
      decode(A.SFGWY0,'1','公务员','2','职工','') SFGWYM  
  from BM_BRXXB0 A,BM_BRFBB0 B,IC_YHXX00 C,IC_YBBRLB D
  where A.FBBH00 = B.FBBH00
    and A.BRID00 = C.BRID00
    and A.YBLB00 = D.YBLB00 
    and A.FBBH00 = D.FBBH00
    and A.SFYX00 = 'Y'
    and C.ZT0000 = '1'    --该卡是有效的
    UNION ALL
   select
          ''  ICKH00,    --病人IC卡号
       '' ICKMM0,    --IC卡密码
      A.BRID00,    --病人的唯一标识号,ID号
        MRN000,    --病案号
        BRBLH0,    --门诊病历号

        YBKH00,    --病人医保卡号
        YBID00,    --病人医疗保险号(医保ID)
      D.YBLB00,    --病人医保类别,'0':非医保'1':省直医保,'2':市医保

      D.YBMC00,    --病人医保类别名称
      D.YBZXLB,    --医保中心类别
        BRXM00,    --姓名
      A.PYSM00,    --拼音首码
        BRXB00,    --性别
        BRXX00,    --血型

        BRCSRQ,    --出生日期
        substr(SF_XT_CSRQTONL(a.BRCSRQ,to_char(sysdate,'yyyymmdd')),1,10) BRNL00,
        BRHYZK,    --婚姻状况
        BRZY00,    --职业
        BRMZ00,    --民族
        BRGJ00,    --国籍
        BRZJLX,    --证件类型
        --BRZJBH  ,    --证件编号
        decode(SF_SF_GETYYID00(),'223280',decode(A.BRZJLX,'身份证',substr(sp_sf_sfz15to18(A.BRZJBH),1,20),A.BRZJBH),A.BRZJBH) as BRZJBH, --证件编号
      B.FBBH00,    --费别编号
      B.FBMC00,    --费别名称
        BRGFZH,    --凭证号/公费证号
        BRDYFW,    --地域范围;本市、外地）
        BRDH00,    --电话
        --trim(substr((trim(BRSZSF)||trim(BRSZS0)||trim(BRSZZ0)||trim(BRJTDZ)),1,100)) ,    --家庭地址/通信地址
        trim(substr(nvl(trim(BRSZSF)||trim(BRSZS0)||trim(BRSZZ0),trim(BRJTDZ)),1,100)) as BRJTDZ,   --家庭地址/通信地址
        BRYB00,    --邮编
        TYDWID,    --单位ID
        TYDWMC,    --单位名称
        BRLXGX,    --联系人关系

        BRLXXM,    --联系人姓名

        BRLXDZ,    --联系人地址
        BRLXDH,    --联系人电话

        BRZTQK,    --职退情况
        BRJKQK,    --健康状况
        BRLX00,    --病人类型
        CZY000,    --操作员ID
        (select ZWXM00 from BM_YGBM00 where YGBH00 = A.CZY000) CZYXM0, --操作员姓名

        CZRQ00,    --操作日期
        decode(CZRQ00, null, null,
              substr(A.CZRQ00,3,2)||'-'||substr(A.CZRQ00,5,2)||'-'||substr(A.CZRQ00,7,2)) CZRQGG, --操作日期规格化

        CZSJ00,    --操作时间
        SHR000,    --审核人姓名

        SHRQ00,    --审核日期
        RYCS00,    --入院次数
        CYQKJE,    --病人出院后的欠款数额,供病人再次入院是查询提示
        ZYZT00,    --病人在院状态,'0':门诊,'1':住院,'2':其它,'3':出院
        decode(A.ZYZT00, '0', '门诊', '1', '住院', '2', '其它', '3', '出院') ZYTZMC, --病人在院状态名称

        BZ0000,    --备注
      A.SFYD00,    --是否优待
      A.SFYXJB,
      A.YBBRLB,
      D.SFXNH0,
      A.GRSFEN,
      '1' YBSBK0,
      floor(MONTHS_BETWEEN(SYSDATE,TO_DATE(A.BRCSRQ,'YYYYMMDD'))/12) BRSS00,
      d.YBJGJC FBXX00,
      (select ykzye0+yxqfje-tyje00 from SF_BRZHXX where brid00=a.brid00 and  JFLBID IN( select JFLBID from BM_BRJFLB where SYBZ00='0') and SFDJ00='0') MZKYJE,
      A.TSSXMC,
      A.JG0000,
      A.SFBJ00,
      A.SFBYZG,
      A.HZDWMC,
      A.BRDZBM,
      A.SFGHXZ,
      A.GZDWDH,
      A.BRGRDH,
      A.BRYB01,
      A.SFSY00,
      A.BRSZSF,
      A.BRSZS0,
      A.BRSZZ0,
      A.BRSZC0,
      (select nvl(sum(ZYE000),0) from ZY_BRZHXX E where A.BRID00=E.BRID00) as ZYZYE0,
      decode(nvl(A.SFJZFP,'0'),'Y','1','N','0',nvl(A.SFJZFP,'0'))SFJZFP,
      A.ZSYID0,
      D.YBMC00,
      A.SFYLJZ,
      A.SFGWY0,
      decode(A.SFGWY0,'1','公务员','2','职工','') SFGWYM
    from
     BM_BRXXB0 a,BM_BRFBB0 B,IC_YBBRLB D
    where  A.FBBH00 = B.FBBH00
    and A.YBLB00 = D.YBLB00
    and A.FBBH00 = D.FBBH00
    and A.SFYX00 = 'Y'
    AND NOT EXISTS(SELECT 1 FROM ic_yhxx00 C WHERE C.BRID00=A.BRID00)
/

-- Grants for View
GRANT SELECT ON vw_bm_brxxb0 TO sd_dzbljk
/

-- End of DDL Script for View SD_HOSPITAL.VW_BM_BRXXB0