create or replace function Fs1(v_cno in char) return varchar
is
v_cpno course.cno%type;
v_cname course.cname%type;
v_cpname course.cname%type;
begin
select cname,cpno into v_cname,v_cpno from course where cno=v_cno;
if v_cpno is null then
return(v_cname||'课程没有先行课');
end if;
select cname into v_cpname from course where cno = trim(v_cpno);
return(v_cname||'课程的先行课为:'||v_cpname);
exception when no_data_found then
return(v_cno||'课程号未找到');
end Fs1;
2.