VERTICALLY SHOW STRING VALUE

SELECT SUBSTR (:p_string, ROWNUM, 1)
FROM all_objects
WHERE ROWNUM <= LENGTH (TRIM (:p_string));