Subversion Repositories Sigmater

create or replace procedure CREA_UTENTE_COMUNALE(user_name varchar2,nome varchar2,cognome varchar2,email varchar2,codicebelfiore varchar2) is


id_ente                 NUMBER;

begin

     -- ricavo id_ente
     select d.id into id_ente from ws_enti d where d.codice_belfiore_ente = codicebelfiore;
          
     -- inserimento utente
     insert into ws_utenti (USERNAME,PASSWORD,
                            COGNOME,NOME,
                            EMAIL,LOGIN,
                            USR_CREATE_DATE,USR_EXPIRATION_DATE)
                 values    (user_name,'7c222fb2927d828af22f592134e8932480637c0d', 
                            cognome,nome,
                            email,upper(user_name),
                            sysdate,sysdate);
     -- creazione del profilo 
     CREA_RUOLO_PROFILO('COMUNALE',1039,user_name,416);
           CREA_RUOLO_PROFILO('COMUNALE',1038,user_name,415);
           CREA_RUOLO_PROFILO('COMUNALE',1037,user_name,414);
           CREA_RUOLO_PROFILO('COMUNALE',1035,user_name,413);
           CREA_RUOLO_PROFILO('COMUNALE',1033,user_name,412);
           CREA_RUOLO_PROFILO('COMUNALE',1030,user_name,411);
           CREA_RUOLO_PROFILO('COMUNALE',1028,user_name,410);
           CREA_RUOLO_PROFILO('COMUNALE',1026,user_name,409);
           CREA_RUOLO_PROFILO('COMUNALE',1023,user_name,408);
           CREA_RUOLO_PROFILO('COMUNALE',1020,user_name,407);
           CREA_RUOLO_PROFILO('COMUNALE',1017,user_name,406);
           CREA_RUOLO_PROFILO('COMUNALE',1014,user_name,405);
           CREA_RUOLO_PROFILO('COMUNALE',1011,user_name,404);
     CREA_RUOLO_PROFILO('COMUNALE',1008,user_name,403);
           CREA_RUOLO_PROFILO('COMUNALE',1006,user_name,402);
           CREA_RUOLO_PROFILO('COMUNALE',1005,user_name,401);
           CREA_RUOLO_PROFILO('COMUNALE',1000,user_name,400);  
  
   /*  -- inserisco l'abilitazione  */
     insert into ws_cross_enti_utenti values(user_name,id_ente);
     commit;
     
exception 
          when others then
               dbms_output.put_line('ERR INS utente '|| sqlcode ||' '||sqlerrm);
               rollback;
            
end CREA_UTENTE_COMUNALE;
/