gm gming_list := gming_list(
'梦琪','忆柳','之桃','慕青','问兰','尔岚','元香','初夏','沛菡','傲珊','曼文','乐菱','痴珊','恨玉','惜文','香寒','新柔','语蓉',
'海安','夜蓉','涵柏','水桃','醉蓝','春儿','语琴','从彤','傲晴','语兰','又菱','碧彤','元霜','怜梦','紫寒','妙彤','曼易','南莲',
'语雪','初珍','白安','冰薇','诗槐','冷玉'
);
begin
return gm(m);
end;
-- 主函数开始,上面都是声明部分
begin
f_re_xing := f_xing(trunc(dbms_random.value(1,560)));
-- 按条件取出男名或女名
if gender =1 then
f_re_ming := f_boyming(trunc(dbms_random.value(1,1200)));
return f_re_xing||f_re_ming;
else
f_re_ming := f_girlming(trunc(dbms_random.value(1,2807)));
return f_re_xing||f_re_ming;
end if;
end f_get_chinaname;
来自 “ ITPUB博客 ” ,链接:https://blog.itpub.net/12961536/viewspace-1061397/
,如需转载,请注明出处,否则将追究法律责任。