Procedura pro obrácení řetězce v PL/SQL

Dvě věci – neměli byste specifikovat velikost datového typu v seznamu parametrů procedury/funkce a nepotřebujete DECLARE klíčové slovo. Zkuste toto:

CREATE OR REPLACE PROCEDURE ReverseOf(input IN varchar2) IS
        rev varchar2(50):='';
BEGIN
        FOR i in reverse 1..length(input) LOOP
                rev := rev||substr(input, i, 1);
        END LOOP;
        dbms_output.put_line(rev);
END;