Procedura inserisci righe in tabella
Vogliamo popolare una tabella così fatta.
Per eseguire la procedura usare il seguente script.
create table BIBI.CONTRATTI
(
ID_TIPOLOGIACONTRATTO NUMBER NOT NULL,
DESCRIZIONE VARCHAR2(100 CHAR) NOT NULL,
DATA_INIZIO_VALIDITA DATE NOT NULL,
DATA_FINE_VALIDITA DATE,
DATA_ULTIMO_AGGIORN DATE NOT NULL,
ID_OPERATORE VARCHAR2(100 CHAR) NOT NULL
)
tablespace TBS_BIBI_DATA;
La seguente procedura prende in ingresso due numeri che rappresentano l'intervallo di inserimento dei valori.
CREATE OR REPLACE PROCEDURE INSERISCIRIGHEINTABELLA (primo number, ultimo number) IS
a NUMBER;
b NUMBER;
begin
a := primo;
b:= ultimo;
for i in a..b
loop
insert into bibi.Contratti values ( i , 'Contratto#'||i, sysdate, null, sysdate, i*2);
end loop;
commit;
commit;
end;
/
Per eseguire la procedura usare il seguente script.
SQL> Begin
INSERISCIRIGHEINTABELLA (21, 31);
end;
/
