create procedure add_book_procedures (
s_bookname in book_tb.a1%type,  --书名
s_penster in book_tb.a2%type,  --作者
s_book_concern in book_tb.a3%type, --出版社
n_book_type in book_tb.a4%type,  --类型
n_possession in book_tb.a5%type,  --所属部门
d_printdate in book_tb.a6%type,  --出版日期
n_price in book_tb.a7%type, --价格
s_ISBN in book_tb.a8%type,  --ISBN号
s_photo in book_tb.a9%type,  --图片
s_synopsis in book_tb.a10%type,  内容简介
s_booker in book_tb.a12%type  --登记人
)
as
n_no book_tb.a0%type;  --编号
begin
select max(a0)+1 into n_no from book_tb;
insert into book_tb (a0,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12,a13) values (n_no,s_bookname,s_penster,s_book_concern,n_book_type,n_possession,d_printdate,n_price,s_ISBN,s_photo,s_synopsis,1,s_booker,sysdate);
end;
/