CREATE FUNCTION LISTA_DAT_WYPOZYCZEN(imie_klienta VARCHAR) returns VARCHAR AS $$
DECLARE
    v_id_klienta INTEGER;
    response_string VARCHAR(1000);
    v_data_wypozyczenia wypozyczenia.data_wypozyczenia%TYPE;
    counter INTEGER;
BEGIN
    SELECT MAX(id_klienta) INTO v_id_klienta FROM klienci WHERE klienci.imie = imie_klienta;
END;
DECLARE
    wypozyczenia_kursor CURSOR FOR SELECT data_wypozyczenia FROM wypozyczenia WHERE id_klienta = v_id_klienta;
BEGIN
counter :=0
LOOP
    FETCH wypozyczenia_kursor INTO v_data_wypozyczenia;
    EXIT WHEN NOT FOUND;
    counter := counter+1
    response_string := response_string || counter || '. ' || v_data_wypozyczenia || ', ';
END LOOP
CLOSE wypozyczenia_kursor;
RETURN response_string;

EXCEPTION
 WHEN NOT_NULL_VIOLATION THEN
    RAISE NOTICE 'nie znaleziono uzytkownika o podanym imieniu'
    RETURN ''
END;
$$ LANGUAGE PLPGSQL;