prompt 获取医保项目特殊提示限制SF_ZS_GETYBTSTSXZ
create or replace function SF_ZS_GETYBTSTSXZ(ad_YPNM00 number,
                                             ad_FBBH00 number,
                                             as_YBZXLB char,
                                             as_YBBRLB char
                                             )
return varchar2 is
  Vresult BM_YBSFXM.BZ0000%type;
--MODIFICATION HISTORY
--Person           Date               Comments
--dsm              2015.09.10         create for ZYYS-20150901-001  
begin
  begin
    select b.BZ0000 into Vresult
      from BM_YBSFDY a,BM_YBSFXM b,BM_YD0000 c where a.sfyp00='Y' and a.YBXMBH=b.XMBH00 
        and a.YBZXLB=b.YBZXLB and a.SFXMID=c.YPNM00 and c.YPNM00=ad_YPNM00
        and a.FBBH00=ad_FBBH00 and a.YBZXLB=as_YBZXLB and a.YBBRLB in (as_YBBRLB,'Z')   
        and b.BZ0000 is not null and b.bz0000 not like '%国家基药%' and b.bz0000 not like '%增补%';
  
  exception
    when others then
     Vresult:=''; 
  end;        
  return Vresult;
end;  
/
show error;