CREATE OR REPLACE package BOOKSDEL_PKG AS
 
  PROCEDURE  delete_book(IDBOOK NUMBER);
 
end BOOKSDEL_PKG;

CREATE OR REPLACE PACKAGE BODY booksdel_pkg
AS
   PROCEDURE delete_book (idbook NUMBER)
   IS
      CURSOR bk
      IS
         ..
 
   BEGIN
   	.
	.
	.	  
      COMMIT;
   EXCEPTION
     .
     .
     .
   END delete_book;
END booksdel_pkg;