proc addbook insert arrays tipos

CREATE OR REPLACE PROCEDURE AddBook(  p_isbn IN BOOKS.ISBN%TYPE
                                    , p_category IN BOOKS.CATEGORY%TYPE := 'Oracle Server'
                                    , p_title IN BOOKS.TITLE%TYPE
                                    , p_numpages IN BOOKS.NUM_PAGES%TYPE
                                    , p_price IN BOOKS.PRICE%TYPE
                                    , p_copyright IN BOOKS.COPYRIGHT%TYPE DEFAULT TO_NUMBER(TO_CHAR(SYSDATE, 'YYYY'))
                                    , p_author1 IN BOOKS.AUTHOR1%TYPE
                                    , p_author2 IN BOOKS.AUTHOR1%TYPE := NULL
                                    , p_author3 IN BOOKS.AUTHOR1%TYPE := NULL) IS
BEGIN
  INSERT INTO BOOKS(isbn, category, title, num_pages, price, copyright, author1, author2, author3)
  VALUES (p_isbn, p_category, p_title, p_num_pages, p_price, p_copyright, p_author1, p_author2, p_author2);
END;
/

BEGIN
  AddBook('0000000000', 'Oracle Basic', 'A Really Nifty Book', 500, 34.99, 2004, 1);
END;
/

BEGIN
  AddBook(  p_isbn => '000000000'
          , p_category => 'Oracle Basics'
          , p_title => 'A Really Nifty Book'
          , p_numpages => 500
          , p_price => 34.99
          , p_copyright => 2004
          , p_author1 => 1);
END;
/

BEGIN
  AddBook(  p_isbn => '000000000'
          , p_title => 'A Really Nifty Book'
          , p_numpages => 500
          , p_price => 34.99
          , p_author1 => 1);
END;
/