------LOSUJ WARTOŚĆ--------
CREATE OR REPLACE FUNCTION fn_losuj_wartosc (v_min INTEGER, v_max INTEGER) RETURN INTEGER AS
v_rezultat INTEGER;
BEGIN
SELECT DBMS_RANDOM.VALUE (v_min,v_max) INTO v_rezultat FROM dual;
RETURN v_rezultat;
END;
------LOSUJ PRODUKT-------
CREATE OR REPLACE FUNCTION FN_LOSUJ_PRODUKT RETURN NUMBER AS
v_wylosowany Komiks.id_komiksu%TYPE;
zm1 Komiks.id_komiksu%TYPE;
zm2 Komiks.id_komiksu%TYPE;
BEGIN
SELECT MIN(id_komiksu), MAX(id_komiksu) INTO zm1, zm2 FROM KOMIKS;
SELECT ROUND(DBMS_RANDOM.VALUE (zm1,zm2)) INTO v_wylosowany FROM dual;
RETURN v_wylosowany;
END FN_LOSUJ_PRODUKT;
------LOSUJ KLIENTA-------
CREATE OR REPLACE FUNCTION FN_LOSUJ_KLIENTA RETURN NUMBER AS
v_wylosowany Klient.id_klienta%TYPE;
zm1 Klient.id_klienta%TYPE;
zm2 Klient.id_klienta%TYPE;
BEGIN
SELECT MIN(id_klienta), MAX(id_klienta) INTO zm1, zm2 FROM KLIENT;
SELECT ROUND(DBMS_RANDOM.VALUE (zm1,zm2)) INTO v_wylosowany FROM dual;
RETURN v_wylosowany;
END FN_LOSUJ_KLIENTA;
------LOSUJ DATE----------
CREATE OR REPLACE FUNCTION fn_losuj_date (v_min DATE, v_max DATE) RETURN DATE AS
v_rezultat DATE;
BEGIN
 SELECT TO_DATE(
              TRUNC(
                   DBMS_RANDOM.VALUE(TO_CHAR(v_min,'J')
                                    ,TO_CHAR(v_max,'J')
                                    )
                    ),'J'
               )INTO v_rezultat FROM DUAL;
RETURN v_rezultat;
END;