Oracle 11g - Running PL/SQL-Cursor

Gibt es ein paar Probleme:

• Müssen Sie ein Semikolon nach der cursor-definition (D. H., nach der Abfrage).
• Sie nicht verwenden können bookCursor sowohl als der name des Cursors und wie der name von der Scheibe zu Holen. (Ich merke, dass etwas von Ihrem code verwendet bookCursorRec für das letztere, so werde ich gehen.)
• Die fetch abrufen muss in etwas, das ist in bookCursorRec.
• Müssen Sie ein Semikolon nach dem Aufruf dbms_output.put_line.
• Deine Abfrage falsch ist; es sieht aus wie beide joins cross-Join.

Setzen Sie zusammen, und anpassen der Formatierung und Struktur ein wenig, so dass es etwas mehr "idiomatischen" PL/SQL:

DECLARE
    CURSOR bookcursor IS
    SELECT btname, isbn, pubname, datedestroyed
      FROM booktitle bt
      JOIN publisher p
        ON bt.pid = p.id -- this is just a guess
      JOIN bookcopy bc
        ON bt.bcid = bc.id -- this is just a guess
     WHERE datedestroyed IS NULL
    ;
    bookcursorrec bookcursor%ROWTYPE;
BEGIN
    OPEN bookcursor;
    LOOP
        FETCH bookcursor INTO bookcursorrec;
        EXIT WHEN bookcursor%NOTFOUND;
        dbms_output.put_line( 'ISBN: ' ||bookcursorrec.isbn
                              || ' - Book Name: ' || bookcursorrec.btname
                              || ' - Publisher: ' || bookcursorrec.pubname );
    END LOOP;
    CLOSE bookcursor;
END;
/

Durch die Art und Weise, Oracle-Bezeichner sind meist groß-und Kleinschreibung (Sie sind implizit in Großbuchstaben, es sei denn, Sie wickeln Sie Sie in doppelte Anführungszeichen), also in der Regel Menschen nutzen Bezeichner wie book_cursor_rec und date_destroyed eher als bookCursorRec (= bookcursorrec) und dateDestroyed (= datedestroyed).

InformationsquelleAutor ruakh

Set Serveroutput on
CREATE OR REPLACE A PROCEDURE TO GET_SENRYO_EMP
DECLARE
    CURSOR Senryocursor IS
    SELECT first_name, last_name, full_Name,Gender,DOB,Martialstatus,Nationality,Telephone,Email_id,job,Nationalidentifier,Hire_date
      FROM Senryo;
--Senryocursorrec senryocursor%rowtype;
BEGIN
 OPEN Senryocursor;
LOOP
        FETCH Senryocursor INTO Senryocursorrec;
        EXIT WHEN Senryocursor%NOTFOUND;
        dbms_output.put_line( 'Senryocursor ' ||Senryocursorrec
                              || '- Full_name :' || Senryocursorrec.full_name
                              || ' - Job: ' || Senryocursorrec.Job );
    END LOOP;
    CLOSE Senryocursor;
END;

InformationsquelleAutor Aravind Rajasekaran