通过BS代码和SQL直接获取指定的Sequence值

function getSequence(Inputs, Outputs) {
    try {
        // 获取输入参数Sequence的名字
        var vSeqName = Inputs.GetProperty("Seq Name");
        var objConn = COMCreateObject("ADODB.Connection");
        var strConnect = "DSN=XXX;UID=XXX;Password=XXXX;"
        objConn.Open(strConnect);
        var rs = COMCreateObject("ADODB.Recordset");
        rs = objConn.Execute("Select siebel." + vSeqName + ".Nextval From dual");
        if (!rs.Eof) {
            var vSeq = rs.Fields(0).Value;
            Outputs.SetProperty("Seq Value", vSeq);
        } else {
            TheApplication().RaiseErrorText("Can not get Sequence value!");
        }
        rs.Close();
        objConn.Close();
    } catch (e) {
        TheApplication().RaiseErrorText("Get Sequence Error:!" + e.toString());
    } finally {
        objConn = null;
        rs = null;
    }
}

***************************以下常识介绍**********************

CREATE SEQUENCE emp_sequence

　　INCREMENT BY 1 —— 每次加几个
　　START WITH 1 —— 从1开始计数
　　NOMAXVALUE —— 不设置最大值
　　NOCYCLE —— 直累加，不循环
　　CACHE 10; —— 如下描述。

只要定义了emp_sequence，你就可以用使CURRVAL，NEXTVAL

第一次NEXTVAL返回的是初始值;随后的NEXTVAL会自动增加你定义的INCREMENT BY值，然后返回增加后的值。
CURRVAL 总是返回当前SEQUENCE的值，但是在第一次NEXTVAL初始化之后才能使用CURRVAL，否则会出错。
一次NEXTVAL会增加一次 SEQUENCE的值，所以如果你在同一个语句里面使用多个NEXTVAL，其值就会是不一样的。

　　- 假如指定CACHE值，Oracle就可以预先在内存里面放置一些sequence，这样存取的快些。
cache里面的取完后，Oracle自动再取一组到cache. 使用cache或许会跳号， 比如数据库突然不正常down掉(shutdown abort)，cache中的sequence就会丢失。 
所以可以在create sequence的时候用nocache防止这种情况。