Blame | Last modification | View Log | Download | RSS feed
create or replace procedure CREA_RUOLO_PROFILO(DESCRIZIONE VARCHAR2,
COD_APPLICAZIONE NUMBER,
USER_NAME varchar2,
PROFILO_FUNZIONE NUMBER) is
TEMP_KEY NUMBER;
begin
select WS_PROFILI_UTENTE_SEQ.NEXTVAL into TEMP_KEY from dual;
begin
-- inserimento del profilo utente e del ruolo
INSERT INTO WS_PROFILI_UTENTE(COD_PROFILO_U, DESCRIZIONE, COD_APPLICAZIONE)
VALUES ( TEMP_KEY, DESCRIZIONE, COD_APPLICAZIONE);
-- inserimento del ruolo utente
INSERT INTO WS_RUOLI(COD_PROFILO_U, USERNAME, FLG_NOTIFICA_EVENTI)
VALUES ( TEMP_KEY, USER_NAME, NULL);
INSERT INTO WS_ABILITAZIONI ( COD_PROFILO_U,COD_PROFILO_FUNZ,COD_FILTRO)
VALUES ( TEMP_KEY, PROFILO_FUNZIONE, 1);
COMMIT;
exception
when others then
rollback;
end;
end CREA_RUOLO_PROFILO;
/