select 
  A.CFYZID CFLSH0, --处方号
  substrb(A.FYRQ00,1,4)'-'substrb(A.FYRQ00,5,2)'-'substrb(A.FYRQ00,7,2) FYRQXS, --发药日期(显示用)
  A.YPQLPC,   --
  A.BRXM00,   --姓名
  ' ' XB0000, --性别
  a.CH0000,   --床号
  substrb(a.CH0000,instrb(a.CH0000,'-')+1,10) CHXS00,  --床号(显示用)
  (select BMMC00 from BM_BMBM00 where BMBH00=a.BQBMBH) BQMC00,  --病区名称
  A.YPMC00, --药品名称
  A.YPYFMC, --药品用法名称
  '('A.YPGG00')' YPGG00,
 -- substr(replace(to_char(A.YPZSL0,'FM9999990.99')' ','. ','')a.QLDW00,1,10) SLDW00,   --药品总量
 substr(SF_YF_YPSLZH(a.YPZSL0a.ZHL000,a.YPNM00,3),1,10) SLDW00,
    nvl((select trim(SM0000)' ' from BM_PC0000 M where M.PCMC00=A.PCMC00 and rownum=1),' ')
    decode(A.CSL000,null,null,'每次'rtrim(replace(to_char(A.CSL000d.ZJJL2J,'FM9999990.99')' ','. ','')) trim(d.ZJJLDW)
    ' ('rtrim(replace(to_char(A.CSL000,'FM9999990.99')' ','. ','')) trim(A.JLDW00)')') XXYF00, --详细用法 
  case when (a.ypyfmc like '%灌肠%' or a.ypyfmc like '%塞肛%' or a.ypyfmc like '%外用%' 
   or a.ypyfmc like '%外洗%' or a.ypyfmc like '%阴道%' or a.ypyfmc like '%坐浴%') then a.ypyfmc  
    else ' ' end  as BZ0000, --用法备注
  D.YFID00,   --用法ID
  A.CKDH00,   --出库单号
  A.FYRQ00 ,
substrb(SF_YF_GETKFYPEWM(a.YPQLPC,1),1,200)  as EWM001 
,(select MC0000 from BM_TYZD00 ZD where zdmc00='储存方法' and ZD.nbbh00=D.CCFS00) CCFSMC
from YF_YZYPSQ A, BM_YD0000 D
 where A.YPNM00=D.YPNM00
#if vSFHZ=='1'
  and CKDH00='${vDH}'
#else 
  and YPQLPC in (${vDH})
#if