CREATE OR REPLACE VIEW SD_HOSPITAL.VW_YF_ZYBYXX
 (
 YPQLPC, CKDH00, TQDJH0, YFBMBH, BQBMBH, DQKS00, ZYID00, ZYH000, YZID00, 
YZMXID, JCBZ00, SQKS00, YZXZMC, CH0000, BRXM00, YPMC00, YPZSL0, QLDW00, 
CSL000, JLDW00, SRRQSJ, PCMC00, YPGG00, YPJE00, ZFJE00, NL0000, YSXM00, 
YPKM00, RKSJ00, RYZD00, YPYFMC, ZT0000, BRID00, YPBM00, LSDJ00, BQMC00, 
YYRQ00, CLBZ00, YZXZ00, YFID00, PSPC00, BYFL00, ZJZYCF, DM0000, BYTJ00, 
BYTJMC, LBBH00, YZNR01, SFRXM0, BZ0000, YPYZSX, YPNM00, SFBT00, SJDJ00, 
YYLC00, YFLBID, LBJXBH, QLZT00, DJH000, YYTS00, SFDJ00, SQLY00

 )
 AS 
select
  a.YPQLPC, --药品请领批次 
  a.CKDH00,--出库单号
  a.TQDJH0,--提取单据号
  a.YFBMBH,--药房
  a.BQBMBH,--病区
  a.DQKS00,--科室
  a.ZYID00,--住院id号
  a.ZYH000,--住院号 
  a.YZID00,--医嘱id号 
  a.YZMXID,--医嘱明细ID
  --(select decode(nvl(SFR000,'20991231'),'20991231','N','Y') from bq_ypyz00 where yzid00=a.yzid00) JCBZ00,--检查标志
  decode(a.SHR000,null,'N','Y') JCBZ00,--检查标志
  b.BMMC00 SQKS00,--申请科室
  decode(a.CLBZ00,'0','长嘱','1','短嘱')  YZXZMC, --医嘱性质
  a.CH0000,--床号
  a.BRXM00,--病人姓名
  a.YPMC00,--药品名称
  a.YPZSL0,--药品数量
  a.QLDW00,--请领单位
  a.CSL000,--次数量
  a.JLDW00,--剂量单位
  a.SRRQ00||' '||a.SRSJ00  SRRQSJ,--输入日期时间
  a.PCMC00,--频次
  a.YPGG00,--规格
  round(a.LSDJ00*a.YPZSL0,2) YPJE00,--药品费用 
  a.ZFJE00,--自付金额 
  substr(trim(SF_XT_CSRQTONL(c.CSRQ00,to_char(sysdate,'YYYYMMDD'))),1,127) NL0000,--年龄
  (select ZWXM00 from BM_YGBM00 where YGBH00=a.YSGZH0) YSXM00,--医生姓名
   --decode(a.YPDLBH,'0','西药','1','成药','2','草药','其他')||(select YFLBMC from BQ_YFLB00 where YFLBID=D.YFID00) YPKM00,--药品科目
   decode(a.YPDLBH,'0','西药','1','中成药','2',decode(D.YPCZFL,'2','全成分颗粒','1','中草药颗粒','中草药'),'其他') YPKM00,--药品科目
   c.SJRYRQ||' '||c.SJRYSJ  RKSJ00,  --入科时间 
  c.RYZD00, --入院诊断 
  a.YPYFMC||' '||a.YFSMMC, --药品用法名称 
  decode(a.QLZT00,'0','未记账','1','已记账','其他') ZT0000,  --状态 
  c.BRID00,   --病人ID 
  d.YPBM00,   --药品编码 
  a.LSDJ00,    --零售价 
  e.BMMC00 BQMC00, --病区名称  
  a.YYRQ00,  --用药日期 
  a.CLBZ00, --长临标志
  a.YZXZ00, --医嘱性质
  a.YFID00,--用法ID
  a.PSPC00, --用药批次
  d.BYFL00,--摆药分类
  d.ZJZYCF,--中间住院拆分
  d.DPDJ00||d.MZDJ00||decode(d.SJDJ00,'1','1','0') DM0000, --毒麻 
  a.BYTJ00, --摆药条件 
  --decode(a.BYTJ00,'0','手工','1','包药','2','静配','3','干预手工') BYTJMC, --摆药条件名称
  decode(a.BYTJ00,'0','手工','2','静配','3','干预手工',null,null,BYTJ00||'号包药机') BYTJMC, --摆药条件名称
  d.LBBH00, --药品类别编号
  nvl((select YZNR01 from bq_ypyzmx where yzmxid=a.yzmxid and yzid00=a.yzid00),a.YPYFMC||' '||a.PCMC00) as YZNR01, --显示字段2(用法),20190821增加yzid00=a.yzid00条件
  --(select BB.ZWXM00 from bq_ypyz00 aa,BM_YGBM00 bb where aa.YZID00=a.YZID00 and aa.SFR000=bb.YGBH00) as SFRXM0,  --审方人姓名
  (select ZWXM00 from BM_YGBM00 where YGBH00=a.SHR000) as SFRXM0,  --审方人姓名
  a.BZ0000, --备注
  d.YPYZSX, --医嘱属性 
  a.YPNM00, --药品内码
  a.SFBT00, --是否补提 0否1是
  d.SJDJ00, --神经等级
  (select to_date(a.yyrq00,'YYYYMMDD')-to_date(SJQSRQ,'YYYYMMDD')+1 from BQ_YPYZ00 where YZID00=a.YZID00) YYLC00,
  a.YFLBID, --用法类别ID
  d.LBBH00||'-'||d.JXBH00 as LBJXBH, --类别剂型编号
  a.QLZT00, --请领状态
  a.DJH000,  --收费单据号
  (select case 
   when a.YPDLBH<>'2' and a.YZXZ00='3' then (a.YYCS00/ZQCS00)||ZQDW00
   else '' end
   from BM_PC0000 
   where PCID00=a.PCID00) YYTS00, --用药天数
  decode(nvl(a.ZYDJS0, 0), 0 , '否', '是') SFDJ00,  --是否代煎
  (select SQLY00 from BQ_YPYZMX where YZMXID=a.YZMXID) as SQLY00  --双签理由
from YF_YZYPSQ a,BM_BMBM00 b,ZY_BRXXB0 c,BM_YD0000 d,BM_BMBM00 e --,
--(select nvl(max(trim(VALUE0)),'Y') YF_ZYBYSFXSWKFD from XT_XTCS00 where NAME00='YF_ZYBYSFXSWKFD' and ROWNUM = 1) f
where a.DQKS00=b.BMBH00 and a.ZYID00=c.ZYID00 and a.YPNM00=d.YPNM00 and a.BQBMBH=e.BMBH00
  --and (f.YF_ZYBYSFXSWKFD <> 'N' AND a.QLZT00 in ('0') OR a.QLZT00 in ('1')) 
  and a.QLZT00 in ('0','1')    
  and a.FYBZ00='0' and a.CXBZ00='Z'
  and (c.BRZT00 like '2%' or c.BRZT00 like '3%' or c.BRZT00 like '4%' or c.BRZT00 like '5%') and a.THBZ00='0' --莆田涵江区精神病院需求添加brzt00欠费状态
/