ZAD 1


set serveroutput on;
CREATE OR REPLACE PROCEDURE Sprawdz_Marke
IS
V_Nazwa Marki.nazwa%TYPE;

BEGIN
SELECT M.Nazwa INTO V_Nazwa
FROM eb.Samochody S, eb.Modele N, eb.Marki M
WHERE S.IdModelu = N.IdModelu
AND N.IdMarki = M.IdMarki
GROUP BY M.IdMarki, M.Nazwa
HAVING COUNT(*) = 3;

DBMS_OUTPUT.PUT_LINE('Marka ktorej jest tylko jeden samochod: '|| V_Nazwa);
END;

EXECUTE Sprawdz_Marke;

ZAD 2


CREATE TABLE Pom5_2
(
Pole_1 VARCHAR(15),
Pole_2 NUMBER(2)
)

ZAD 3


set serveroutput on;
CREATE OR REPLACE PROCEDURE Liczba_Samochodow
(a_nazwa eb.Modele.Nazwa%TYPE)
IS
V_Liczba Number(2);

BEGIN
SELECT Count(*) INTO V_Liczba
FROM eb.Samochody S, eb.Modele M
WHERE S.IdModelu = M.IdModelu
AND M.Nazwa = a_nazwa;

INSERT INTO Pom5_2 VALUES (a_nazwa, V_Liczba);

END;

EXECUTE Liczba_Samochodow('Honda Civic');

ZAD 4

CREATE OR REPLACE FUNCTION stanowisko
RETURN VARCHAR2
IS
V_Nazwa Stanowiska.nazwa%TYPE;
BEGIN
SELECT S.nazwa INTO V_Nazwa
FROM eb.Pracownicy P, eb.Stanowiska S
WHERE P.IdStanowiska(+) = S.IdStanowiska AND P.Nazwisko IS NULL;
RETURN V_Nazwa;
END stanowisko;

wywołać to trzeba

ZAD 5

set serveroutput on;
CREATE OR REPLACE function LiczbaSamWl
(IDD eb.WLASCICIELE.IdWlasciciela%TYPE)
RETURN NUMBER
AS
liczba NUMBER(4);
BEGIN
SELECT COUNT(1) INTO liczba
FROM eb.SAMOCHODY
WHERE IdWlasciciela = IDD;
RETURN (liczba);
END;

ZAD 6
?????????????