Subversion Repositories Sigmater

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
6 Andrea 1 
create or replace procedure ABILITAZIONE_UTENTE_COMUNE(user_name varchar2,codicebelfiore varchar2) is
2 
 
3 
 
4 
id_ente                 NUMBER;
5 
 
6 
begin
7 
 
8 
     -- ricavo id_ente
9 
     select d.id into id_ente from ws_enti d where d.codice_belfiore_ente = codicebelfiore;
10 
     -- inserisco l'abilitazione
11 
     insert into ws_cross_enti_utenti values(user_name,id_ente);
12 
     commit;
13 
 
14 
exception
15 
          when others then
16 
               dbms_output.put_line('ERR INS utente '|| sqlcode ||' '||sqlerrm);
17 
               rollback;
18 
 
19 
end ABILITAZIONE_UTENTE_COMUNE;
20 
/
21