function SF_YS_getYSBNYZB(ad_YSBH00 in number)
return varchar2 is
  ls_STARDATE  varchar2(8);
  ls_ZFY000    SF_BRFY00.HJJE00%type;
  ls_BCYFY0   SF_BRFY00.HJJE00%type;
  ls_GHCS00   BM_YSFYTJ.GHCS00%type;
  ls_YPFY00   SF_BRFY00.HJJE00%type;
  ls_JCYPFY   SF_BRFY00.HJJE00%type;
  ls_DJYPFY    SF_BRFY00.HJJE00%type;
  ls_HCFY00    SF_BRFY00.HJJE00%type;
  ls_result     varchar2(500);
  ls_SFXSQNYZB  varchar2(10);
  ls_count    number;
--MODIFICATION HISTORY
-- Person      Date         Comments
-- dsm         2016.05.11   create for MZYS-20160504-001   
-- dsm         2016.07.22   马尾医院也要启用这个功能,但只要显示次均费用和药占比及基药比 for MZYS-20160719-001
begin
  ls_result:='';
  select count(*) into ls_count from XT_XTCS00 where NAME00='YS_SFXSQNYZB' and VALUE0='Y';
  select nvl(max(trim(VALUE0)),'N') into ls_SFXSQNYZB from   XT_XTCS00 where NAME00='YS_SFXSQNYZB' ;
  if ls_SFXSQNYZB in('Y','M') then
	  ls_STARDATE := to_char(trunc(sysdate ,'YYYY'),'YYYYMMDD');
    select sum(ZFY000)
        ,sum(BCYFY0)        
        ,sum(GHCS00) 
        ,sum(YPFY00)
        ,sum(JCYPFY)
        ,sum(DJYPFY) 
        ,sum(HCFY00)
        into ls_ZFY000,ls_BCYFY0,ls_GHCS00,ls_YPFY00,ls_JCYPFY,ls_DJYPFY,ls_HCFY00
        from BM_YSFYTJ where RQ0000>=ls_STARDATE and RQ0000<to_char(sysdate,'YYYYMMDD') and YSBH00=ad_YSBH00;
  end if;
  if ls_SFXSQNYZB='Y' then
    select  '次均:'||decode(ls_GHCS00,0,0,round(ls_ZFY000/ls_GHCS00,2))
          ||'   药占比:'||trim(to_char(decode(ls_ZFY000,0,0,round(ls_YPFY00/ls_ZFY000,4)) * 100,'990.00')||'%' )
          ||'   基药比:'||trim(to_char(decode(ls_YPFY00,0,0,round(ls_JCYPFY/ls_YPFY00,4)) * 100,'990.00')||'%' )
          ||'   低价药比:'||trim(to_char(decode(ls_YPFY00,0,0,round(ls_DJYPFY/ls_YPFY00,4)) * 100,'990.00')||'%' )
          ||'   耗材占比:'||trim(to_char(decode(ls_ZFY000,0,0,round(ls_HCFY00/ls_ZFY000,4)) * 100,'990.00')||'%' )
          into ls_result from dual;
  elsif ls_SFXSQNYZB='M' then         
    select  '次均:'||decode(ls_GHCS00,0,0,round(ls_ZFY000/ls_GHCS00,2))
          ||'   药占比:'||trim(to_char(decode(ls_ZFY000,0,0,round(ls_YPFY00/ls_ZFY000,4)) * 100,'990.00')||'%' )
          ||'   基药比:'||trim(to_char(decode(ls_YPFY00,0,0,round(ls_JCYPFY/ls_YPFY00,4)) * 100,'990.00')||'%' )
          into ls_result from dual;
  end if;        
  return ls_result;       
              
end;