create or replace view 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)
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),a.YPYFMC||' '||a.PCMC00) as YZNR01, --显示字段2(用法)
  --(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  --收费单据号
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';