prompt 3 VW_PY_YPBQXX 打印药品标签信息
create or replace view VW_PY_YPBQXX
as 
-- MODIFICATION HISTORY
-- Person      Date        Comments
-- JXQ         2012.11.14  Add: YFID00
-- zhanghr     zhanghr     create
-- qks         2017.06.19  药品名称改为取字典名称; for MZPY9-20170617-001
-- qks         2017.08.28  改为打印处方的所有药品(需求：MZPY9-20221213-001重新补归档); for YF9-20170510-001
-- qks         2018.01.23  咀嚼跟外用也要打印用药标签; JCBB-20180123-002
-- qks         2018.12.11  鼻饲、喷喉、滴鼻、吸入也要打印用药标签;
-- linshu      2022.12.15  增加字段CKMC00、FYDLXH、YFSMMC、YYMC00(现场归档); for MZPY9-20221213-001
-- ---------   ----------  -------------------------------------------  
select 
  C.CFLSH0, --处方号
  substrb(C.FYRQ00,1,4)||'-'||substrb(C.FYRQ00,5,2)||'-'||substrb(C.FYRQ00,7,2) FYRQ00, --发药日期
  I.CFID00, --
  C.BRXM00, --姓名
  C.XB0000, --性别
  --I.YPMC00, --药品名称
  d.YPMC00,  --药品名称
  I.YPYFMC, --药品用法名称
  '('||I.YPGG00||')' YPGG00,
  substr(SF_YF_GETYPKCZLXX(i.YPZSL0*i.ZHL000,2,d.K2J000,d.ZJJL2J,d.KCDW00,d.ZJJLDW,d.JLDW00),1,10) SLDW00,   --药品总量
--  decode(substr(trim(I.YPZSL0),1,1),'.','0','')||trim(I.YPZSL0)||trim(I.CFDW00) SLDW00,
    nvl((select trim(SM0000)||' ' from BM_PC0000 M where M.PCMC00=I.PCMC00 and rownum=1),' ')||
    decode(I.CSL000,null,null,'每次'||rtrim(replace(to_char(i.CSL000*i.F2J000/d.ZJJL2J,'FM9999990.99')||' ','. ',''))|| trim(d.ZJJLDW)||
    ' ('||rtrim(replace(to_char(I.CSL000,'FM9999990.99')||' ','. ',''))|| trim(I.JLDW00)||')') XXYF00, --详细用法 
  nvl(D.BZ0000,E.MC0000) BZ0000, --用法备注
  D.YFID00,  --用法ID
  I.HJJE00,  --合计金额
  C.YSXM00,  --医生姓名
  (select BMMC00 from BM_BMBM00 where BMBH00=c.GHKS00) GHKSMC,   --就诊科室名称
  (select ckmc00 from bm_ckbm00 where ckbh00=(select fyckbh from yf_cfdl00 WHERE cflsh0=c.cflsh0)) ckmc00,--窗口名称
  (select FYDLXH from YF_CFDL00 where cflsh0=c.cflsh0) FYDLXH,  --序号
  I.YFSMMC ,  --用法说明名称
  (select YYQC00 from XT_YYXX00 where YYID00 in (select YYID00  from BM_BMBM00 where BMBH00=C.YFBMBH )) YYMC00 -- 医院名称
from YF_MZCFMX I, BM_YD0000 D, YF_MZCF00 C,VW_YK_YPCCFS E 
where I.YPNM00=D.YPNM00 and I.SFZBY0='N' and I.CFLSH0=C.CFLSH0 and D.CCFS00=E.NBBH00(+)
  and (LBBH00 in ('0','1') and (I.YPYFMC in (select YPYFMC from BM_YPYF00 where YFLBID = 0)
       or I.YPYFMC like '%咀嚼%' or I.YPYFMC like '%外用%' or I.YPYFMC like '%鼻饲%' or I.YPYFMC like '%喷喉%' or I.YPYFMC like '%滴鼻%' or I.YPYFMC like '%吸入%' or D.BZ0000 is not null
       or exists (select 1 from VW_YK_YPCCFS E where D.CCFS00=E.NBBH00)))
/       
--%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%