create or replace function SF_PY_GETCFZZSXH
-- MODIFICATION HISTORY
-- Person    Date        Comments
-- qks       2019.06.04  create:获取病人本次取药处方总张数以及序号 for MZPY9-20190522-001
(
  Pcflsh0  varchar2            --处方流水号
)
return varchar2 is  -- 
  lv_return     varchar2(20);
  lv_ZZS000     number;
  lv_XH0000     number;
  cursor C_CFDL is select ROW_NUMBER() OVER(order by DLXH00) AS ROWNUM1,a.CFLSH0 from YF_CFDL00 a where (PHRQ00,BRID00,FYCKBH,FYDLXH) in 
  (select PHRQ00,BRID00,FYCKBH,FYDLXH from YF_CFDL00 where CFLSH0=Pcflsh0);
begin 
  lv_return:='';
  lv_ZZS000 := 0;
  for CFDL in C_CFDL loop   
    lv_ZZS000 := lv_ZZS000 + 1; 
    if CFDL.CFLSH0=Pcflsh0 then
      lv_XH0000 := CFDL.ROWNUM1;
    end if;    
  end loop;
  if lv_ZZS000 >0 then
    --lv_return := '第'||lv_XH0000||'张/共'||lv_ZZS000||'张';
    lv_return := lv_XH0000||'('||lv_ZZS000||')';   -- lxl 2022.12.02 调整格式
  end if;       
  return lv_return;
end;