CREATE OR REPLACE FUNCTION "SF_PY_JHXX00" ( Pfydlxh in int, --发药队列序号 Pbrxm00 in char, --病人姓名 Pckmc00 in char --窗口名称 ) return char is -- Vmgbrxx varchar2(200); Vjhcs00 int; Vjhlx00 int; i int; begin select to_number(nvl(trim(max(VALUE0)),'2')) into Vjhcs00 from XT_XTCS00 where NAME00='MZPY_MGBRJHCS'; select to_number(nvl(trim(max(VALUE0)),'0')) into Vjhlx00 from XT_XTCS00 where NAME00='MZPY_JHLX'; Vmgbrxx:=''; if Vjhlx00=0 then --编号 Vmgbrxx:=Vmgbrxx||/*SF_XT_ALTOCH(Pfydlxh)*/replace(SF_XT_ALTOCH(Pfydlxh),'九十九','九实九')||'号'; elsif Vjhlx00=1 then --姓名 Vmgbrxx:=Vmgbrxx||'请'||Pbrxm00; else --编号加姓名 Vmgbrxx:=Vmgbrxx||'请'||/*SF_XT_ALTOCH(Pfydlxh)*/replace(SF_XT_ALTOCH(Pfydlxh),'九十九','九实九') ||'号'||Pbrxm00; end if; Vmgbrxx:=Vmgbrxx||'到'||Pckmc00||'取药,,,,'; if Vjhcs00>1 then for i in 2..Vjhcs00 loop Vmgbrxx:=Vmgbrxx||' '||Vmgbrxx; end loop; end if; return Vmgbrxx; end;