[SBD] Kolos PL/SQL

GRA)
    ZAD5A)
BEGIN
FOR iterator IN 1..10 LOOP
DBMS_OUTPUT.put_line(iterator);
END LOOP;
END;

    ZAD5B)
ACCEPT maksimum NUMBER PROMPT 'Podaj max:  '
DECLARE
BEGIN
FOR iterator IN 1..&maksimum LOOP
    IF MOD(iterator,2)=0 THEN
        DBMS_OUTPUT.put_line(iterator);
    END IF;
END LOOP;
END;

 ZAD5C)
Nie potrzebujemy, ponieważ możemy dostać się bezpośrednio DO watrtości pobranej od użytkownika zmiennej po referencji

    ZAD6A)
CREATE OR REPLACE PROCEDURE proc1(
    var_empno IN NUMBER
)
IS
result EMP%ROWTYPE;
BEGIN
SELECT * INTO result FROM EMP WHERE empno=var_empno;
IF SQL%FOUND THEN
    DBMS_OUTPUT.put_line('ename: ' || result.ename || ', job: ' || result.job);
ELSE
    DBMS_OUTPUT.put_line('Brak takiego');
END IF;
END;

    ZAD6B)
Kursor niejawny, ponieważ zwraca ON informacje o ostatnim wykonanym poleceniu. Kursory jawne są deklarowane przez programistę i służą DO odczytu zbioru rekordów z bazy danych. My chcemy tylko jeden rekord.
    ZAD6C)
1. Zostanie wypisany błąd 'no data found'. 2. Zostanie zwrócony błąd: "exact fetch returns more than requested number of rows"


GRB)
    ZAD6A)
CREATE OR REPLACE PROCEDURE proc2(
    var_job IN VARCHAR
)
IS
result KLIENCI%ROWTYPE;
CURSOR pierwszy IS
SELECT * FROM EMP WHERE job=var_job;
BEGIN
FOR kl IN pierwszy LOOP
DBMS_OUTPUT.put_line('ename: ' || kl.ename || ', job: ' || kl.job);
END LOOP;
END;

    ZAD6B)
Kursor jawny, ponieważ tylko dzięki niemu możemy pobrać z tabeli więcej wartości niż jedna

    ZAD6C)
Gdy nie bd istniało, TO nic się nie stanie, nie będzie żadnego wyniku. Gdy będzie więcej, wypiszą się na ekranie wszystkie pobrane