create or replace function SF_LJ_RYZDLJ_DZBL
(
  Pzyid00        in   number       --住院ID
)
-- MODIFICATION HISTORY
-- Person      Date        Comments
-- xuxm      2014.09.01      create 【临床路径使用统计】界面，统计条件选择“按诊断”，应根据第一诊断而不是所有诊断来统计 for DZBL-20140805-003
-- xuxm      2014.12.08    临床路径使用统计界面，如果该路径在路径维护系统“诊断维护界面”有维护中医证型，那么需在中医诊断跟证型同时满足的情况下才纳入“出院人次”字段统计 for DZBL-20141007-001
-- 阮炳辉    2014.12.11   VW_ZY_LJ_LJMBTJXX_zydzbl改为引用ZYDZBL的视图 for DZBL-20141210-007
-- xuxm      2016.09.01    ZYDZBL-20160804-003 （急）【查询】-【路径相关统计】-【临床路径使用统计】统计入院人次的条件和弹出入径界面的条件统一为：1. 中医诊断名称完全相同（不判断诊断码）。或：2.西医诊断诊断码相同且诊断名称相同。 
return  varchar2 is
  V_LJID00 number;
  V_ZDMC00_ZY   varchar2(100);
  V_ZDMC00_ZH   varchar2(100);
  V_ZDMC00_XY   varchar2(100);

begin
   V_LJID00:=0;
   select ZDMC00 into V_ZDMC00_XY from ( select substr(trim(ZDMC00),200) ZDMC00 from BQ_BRZDXX where   ZYID00=Pzyid00 and ZDLB00='2' order by PLXH00 ) where rownum<=1 ;--取西医第一个入院诊断

   select ZDMC00 into V_ZDMC00_ZY from ( select substr(trim(ZDMC00),200) ZDMC00 from BQ_BRZDXX where   ZYID00=Pzyid00 and ZDLB00='c' order by PLXH00 ) where rownum<=1 ;--取中医第一个入院诊断
      begin
         select nvl(ZDMC00,'') into V_ZDMC00_ZH from ( select trim(ZDMC00) ZDMC00 from BQ_BRZDXX where   ZYID00=Pzyid00 and ZDLB00='g' order by PLXH00 ) where rownum<=1 ;--取中医第一个入院诊断
        exception
           when others then
            V_ZDMC00_ZH:='';
      end;

   select  trim(x.LJID00)   into V_LJID00 from VW_ZY_LJ_LJMBTJXX_zydzbl x where x.TJZT00='0'  and ( trim(x.ICDMC0)=V_ZDMC00_XY or trim(x.ICDMC0)=V_ZDMC00_ZY and (x.ZXMC00 is null or trim(x.ZXMC00)=V_ZDMC00_ZH ))
   and x.KSBH00 in(select b.dqks00 from zy_brxxb0 b where zyid00=Pzyid00)
    and rownum<=1;
   return V_LJID00;
end;