joserome / BaseDatos2-joserome

tareas y ejercicios del curso de BaseDatos2
0 stars 0 forks source link

reto libros #3

Open joserome opened 9 years ago

joserome commented 9 years ago

@daton profesor este es mi codigo pero tengo problemas para compilarlo

CREATE TABLE libros ( book_id INTEGER, isbn VARCHAR2(13), titulo VARCHAR2(200), resumen VARCHAR2(2000), autor VARCHAR2(200), fecha_publicacion DATE, num_pag NUMBER , constraint pk_book_id primary key (book_id) );

create sequence sec_libros start with 1 increment by 1 nomaxvalue;

create or replace procedure guardar_libros(my_id out integer,my_isbn in varchar2,my_titulo in varchar2,my_resumen in varchar2, my_autor in varchar2,my_fecha_publicacion in date,my_num_pag in number) as

set serveroutput on; begin

select sec_libros.nextval into my_id from dual; insert into libros(book_id,isbn,titulo,resumen,autor,fecha_publicacion,num_pag) values(my_id,my_isbn,my_titulo,my_resumen,my_autor,my_fecha_publicacion,my_num_pag);

end; /

set serveroutput on;

declare valor_id integer; begin guardar_libro(valor_id,'123456','ganadores','la estrategia de los campeones','william h. stein',to_char(fecha_publicacion, 'dd/mm/yyyy') = '01062012');

end; /