procedimientos_almacenados

create table malo(id_malo integer, nombre varchar2(120), constraint pk_id_malo primary key(id_malo));

create table bueno(id_bueno integer, id_malo integer, email varchar2(80), constraint id_bueno_pk primary key (id_bueno), constraint id_malo_fk foreign key (id_malo) references malo (id_malo));

create sequence sec_malo start with 1 increment by 1 nomaxvalue;

create sequence sec_bueno start with 1 increment by 1 nomaxvalue;

create or replace PROCEDURE GUARDAR_malo( MY_ID_malo OUT INTEGER, MY_NOMBRE IN VARCHAR2) AS BEGIN SELECT sec_malo.NEXTVAL INTO my_id_malo FROM DUAL; INSERT INTO malo VALUES(MY_ID_malo, MY_NOMBRE); END; /

create or replace PROCEDURE GUARDAR_malo_bueno( MY_NOMBRE IN VARCHAR2), my_id_bueno out integer, my email in varchar2) AS algo integer; BEGIN malo(algo, my_nombre); SELECT sec_bueno.NEXTVAL INTO my_id_bueno FROM DUAL; INSERT INTO bueno VALUES(MY_ID_bueno, algo, my_email); END; /