Oracle > print out more than 255 chars

 CREATE OR REPLACE PROCEDURE ausgabe (text IN VARCHAR2?)
   IS
	  n NUMBER;
	  m NUMBER;
	  i NUMBER;
	  j NUMBER;
   BEGIN
	  n := length(text);
	  IF n < 256 THEN
		 dbms_output.put_line(text);
	  ELSE
		 m := trunc(n/255);
		 FOR i IN 0 .. m
			LOOP
			   j := i*255+1;
			   dbms_output.put_line(substr(text,j,255));
			END LOOP;
	  END IF;
 END ausgabe;

Leave a Reply