Subversion Repositories Sigmater

Rev

Blame | Last modification | View Log | Download | RSS feed

CREATE OR REPLACE Function WS_FUNZIONI_INSERT
  (
    nCOD_GRUPPO_F    IN NUMBER,
    sDESCRIZIONE     IN VARCHAR2,
    sLINK            IN VARCHAR2,
    sFLG_MENU        IN VARCHAR2,
    sNOME            IN VARCHAR2,
    sFLAG_F          IN VARCHAR2,
    nORDINE          IN NUMBER,
    nPADRE           IN NUMBER)
RETURN               NUMBER IS
TEMP_KEY             NUMBER;
-- Declare program variables as shown above
-- PRAGMA AUTONOMOUS_TRANSACTION;
BEGIN
-- TEMP_KEY:=WS_GRUPPI_FUNZIONE_SEQ.nextval;
select WS_FUNZIONI_SEQ.NEXTVAL into TEMP_KEY from dual;
INSERT INTO WS_FUNZIONI
 (COD_FUNZIONE, COD_GRUPPO_F, DESCRIZIONE, LINK, FLG_MENU, NOME, FLAG_F, ORDINE, PADRE)
VALUES
 ( TEMP_KEY, nCOD_GRUPPO_F, sDESCRIZIONE, sLINK, sFLG_MENU, sNOME, sFLAG_F, nORDINE, nPADRE);

--COMMIT;
    RETURN TEMP_KEY ;
-- EXCEPTION
-- WHEN exception_name THEN
-- statements ;
-- RETURN -1;
END;
/