";
$codigo_libro=$id_libro;
//informacion libro y editorial
$selec1="select t2.isbn, t2.titulo_libro, t2.idioma,t2.año, t4.nombre_editorial, t4.nacionalidad_editorial from libro t2,editorial_biblio t4 where t2.codigo_edit=t4.codigo_edit and t2.codigo =$codigo_libro";
$tabla_libro=guardar_select_tabla($conexion,$selec1,$num2);
//ejemplares prestado
$selec3="select t1.id_ejemplar, t1.sujeto_a_prestamo, t1.emplazamiento, t2.f_dev from ejemplar t1,prestamo t2 where t1.codigo_ejemplar=t2.codigo_ejemplar and t1.codigo =$codigo_libro";
$tabla_ej_prest=guardar_select_tabla($conexion,$selec3,$num_ej_prest);
//ejemplares no prestado
$selec4="select t1.id_ejemplar, t1.sujeto_a_prestamo, t1.emplazamiento from ejemplar t1 where t1.codigo =$codigo_libro except select t1.id_ejemplar, t1.sujeto_a_prestamo, t1.emplazamiento from ejemplar t1,prestamo t2 where t1.codigo_ejemplar=t2.codigo_ejemplar and t1.codigo =$codigo_libro ";
$tabla_ej_no_prest=guardar_select_tabla($conexion,$selec4,$num_ej_no_prest);
//autores
$selec5="select t2.nombre_autor, t2.nacionalidad from autor t2,escrito t3 where t2.id_autor=t3.id_autor and t3.codigo =$codigo_libro";
$tabla_autores=guardar_select_tabla($conexion,$selec5,$num_autor);
?>
