Devart Forums

Code: Select all

create or replace
PROCEDURE getnextid
( P_NEXTID OUT INTEGER
, P_TABLENAME IN VARCHAR2
) AS

--
-- Purpose: Retrives the next value from a sequence which is named
--          after table name concatented with _seq.
--          To provide for .Net Entity Framework lack of sequences
--
-- MODIFICATION HISTORY
-- Person  Date      Comments
-- ---------------------------------------------------------
-- CS      16/12/10  Created
--

--local variables---------------------------------
   --return value for the next value of the sequence
   ld_next_id  integer;
   --local variable for the in parameter table name
   ld_tablename VARCHAR2(30) := upper(P_TABLENAME);
   -- holds the sql str to be dynamically run
   ld_sql_str VARCHAR2(2000);


BEGIN

    ld_sql_str := 'SELECT '||ld_tablename||'_seq.nextval from dual';

    --dbms_output.put_line(ld_sql_str);

    EXECUTE IMMEDIATE ld_sql_str
       INTO ld_next_id;

    P_NEXTID := ld_next_id;
    
    

EXCEPTION
   WHEN OTHERS THEN
       --raise_application_error(-20101, 'There is no such sequence for this table, Please contact System Support') ;
       P_NEXTID := -1;
    
END getnextid;

Code: Select all

in this part of code:

/// 
        /// No Metadata Documentation available.
        /// 
        /// No Metadata Documentation available.
        /// No Metadata Documentation available.
        public int GETNEXTID(ObjectParameter p_NEXTID, global::System.String p_TABLENAME)
        {
            ObjectParameter p_TABLENAMEParameter;
            if (p_TABLENAME != null)
            {
                p_TABLENAMEParameter = new ObjectParameter("P_TABLENAME", p_TABLENAME);
            }
            else
            {
                p_TABLENAMEParameter = new ObjectParameter("P_TABLENAME", typeof(global::System.String));
            }
    
           return base.ExecuteFunction("GETNEXTID", p_NEXTID, p_TABLENAMEParameter);
        }

Code: Select all

return base.ExecuteFunction("GETNEXTID", p_NEXTID, p_TABLENAMEParameter);