create or replace
Function GetInvitationNO(prev varchar2, num1 varchar2, num2 varchar2, sessionSetting varchar2)
Return Varchar2
Authid Current_User Is PRAGMA AUTONOMOUS_TRANSACTION;– 需要使用“Current_User”的权限防止无法运行“Execute Immediate”命令 & “PRAGMA AUTONOMOUS_TRANSACTION”自制事务防止DML无法DDL的问题
Totalprev Varchar2(50);
Hassequences Number;
ReNO varchar2(50);
Begin
— 号码的前缀
Totalprev := Prev || Num1 || Num2 || Sessionsetting;
— 创建序列
Select Count(*) Into Hassequences From User_Sequences Where Sequence_Name=Totalprev;
If Hassequences 1 Then
Execute Immediate ‘Create Sequence ‘||Totalprev||’ Increment By 1 Start With 1 maxvalue 9999999 Nocycle’;
End If;
— 通过动态的序列名取序列值,把获取的序列值转换为7位长度的字符串,长度不足用“0”填充
Execute Immediate ‘Select ”’|| Totalprev ||”’ || to_char(‘||Totalprev||’.Nextval,”FM0000000”) From Dual’ into ReNO;
— to_char()中FM后跟的0代表了数字的位数,不足的用“0”填充;加上“FM”可以避免空格的出现,,前面的空格是为符号位保留的,如果是对负数使用to_char,则空格部分是用来显示-的,因为是正数,所以不显示+,而是以空格代替
Return ReNO;
end;
测试
Select GetInvitationNO(‘p’, ‘1’, ’01’, ‘114’) From dual
— Dual 是 Oracle中的一个实际存在的表,任何用户均可读取,常用在没有目标表的select语句块中。