Subversion Repositories Sigmater

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;
/