如何使用opql定义一个oracle中随机取名的函数以及其他函数结构?
--定义一个函数 取名函数
create or replace function creatname(num1 varchar)
return varchar
is
xing varchar2(500) :='赵钱孙李周吴郑王申肖黄龚母杜岳';
ming varchar2(500) :='麟磊刚昕星平峰锋靖锐伟顺欣俞泉铭嫣文运俊杰成';
v_xing varchar(500);
v_ming varchar(500);
begin
select substr(xing,trunc(dbms_random.value(1,length(xing)+1),0),1) into v_xing from dual;
select substr(ming,trunc(dbms_random.value(1,length(ming)+1),0),1) into v_ming from dual;
return v_xing || v_ming ;
end creatname;
select creatname(22) from dual;
*declare
v_name varchar(200) := '';
begin
select first_name || last_name into v_name from employees where employee_id=45;
dbms_output.put_line('这个员工的名字是:' || v_name);
end;*/
--if elsif else 结构
/* declare
v_num number := #
begin
if v_num=1 then
dbms_output.put_line('您中了一等奖,奖励充气娃娃一个') ;
elsif v_num=3 then
dbms_output.put_line('您中了二等奖,奖励资源1个t');
else
dbms_output.put_line('谢谢惠顾,再接再厉');
end if;
end;*/
--普通循环
/* declare
v_num number := 0 ;
begin
loop
v_num := v_num + 1;
dbms_output.put_line(v_num);
exit when v_num = 100;
end loop;
end;*/
--for循环结构
/* begin
for i in 1..10 loop
dbms_output.put_line(i);
end loop;
end;
begin
for i in reverse 1..10 loop
dbms_output.put_line(i);
end loop;
end;*/
--游标结构
/* declare
emp employees%rowtype;
cursor mycursor is select * from employees;
begin
open mycursor;
loop
fetch mycursor into emp;
exit when mycuesor%notfound;
dbms_output.put_line(emp.first_name);
end loop;
close mycuesor;
end;*/