select 0 FLAG00,Q.YPQLPC,Q.CH0000,Q.ZYH000,Q.BRXM00,Q.YZID00,Q.YYRQ00,Q.YPMC00,Q.YPGG00,Q.PSPC00, decode(sign(Q.CSL000-1),-1,to_char(Q.CSL000,'FM99990.99999'),Q.CSL000)||Q.JLDW00 CSL000,Q.YPYFMC||' '||Q.YFSMMC YPYF00,Q.PCMC00, substr(SF_YF_YPSLZH(Q.YPZSL0*Q.ZHL000,Q.YPNM00,3),1,50) YPZSL0,round(Q.YPZSL0*Q.LSDJ00,2) YPJE00, decode(sign(nvl(Q.ZCXSL0,0)),0,'',Q.ZCXSL0||Q.QLDW00) ZCXSL0,decode(Q.CLBZ00,'0','长嘱','1','短嘱') CLZ000,(select ZWXM00 from BM_YGBM00 where YGBH00=Q.YSGZH0) XZYS00,Q.JLDW00,Q.QLDW00,decode(K.YPCZFL,'2','全成分','1','颗粒',(decode(K.LBBH00,'0','西药','1','中成药','2','中草药'))) CZFLMC,decode(K.YPCZFL,'2','5','1','4',K.LBBH00) CZFLBH,decode(nvl(Q.ZCXSL0,0),0,'0',(select decode(count(1),1,'2','1') from yf_yzypsq where yzid00=Q.yzid00 and cxbz00='-' and cxpcid=Q.ypqlpc and nvl(jzrq00,'20991231')<>'20991231' and rownum=1)) TYBZ00,decode(Q.BYTJ00,'0','手工','2','静配','3','干预为手工',null,null,BYTJ00||'号包药机') BYTJMC,(select YZNR01 from bq_ypyzmx where yzmxid=Q.yzmxid) as YZNR01,Q.ZYDJS0,K.YPCZFL,substr(Q.SRRQ00,1,4)||'-'||substr(Q.SRRQ00,5,2)||'-'||substr(Q.SRRQ00,7,2)||' '||Q.SRSJ00 TQRQSJ,Q.ZYTS00,decode(Q.YZXZ00,'1','手术医嘱','2','麻醉医嘱',null) SSMZBZ,Q.CXBZ00, decode(pspc00,'1',( select N.ZWXM00 from YF_JPLZJL M,BM_YGBM00 N where M.CZY000=N.YGBH00 and M.MXBQID = (select MXBQID from YF_JPMXBQ where YYRQ00 = Q.YYRQ00 and YZID00 = Q.YZID00 and PSPC00 = Q.PSPC00 ) and CZLX00='6'),' ') LYR001, decode(pspc00,'1',( select to_char(m.CZRQ00||' '||m.CZSJ00) from YF_JPLZJL M,BM_YGBM00 N where M.CZY000=N.YGBH00 and M.MXBQID = ( select MXBQID from YF_JPMXBQ where YYRQ00 = Q.YYRQ00 and YZID00 = Q.YZID00 and PSPC00 = Q.PSPC00 ) and CZLX00='6'),' ') LYSJ01, decode(pspc00,'2',( select N.ZWXM00 from YF_JPLZJL M,BM_YGBM00 N where M.CZY000=N.YGBH00 and M.MXBQID = (select MXBQID from YF_JPMXBQ where YYRQ00 = Q.YYRQ00 and YZID00 = Q.YZID00 and PSPC00 = Q.PSPC00 ) and CZLX00='6'),' ') LYR002, decode(pspc00,'2',( select to_char(m.CZRQ00||' '||m.CZSJ00) from YF_JPLZJL M,BM_YGBM00 N where M.CZY000=N.YGBH00 and M.MXBQID = ( select MXBQID from YF_JPMXBQ where YYRQ00 = Q.YYRQ00 and YZID00 = Q.YZID00 and PSPC00 = Q.PSPC00 ) and CZLX00='6'),' ') LYSJ02, decode(pspc00,'3',( select N.ZWXM00 from YF_JPLZJL M,BM_YGBM00 N where M.CZY000=N.YGBH00 and M.MXBQID = (select MXBQID from YF_JPMXBQ where YYRQ00 = Q.YYRQ00 and YZID00 = Q.YZID00 and PSPC00 = Q.PSPC00 ) and CZLX00='6'),' ') LYR003, decode(pspc00,'3',( select to_char(m.CZRQ00||' '||m.CZSJ00) from YF_JPLZJL M,BM_YGBM00 N where M.CZY000=N.YGBH00 and M.MXBQID = ( select MXBQID from YF_JPMXBQ where YYRQ00 = Q.YYRQ00 and YZID00 = Q.YZID00 and PSPC00 = Q.PSPC00 ) and CZLX00='6'),' ') LYSJ03, decode(pspc00,'4',( select N.ZWXM00 from YF_JPLZJL M,BM_YGBM00 N where M.CZY000=N.YGBH00 and M.MXBQID = (select MXBQID from YF_JPMXBQ where YYRQ00 = Q.YYRQ00 and YZID00 = Q.YZID00 and PSPC00 = Q.PSPC00 ) and CZLX00='6'),' ') LYR004, decode(pspc00,'4',( select to_char(m.CZRQ00||' '||m.CZSJ00) from YF_JPLZJL M,BM_YGBM00 N where M.CZY000=N.YGBH00 and M.MXBQID = ( select MXBQID from YF_JPMXBQ where YYRQ00 = Q.YYRQ00 and YZID00 = Q.YZID00 and PSPC00 = Q.PSPC00 ) and CZLX00='6'),' ') LYSJ04, decode(pspc00,'5',( select N.ZWXM00 from YF_JPLZJL M,BM_YGBM00 N where M.CZY000=N.YGBH00 and M.MXBQID = (select MXBQID from YF_JPMXBQ where YYRQ00 = Q.YYRQ00 and YZID00 = Q.YZID00 and PSPC00 = Q.PSPC00 ) and CZLX00='6'),' ') LYR005, decode(pspc00,'5',( select to_char(m.CZRQ00||' '||m.CZSJ00) from YF_JPLZJL M,BM_YGBM00 N where M.CZY000=N.YGBH00 and M.MXBQID = ( select MXBQID from YF_JPMXBQ where YYRQ00 = Q.YYRQ00 and YZID00 = Q.YZID00 and PSPC00 = Q.PSPC00 ) and CZLX00='6'),' ') LYSJ05 from YF_YZYPSQ Q,BM_YD0000 K where Q.QLZT00 in ('2','4','5','6') AND Q.THBZ00='0' AND Q.CKDH00 =? and Q.YPNM00=K.YPNM00 order by Q.CH0000,Q.YYRQ00,Q.YZID00,Q.YZMXID