library management system using pl sql

[seminar report asees]

library management system using pl sql

declare



bknam char(15);

auth char(15);

tot number(5);

id number(5);

no number(5);

i number(3);



begin



bknam:='&bknam';

auth:='&auth';

tot:=&tot;



insert into book_rec values(bknam,auth,tot,tot);





for i in 1..tot

loop

select MAX(book_id) into no from book_details;



if no is not null then

id:=no+1;

else

id:=1;

end if;



insert into book_details values(id,bknam,null);



end loop;



end;

/





Enter value for bknam: DCD

old 9: bknam:='&bknam';

new 9: bknam:='DCD';

Enter value for auth: Mano

old 10: auth:='&auth';

new 10: auth:='Mano';

Enter value for tot: 3

old 11: tot:=&tot;

new 11: tot:=3;



PL/SQL procedure successfully completed.



SQL> /

Enter value for bknam: OS

old 9: bknam:='&bknam';

new 9: bknam:='OS';

Enter value for auth: Silber

old 10: auth:='&auth';

new 10: auth:='Silber';

Enter value for tot: 2

old 11: tot:=&tot;

new 11: tot:=2;



PL/SQL procedure successfully completed.