復制代碼 代碼如下:

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語句塊中