CREATE PROCEDURE (P_BOOK_ID INTEGER)
CURSOR C1(L_BOOK_ID INTEGER) IS
SELECT * FROM COPIES WHERE BOOK_ID = L_BOOK_ID;
L_NUM_COPIES NUMBER;
BEGIN
SELECT NO_OF_COPIES INTO L_NUM_COPIES FROM BOOK WHERE BOOK_ID = P_BOOK_ID;
IF L_NUM_COPIES>0
THEN
FOR CUR IN C1(P_BOOK_ID)
LOOP
DBMS_OUTPUT.PUT_LINE(CUR.COPY_NUMBER);
END LOOP;
END;
OR
CREATE PROCEDURE (P_BOOK_ID INTEGER)
CURSOR C1(L_BOOK_ID INTEGER) IS
SELECT B.book_id,
B.shelf_letter,
B.call_number,
B.no_of_copies,
C.copy_id,
C.copy_number
FROM COPIES C,
BOOK B
WHERE C.BOOK_ID = L_BOOK_ID
AND C.BOOK_ID=B.BOOK_ID;
L_NUM_COPIES NUMBER;
BEGIN
FOR CUR IN C1(P_BOOK_ID)
LOOP
DBMS_OUTPUT.PUT_LINE(CUR.book_id);
DBMS_OUTPUT.PUT_LINE(CUR.shelf_letter);
DBMS_OUTPUT.PUT_LINE(CUR.call_number);
DBMS_OUTPUT.PUT_LINE(CUR.no_of_copies);
DBMS_OUTPUT.PUT_LINE(CUR.copy_id);
DBMS_OUTPUT.PUT_LINE(CUR.copy_number);
END LOOP;
END;