fun reverse cadena

//Crea una funcion a la que le pases una cadena y retorne al reves.

CREATE OR REPLACE FUNCTION al_reves (cadena IN VARCHAR2) RETURN VARCHAR2 IS
aux VARCHAR2(100) := cadena;

BEGIN
  SELECT reverse(aux)
  INTO aux
  FROM dual;
  
  DBMS_OUTPUT.PUT_LINE(aux);
END;


/** Para mostrarlo**/

SET SERVEROUTPUT ON
DECLARE
x VARCHAR2(100) := 'pepe mola ';

BEGIN
DBMS_OUTPUT.PUT_LINE(al_reves(x));

END;